home *** CD-ROM | disk | FTP | other *** search
/ Más de 2,500 Juegos / CD1.iso / ZIPDAT / 0951 / 0951.ZIP / SDUCK.AT2 < prev    next >
Encoding:
Text File  |  1997-02-26  |  612 b   |  30 lines
  1. ;
  2. ; Sitting-Duck robot.  Use this one as a non-moving target.
  3. ; (it just spins in place)
  4. ;
  5. ; Sample robot - by Ed T. Toton III 02/04/97
  6.  
  7. #def turn_rate
  8.  
  9.      mov        turn_rate,      8
  10.  
  11.  
  12. :1
  13.  
  14.      ipo        p_rand, ax              ; get random number
  15.      and        ax,     255             ; fix it to 0 to 255
  16.      opo        p_abs_turret,     ax    ; aim turret
  17.  
  18.      opo        14,     turn_rate
  19.  
  20.      jmp        1
  21.  
  22.  
  23. #END
  24.  
  25.   02/17/97
  26.  
  27.   You can put whatever you want after the program by using the #END compiler
  28. directive, since the compiler stops compiling at that point.
  29.  
  30.