'Russian Babies (F1/MB League)
'By Spike43884
'Originally All Eyes V1.5 - then Russia - then Russian Babies - then Russian Babies Mobilised - Now RBF
'This bot goes into hibernation whilest waiting
'Should reproduce in the face of danger...or food
'Can't grow old
'Dev Info:
'Hibernation Sys - TRUE
'Hunting Sys - AllEyes
'Corpsify - UNKNOWN
'Confusion - TRUE
'Retaliation Type - Babies
'Ageing - No Elders
'Just some free variables
def attack 50
def hibernate 51
def head 52
'Initialisation (EYES)
cond
*.robage 2 <
start
135 .eye1width store
135 .eye2width store
135 .eye3width store
135 .eye4width store
15 .eye5width store
135 .eye6width store
135 .eye7width store
135 .eye8width store
135 .eye9width store
410 .eye1dir store
300 .eye2dir store
190 .eye3dir store
80 .eye4dir store
0 .eye5dir store
-80 .eye6dir store
-190 .eye7dir store
-300 .eye8dir store
-410 .eye9dir store
.aimsx .vloc store
128 .venval store
stop
' Gene 1 Initiate Hibernation (waiting)
cond
*.eye1 0 =
*.eye2 0 = and
*.eye3 0 = and
*.eye4 0 = and
*.eye5 0 = and
*.eye6 0 = and
*.eye7 0 = and
*.eye8 0 = and
*.eye9 0 = and
*.refeye *.myeye = or
*.nrg 3000 < and
*.hibernate 0 = and 'KEY
start
1 .hibernate store
stop
' Gene 1 Search (waiting)
cond
*.eye1 0 =
*.eye2 0 = and
*.eye3 0 = and
*.eye4 0 = and
*.eye5 0 = and
*.eye6 0 = and
*.eye7 0 = and
*.eye8 0 = and
*.eye9 0 = and
*.refeye *.myeye = or
*.nrg 3000 >= and
start
10 rnd .aimdx store
stop
'Gene 2 Food Sighted
'*********************
cond
*.refeye *.myeye !=
*.eyef 0 !=
start
1 .attack store
stop
cond
*.refeye *.myeye =
*.eyef 0 = or
start
0 .attack store
stop
cond
*.eye1 0 >
*.attack 0 =
start
550 .aimdx
0 .hibernate store
stop
cond
*.eye2 0 >
*.attack 0 =
start
405 .aimdx
0 .hibernate store
stop
cond
*.eye3 0 >
*.attack 0 =
start
260 .aimdx
0 .hibernate store
stop
cond
*.eye4 0 >
*.attack 0 =
start
115 .aimdx
0 .hibernate store
stop
cond
*.eye6 0 >
*.attack 0 =
start
115 .aimsx
0 .hibernate store
stop
cond
*.eye7 0 >
*.attack 0 =
start
260 .aimsx
0 .hibernate store
stop
cond
*.eye8 0 >
*.attack 0 =
start
405 .aimsx
0 .hibernate store
stop
cond
*.eye9 0 >
*.attack 0 =
start
550 .aimsx
0 .hibernate store
stop
'*********************
' Gene 3 Chase Food
cond
*.eye5 0 >
*.refeye *.myeye !=
start
*.refveldx .dx store
*.refvelup 30 add .up store
stop
' Gene 4 Long Range Food Handling
cond
*.eye5 50 >
*.refeye *.myeye !=
*.refeye 0 >
*.hibernate 0 =
start
1 rnd 2 mult 3 sub .shoot store
216 .shootval store
stop
'Gene 5 Blind Retaliation
cond
*.hit 1 =
*.eye5 40 > or
*.refeye *.myeye !=
start
*.shang 90 sub .aimdx
10 .repro store
10 .repro store
stop
' Gene 6 Eat Food
cond
*.eye5 50 >
*.refeye *.myeye !=
*.hibernate 0 =
*.refeye 0 =
*.robage 0 !=
start
-1 .shoot store
*.refvelup .up store
stop
' Gene 7 Venom
cond
*.hibernate 0 =
*.venom 50 <
start
10 .strvenom store
stop
' Gene 8 Avoiding Family
cond
*.eye5 0 =
*.refeye *.myeye = or
*.hibernate 0 =
start
314 rnd .aimdx store
stop
' Gene 9 Duplicate
cond
*.robage 0 !=
*.numties 0 =
*.head 0 =
start
1 .head store
stop
' Gene 10 Reproduce
cond
*.nrg 15000 >
*.robage 3 > and
start
15 .repro store
stop
' Gene 11 Reproduce for MB league
cond
*.numties 0 =
*.robage 0 !=
start
10 .repro store
stop
'*-*-*-*-*-*-*-*-*-*-*-*
' Core Fat Functions
body
cond
*.nrg 1200 >
*.nrg *.body 100 add >
start
100 .strbody store
stop
cond
*.nrg 1000 <
start
100 .fdbody store
stop
' tie to parent
cond
*.robage 0 =
start
.tie inc
stop
' If MB Stuff
cond
*.multi 1 = or
*.hibernate 0 =
start
50 .sharenrg store
500 .maxlen
60 .stifftie store
stop
' MB communication
cond
*.eye5 0 !=
*.head 1 =
start
*.eye5 .tout1 store
*.aimdx .tout2 store
stop
cond
*.tin1 0 !=
*.head 0 =
start
*.tin2 .aimdx store
stop
' Waste Disposal
cond
*.waste 100 >
*.refeye 0 =
*.reftie 0 =
start
*.waste .shootval store
-4 .shoot store
stop
'I want to stay young, FOREVER!
cond
*.pwaste 1000 >
start
90 .repro store
10 .tie store
10 .tienum
-1 .tieloc
1000 .tieval store
end
1 Major change from russian babies mobilised, is an extra gene...These babies, stay babies...For certain, they create a young clone of themselves if they become an pensioner...And pump all their energy into it, I haven't actually seen the process happen, because of how successful they are and how much they reproduce...They should work on even bad processors, theyre not quite cancerous (in f1 conditions). Its an anti-pwaste measure, and they certainly became younger on average, as I checked the age graph, when they weren't being hunted by anything else, and it was lower than the average age of the vegetables, and most of the vegetables were being smashed by them...It was quite tremendous actually the effect it had. Im entertained by it