Author Topic: E. Diplomaticus Diplo (F2)-01.02.04  (Read 2856 times)

Offline Light

  • Bot Destroyer
  • ***
  • Posts: 245
    • View Profile
E. Diplomaticus Diplo (F2)-01.02.04
« on: October 24, 2005, 07:41:39 PM »
Code: [Select]
'E_Diplomaticus 'Diplo'
'Feb. 2004 Joan
'---------------------

'---------------------
'*40 *41 counter values
'*80 .aimdx value
'---------------------

'----------Setup

cond
*.out1 32 !=
start
32 .out1 store
*.out1 .out2 store
300 .aimdx store
50 80 store
stop

'---Reproduction
cond
*.nrg 10000 >
start
50 .repro store
150 .aimsx store
stop

'------Movement
'--------Rotation
cond
*.eye5 0 =
start
*80 .aimdx store
*80 *41 add
41 store *.out1 .out2 store
stop

'---------Control
cond
*41 1200 >
*.eye5 0 =
start
15 .up store
0 41 store
stop

'---Go away from parthners
cond
*.eye5 0 !=
*.in1 *.out1 =
*.in2 *.out1 =
start
300 .aimdx store
stop

'---Go away from parthners
cond
*.eye1 0 !=
*.in1 *.out1 =
*.in2 *.out1 =
start
15 .dn store
stop

'---Atacs partners while eating
cond
*.eye5 0 !=
*.in2 *.out1 !=
start
10 .up store
-1 .shoot store
stop

'----------Feed
'----------------
cond
*.eye5 0 !=
*.in1 *.out1 !=
start
-1 .shoot store
*.up 5 add .up store
0 40 store
0 41 store
0 .out2 store
stop

'--------Defend
'-----------------
cond
*40 0 <
start
.aimdx .shoot store
300 .shootval store
150 .aimdx store
*40 10 add 40 store
0 .out2 store
stop

'------SideShot
cond
*.shsx 0 !=
start
-80 40 store
stop

'--------------
end
« Last Edit: May 09, 2014, 12:34:21 PM by Botsareus »

Offline PurpleYouko

  • Bot God
  • *****
  • Posts: 2556
    • View Profile
E. Diplomaticus Diplo (F2)(Joan Escala)-01.02.04
« Reply #1 on: October 25, 2005, 09:28:13 AM »
Are you trying to tell me that good old EDD wasn't in the beastiary?  :blink:

Consider me surprised.
« Last Edit: December 14, 2006, 08:53:57 AM by Jez »
There are 10 kinds of people in the world
Those who understand binary.
and those who don't

:D PY :D