Author Topic: Hojo bot (F2)(Henk)-13.06.04  (Read 2346 times)

Offline Jez

  • Bot Overlord
  • ****
  • Posts: 788
    • View Profile
Hojo bot (F2)(Henk)-13.06.04
« on: December 05, 2006, 01:48:39 PM »
Code: [Select]
'A bot for DB 2.3
'Henk

' Hojo bot
' for DB 2.3
' By Henk

' repro
cond
*.nrg 6000 >
*.robage 40 >
start
50 .repro store
stop

' move
cond
*.vel *.maxvel <
start
15 .up store
stop

' edge
cond
*.edge 0 !=
*.eye5 0 =
start
314 .aimdx store
stop

' follow
cond
*.eye1 *.eye9 >
*.eye1 *.eye5 >
*.numties 0 =
start
-128 .aimdx store
4 .sx store
stop

cond
*.eye9 *.eye1 >
*.eye9 *.eye5 >
*.numties 0 =
start
128 .aimdx store
4 .dx store
stop

cond
*.eye4 *.eye6 >
*.eye4 *.eye5 >
*.numties 0 =
start
-26 .aimdx store
stop

cond
*.eye6 *.eye4 >
*.eye6 *.eye5 >
*.numties 0 =
start
26 .aimdx store
stop

' avoid friends
cond
*.eye5 35 >
*.memval 230 =
*.robage 1 >
start
314 .aimsx store
stop

' I want 2 c
cond
*.eye5 20 >
start
41 .memloc store
stop

' eat body points
cond
*.eye5 20 >
*.memval 230 !=
*.vel 0 >
start
0 .backshot store
-6 .shoot store
stop


' convert body points to energy
cond
*.body 3500 >
*.nrg 3100 <
start
10 .fdbody store
stop

' activate aft shooting when some-one is behind me somehow
cond
*.hitdn 0 !=
*.eye5 20 <
start
.backshot inc
-1 .shoot store
stop

cond
*.shdn 0 !=
*.eye5 20 <
start
.backshot inc
-1 .shoot store
stop

' initiative genes
cond
*.robage 0 =
start
.tie inc
41 .memloc store
230 41 store
stop

cond
*.robage 1 =
start
.deltie inc
stop

' make slime
cond
*.slime 90 <
start
100 *.slime sub .mkslime store
stop

' waste management
cond
*.waste 75 >
start
-4 .shoot store
*.waste .shootval store
stop

' Tie stuff
cond
*.numties 0 >
start
*.tiepres .tienum store
-1 .tieloc store
-1000 .tieval store
stop

' using bouyancy for speed
cond
*.aim 157 >
*.aim 471 <
*.rdboy -2000 !=
start
-2000 .setboy store
stop

cond
*.aim 785 <
*.aim 471 >
*.rdboy 0 !=
start
0 .setboy store
stop

cond
*.aim 785 >
*.aim 1099 <
*.rdboy 2000 !=
start
2000 .setboy store
stop

cond
*.aim 1250 %=
*.rdboy 0 !=
start
0 .setboy store
stop
end
« Last Edit: May 09, 2014, 12:22:02 PM by Botsareus »
If you try and take a cat apart to see how it works, the first thing you have in your hands is a non-working cat.
Douglas Adams