Bots and Simulations > Evolution and Internet Sharing Sims

My 2.44.1 first-bot results so far...

<< < (4/6) > >>

Botsareus:
The 18th will be one month, give or take 24 hours

Panda:
Wow. XD quite a while then.

Botsareus:
update:

Back when I started, 1/18/2011, I disabled point and delta mutations replacing delta with a custom algorithm that occurs on reproduction.
On 2/11/2011 I had to turn DB off, I needed my desktop for a school project.
On 2/24/2011 I decided to reintroduce point mutation with the following code on reproduction event:

--- Quote ---
Private Sub PointMutation(robn As Integer) 'botschange full redo of point mutation
Dim dnaSize As Integer
Dim e As Integer 'counter
Dim e2 As Integer 'update generator
Dim randomsysvar As Integer
With rob(robn)
    dnaSize = DnaLen(.DNA) - 1 'get aprox length
   
    Dim datahit() As Boolean 'operation repeat prevention
    ReDim datahit(dnaSize)
    For e = 0 To dnaSize
        If Rnd < (1 / (.Mutables.mutarray(PointUP) * 28 / 30000 * (10 ^ 0.5))) Then 'chance
            Do
                e2 = Int(Rnd * (dnaSize + 1))
            Loop Until datahit(e2) = False
            datahit(e2) = True
            Do
                randomsysvar = Int(Rnd * 1000)
            Loop Until sysvar(randomsysvar).Name <> ""
            .DNA(e2).tipo = 1
            If .DNA(e2 + 1).tipo = 7 Then .DNA(e2).tipo = 0 'if store , inc , or dec then type 0
'            If .DNA(e2 + 1).tipo = 7 Then
'            MsgBox sysvar(randomsysvar).Name
'            robfocus = robn
'            End If
            .DNA(e2).value = sysvar(randomsysvar).value 'impotent: transfears value, not adress
            .LastMutDetail = "Point mutation changed dna location " & e2 & " to: " & sysvar(randomsysvar).Name & vbCrLf & .LastMutDetail
            .Mutations = .Mutations + 1
            .LastMut = .LastMut + 1
        End If
    Next
End With
End Sub

--- End quote ---

Results?

In 36 hours and 4 generations the population doubled! see attachment.

Note: Robot may be using 2.44.1 features, not 2.45.1 ...

Botsareus:
Ok, I decided to 'reload' a.k.a. Restart the entire process because:

The robot stopped mutating after level39
 It was doing 21+ hours , and then either no evolution or all dead. after 60 hours I had enough.

I figured I restart also because of all the new 'tweaks' I added as I was going.

One good 'tweak' that still needs work is the 'simplification' stage, but this one is easy now that I restarted because I can go back to the level I need w/o worrying  about deleting like 9 levels ahead.

Question:

I can start implementing this changes to DB 2.45 but I need to know what is happening with Pandas mod? ...

Botsareus:
ok, the new stabler formula is:

Rnd < (1 / (.Mutables.mutarray(PointUP) * 28 / 300)) Then 'chance



What is happining with Pandas modifications? Panda? Anyone?

Navigation

[0] Message Index

[#] Next page

[*] Previous page