Author Topic: C. Ancestralis (F2)(Carlo)-DBv2.1 (04-12-2006)  (Read 2558 times)

Offline Jez

  • Bot Overlord
  • ****
  • Posts: 788
    • View Profile
C. Ancestralis (F2)(Carlo)-DBv2.1 (04-12-2006)
« on: December 04, 2006, 08:54:52 AM »
Code: [Select]
' Comisia Ancestralis
'
' One of the first robots,
' many others evolved from it.
' Very unefficient.

cond
  *40
  29
  >
start
  0
  40
  store
stop

cond
start
  1
  .aimdx
  store
stop

cond
  *.eye6
  0
  >
start
  15
  .aimdx
  store
stop

cond
  *.eye7
  0
  >
start
  15
  .aimdx
  store
stop

cond
  *.eye8
  0
  >
start
  15
  .aimdx
  store
stop

cond
  *.eye9
  0
  >
start
  15
  .aimdx
  store
stop

cond
  *.shdx
  0
  >
start
  15
  .aimsx
  store
stop

cond
  *.vel
  0
  !=
  *.eye3
  0
  >
start
  15
  .aimsx
  store
stop

cond
  *.eye2
  0
  >
start
  15
  .aimsx
  store
stop

cond
  *.eye1
 -1
  >
start
  15
  .aimsx
  store
stop

cond
  *.eye5
 -1
  >
  *.refshoot
  0
  =
start
 -1
  .shoot
  store
  9
  .shootval
  store
  5
  .up
  store
stop

cond
  *.eye5
  0
  >
  *.refshoot
  0
  >
start
  5
  .dn
  store
stop

cond
  *.nrg
  10000
  >
start
  314
  .aimdx
  store
  40
  .repro
  store
stop

cond
  *.vel
  5
  <
start
  100
  .aimdx
  store
stop
end
« Last Edit: May 09, 2014, 12:25:46 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