Darwinbots Forum

Bots and Simulations => Bestiary => Single store => Topic started by: MysticalDumpling on August 13, 2014, 12:51:18 PM

Title: Insulsus(SS)MysticalDumpling 13.8.14
Post by: MysticalDumpling on August 13, 2014, 12:51:18 PM
Code: [Select]
'Insulsus
'Randomly selects a list of sysvars and addstores

'Sysvars- tie repro up sharenrg (4)
'Range of 1 to 830
'1, 300, 330, 830
start
50

'Up
5 rnd sgn
'Tie
329 10 rnd sgn mult add
'Feed
830 1 rnd mult add
'Repro
'Need condition!
*.nrg 1000 sub sgn 0 floor 300 mult 1 rnd mult add

1 floor 830 ceil addstore

stop