home *** CD-ROM | disk | FTP | other *** search
/ Más de 2,500 Juegos / CD1.iso / ZIPDAT / 0951 / 0951.ZIP / TRACON.AT2 < prev   
Encoding:
Text File  |  1997-02-24  |  852 b   |  25 lines
  1. ;
  2. ; TRACON.  Use this one as a non-moving target.
  3. ; (Unlike SDUCK, this one actually shoots back!)
  4. ; Be careful, once locked on a non-moving target,
  5. ; this guys can really dish out the damage.
  6. ;
  7. ; Sample robot - by Ed T. Toton III 02/24/97
  8.  
  9. #MSG Where are you?
  10.  
  11.         opo     17,     0       ; Scan-arc = 0 (just a line)
  12. :1
  13.         opo     12,     1       ; Turn 1 degree.
  14. :2
  15.         ipo     7,      ax      ; Scan
  16.         cmp     ax,     1500    ; Find anything?
  17.         jls     3               ; If so, shoot!
  18.         jmp     1               ; If not, continue scans.
  19. :3
  20.         ipo     2,      ax      ; check heat
  21.         cmp     ax,     250     ; hotter than 250?
  22.         jgr     2               ; if so, forget target, continue scan.
  23.         opo     15,     0       ; Fire!
  24.         jmp     2               ; Scan again.
  25.