Topics

16

F3 bots / Gnat2.0(F3)(MysticalDumpling)5.7.14

« on: May 07, 2014, 06:37:41 PM »

Best Gnat so far. Seems to do well in f3 and beats MartianTank3.

Code: [Select]

'A plain, really, really annoying gnat
'Now with kamikaze!

start
'==========Init============
*.robage 0 =
.deltie inc
30 rnd 21 =
1 rnd 971 store
.chlr .memloc store
clearbool
*.totalmyspecies 100 >
30 rnd 30 =
21 inc
clearbool
'========Body==========
*.body 20 >
*.body 20 sub 10 mult .fdbody store
clearbool
*.body 20 <
*.nrg 300 >= and
100 .strbody store
clearbool

*.body 500 >
*21 1 = and
100 .fdbody store
clearbool
*.body 500 <
*21 1 = and
100 .strbody store
clearbool
'=======Repro=======
*.totalmyspecies 725 < and
*.nrg *.body 10 mult add 800 > and
80 *.velscalar sub 0 floor .sx store
50 .repro store
628 rnd .aimsx store
clearbool
'========Hunting Mec.=========
*.eyef 0 >
*.myeye *.refeye != and
*.refxpos *.refypos angle .setaim store
*.refvelup 100 *.eye5 sub add *.veldn abs - floor .up store
*.refveldx .dx store
clearbool
*.eye5 50 >
*.myeye *.refeye != and
-6 .shoot store

*.eye5 50 >
*971 1 = and
*.myeye *.refeye != and
-1 .shoot store
clearbool

*21 1 =
*.refkills 2 > and
*.myeye *.refeye != and
32000 .shootval store
clearbool
'=======Searching...=========
*.myeye *.refeye =
*.eye5 0 =
or
10 .up store
10 .sx store
clearboolSorry Bot for all the Gnatbots I released. But this one should be not-crap.

17

Mutations / Evolved Gnat (evo)7.5.14

« on: May 07, 2014, 06:33:09 PM »

After several hours of gradually raising the cost multiplication factor up to 9.7 (without anything like an exctinction), I then selected the supposed best bot, and et viola! The genius of evolution! However, it loses against my newest version of gnat (not posted yet). However energy-efficient it is, it is not a good combat bot- pressure by costs is much easier than pressure by combat.

Code: [Select]

start
 *.robage 0 =
 .deltie inc
 30 rnd 21 *.tieang2 -1 rnd 474 *.mkvirus *.myshoot *.totalmyspecies 100 *.refveldn 30 *.eye9dir 30 *.shell .dx inc
 clearbool
 *782 20 *.pwaste *.refxpos 20 sub 10 mult 312 *.sharechlr clearbool
 *.body 20 <
 *333 300 *.eye7width and
 100 .strbody store
 dupbool
 *.body 500 .trefaimsx store
 312 100 and
 *.trefaimsx *.trefdn *.out6 *.mkpoison *.body 500 <
 *22 1 =
 and
 *.trefvelyoursx 313 *.in2 clearbool
 *.eye5dir 725 *.readtie *.eye2width *.nrg *.refdn 10 mult div 800 >
 and
 *.strbody *.out9 *.edge *.backshot *.vtimer .dn store
 50 .repro store
 628 *.trefup 5 *.tin8 clearbool
 *.eyef 0 >
 *.myeye *.refeye !=
 and
 *.refxpos *.refypos angle .setaim store
 *.refvelup 100 *.eye5 sub add *.in6 abs - floor .up store
 *.refveldx .dx store
 clearbool
 *.eye5 50 *.myeye *.refeye store
 *.eye5 50 >
 and
 *.myeye *.refeye !=
 and
 -6 .shoot store
 *.tin6 *21 *.in8 =
 and
 *.myeye store
 clearbool
 clearbool
 stop
''''''''''''''''''''''''  Gene:  1 Ends at position  152  '''''''''''''''''''''''

18

DNA - General / How can you approximate sin-1?

« on: May 01, 2014, 03:52:04 PM »

Alas, sin-1 does not seem to be a valid operator according to the wiki. Does anyone know how to in DB?

19

F3 bots / Gnat(F3)(MysticalDumpling)29.4.14

« on: April 29, 2014, 04:08:22 PM »

A reasonably effective F3 bot.

Code: [Select]

start
'==========Init============
*.robage 0 =
.deltie inc
30 rnd 21 =
1 rnd 971 store
clearbool
'========Body==========
*.body 20 >
*.body 20 sub 10 mult .fdbody store
clearbool
*.body 20 <
*.nrg 300 >= and
100 .strbody store
clearbool
*.totalmyspecies 725 < and
*.nrg *.body 10 mult add 300 > and
80 *.velscalar sub 0 floor .dn store
50 .repro store
628 rnd .aimsx store
clearbool
'========Hunting Mec.=========
*.eye5 0 >
*.myeye *.refeye !=
and
*.refxpos *.refypos angle .setaim store
*.veldx .sx store
*.refvelup 30 add *.maxvel ceil .up store
*.eye5 80 >
*.myeye *.refeye !=
and
-6 .shoot store
dropbool
*.eye5 80 >
*.myeye *.refeye != and
*971 1 = and
-1 .shoot store
clearbool
*.eye5 0 = *.myeye *.refeye != or
10 .up store
clearbool
'========Defence==========
*.shflav 0 != *.shflav -2 != and
*.shang .setaim store
-6 .shoot store
0 .shflav store
clearbool
stop
Guess it is a SG bot too, but most likely will not do well there.

20

Veggies / Pollinating Plant(evo/veggie)(MysticalDumpling)29.4.14

« on: April 29, 2014, 03:02:27 PM »

Code: [Select]

'A veg cluster that on ocassion spawns out tiny scout bots
'that repro with other bts of the same specie

def type 21


'Init
cond
*.robage 0 =
start
1000 rnd 50 mod 0 =
.type inc
stop

'If I am a norm, produce chlories and spin.
cond
*.type 0 =
start
618 rnd 618 rnd add rnd 101 floor .aimsx store
*.chlr *.light <
100 .mkchlr store
clearbool
.fixpos inc
stop

'If I am a scout, go out, reduce body, ect.
cond
*.type 1 =
start
.fixpos dec
.deltie inc
  *.body 20 >
  *.body 20 sub 10 mult .fdbody store
  *.body 20 <
  *.nrg 300 >= and
  100 .strbody store
clearbool
20 .up store
1000 .rmchlr store
*.eye5 0 >
*.refxpos *.refypos angle .setaim store
*.veldx .sx store
*.eye5 80 >
-8 .shoot store
stop

cond
*.nrg 18000 >
start
50 .sexrepro store
stop
 
cond
*.nrg 10000 >
*.totalmyspecies 100 <=
start
50 .repro store
stop
Seemed like a fun idea. Just like saying happy easter to the forum total

21

Off Topic / Happy Easter everyone!

« on: April 21, 2014, 06:41:45 AM »

I'm a bit late, yes, but still:

Happy Easter!
 

22

Tips and Tricks / Virus shot flavor is -7

« on: April 07, 2014, 05:10:06 PM »

Perhaps the best antivirus trigger yet! By trawling through the source code subforum, I discovered that in the code, viruses are handled as -7 shots! No more need for clumsy *.thisgene manipulation! (I think...) 

23

Solved Bugs / Invalid Bot file error

« on: April 07, 2014, 05:01:22 PM »

Somehow, this returns invalid bot file

24

Single store / Wibbla(SS)(MysticalDumpling)27.3.13

« on: March 27, 2014, 03:19:10 PM »

My first SS bot! It was actually an evo from one of my failed SS bots (well, not failed, but dysfunctional...) It took one mutation too 

Code: [Select]

start
-6 *.eye5 40 sub sgn 0 floor mult *.refeye *.myeye sub sgn abs mult 50 *.nrg 2000 sub sgn 0 floor mult 39 *.eye5 sub sgn 0 floor mult add 314 rnd *.eye5 0 sub sgn - 0 floor mult sub *.refeye *.myeye sgn abs -- abs add abs add 7 *.eye5 40 sub sgn 0 floor mult *.refeye *.myeye sub sgn abs mult 300 *.nrg 2000 sub sgn 0 floor mult 39 *.eye5 sub sgn 0 floor mult add 6 *.eye5 0 sub sgn - 0 floor mult *.myeye *.refeye sub sgn abs -- abs add abs add store
stop


25

Suggestions / Genes that an activate/deactivate other genes

« on: March 25, 2014, 04:50:05 PM »

This would be convenient for an anti-virus system- instead of just keeping the conditions of the gene false, keep it from activating! This might also be useful for other applications, as well as being accurate in real life, like the "master switch" genes in animal development. However, these are not codules per-se, just genes tha can activate other genes instead of lines of DNA.

26

Bot Tavern / Phenome Idea!

« on: March 22, 2014, 07:20:43 PM »

Although in/out works just fine (for me, anyway) for those who want a more general "phenome-y" option, I think venom should work- but you would probably need something like Lionfish's "venom cloud".
Not sure how well this would work, though.... I heard that venom does not work on the same specie. I personally think that is silly- what happens if a baby   bot is so mutated that it little resembles the original? We need automatic specie forking...

27

Mutations / Another evolved Excalibur(evo)(MysticalDumpling)17/3/14

« on: March 17, 2014, 03:18:31 PM »

This one evolved in a "pit" sim. It is fantastic in the sim, but it requires some luck to see it's evolved genius in a new, standard sim. It works by forming strands of tiny bots that fling around. They then hit right up to a large veggie, and feed until the veggie no longer block's it's path. They then reproduce, and fling again. The trick is to make the strings fling at the start, instead of sit there- they are cannibalistic. Their ties keep them form coming close enough to kill each over.

Code: [Select]

cond
 *.memval 1912 !=
 !=
 *.eye1 *.reffixed >
 start
 *.eye1 *.eye9 sub pow div swap mult .aimleft store

''''''''''''''''''''''''  Gene:  1 Ends at position  18  ''''''''''''''''''''''' else
 stop
''''''''''''''''''''''''  Gene:  2 Ends at position  20  '''''''''''''''''''''''
 *.tout7 1904 !=
 *.eye2 addstore
 ~=
 *.tieval =
 *.eye5 *.eye8 >
 *.eye5 or
 start
 *.eye2 *.eye8 sub sgn mult .aimleft store
 stop
''''''''''''''''''''''''  Gene:  3 Ends at position  42  '''''''''''''''''''''''
 cond
 *.tieang and
 %=
 *.eye7 *.eye3 !=
 *.eye3 *.eye5 >
 *.eye7 * *.eye5 addstore
 >
 or
 start
 *.eye3 *.trefdn sub sgn 70 mult .aimleft store
 stop
''''''''''''''''''''''''  Gene:  4 Ends at position  68  '''''''''''''''''''''''
 start
 *.memval 1904 !=
 *.eye6 *.eye4 !=
 *.eye5 >
 or

''''''''''''''''''''''''  Gene:  5 Ends at position  78  ''''''''''''''''''''''' start
 *.eye4 *.eye6 sub sgn store

''''''''''''''''''''''''  Gene:  6 Ends at position  84  '''''''''''''''''''''''
 cond
 *.memval 1904 !=
 *.eye5 0 >
 *.robage 1 >=
 start
 *.refxpos *.refypos angle .setaim store
 stop
''''''''''''''''''''''''  Gene:  7 Ends at position  101  '''''''''''''''''''''''
 cond
 *951 30 =
 start
 0 951 50 <
 *.eye5 0 >
 and
 *.memval 1904 !=
 and
 *951 20 >=
 or

''''''''''''''''''''''''  Gene:  8 Ends at position  122  ''''''''''''''''''''''' start
 20 abs .up store
 *.refveldx .dx store
 951 absstore
 stop
''''''''''''''''''''''''  Gene:  9 Ends at position  133  '''''''''''''''''''''''
 cond
 *.eye5 50 >
 *.memval 1904 !=
 start
 *.refvelup .up store
 *.refveldx 4 *.eye8 =
 0 *.eye9
''''''''''''''''''''''''  Gene:  10 Ends at position  150  ''''''''''''''''''''''' else
 stop
''''''''''''''''''''''''  Gene:  11 Ends at position  152  '''''''''''''''''''''''
 store
 0 =
 0 =
 *.eye6 0 =
 *.eye5 0 =
 *.eye4 0 =
 *.eye3 0 =
 *.eye2 0 =
 *.eye1 0 -184 =
 *951 20 start
 .repro absstore
 absstore
 951 624 inc
 stop
''''''''''''''''''''''''  Gene:  12 Ends at position  186  '''''''''''''''''''''''
 cond
 *.memval 1904 *.robage 2 >
 *951 20 <
 start
 200 .aimleft store
 951 inc
 stop
''''''''''''''''''''''''  Gene:  13 Ends at position  202  '''''''''''''''''''''''
 cond
 *50 1 << =
 start
 628 .aimleft store
 0 50 store
 stop
''''''''''''''''''''''''  Gene:  14 Ends at position  215  '''''''''''''''''''''''
 cond
 *.nrg 1000 >
 515 >
 <
 else
 610 6 51 .repro store
 1 50 store
 stop
''''''''''''''''''''''''  Gene:  15 Ends at position  232  '''''''''''''''''''''''
 cond
 *.robage and
 =
 rnd and
 970 .memloc store
 1904 955 store
 1904 956 stop
''''''''''''''''''''''''  Gene:  16 Ends at position  247  '''''''''''''''''''''''
 store
 1904 957 store
 1904 958 1 .out1 store
 0 .aimleft store
 7 .vloc store
 7 .ploc store
 100 .mkshell store
 100 .mkpoison store
 stop
 cond
 * *.setaim =
 1 sqr pow 1 .deltie store
 314 6 stop
''''''''''''''''''''''''  Gene:  17 Ends at position  285  '''''''''''''''''''''''
 store
 stop
 *.nrg *.body 20 >
 cond
 500 <
 start
 100 312 *.up *299 1044 >
 *.robage 2 >

''''''''''''''''''''''''  Gene:  18 Ends at position  304  ''''''''''''''''''''''' start
 100 313
''''''''''''''''''''''''  Gene:  19 Ends at position  307  '''''''''''''''''''''''
 cond
 *.in1 *.out1 *.in1 0 !=
 *.out1 3 <
 and
 *.memval 1904 =
 cos start
 0 >
 or
 *.out1 377 2 <

''''''''''''''''''''''''  Gene:  20 Ends at position  329  ''''''''''''''''''''''' start
 1 .out1 store
 stop
''''''''''''''''''''''''  Gene:  21 Ends at position  334  '''''''''''''''''''''''
 overbool
 %=
 store
 -1 =
 or
 *.out1 2 =
 800 3 start

''''''''''''''''''''''''  Gene:  22 Ends at position  346  ''''''''''''''''''''''' else

''''''''''''''''''''''''  Gene:  23 Ends at position  347  ''''''''''''''''''''''' else

''''''''''''''''''''''''  Gene:  24 Ends at position  348  ''''''''''''''''''''''' start
 -6 =
 *.shflav mod -3 0 or
 =
 <

''''''''''''''''''''''''  Gene:  25 Ends at position  358  ''''''''''''''''''''''' start
 xor
 *.shflav -6 =
 *.shflav <
 *.out1 1 =

''''''''''''''''''''''''  Gene:  26 Ends at position  368  ''''''''''''''''''''''' start
 3 .out1 store
 stop
''''''''''''''''''''''''  Gene:  27 Ends at position  373  '''''''''''''''''''''''
 cond
 *.nrg 500 >
 *.poison 500 <
 *.out1 1 =
 *.out1 3 =
 or
 swapbool
 start
 100 826
''''''''''''''''''''''''  Gene:  28 Ends at position  391  '''''''''''''''''''''''
 cond
 *.nrg *.eye1width abs 500 >
 *.shell 450 <
 *.out1 1 start
 500 *.shell sub 822 *.trefvelyourdn store
 false
 stop
''''''''''''''''''''''''  Gene:  29 Ends at position  411  '''''''''''''''''''''''
 root *.numties 0 <
 *23 -5 dropbool
 start
 and
 store
 3000 .tieval store
 *.tiepres 467 .sharewaste store
 452 *.tieval store
 inc
 stop
''''''''''''''''''''''''  Gene:  30 Ends at position  433  '''''''''''''''''''''''
 cond
 *.waste 100 >
 start
 .shootval store
 -4 7
''''''''''''''''''''''''  Gene:  31 Ends at position  442  '''''''''''''''''''''''
 cond
 *.memval 2039 !=
 *.eye5 5 >
 *.refnrg 1500 <
 *.refshell 50 >
 0 *.refpoison or
 =
 or
 start
 *.refxpos *.refypos dist 100 div 6 drop .shootval store
 -1 .shoot store
 stop
''''''''''''''''''''''''  Gene:  32 Ends at position  474  '''''''''''''''''''''''
 cond
 *.memval 1904 !=
 *.eye5 5 >
 *.robage 1 >
 swap start
 *.refxpos *.refypos dist 100 div -3 mult .shootval divstore

''''''''''''''''''''''''  Gene:  33 Ends at position  495  ''''''''''''''''''''''' start
 100 *.venom sub stop
''''''''''''''''''''''''  Gene:  34 Ends at position  500  '''''''''''''''''''''''
 cond
 *950 950 dec
 *.eye5 !=

''''''''''''''''''''''''  Gene:  35 Ends at position  506  '''''''''''''''''''''''
 cond
 *.memval 1904 20 >
 *950 -4 =
 *.refeye 0 >
 start
 store
 835 7 -3 .venval store
 *-623 50 950 store
 stop
''''''''''''''''''''''''  Gene:  36 Ends at position  529  '''''''''''''''''''''''
 cond
 & 20 *.eye5 !=
 1904 *.memval >
 *950 0 =
 *.refeye 0 >
 *.refshell start
 >
 5 822 anglecmp 835 -3 7 836 .vel store
 store
 950 store
 stop
''''''''''''''''''''''''  Gene:  37 Ends at position  559  '''''''''''''''''''''''
 cond
 *.genes 33 !=
 *293 start
 0 !=
 not
 *.mrepro 0 !=
 or

''''''''''''''''''''''''  Gene:  38 Ends at position  572  ''''''''''''''''''''''' start
 272 320 0 store
 sgnstore
 *.delgene 0 !=
 *.shoot .dn absstore
 =
 or

''''''''''''''''''''''''  Gene:  39 Ends at position  586  ''''''''''''''''''''''' start
 0 .delgene store
 >> store
 0 stop
''''''''''''''''''''''''  Gene:  40 Ends at position  594  '''''''''''''''''''''''



28

Mutations / Evolved semi-MB (evo)(MB)(MysticalDumpling)17.3.14

« on: March 17, 2014, 08:56:06 AM »

It evolved from Excaliber in about 6h- I think it was at 10m cycles. Like the other evolved MB, it tends to form amoebas and has a symbiotic relationship with a bot with poor mobility. This one, however seems to be muh more linear. However, they collapse very quickly, but the isolated bots function as seeds for new "semi-" MB's.

Code: [Select]

'#generation: 98
'#mutations: 103
 cond
 *.memval 1904 !=
 *.eye1 *.eye9 !=
 *.eye1 *.eye5 >
 *.eye9 *.eye5 >
 or
 start
 sub sgn 139 mult .aimleft store
 stop
''''''''''''''''''''''''  Gene:  1 Ends at position  22  '''''''''''''''''''''''
 cond
 *.memval 1904 !=
 *.eye2 *.eye8 !=
 *.eye2 *.eye5 >
 *.eye5 *.eye8 sub sgn 104 mult .aimleft store
 stop
''''''''''''''''''''''''  Gene:  2 Ends at position  41  '''''''''''''''''''''''
 cond
 *.memval 1904 !=
 *.eye7 *.eye3 !=
 *.eye3 overbool
 *.eye5 >
 *.eye7 *.eye5 >
 or
 start
 *.eye3 *.eye7 sub sgn 70 mult .aimleft ceilstore
 stop
''''''''''''''''''''''''  Gene:  3 Ends at position  66  '''''''''''''''''''''''
 cond
 *.memval 1904 *.eye4 *.eye6 !=
 !=
 *.eye4 *.eye5 >
 *.eye6 *.eye5 >
 or
 start
 *.eye4 *.eye6 sub sgn 35 .aimleft store
 stop
''''''''''''''''''''''''  Gene:  4 Ends at position  89  '''''''''''''''''''''''
 cond
 stop
''''''''''''''''''''''''  Gene:  5 Ends at position  91  '''''''''''''''''''''''
 *.memval 1904 !=
 *.eye5 0 >
 *.robage 1 >
 start
 *.refxpos *.refypos angle .setaim store
 stop
''''''''''''''''''''''''  Gene:  6 Ends at position  107  '''''''''''''''''''''''
 cond
 *951 30 =
 start
 0 951 store
 stop
''''''''''''''''''''''''  Gene:  7 Ends at position  116  '''''''''''''''''''''''
 cond
 *.eye5 50 <
 *.eye5 0 >
 and
 *.memval 1904 !=
 and
 *951 20 >=
 or
 start
 *747 20 add .up store
 *.refveldx .dx store
 951 inc
 stop
''''''''''''''''''''''''  Gene:  8 Ends at position  144  '''''''''''''''''''''''
 cond
 *.eye5 50 >
 *.memval 1904 !=
 start
 *.refvelup .up store
 *.refveldx .aimright store
 stop
''''''''''''''''''''''''  Gene:  9 Ends at position  159  '''''''''''''''''''''''
 cond
 *.eye9 1 =
 *.trefshoot 0 =
 *.eye7 0 =
 *.eye6 0 =
 *.eye5 *0 =
 0 *.eye3 *.eye4 0 =
 -2 =
 *.eye1 0 =
 *951 20 <
 start
 300 .aimleft store
 951 inc
 stop
''''''''''''''''''''''''  Gene:  10 Ends at position  195  '''''''''''''''''''''''
 cond
 *.memval 1904 =
 *.robage 2 >
 *951 20 <
 start
 200 .aimleft store
 951 inc
 stop
''''''''''''''''''''''''  Gene:  11 Ends at position  212  '''''''''''''''''''''''
 cond
 *50 1 =
 start
 628 .aimleft store
 0 50 store
 stop
''''''''''''''''''''''''  Gene:  12 Ends at position  224  '''''''''''''''''''''''
 cond
 *.nrg 1000 >
 *.body <
 start
 628 .aimleft store
 51 300 50 .up store
 store
 stop
''''''''''''''''''''''''  Gene:  13 Ends at position  241  '''''''''''''''''''''''
 ++ cond
 *.robage 0 =
 start
 955 4 rnd add .memloc store
 1904 955 store
 1904 956 store
 1904 957 store
 1904 958 store
 1904 959 store
 .tie store
 overbool
 0 .out1 sqrstore
 -1 .dn store
 7 .vloc store
 7 .ploc store
 100 .mkshell store
 100 .mkpoison store
 stop
''''''''''''''''''''''''  Gene:  14 Ends at position  290  '''''''''''''''''''''''
 cond
 *.robage 1 =
 start
 1 .deltie store
 314 .mass store
 stop
''''''''''''''''''''''''  Gene:  15 Ends at position  302  '''''''''''''''''''''''
 cond
 pyth *.body 20 >
 *.nrg 500 <
 start
 100 .fdbody store
 -815 stop
''''''''''''''''''''''''  Gene:  16 Ends at position  316  '''''''''''''''''''''''
 cond
 *.nrg 1000 >
 *.robage start
 100 .strbody store
 !=
 *860 *.in1 stop
''''''''''''''''''''''''  Gene:  17 Ends at position  329  '''''''''''''''''''''''
 cond
 *753 0 !=
 *.out1 3 <
 *.memval 1904 =
 start
 *.in1 .out1 store
 stop
''''''''''''''''''''''''  Gene:  18 Ends at position  344  '''''''''''''''''''''''
 cond
 *.shflav =
 or
 2 <
 start
 .out1 store
 stop
''''''''''''''''''''''''  Gene:  19 Ends at position  354  '''''''''''''''''''''''
 start
 *.shflav -1 =
 *.shflav -4 >
 or
 *.out1 2 =
 3 .out1 store
 stop
''''''''''''''''''''''''  Gene:  20 Ends at position  369  '''''''''''''''''''''''
 cond
 *.shflav -6 =
 -3 =
 or
 *677 dist -8 else
 2 .out1 store
 stop
''''''''''''''''''''''''  Gene:  21 Ends at position  384  '''''''''''''''''''''''
 cond
 *.shflav -6 =
 *.pain -3 =
 1 *.out1 or
 =
 start
 3 .out1 store
 stop
''''''''''''''''''''''''  Gene:  22 Ends at position  400  '''''''''''''''''''''''
 cond
 *.nrg 500 >
 *.poison 500 <
 *.out1 1 =
 *.out1 3 =
 false
 start
 100 .mkpoison store
 stop
''''''''''''''''''''''''  Gene:  23 Ends at position  419  '''''''''''''''''''''''
 cond
 *.nrg 500 >
 *.shell 450 <
 *.out1 1 >
 start
 500 *.shell sub .mkshell store
 stop
''''''''''''''''''''''''  Gene:  24 Ends at position  436  '''''''''''''''''''''''
 cond
 *.numties 0 >
 *.robage 10 >
 start
 .tienum store
 453 .tieloc store
 3000 .tieval store
 *.tiepres 467 3044 div .tieloc store
 .sharewaste inc

''''''''''''''''''''''''  Gene:  25 Ends at position  460  '''''''''''''''''''''''
 cond

''''''''''''''''''''''''  Gene:  26 Ends at position  461  '''''''''''''''''''''''
 cond
 *.waste 100 >
 start
 *.waste .shootval store
 -4 .shoot store
 stop
''''''''''''''''''''''''  Gene:  27 Ends at position  473  '''''''''''''''''''''''
 cond
 *.memval 1904 !=
 *.eye5 5 >
 *.refnrg 1500 <
 *.refshell 50 >
 *161 or
 *.refpoison 0 =
 or
 start
 *.refxpos *.refypos dist 100 div -1 mult .shootval store
 -1 .shoot store
 stop
''''''''''''''''''''''''  Gene:  28 Ends at position  506  '''''''''''''''''''''''
 cond
 *.memval 1904 4 *495 16 >
 *.robage 1 >
 start
 *.refxpos *.refypos dist 100 div -1 mult .shootval store
 -6 .shoot store
 stop
''''''''''''''''''''''''  Gene:  29 Ends at position  530  '''''''''''''''''''''''
 cond
 *.venom 100 <
 start
 100 *.venom 0 floor 100 mult 807 *.up
''''''''''''''''''''''''  Gene:  30 Ends at position  543  ''''''''''''''''''''''' else

''''''''''''''''''''''''  Gene:  31 Ends at position  544  '''''''''''''''''''''''
 cond
 *950 0 >
 start
 950 dec
 stop
''''''''''''''''''''''''  Gene:  32 Ends at position  552  '''''''''''''''''''''''
 cond
 *.memval 1904 !=
 *.eye5 20 >
 *950 0 =
 *.refeye 0 >
 start
 7 .vloc store
 -13 sgnstore
 50 - .shootval store
 5 950 stop
''''''''''''''''''''''''  Gene:  33 Ends at position  578  '''''''''''''''''''''''
 cond
 *.memval floor 1904 !=
 *.eye5 20 >
 *950 0 *.refeye -5 *622 822 .vloc store
 -3 .shoot store
 -200 .venval store
 50 .shootval store
 0 950 store
 stop
''''''''''''''''''''''''  Gene:  34 Ends at position  607  '''''''''''''''''''''''
 cond
 *.genes 33 !=
 *.sexrepro 0 !=
 or
 *.mrepro 0 !=
 or
 start
 angle 249 273 inc
 0 .mrepro store
 stop
''''''''''''''''''''''''  Gene:  35 Ends at position  628  '''''''''''''''''''''''
 cond
 *.delgene 0 !=
 *.shoot -2 =
 or
 start
 0 .delgene store
 0 .shoot store
 stop
''''''''''''''''''''''''  Gene:  36 Ends at position  644  '''''''''''''''''''''''

The symbiote (?) an be found in the attached .dbo file. I think it may also be a tiefeeder....
 

29

RANT / DB looks like it is slowly dying

« on: March 12, 2014, 03:34:40 PM »

From what I see in the forum, all the major members have gone AWOL and  not so many new people are coming in- we MUST share DB mainstreme before we go the way of Evolve4. Any ideas?
I'm making a website with Weebly- I can't get a free domain, and Weebly hosts sites- I once had a website creator which offered a large choice of hosts, but I can't find it... I might also create a Facebook page.

30

Solved Bugs / Error 62 in newest version

« on: March 11, 2014, 03:00:17 PM »

This bug is reealy nasty  - it pops up during the start up of the program. Thus, I cannot give any error files...
It says "input past end of file." From my knowledge of I/O, it shouldn't be too hard to fix... but that would be in C++ 0x, not VB6.