'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