home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware 1 2 the Maxx
/
sw_1.zip
/
sw_1
/
GAMES
/
T_ROBS20.ZIP
/
KILL1.TR
< prev
next >
Wrap
Text File
|
1991-11-13
|
574b
|
56 lines
head 0
move 100
setshift 180
burn-on
:1
if enemy fire
if y>70 goto 1
setshift 90
angle 5
:10
head 90
move 100
:20
if x<910 if enemy gosub 49
if x<960 goto 20
head 180
move 100
:30
if y<910 if enemy gosub 49
if y<960 goto 30
head 270
move 100
:40
if x>90 if enemy gosub 49
if x>40 goto 40
head 0
move 100
:50
if y>90 if enemy gosub 49
if y>40 goto 50
goto 10
:49
lfire
setshift 81
sfire
setshift 0
if enemy gosub 99
setshift 90
return
:99
move 0
sfire
if enemy goto 99
return
; Jeremy's wonderful BOT.