system "Intelligent dozens v1"
{
*************************************
*      System by luposlipphobia     *
*         on the VIP Lounge         *
*************************************
          Rx-ed by St0rm0r
-------------------------------------
           00-c0mpatible
-------------------------------------
Start at 1st dozen.
Follow the last dozen except when the progression step is bigger then 8.
If the progression step is bigger then 8 then stay at the same dozen.
When 0 or 00 appears, choose the dozen that appeared the most in the last 10 spins.
Use progression [1,1,1,2,3,4,6,9,14,21,31,47,70,105,158,237,355]
-------------------------------------
}
method "main"
begin
// section 1: do this once
while starting new session
    begin
    call "init"
    end

// section 2: do the tracking
track last dozen for 1 time in record"last dozen"layout
track last dozen for 10 times in record"last 10 dozens"layout
track last number for 1 time in record"last number"layout

// section 3: act on a loss
if net < 0
    begin
    add 1 record"dozenbet"data index
    if record"dozenbet"data index > record"dozenbet"data count
        begin
        put 1 record"dozenbet"data index
        end
    end

// section 4:act on a win
if net > 0
    begin
    put 1 record"dozenbet"data index
    end

//section 5:bet
if record"last number"layout = number 0 or record"last number"layout = number 00
    begin
    call "select the dozen that hit the most in the last 10 spins"
    //place bet after 0
    put 100% record"dozenbet"data on record"dozen to play after 0"layout
    end
    else
    begin
    if record"dozenbet"data index > 8
        begin
        //don't change the dozen to play
        //place bet
        put 100% record"dozenbet"data on record"dozen to play"layout
        end
        else
        begin
        //follow the last dozen
        copy record"last dozen"layout record"dozen to play"layout
        //place bet
        put 100% record"dozenbet"data on record"dozen to play"layout
        end
    end

end
//==============================================================================
// section 6: subroutines
method "init"
begin
set list [1,1,1,2,3,4,6,9,14,21,31,47,70,105,158,237,355] record"dozenbet"data
put 1 record"dozenbet"data index
end

method "select the dozen that hit the most in the last 10 spins"
begin
//count the dozens in the last 10 spins
put 0 record"1st dozen counter"data
put 0 record"2nd dozen counter"data
put 0 record"3rd dozen counter"data
put 1 record"last 10 dozens"layout index
loop until record"last 10 dozens"layout index > record"last 10 dozens"layout count
    begin
    if record"last 10 dozens"layout = 1st dozen
        begin
        add 1 record"1st dozen counter"data
        end
    if record"last 10 dozens"layout = 2nd dozen
        begin
        add 1 record"2nd dozen counter"data
        end
    if record"last 10 dozens"layout = 3rd dozen
        begin
        add 1 record"3rd dozen counter"data
        end
    add 1 record"last 10 dozens"layout index
    end
//take the biggest one
if record"1st dozen counter"data >= record"2nd dozen counter"data and
record"1st dozen counter"data >= record"3rd dozen counter"data
    begin
    copy 1st dozen record"dozen to play after 0"layout
    end
if record"2nd dozen counter"data >= record"1st dozen counter"data and
record"2nd dozen counter"data >= record"3rd dozen counter"data
    begin
    copy 2nd dozen record"dozen to play after 0"layout
    end
if record"3rd dozen counter"data >= record"2nd dozen counter"data and
record"3rd dozen counter"data >= record"1st dozen counter"data
    begin
    copy 3rd dozen record"dozen to play after 0"layout
    end
end