Hot Spot Mapping v1

Contenuto del file

system "Hot Spot Mapping v1"
{
*************************************
*      System by luposlipphobia     *
*         on the VIP Lounge         *
*************************************
          Rx-ed by St0rm0r
-------------------------------------
           00-c0mpatible
-------------------------------------
Place 1 unit on last number that appeared (including 0 and 00).
Continue to do so until 10 numbers are covered or you have improved your starting
balance (gone one or more units above starting balance).
Start over from 1 unit on last number hit once starting balance has been improved.
Triple the bet for hits to existing hits.
When 10 numbers are covered but you have not improved your starting balance yet,
increase all 1 unit bets to 2 units and all 3 unit bets to 6 units.
When 15 numbers are covered but you have not improved your starting balance yet,
increase all 2 unit bets to 3 units,
all 6 to 9 unit bets to 10 units,
all 10 to 14 unit bets to 15 units and leave all bets 15 units or over as is.
When 20 numbers are covered but you have not improved your starting balance yet,
increase all existing bets that are under 5 units to 5 units,
all 5 to 9 unit bets to 10 units,
all 10 to 14 unit bets to 15 units and leave all bets 15 units or over as is.
When 24 numbers are covered but you have not improved your starting balance yet,
increase the minimum bet to 10 units and leave all over bet as is.
-------------------------------------
}
method "main"
begin
// section 1: do this once
while starting new session
    begin
    call "init"
    exit
    end

// section 2: do the tracking
set flag "restart" false
if bankroll > record"new high"data
    begin
    clear record"play"layout
    clear record"play amount"data
    put 100% bankroll record"new high"data
    set flag "restart" true
    put 1 record"base amount"data
    end
track last number for 1 time record"last N"layout
if record"last N"layout is not found record"play"layout
    begin
    call "goto end of the list"
    copy record"last N"layout to record"play"layout
    put 100% record"base amount"data record"play amount"data
    if record"play"layout count = 11
        begin
        call"increase bets 1"
        put 2 record"base amount"data
        end
    if record"play"layout count = 16
        begin
        call"increase bets 2"
        put 3 record"base amount"data
        end
    if record"play"layout count = 21
        begin
        call"increase bets 3"
        put 5 record"base amount"data
        end
    if record"play"layout count = 25
        begin
        call"increase bets 4"
        put 10 record"base amount"data
        end
    end
// section 3: act on a loss
if net < 0
    begin

    end

// section 4:act on a win
if net > 0
    begin
    if flag "restart" false
        begin
        call "triple bet"
        end
    end

call "check table limit"
//section 6: bet
put 1 record"play"layout index
loop until record"play"layout index > record"play"layout count
    begin
    put 100% record"play"layout index record"play amount"data index
    put 100% record"play amount"data record"play"layout
    add 1 record"play"layout index
    end
end

// section 7: subroutines
method "init"
begin
put 100% bankroll record"new high"data
set flag "restart" false
put 1 record"base amount"data
call "reset"
end

method "reset"
begin

end

method "goto end of the list"
begin
put 1 record"play"layout index
loop until record"play"layout index > record"play"layout count
    begin
    add 1 record"play"layout index
    end
put 100% record"play"layout index record"play amount"data index
end

method "triple bet"
begin
put 1 record"play"layout index
loop until record"play"layout = record"last N"layout
    begin
    add 1 record"play"layout index
    end
put 100% record"play"layout index record"play amount"data index
multiply by 3 on record"play amount"data
end

method "increase bets 1"
begin
put 1 record"play amount"data index
loop until record"play amount"data index > record"play amount"data count
    begin
    if record"play amount"data = 1
        begin
        put 2 record"play amount"data
        end
    if record"play amount"data = 3
        begin
        put 6 record"play amount"data
        end
    add 1 record"play amount"data index
    end
end

method "increase bets 2"
begin
put 1 record"play amount"data index
loop until record"play amount"data index > record"play amount"data count
    begin
    if record"play amount"data > 9 and record"play amount"data < 15
        begin
        put 15 record"play amount"data
        end
    if record"play amount"data > 5 and record"play amount"data < 10
        begin
        put 10 record"play amount"data
        end
    if record"play amount"data = 2
        begin
        put 3 record"play amount"data
        end
    add 1 record"play amount"data index
    end
end

method "increase bets 3"
begin
put 1 record"play amount"data index
loop until record"play amount"data index > record"play amount"data count
    begin
    if record"play amount"data > 9 and record"play amount"data < 15
        begin
        put 15 record"play amount"data
        end
    if record"play amount"data > 5 and record"play amount"data < 10
        begin
        put 10 record"play amount"data
        end
    if record"play amount"data < 5
        begin
        put 5 record"play amount"data
        end
    add 1 record"play amount"data index
    end
end

method "increase bets 4"
begin
put 1 record"play amount"data index
loop until record"play amount"data index > record"play amount"data count
    begin
    if record"play amount"data < 10
        begin
        put 10 record"play amount"data
        end
    add 1 record"play amount"data index
    end
end

method "check table limit"
begin
put 0 record"total"data
put 1 record"play amount"data index
loop until record"play amount"data index > record"play amount"data count
    begin
    add 100% record"play amount"data record"total"data
    add 1 record"play amount"data index
    end
if record"total"data > 500
    begin
    display "Table Limit Reached"
    end
end