Author Topic: Caecus Canis(F2)(CommanderKeen)(12-01-2008)  (Read 2597 times)

Offline Commander Keen

  • Bot Builder
  • **
  • Posts: 91
    • View Profile
Caecus Canis(F2)(CommanderKeen)(12-01-2008)
« on: January 11, 2008, 06:16:00 PM »
Basically Oculus Infinitus minus all the eys and with a few extra random things. I called it Blind Dog because it's as close to being blind as you can get without being blind. I should have called Profero Victoria (Lone Victory) Caecus Canis (Blind Dog) but for some reason they're named this way round.
Code: [Select]
cond
start
20 rnd 10 sub .dx store
20 rnd 10 sub .up store
stop

cond
*.eye5width 1200 !=
start
1200 .eye5width store
stop

cond
*.eye5 90 >
*.nrg 2000 >
start
256 .shootval store
stop

cond
*.refeye *.myeye !=
*.eye5 20 >
start
-6 .shoot store
991 inc
stop

'MWAHAHAHAA!
cond
-6 *.shoot =
*991 4 >=
start
0 991 store
.mkslime .shoot store
32000 .shootval store
stop

'MWAHAHAHAA! v2
cond
-6 *.shoot =
*991 3 =
start
.eye5dir .shoot store
628 .shootval store
stop

cond
*.nrg 2000 >
*.body 2000 <
start
*.nrg 2000 sub 10 div .strbody store
stop

cond
*.nrg 2000 >
*.body 1000 >
start
50 .repro store
100 rnd 50 sub .dx store
100 rnd 50 sub .up store
stop

cond
*.nrg 2000 <
*.body 50 >
start
*.body 20 sub .fdbody store
stop

cond
*.waste 100 >
start
*.waste .shootval .store
-4 .shoot store
stop

cond
*.eye5 0 !=
start
*.refxpos *.refypos angle 30 rnd 15 sub add .setaim store
stop

cond
*.myeye *.refeye !=
*.eye5 0 !=
start
100 *.eye5 sub .up store
stop

cond
*.myeye *.refeye !=
*.eye5 80 >
start
*.velsx .dx store
*.velup .dn store
stop


cond
*.myeye *.refeye =
*.eye5 0 !=
start
*.refvelsx .dx store
*.refveldn .up store
stop

cond
*.vel 75 >
start
*.velsx .dx store
*.veldn .up store
stop
« Last Edit: May 27, 2011, 07:23:01 PM by Panda »