Author Topic: I. Venia (F2)(Jeremiah)-11.08.03  (Read 2373 times)

Offline Jez

  • Bot Overlord
  • ****
  • Posts: 788
    • View Profile
I. Venia (F2)(Jeremiah)-11.08.03
« on: December 02, 2006, 03:21:09 AM »
Code: [Select]
'11.08.03
'Topic: infinitus venia - the new top bot 
'Jeremiah

' infinitus venia
' "infinite forgiveness"
'
' with secret weapon, "leaching"
'
' jeremiah martell
' aug 11, 2003
'
' <a href="http://inlovewithGod.com" target="_blank">http://inlovewithGod.com</a>


'******************
'* SETUP *
'******************

cond
*40
0
=
start
1
40
store
0
50
store
0
60
store
314
.aimsx
store
10
.up
store
stop

'******************
'* REPRODUCTION *
'******************

cond
*.nrg
15000
>
start
50
.repro
store
314
.aimdx
store
stop

'******************
'* AIM *
'******************

cond
*.eye4
*.eye5
>
start
40
.aimsx
store
stop

cond
*.eye1
*.eye5
>
start
80
.aimsx
store
stop

cond
*.eye6
*.eye5
>
start
40
.aimdx
store
stop

cond
*.eye9
*.eye5
>
start
80
.aimdx
store
stop

'******************
'* VEGE? *
'******************

cond
start
0
60
store
stop

cond
*.refshoot
0
=
*.refup
0
=
start
1
60
store
stop

cond
*.refdn
0
=
start
1
60
store
stop

cond
*.refup
0
=
start
1
60
store
stop

'******************
'* FIRE *
'******************

cond
*.eye5
0
>
*60
0
=
start
20
.up
store
stop

cond
*.eye5
0
>
*60
0
>
start
5
.up
store
-1
.shoot
store
stop


cond
*50
2
>
start
0
50
store
stop

cond
*50
1
>
start
50
inc
-1
.shoot
store
stop

cond
*50
0
>
*60
0
=
start
50
inc
-2
.shootval
store
.shoot
.shoot
store
stop

cond
*.eye5
0
>
*50
0
=
*60
0
=
start
50
inc
1000
.shootval
store
.shootval
.shoot
store
stop


'******************
'* SEARCH *
'******************

cond
*.eye1
0
=
*.eye3
0
=
*.eye5
0
=
*.eye7
0
=
*.eye9
0
=
start
300
.aimsx
store
stop

'***************************
'* TRY NOT TO KILL FRIENDS *
'***************************

cond
*.eye5
0
>
*.refup
3
=
*.refdn
0
=
*.refsx
0
=
*.refdx
0
=
*.refnrg
*.nrg
>
start
0
.shoot
store
314
.aimdx
store
0
50
store
stop

cond
*.eye5
0
>
*.refup
3
=
*.refdn
0
=
*.refsx
0
=
*.refdx
0
=
*.refnrg
*.nrg
<
start
0
.shoot
store
314
.aimsx
store
0
50
store
stop

end
« Last Edit: May 09, 2014, 12:28:25 PM by Botsareus »
If you try and take a cat apart to see how it works, the first thing you have in your hands is a non-working cat.
Douglas Adams