Saliu even money v2

Contenuto del file

system "io_saliu_even_money v2"
{
    This system is for even money bets, based on the theories of Ion Saliu (www.saliu.com)
    Red and Black example:
    step 1 - black has not hit for 2 times in row ? -> go to step 2
    step 2 - track the same pattern for x times set by ( "Wait for x qualifications before placing a bet ?") -> go to step 3
    step 3 - red has hit? wait for a black to hit ->step 4
    step 4 - black has hit once ?-> step 5
    step 5 - bet on red
}
method "main"
begin
     while starting a new session
     begin
        Clear All Records
        Set List of [1,2,4,8,16,32,64,128] to record "bet_high" data;
        Put 1 on Record "bet_high" data index
        Set List of [1,2,4,8,16,32,64,128] to record "bet_low" data;
        Put 1 on Record "bet_low" data index
        Set List of [1,2,4,8,16,32,64,128] to record "bet_odd" data;
        Put 1 on Record "bet_odd" data index
        Set List of [1,2,4,8,16,32,64,128] to record "bet_even" data;
        Put 1 on Record "bet_even" data index
        Set List of [1,2,4,8,16,32,64,128] to record "bet_red" data;
        Put 1 on Record "bet_red" data index
        Set List of [1,2,4,8,16,32,64,128] to record "bet_black" data;
        Put 1 on Record "bet_black" data index

        group
        begin
            Input Dropdown "Wheel Type ?
            1:= Single zero
            2:= Double zero" to record "wheel" data


            Input dropdown "What layouts to use ?
            1:=  low/high
            2:=  odd/even
            3:=  black/red
            4:=  All 3"    to record "LayoutType" data

            put 2 on record "aHits" data //default
            put 999999 on record "WinGoal" data //default
            put 999999 on record "LossGoal" data //default

            input data "Wait for x qualifications
                        before placing a bet ?" to record "aHits" data
            input data "Bankroll ?" to Bankroll
            input data "Win Goal ?" to record "WinGoal" data
            input data "Loss Goal ?" to record "LossGoal" data

            set flag "chkpoint1" false
            set flag "chkpoint2" false
            set flag "chkpoint3" false
            set flag "chkpoint4" false
            set flag "chkpoint5" false
            set flag "chkpoint6" false
            set flag "chkpoint7" false
            set flag "chkpoint8" false
            set flag "chkpoint9" false
            set flag "chkpoint10" false
            set flag "chkpoint11" false
            set flag "chkpoint12" false

            set flag "red_bet_placed" false
            set flag "black_bet_placed" false


        end

        if record "wheel" data = 1 begin
            Load Single Wheel end
        else begin
            Load Double Wheel end

        exit;
     end

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

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


     // ************ LOW ****************
    if record "LayoutType" data = 1 or record "LayoutType" data = 4
    begin
    // track the low pattern
    if Low has hit exactly 2 times in a row
    begin
        Add 1 to record "low" data index
    end

    If the Record "low" data index >= record "aHits" data
    begin
        Copy Last Low-High to the Record "last_low" Layout
        if record "last_low" Layout = high
        begin
            set flag "chkpoint5" true
        end
        if record "last_low" Layout = low and flag "chkpoint5" true
        begin
            set flag "chkpoint6" true
        end
        If flag "chkpoint5" true and flag "chkpoint6" true
        begin
            if High has Won exactly 1 times in a row
            begin
                set flag "high_bet_placed" false
                set flag "chkpoint5" false
                set flag "chkpoint6" false
                Clear record "low" data
                Put 1 record "bet_high" data index
            end
            else
            begin
                Put 100% of record "bet_high" data to High
                set flag "high_bet_placed" true
                add 1 record "bet_high" data index
            end
        end
    end

    If the Record "bet_high" data index >
        the Record "bet_high" data count  begin
        Put 1 on Record "bet_high" data index  end

    end


     // ************ HIGH ****************
    if record "LayoutType" data = 1 or record "LayoutType" data = 4
    begin
    // track the high pattern
    if High has hit exactly 2 times in a row
    begin
        Add 1 to record "High" data index
    end

    If the Record "High" data index >= record "aHits" data
    begin
        Copy Last Low-High to the Record "last_High" Layout
        if record "last_High" Layout = low
        begin
            set flag "chkpoint7" true
        end
        if record "last_High" Layout = high and flag "chkpoint7" true
        begin
            set flag "chkpoint8" true
        end
        If flag "chkpoint7" true and flag "chkpoint8" true
        begin
            if low has Won exactly 1 times in a row
            begin
                set flag "low_bet_placed" false
                set flag "chkpoint7" false
                set flag "chkpoint8" false
                Clear record "high" data
                Put 1 record "bet_low" data index
            end
            else
            begin
                Put 100% of record "bet_low" data to low
                set flag "low_bet_placed" true
                add 1 record "bet_low" data index
            end
        end
    end

    If the Record "bet_low" data index >
        the Record "bet_low" data count  begin
        Put 1 on Record "bet_low" data index  end

    end

    // ************ EVEN ****************
    if record "LayoutType" data = 2 or record "LayoutType" data = 4
    begin
    // track the even pattern
    if even has hit exactly 2 times in a row
    begin
        Add 1 to record "even" data index
    end

    If the Record "even" data index >= record "aHits" data
    begin
        Copy Last Odd-Even to the Record "last_even" Layout
        if record "last_even" Layout = odd
        begin
            set flag "chkpoint9" true
        end
        if record "last_even" Layout = even and flag "chkpoint9" true
        begin
            set flag "chkpoint10" true
        end
        If flag "chkpoint9" true and flag "chkpoint10" true
        begin
            if odd has Won exactly 1 times in a row
            begin
                set flag "odd_bet_placed" false
                set flag "chkpoint9" false
                set flag "chkpoint10" false
                Clear record "even" data
                Put 1 record "bet_odd" data index
            end
            else
            begin
                Put 100% of record "bet_odd" data to odd
                set flag "odd_bet_placed" true
                add 1 record "bet_odd" data index
            end
        end
    end

    If the Record "bet_odd" data index >
        the Record "bet_odd" data count  begin
        Put 1 on Record "bet_odd" data index  end

    end

     // ************ ODD ****************
    if record "LayoutType" data = 2 or record "LayoutType" data = 4
    begin
    // track the odd pattern
    if odd has hit exactly 2 times in a row
    begin
        Add 1 to record "odd" data index
    end

    If the Record "odd" data index >= record "aHits" data
    begin
        Copy Last Odd-Even to the Record "last_odd" Layout
        if record "last_odd" Layout = even
        begin
            set flag "chkpoint11" true
        end
        if record "last_odd" Layout = odd and flag "chkpoint11" true
        begin
            set flag "chkpoint12" true
        end
        If flag "chkpoint11" true and flag "chkpoint12" true
        begin
            if even has Won exactly 1 times in a row
            begin
                set flag "even_bet_placed" false
                set flag "chkpoint11" false
                set flag "chkpoint12" false
                Clear record "odd" data
                Put 1 record "bet_even" data index
            end
            else
            begin
                Put 100% of record "bet_even" data to even
                set flag "even_bet_placed" true
                add 1 record "bet_even" data index
            end
        end
    end

    If the Record "bet_even" data index >
        the Record "bet_even" data count  begin
        Put 1 on Record "bet_even" data index  end

    end


    // ************ BLACK ****************
    if record "LayoutType" data = 3 or record "LayoutType" data = 4
    begin
    // track the black pattern
    if Black has hit exactly 2 times in a row
    begin
        Add 1 to record "black" data index
    end

    If the Record "black" data index >= record "aHits" data
    begin
        Copy Last Red-Black to the Record "last_black" Layout
        if record "last_black" Layout = red
        begin
            set flag "chkpoint1" true
        end
        if record "last_black" Layout = black and flag "chkpoint1" true
        begin
            set flag "chkpoint2" true
        end
        If flag "chkpoint1" true and flag "chkpoint2" true
        begin
            if Red has Won exactly 1 times in a row
            begin
                set flag "red_bet_placed" false
                set flag "chkpoint1" false
                set flag "chkpoint2" false
                Clear record "black" data
                Put 1 record "bet_red" data index
            end
            else
            begin
                Put 100% of record "bet_red" data to Red
                set flag "red_bet_placed" true
                add 1 record "bet_red" data index
            end
        end
    end

    If the Record "bet_red" data index >
        the Record "bet_red" data count  begin
        Put 1 on Record "bet_red" data index  end

    end


    // ************ RED ****************
    if record "LayoutType" data = 3 or record "LayoutType" data = 4
    begin
    // track the red pattern
    if Red has hit exactly 2 times in a row
    begin
        Add 1 to record "red" data index
    end

    If the Record "red" data index >= record "aHits" data
    begin
        Copy Last Red-Black to the Record "last_red" Layout
        if record "last_red" Layout = black
        begin
            set flag "chkpoint3" true
        end
        if record "last_red" Layout = red and flag "chkpoint3" true
        begin
            set flag "chkpoint4" true
        end
        If flag "chkpoint3" true and flag "chkpoint4" true
        begin
            if Black has Won exactly 1 times in a row
            begin
                set flag "black_bet_placed" false
                set flag "chkpoint3" false
                set flag "chkpoint4" false
                Clear record "red" data
                Put 1 record "bet_black" data index
            end
            else
            begin
                Put 100% of record "bet_black" data to Black
                set flag "black_bet_placed" true
                add 1 record "bet_black" data index
            end
        end
    end

    If the Record "bet_black" data index >
        the Record "bet_black" data count  begin
        Put 1 on Record "bet_black" data index  end

    end

end