Saliu 2 dozens agressive

Contenuto del file

system "ion_saliu_2_dozens_agressive"
{
    See www.saliu.com for more information
    A group is 2 dozens played together
    In this system we wait for a group that has:
    hit 1 time, not hit at least 1 times, hit 1 time, we bet here

}
method "main"
begin
    while starting a new session
    begin
        clear All Records
        Set List of [1,3,9,27,81,243] to record "bet_a_1" data;
        Put 1 on Record "bet_a_1" data index
        set flag "clr1" to false
        duplicate information from Record "bet_a_1" to record "bet_b_1";
        Put 1 on Record "bet_b_1" data index
        set flag "clr2" to false
        duplicate information from Record "bet_a_1" to record "bet_c_1";
        Put 1 on Record "bet_c_1" data index
        set flag "clr3" to false

        group
        begin
            Input Dropdown "What Dozen layout do you want to use?

            1:=  1-12 & 13-24
            2:=  1-12 & 25-36
            3:= 13-24 & 25-36
            4:= All 3"    to record "dozen layout" data

            input data "Initial Bankroll ?" to bankroll
            input data "Win Goal ?" to record "WinGoal" data
            input data "Loss Goal ?" to record "LossGoal" data

        end
    end



    if Loss >= record "LossGoal" data
    begin
        Display "Loss limit reached"
    end

    if Win >= record "WinGoal" data
    begin
        Display "Win Goal reached"
    end

    // ***************************************************************
    if record "dozen layout" data = 1 or record "dozen layout" data = 4
    begin
    // Group A = 1-12, 13-24
    if 3rd dozen has not hit for 1 times in a row
    begin
      Add 1 to record "group_a_1" data index
    end
    if the Record "group_a_1" data index > 1
    begin
        if 3rd dozen has not hit each time
        begin
            put 1 to record "bet_a_1" data index
            put 100 % of record "bet_a_1" data on list [1st dozen, 2nd dozen]
            if any dozen bet has won each time
            begin
                set flag "clr1" to true
            end
        end
        else
        begin
            if  flag "clr1" is false
            begin
                add 1 to Record "bet_a_1" data index
                put 100 % of record "bet_a_1" data on list [1st dozen, 2nd dozen]
            end
        end
        if flag "clr1" is true
        begin
            clear record "group_a_1" data
            put 1 on record "bet_a_1" data index
            set flag "clr1" to false
        end
    end
    If the Record "bet_a_1" data index > the Record "bet_a_1" data count
    begin
        clear record "group_a_1" data
        put 1 on record "bet_a_1" data index
    end
    end

    // ***************************************************************
    if record "dozen layout" data = 2 or record "dozen layout" data = 4
    begin
    // Group B = 1-12, 25-36
    if 2nd dozen has not hit for 1 times in a row
    begin
      Add 1 to record "group_b_1" data index
    end
    if the Record "group_b_1" data index > 1
    begin
        if 2nd dozen has not hit each time
        begin
            put 1 to record "bet_b_1" data index
            put 100 % of record "bet_b_1" data on list [1st dozen, 3rd dozen]
            if any dozen bet has won each time
            begin
                set flag "clr2" to true
            end
        end
        else
        begin
            if  flag "clr2" is false
            begin
                add 1 to Record "bet_b_1" data index
                put 100 % of record "bet_b_1" data on list [1st dozen, 3rd dozen]
            end
        end
        if flag "clr2" is true
        begin
            clear record "group_b_1" data
            put 1 on record "bet_b_1" data index
            set flag "clr2" to false
        end
    end
    If the Record "bet_b_1" data index > the Record "bet_b_1" data count
    begin
        clear record "group_b_1" data
        put 1 on record "bet_b_1" data index
    end
    end

    // ***************************************************************
    if record "dozen layout" data = 3 or record "dozen layout" data = 4
    begin
     // Group C = 13-24, 25-36
    if 1st dozen has not hit for 1 times in a row
    begin
      Add 1 to record "group_c_1" data index
    end
    if the Record "group_c_1" data index > 1
    begin
        if 1st dozen has not hit each time
        begin
            put 1 to Record "bet_c_1" data index
            put 100 % of record "bet_c_1" data on list [2nd dozen, 3rd dozen]
            if any dozen bet has won each time
            begin
                set flag "clr3" to true
            end
        end
        else
        begin
            if  flag "clr3" is false
            begin
                add 1 to Record "bet_c_1" data index
                put 100 % of record "bet_c_1" data on list [1st dozen, 2nd dozen]
            end
        end
        if flag "clr3" is true
        begin
            clear record "group_c_1" data
            put 1 on record "bet_c_1" data index
            set flag "clr3" to false
        end
    end
    If the Record "bet_c_1" data index > the Record "bet_c_1" data count
    begin
        clear record "group_c_1" data
        put 1 on record "bet_c_1" data index
    end
    end

end