Bots and Simulations > F2 bots

C. Discernens (F2)(Carlo)-DBv2.1 2002

(1/1)

PurpleYouko:

--- Code: ---' Comisia Discernens
' Robot evolved by Carlo
' very primitive these days
'
' Robot evolved in presence of walls.
' It's able to  tell them from food,
' therefore it don't attacks them.


cond
  *40
  25
  >
start
  0
  40
  store
stop

cond
  *.shdn
  27
  >
start
  0
  .eye1
  store
stop

cond
  *.hitdx
 -1
  !=
  *.hitdn
  26
  <
  *.eye3
  26
  >
  *.eye5
  24
  <
  *.hitdn
  26
  >
start
  0
  .shsx
  store
stop

cond
  *.dn
  0
  !=
  *.dn
  0
  !=
start
  1
  .aimdx
  store
stop

cond
  *.eye8
  0
  %=
start
  14
  .shootval
  store
stop

cond
  *.eye7
  0
  !=
  *.eye7
  0
  !=
start
  15
  .aimdx
  store
stop

cond
  *.eye9
  1
  >
start
  13
  .shoot
  store
stop

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

cond
  *.pain
  0
  !=
  *.refdx
  0
  %=
  *.refaimsx
  0
  >
start
  17
  .eye8
  store
stop

cond
  *.eye2
 -1
  <
start
  15
  .aimsx
  store
stop

cond
  *.eye2
  0
  <
  *.eye2
  1
  <
start
  15
  .nrg
  store
stop

cond
  *.eye2
  0
  <
  *.eye2
  1
  <
start
  15
  .nrg
  store
stop

cond
  *.eye1
 -3
  >
  *.aimsx
 -1
  >
  *.eye1
 -3
  >
  *.eye1
 -1
  >
start
  13
  .aimsx
  store
stop

cond
  *.refaimdx
  0
  !=
  *.refaimdx
  0
  !=
  *.refaimdx
  0
  !=
  *.refaimdx
  0
  !=
start
 -1
  .shoot
  store
  8
  .shootval
  store
  10
  .up
  store
stop

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

cond
  *.vel
  5
  <
  *.refdx
  5
  <
  *.vel
  5
  <
  *.refdx
  5
  <
start
  100
  *.hitup
  store
  .aimdx
  store
stop

cond
  *.vel
  5
  <
  *.refdx
  5
  <
  *.vel
  5
  <
  *.refdx
  5
  <
start
  100
  *.hitup
  store
  .aimdx
  store
stop
end
--- End code ---

Navigation

[0] Message Index