Author Topic: Yojimbo(IBB)(MacadamiaNuts)-25.10.14  (Read 3293 times)

Offline MacadamiaNuts

  • Bot Destroyer
  • ***
  • Posts: 273
    • View Profile
Yojimbo(IBB)(MacadamiaNuts)-25.10.14
« on: October 25, 2014, 01:47:03 PM »
Not a very competitive bot, just an attempt to amusing behaviour.

Code: [Select]
'name: Yojimbo
'description: Baka!

@
def red 213
def green 0
def blue 0

cond
start
*.tiepres .tienum store
.sharenrg .tieloc store
1 .tieval store
99 .sharenrg store
99 .shareshell store
99 .shareslime store
*.myeye 14 store
stop

cond
start
0 .in1 store
*.thisgene .mkvirus *.vtimer sgn 1 sub abs mult store
.vshoot *.vtimer 1 sub sgn 1 sub abs mult inc
16000 16000 angle .setaim *14 *.myeye sub sgn abs mult store
10 .up store
*13 .delgene *.thisgene *13 sub abs 0 floor mult store
*.thisgene 13 store
0 .shoot *14 *.myeye sub sgn abs mult store
1 .sharenrg *14 *.myeye sub sgn abs mult store
1000 .tieval *14 *.myeye sub sgn abs mult store
100 .rmchlr store
stop

cond
*.in1 98 =
start
*.in2 *.in3 angle .setaim store
*.in2 .out2 store
*.in3 .out3 store
stop

cond
start
*.totalmyspecies 25 add *971 24 mult add 25 div 971 store
stop

cond
*971 0 =
start
250 971 store
stop

cond
*.robage 4000 mod 500 <
*.xpos 16000 sub abs
*.ypos 16000 sub abs add 4000 >
*.eye5 0 =
start
460 .eye9width store
520 .eye9dir store
460 .eye1width store
-520 .eye1dir store
16000 16000 angle .setaim store
stop

cond
*.eye5 0 =
start
135
*.eye6 *.eye7 add *.eye8 add *.eye9 add
*.eye4 *.eye3 add *.eye2 add *.eye1 add sub sgn mult
.aimdx store
stop

cond
*.eye5 5 >
*.refeye *.myeye !=
start
*.refxpos .out2 store
*.refypos .out3 store
-6 .shoot store
1 .tie store
.sharenrg .vloc store
1 .venval store
10 .mkpoison store
-3 .shoot 1 rnd mult store
*.refxpos *.refypos angle .setaim store
stop

cond
*.eye5 5 >
*.refeye *.myeye !=
4 rnd 1 =
start
.fdbody .shoot store
100 .shotval store
stop

cond
*.refeye *.myeye =
start
314 .aimsx store
0 .tie store
stop

cond
*.eye5 40 <
start
100 rnd 50 sub .aimsx store
*.maxvel .up store
stop

cond
*.eye5 80 >
start
0 .up store
stop

cond
*.nrg 1000 >
*.totalmyspecies *971 <
start
50 .repro store
stop

cond
*.nrg 30 >
*.body 6 mult *.nrg <
start
10 .strbody store
stop

cond
*.body 2 >
*.body 5 mult *.nrg >
start
1 .fdbody store
stop

cond
*.hit 0 >
start
50 .mkshell store
.shoot .ploc store
-2 .pval store
50 .strpoison store
*.shang 614 add .setaim store
stop
« Last Edit: October 25, 2014, 01:56:31 PM by MacadamiaNuts »
Sometimes you win, and sometimes you lose...

Offline Botsareus

  • Society makes it all backwards - there is a good reason for that
  • Moderator
  • Bot God
  • *****
  • Posts: 4483
    • View Profile
Re: Yojimbo(IBB)(MacadamiaNuts)-25.10.14
« Reply #1 on: October 26, 2014, 11:03:03 AM »
lol, IBB, good one.