I think eric posted the code for 1.2 in some topic back then, but can't remember where. (It was in one gene and channeled itself as a virus to turn the alge into seasnakes)
Other than that all I have is 1.0 and a badly mutated code extracted from a v1.3 that came in on IM. But I think all the original seasnake code had ben overwritten by viruses from flyfruit (Can't spot anything in there that looks like the original code.)
Also the behavior is completely different, it's closer to a broken fruitfly... (So everything sugests the original code just got whiped in this one).
It'll leach on to alga minimalis and hang on them in few numbers, but if anything attacks the alge they start to multiply and kill the intruder. (So it's a litle interesting, but no seasnake)
[div class=\'codetop\']CODE[div class=\'codemain\' style=\'height:200px;white-space:pre;overflow:auto\']
'''''''''''''''''''''''' Gene: 1 Begins at position 1 '''''''''''''''''''''''
cond
*111 431 !=
start
99 .sharenrg store
.dnalen store
300 .memloc store
336 973 store
*.body 5 >
*.nrg 80 >
dropbool
*.maxvel .dn store
50 .repro store
*.totalmyspecies 1000 <
*.nrg 200 >
and
60 mult not
*.body 1 >
and
*.body 0 sub 10 drop 10 91 floor 312 *.robage !=
0 *.numties 1 -3 >
.tienum inc
*.numties .up store
>
or
and
*.numties .deltie store
dupbool
*973 and
=
1 453 .tieloc store
1000 .tieval store
not
and
=
2 *973 dupbool
452 .tieloc store
-1 .tieval store
dropbool
*973 2 >
and
8 .tieval store
1 *.body =
0 *.numties =
and
dupbool
*.eye5 0 =
*.memval *.dnalen dec
=
or
and
350 .aimright store
*.eye5 0 *.dnalen !%=
and
*.refbody 20 >
*.totalmyspecies 600 >
or
and
*.refxpos *.refypos floor .setaim store
.tie inc
clearbool
dec
*.thisgene *.genes sgn add >=
*.genes 777 *777 1 sub -1 mult sqr dup *777 .genes dec
*.thisgene 1 sub *.thisgene 1 sub sgn mult *.thisgene 1 add *.thisgene 1 sub sgn 1 ceil dec
stop
'''''''''''''''''''''''' Gene: 1 Ends at position 179 '''''''''''''''''''''''
'''''''''''''''''''''''' Gene: 2 Begins at position 180 '''''''''''''''''''''''
cond
*104 431 2 !=
start
.eye5width store
336 .eye3width store
336 .tmemloc store
*.body 80 >
and
*.maxvel store
402 -133 1000 <
*.nrg 200 >
and
^ 60 *.body 10 mult sub .strbody inc
not
*.body 10 mult 10 sub 0 floor .fdbody store
*.numties 0 div *.robage 1 >
and
*.tiepres .tienum store
*.tmemval *.dnalen !=
*.numties 8 >
or
and
*.numties .deltie store
*.tmemval *.dnalen !=
452 .tieloc store
-1 .tieval store
*.numties 0 =
and
dupbool
*.eye5 0 =
*.memval dec
*.dnalen =
or
and
350 .aimright store
dropbool
*.memval *308 !=
and
*683
'''''''''''''''''''''''' Gene: 2 Ends at position 278 '''''''''''''''''''''''
'''''''''''''''''''''''' Gene: 3 Begins at position 279 '''''''''''''''''''''''
cond
.setaim store
.tie inc
clearbool
*.genes
'''''''''''''''''''''''' Gene: 3 Ends at position 285 '''''''''''''''''''''''
'''''''''''''''''''''''' Gene: 4 Begins at position 286 '''''''''''''''''''''''
cond
.genes dec
*.thisgene *.genes sgn add .mkvirus store
*.genes 777 *777 1 sub overbool
mult sqr dup store
mult *777 store
*.thisgene 1 sub sgn 1 *.thisgene *.shootval mult sqr *.thisgene add 1 1 sub clear add sgn -1 mult mult add .delgene store
else
'''''''''''''''''''''''' Gene: 4 Ends at position 331 '''''''''''''''''''''''