home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 2 / goldfish_vol2_cd1.bin / files / dev / lang / struct / speedtests / test3.ace < prev    next >
Text File  |  1993-08-21  |  84b  |  10 lines
  1. a&=0
  2. for z&=1 to 6000000
  3. k%=z& mod 2
  4. if k%=0 then
  5. a&=a&+7
  6. else
  7. a&=a&+15
  8. end if
  9. next
  10.