1
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
'made from animal minimalis
'by anazasi
'genes 1 to 4 animal minimalis modified to identify by aimdx instead of eye
cond
*.eye5 0 >
*.refaimdx *.myaimdx !=
start
*.refveldx .dx store
*.refvelup 30 add .up store
stop
cond
*.eye5 50 >
*.refaimdx *.myaimdx !=
start
-1 .shoot store
*.refvelup .up store
stop
cond
*.eye5 0 =
*.refaimdx *.myaimdx = or
start
314 rnd .aimdx store
stop
cond
*.nrg 15000 >
start
30 .repro store
stop
'gene 5 gene deletion gne
cond
*.refeye *.myeye <
*.refeye 3 > and
start
*.genes .delgene store
stop
' gene 6 and later fake eye calls
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
cond
*.eye1 0 >
start
stop
end
'ratita australopitecus
'por/by Anazasi
'primer/first bot;)
'gene 1 and 2 del fathers tie
cond
*.robage 0 =
start
.tie inc
stop
cond
*.robage 1 =
start
.deltie inc
stop
'genes 3 to 10 make the bot look at the nearest bot if the one he is looking isnt of his species (this is wrong I'll fix it in later versions)
cond
*.eye1 *.eye5 >
*.refeye *.myeye != and
start
-157 .aimdx store
stop
cond
*.eye2 *.eye5 >
*.refeye *.myeye != and
start
-100 .aimdx store
stop
cond
*.eye3 *.eye5 >
*.refeye *.myeye != and
start
-78 .aimdx store
stop
cond
*.eye4 *.eye5 >
*.refeye *.myeye != and
start
-15 .aimdx store
stop
cond
*.eye6 *.eye5 >
*.refeye *.myeye != and
start
15 .aimdx store
stop
cond
*.eye7 *.eye5 >
*.refeye *.myeye != and
start
78 .aimdx store
stop
cond
*.eye8 *.eye5 >
*.refeye *.myeye != and
start
100 .aimdx store
stop
cond
*.eye9 *.eye5 >
*.refeye *.myeye != and
start
157 .aimdx store
stop
'if nothing at sight it turns 90 degres
cond
*.eye1 0 =
*.eye2 0 = and
*.eye3 0 = and
*.eye4 0 = and
*.eye5 0 = and
*.eye6 0 = and
*.eye7 0 = and
*.eye8 0 = and
*.eye9 0 = and
*.refeye *.myeye = or
start
314 .aimdx store
stop
'if it sees a bot from another species it follows him
cond
*.eye5 0 >
*.refeye *.myeye !=
start
*.refveldx .dx store
*.refvelup 15 add .up store
stop
'if an enemy is close it ties at it
cond
*.refeye *.myeye !=
*.eye5 25 >
start
13 .tie store
stop
cond
*.tiepres 0 >
*.tienum 0 =
start
*.tiepres .tienum store
stop
'delete friendly ties
cond
*.tienum 0 >
*.trefeye *.myeye = and
start
*.tiepres .deltie store
stop
'feed throw ties
cond
*.tienum 0 >
*.refeye *.myeye != and
start
-1 .tieloc store
-1000 .tieval store
stop
'shoot this was modified in later versions cause the shoots never hit the enemy
cond
*.eye5 25 >
*.refeye *.myeye !=
start
-6 .shoot store
*.refvelup .up store
stop
'reproduce
cond
*.nrg 10000 >
start
50 .repro store
stop
end
'ratita australopitecus
'por/by Anazasi
'primer/first bot;)
cond
*.robage 0 =
start
.tie inc
stop
cond
*.robage 1 =
start
.deltie inc
stop
cond
*.eye1 *.eye5 >
*.refeye *.myeye != and
start
-157 .aimdx store
stop
cond
*.eye2 *.eye5 >
*.refeye *.myeye != and
start
-100 .aimdx store
stop
cond
*.eye3 *.eye5 >
*.refeye *.myeye != and
start
-78 .aimdx store
stop
cond
*.eye4 *.eye5 >
*.refeye *.myeye != and
start
-15 .aimdx store
stop
cond
*.eye6 *.eye5 >
*.refeye *.myeye != and
start
15 .aimdx store
stop
cond
*.eye7 *.eye5 >
*.refeye *.myeye != and
start
78 .aimdx store
stop
cond
*.eye8 *.eye5 >
*.refeye *.myeye != and
start
100 .aimdx store
stop
cond
*.eye9 *.eye5 >
*.refeye *.myeye != and
start
157 .aimdx store
stop
cond
*.eye1 0 =
*.eye2 0 = and
*.eye3 0 = and
*.eye4 0 = and
*.eye5 0 = and
*.eye6 0 = and
*.eye7 0 = and
*.eye8 0 = and
*.eye9 0 = and
*.refeye *.myeye = or
start
314 .aimdx store
stop
cond
*.eye5 0 >
*.refeye *.myeye !=
start
*.refveldx .dx store
*.refvelup 15 add .up store
stop
cond
*.refeye *.myeye !=
*.eye5 25 >
start
13 .tie store
stop
cond
*.tiepres 0 >
*.tienum 0 =
start
*.tiepres .tienum store
stop
cond
*.tienum 0 >
*.trefeye *.myeye = and
start
*.tiepres .deltie store
stop
cond
*.tienum 0 >
*.refeye *.myeye != and
start
-1 .tieloc store
-1000 .tieval store
stop
cond
*.eye5 25 >
*.refeye *.myeye !=
start
-6 .shoot store
*.refvelup .up store
stop
cond
*.nrg 10000 >
start
50 .repro store
stop
end