Difference between revisions of "Humilis"

From WikiManual
Jump to: navigation, search
m (moded repro turning method and waste)
Line 20: Line 20:
 
  'manage body
 
  'manage body
 
  cond
 
  cond
  *.body 10 div
+
  *.body 10 mult
 
  *.nrg !%=
 
  *.nrg !%=
 
  start
 
  start
  *.body 10 div *.nrg sub dup
+
  *.body 10 mult *.nrg sub dup
 
  'difference between energy stored in body and in nrg
 
  'difference between energy stored in body and in nrg
 
  0 floor .fdbody store  
 
  0 floor .fdbody store  
 
  -1 mult 0 floor .strbody store
 
  -1 mult 0 floor .strbody store
 +
'if you feed and str the same it'll zero both effects and waste nrg
 +
'I'll check on fixing it up latter
 
  stop
 
  stop
 
   
 
   

Revision as of 03:20, 9 November 2005

Click the discussion tab above to discuss the code.
added user feedback there. ~griz~



use NewMove

'Humilis

'remove waste
cond
*.waste 100 >
start
'This shoots a particle of waste equal to a bot's current waste level
-4 .shoot store
*.waste .shootval store
stop

'manage body
cond
*.body 10 mult
*.nrg !%=
start
*.body 10 mult *.nrg sub dup
'difference between energy stored in body and in nrg
0 floor .fdbody store 
-1 mult 0 floor .strbody store
'if you feed and str the same it'll zero both effects and waste nrg
'I'll check on fixing it up latter 
stop

cond
start
'Naval Cord Removal
.tie *.robage sgn 1 sub -1 mult mult
.deltie *.robage 1 sub sgn 1 sub -1 mult mult
add inc
'this should do the trick to allow both tie and deltie to use same inc
stop

cond
*.robage 20 mod 0 =
'Finally figured out how to use mod handily :)
start
7 rnd 50 store
stop

cond
'Gene should allow bot to test amongst 8 different refs randomly
.refup *50 add * .myup *50 add * !=
*.eye5 37 >
start
'Cheap shots :)
.shoot dec
stop

cond
*.nrg 10000 >
*.robage 1000 >
'let's let younger bots do other things with excess energy
start
628 .aimdx store
60 inc
'i had to put some iflamma consepts in there -bau
50 .repro store
stop

cond
*.eye5 0 >
*.refeye *.myeye = and
*.eye5 0 = or
start
314 rnd .aimdx store
stop

cond
*60 0 >
start
628 .aimdx store
stop

cond
*.eye5 0 >
*.vel 20 <
start
20 *.vel sub
2 div
*.body mult 1000 div
.up store
stop
end 'end is superfluous in 2.4, but adding it or not doesn't hurt anything...