Author Topic: James 4 (F1)(Jez)-27.07.04  (Read 2804 times)

Offline PurpleYouko

  • Bot God
  • *****
  • Posts: 2556
    • View Profile
James 4 (F1)(Jez)-27.07.04
« on: February 21, 2005, 05:07:33 PM »
Code: [Select]
'James 4
'Made by Jez
' Pretty good Tie feeder

cond
*.eye5 *.eye5 =
start
0 234 store
stop

cond
*.myeye *.refeye =
*.myshoot *.refshoot =
*.myup *.refup =
*.myaimdx *.refaimdx =
*.mydx *.refdx =
'*.myties *.refties =
*.eye5 0 >
start
1 234 store
stop

cond
*.robage 0 =
start
1 1000 rnd 567 store
*567 .tie store
stop

cond
*.robage 1 =
*.numties 0 >
start
*.tiepres .deltie store
stop

cond
*.nrg 2000 >
*.eye5 0 =
start
40 .repro store
stop

cond
*.eye1 *.eye5 >
start
mult 104
stop

cond
*.eye1 *.eye5 >
start
mult -104
stop

cond
*.eye3 *.eye5 >
start
mult 52
stop

cond
*.eye7 *.eye5 >
start
mult -52
stop

cond
*.refeye 0 !=
*.numties 0 =
*.eye5 0 >
*234 1 !=
start
*.nrg 99 div .up store
stop

cond
*.refeye 0 =
'*.numties 0 =
*.eye5 0 >
*234 1 !=
start
*.nrg 99 div 1 add .up store
stop

cond
*.eye5 0 =
start
mult 104
stop

cond
*234 1 =
*.eye5 0 >
start
mult 208
stop

cond
start
.aimdx store
100 *.slime sub .mkslime store
50 *.poison sub .mkpoison store
mult 0
stop

cond
*.refpoison 0 =
*.refeye 0 !=
*.eye5 30 >
*234 1 !=
start
-1 .shoot store
*567 .tie store
stop

cond
*.refpoison 0 =
*.refeye 0 =
*.eye5 30 >
*234 1 !=
start
'-1 .shoot store
*567 .tie store
stop

cond
*.refpoison 0 >
*.eye5 30 >
*234 1 !=
start
505 .shoot store
0 .shootval store
*567 .tie store
stop

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

cond
*.pain 900 >
start
*.tiepres .deltie store
stop

end
« Last Edit: May 07, 2014, 12:47:47 PM by Botsareus »
There are 10 kinds of people in the world
Those who understand binary.
and those who don't

:D PY :D