Darwinbots Forum

Bots and Simulations => DNA - General => Topic started by: -venom- on January 25, 2007, 08:43:45 AM

Title: I am trying to transmit my entier dna via virus.
Post by: -venom- on January 25, 2007, 08:43:45 AM: here is the dna so far

' Alga anaparagogi ios

cond
*.vitmer 0 =
start
1 .mkvirus store
2 .mkvirus store
3 .mkvirus store
stop

cond
*.nrg 6000 >
start
50 .repro store
15 .aimdx store
stop

cond
*.eye5 0 =
*.refeye *.myeye !=
start
*.refveldx .dx store
*.refvelup 30 add .up store
50 .vshoot store
stop
end

so any help would be apreciated
Title: I am trying to transmit my entier dna via virus.
Post by: Sprotiel on January 25, 2007, 11:40:24 AM: Assigning several times to the same sysvar is no good. What you need to do for your first gene is something like that:
Code: [Select]
def counter 50 cond *.vtimer 0 = start *.counter 3 mod ++ .mkvirus store .counter inc stop
Title: I am trying to transmit my entier dna via virus.
Post by: MacadamiaNuts on January 25, 2007, 08:25:43 PM: That looks fun.

If I had the time to do it, I would set up a veggie with an huge gene repository and let it fire random genes to zerobots... I mean... "lego-bots".
Title: I am trying to transmit my entier dna via virus.
Post by: -venom- on January 28, 2007, 09:43:43 PM: in vegs it only transmits the last two genes and in everything else it only transmits the firts one ill keep trying but any help would be extreamly apreciated
Title: I am trying to transmit my entier dna via virus.
Post by: Jez on January 29, 2007, 01:53:34 AM: Could you post the code you are using?
Title: I am trying to transmit my entier dna via virus.
Post by: -venom- on January 29, 2007, 05:32:15 PM: I got it to work but what the hell here it is

what do ya say

Code: [Select]
' Alga anaparagogi ios cond .myup 2= start 7 989 store stop def counter 50 cond *.vtimer 0 = start *.counter 3 mod ++ .mkvirus store .counter inc stop cond 7 *989 != *.nrg 0 != start 50 .repro store 15 .aimdx store *.refveldx .dx store *.refvelup 30 add .up store 50 .vshoot store stop cond *.eye5 0 = *.refeye *.myeye != start *.refveldx .dx store *.refvelup 30 add .up store 50 .vshoot store stop end
Title: I am trying to transmit my entier dna via virus.
Post by: Endy on February 01, 2007, 02:31:20 AM: Why not just use:

Code: [Select]
cond *.counter *.genes > start 0 .counter store stop cond *.vtimer 0 = start *.genes *.counter sub .mkvirus store .counter inc stop
This way it would vshoot the genome from bottom to top.

If you want to go really basic just use: *.genes rnd .mkvirus store this'll eventually vshoot all the genes, just not in a particullarly orderly manner.