'Topic: Interesting Group Behaviour
'K0zm0
'
'Gang Bot
'Made by k0zm0
'1.oct.2004
'Made for DBv2.33beta
cond
*.out1 0 =
start
*.xpos .out1 store
stop
cond
*.out2 0 =
start
*.ypos .out2 store
stop
cond
*.refeye *.myeye !=
*.eye5 0 >
*.kills 0 >
start
*.eye4 *.eye6 sub .aimsx store
stop
cond
*.nrg 6000 >
start
50 .repro store
stop
cond
*.nrg 500 <
start
6000 rnd 6000 rnd angle .setaim store
stop
cond
*.eye5 30 >
*.refeye *.myeye !=
start
-1 .shoot store
stop
cond
*.nrg 2000 >
*.eye5 0 >
*.refeye *.myeye =
*.out1 *.in1 !=
start
*.in1 .out1 store
stop
cond
*.nrg 2000 >
*.eye5 0 >
*.refeye *.myeye =
*.out2 *.in2 !=
start
*.in2 .out2 store
stop
cond
*.vel 10 <
start
1 .up store
stop
cond
*.out1 *.xpos !%=
*.out2 *.ypos !%=
start
*.out1 *.out2 angle .setaim store
stop
cond
*.eye5 0 >
*.refeye *.myeye =
*.out1 *.in1 =
*.out2 *.in2 =
*.out1 *.xpos %=
*.out2 *.ypos %=
start
*.refaim .setaim store
stop
end