Author Topic: A few useful hunting parts  (Read 406 times)

Offline spike43884

  • Bot Overlord
  • ****
  • Posts: 656
    • View Profile
    • OurIllogicalWorld Blog
A few useful hunting parts
« on: November 13, 2014, 04:16:20 PM »
Corpsify - This is where a bot will start hunting instantly, but will do this system to quickly turn the other bot into a corpse (if corpse enabled)
Code: [Select]
'Gene 3 Tie to food
cond
*.eye5 30 >
*.refeye *.myeye !=
*.numties 3 <
*.robage 1 >
start
1 .tie store
 *.refvelup .up store
stop


' Gene 2 Eat Food
cond
*.eye5 50 >
*.refeye *.myeye !=
start
-1 .shoot store
 *.refvelup .up store
stop




'Gene 4 Feeding through tie
cond
*.numties 0 >
start
-1 .tieloc store
-1000 .tieval store
*.tiepres .tienum store
stop

'Jelly Hopping' hunting method (By me again :D)
Code: [Select]
'********************
'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
stop
'********************

'********************
'Gene 1 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
stop

cond
*.eye2 0 >
*.attack 0 =
start
405 .aimdx
stop

cond
*.eye3 0 >
*.attack 0 =
start
260 .aimdx
stop

cond
*.eye4 0 >
*.attack 0 =
start
115 .aimdx
stop

cond
*.eye6 0 >
*.attack 0 =
start
115 .aimsx
stop

cond
*.eye7 0 >
*.attack 0 =
start
260 .aimsx
stop

cond
*.eye8 0 >
*.attack 0 =
start
405 .aimsx
stop

cond
*.eye9 0 >
*.attack 0 =
start
550 .aimsx
stop
'********************

A nasty poison
Code: [Select]
cond
 *.robage 0 =
start
 2 rnd 498 mult 491 sub 1 floor .ploc store
 0 *.ploc .eye5 sub sgn 1 add mult
 -50 *.ploc .up sub sgn -1 mult 1 add mult add
 -2 *.ploc .shoot sub sgn abs -1 mult 1 add mult add
 .pval store
stop

Autism can allow so much joy, and at the same time sadness to be seen. Our world is weird, and full of contradiction everywhere, yet somehow at moments seems to come together, and make near perfect sense.