home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware 1 2 the Maxx
/
sw_1.zip
/
sw_1
/
GAMES
/
T_ROBS20.ZIP
/
ROBOT2.TR
< prev
next >
Wrap
Text File
|
1991-11-13
|
580b
|
57 lines
; My wierd robot...
Range 600
shift 0
angle 9
:1
move 0
turn 19
if enemy goto 1000
goto 1
:1000
move 100
if enemy goto 2000
goto 1
:2000
lfire
if enemy goto 2000
goto 3000
:3000
move 0
if x<50 goto 4000
if x>950 goto 5000
if y>950 goto 6000
if y<50 goto 7000
goto 1
:4000
head 90
move 100
if x<100 goto 4000
goto 3000
:5000
head 270
move 100
if x>900 goto 5000
goto 3000
:6000
head 0
move 100
if y>900 goto 6000
goto 3000
:7000
head 180
move 100
if y<100 goto 7000
goto 3000
; END of this weird robot.