home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d7xx / d743 / turbodex.lha / TurboDEX / ExampleSources / Speed.dex < prev    next >
Text File  |  1992-10-11  |  359b  |  12 lines
  1. /* speedtest: 10.000.000 loops in 16 secs */
  2.  
  3. PROC main()
  4.   DEF a:REGINT
  5.   WRITE 'Now i\am doing 10.000.000 loops in multitasking with pri = 0\n'
  6.   DOWN a,10000000
  7.   ENDDOWN
  8.   WRITE '... and now i\am ready. About 16 secs on a 7Mhz 68000\n\n'
  9.   WRITE 'Only *ONE* higher programming language can reach this speed\n'
  10.   WRITE 'TurboDEX. What else? :-)\n'
  11. ENDPROC
  12.