Combo Pow System

Contenuto del file

system "Combo Pow System"
{
**********************************
*  Idea Posted on VIP by Handle  *
**********************************
   Thu Feb 24, 2005 8:24 am
RX-ed for Single Wheel by St0rm0r

Track 37(europeon) or 38(american) spins.
Bet on the numbers that have repeated at least once.
Anywhere from 8 to 14 total. One unit on each. Take a third of this number
and this becomes your "stopping point".(round up)

Remove number when it hits and add one unit to all the rest.
Session ends when you've reached your "stopping point".


If Bankroll is at a plus, then start over.
If Bankroll is at a minus, then start over AND add one unit to each
numerical bet. This becomes your base bet.

So example time;
First bet is 1unit on each qualifier. Session ends and your at a loss.
Restart and place 2units on each qualifier. When first number hits you'd
add 2units to the others and remove the winner.

}
method "main"
begin
while starting a new session
    begin
    Load Single Wheel
    call "init"
    end

if flag "betting in action" is false
begin
// Track 37 spins
track last number for 37 times to record"37 numbers hit"layout

if record"37 numbers hit"layout count = 37
begin
// After 37 spins, select how many times each number hit
put 1 in record"x"data
loop until record"x"data = 38
    begin
    put 100% of record"x"data in record"37 numbers hit"layout index
    put 1 in record"y"data
    loop until record"y"data = 38
        begin
        put 100% of record"y"data in record"numbers"layout index
        if record"37 numbers hit"layout = record"numbers"layout
            begin
            put 100% of record"y"data in record"number hit frequency"data index
            add 1 to record"number hit frequency"data
            put 37 in record"y"data
            end
        add 1 to record"y"data
        end
    add 1 to record"x"data
    end
// Determine how many numbers have repeated at least once
call "count # active numbers"
// Determine "stopping point" (1/3rd of "# numbers repeated at least once",
//rounded up)
put 100% of record"# numbers repeated at least once"data in
record"stop point number"data index
add 1 to record"stop point number"data index
put 100% of record"stop point number"data in record"stop point"data
//*** TWEAK 1: increase the 0 in line below to increase stop point ***
add 0 to record"stop point"data
set flag "betting in action" to true
put 100% of record"progression"data in record"betting unit"data
end
end
else
begin
track last number for 1 time to record"last number"layout
if net > 0
    begin
    put 1 in record"x"data
    loop until record"x"data = 38
        begin
        put 100% of record"x"data in record"numbers"layout index
        if record"last number"layout = record"numbers"layout
            begin
            put 100% of record"x"data in record"number hit frequency"data index
            put 0 in record"number hit frequency"data
            add 100% of record"progression"data to record"betting unit"data
            end
        add 1 to record"x"data
        end
    end

//***TWEAK 2: start new session as soon as bankroll is at a plus, delete this
// and each session will be played up to the stop point***
if bankroll > record"reference bankroll"data
    begin
    put 1 in record"progression"data index
    call "reset"
    exit
    end

// check if "stop point" is reached
call "count # active numbers"
if record"# numbers repeated at least once"data = record"stop point"data
    begin
    if bankroll > record"reference bankroll"data
        begin
        put 1 in record"progression"data index
        end
        else
        begin
        add 1 to record"progression"data index
        if record"progression"data index > record"progression"data count
            begin
            put 1 in record"progression"data index
            end
        end
    call"reset"
    exit
    end
// place bet
put 1 in record"x"data
loop until record"x"data = 38
    begin
    put 100% of record"x"data to record"number hit frequency"data index
    if record"number hit frequency"data > 1
        begin
        put 100% of record"x"data to record"numbers"layout index

        put 100% of record"betting unit"data to record"numbers"layout
        end
    add 1 to record"x"data
    end
end
end

method "init"
begin
copy list [number 0, number 1, number 2,number 3, number 4,number 5, number 6,
number 7,number 8,number 9, number 10, number 11,number 12, number 13,number 14,
number 15,number 16, number 17,number 18, number 19,number 20, number 21,
number 22,number 23,number 24, number 25,number 26, number 27,number 28,
number 29,number 30,number 31,number 32, number 33,number 34, number 35,
number 36] to record"numbers"layout
set list [0,1,1,1,2,2,2,3,3,3,4,4,4,5,5,5,6,6,6] to record"stop point number"data
//*** TWEAK 3: set list in line below to [1,1] to run without progression ***
set list [1,2,3,4,5,6,7] to record"progression"data
put 1 in record"progression"data index
call "reset"
end

method "reset"
begin
set flag "betting in action" to false
set list [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0] to record"number hit frequency"data
put 100% of bankroll in record"reference bankroll"data
end

method "count # active numbers"
begin
put 1 in record"x"data
put 0 in record"# numbers repeated at least once"data
loop until record"x"data = 38
    begin
    put 100% of record"x"data to record"number hit frequency"data index
    if record"number hit frequency"data > 1
        begin
        add 1 in record"# numbers repeated at least once"data
        end
    add 1 to record"x"data
    end
end