4 number slow progression

Contenuto del file

system "4 number slow progression system"
{
Idea posted by TurboGenius on The VIP Lounge
Posted: Sun Feb 13, 2005 3:16 am    Post subject: 4# slow progression system
RX-ed by St0rm0r on Feb 13th, 2005

rules :
We wait out 4 spins.

To qualify :
No number can repeat during those 4 spins.. and...
No number can be the same as any number from last group
that qualified.
If no qualification - run off 4 more numbers

Once qualified :
Play all 4 numbers on spin #1 at 1 unit each.
From this point on, increase 1 unit per number,
one number at a time until all bets are at 2 units each.
Then begin with 3 units in the same manner

}
method "main"
begin
while starting a new session
    begin
    call "init"
    exit
    end

if net < 0
    begin
    call "calculate slow progression"
    end
if net > 0
    begin
    call "reset"
    end

if flag "qualified" is false
begin
call "try to qualify"
end
if flag "qualified" is true
begin
call "bet"
end

end

method "init"
begin
Load Single Wheel
copy list [number 00,number 00,number 00,number 00] to record"last qualified group"layout
call "reset"
end

method "reset"
begin
clear record"last 4 numbers"layout
set flag "qualified" to false
set list [1,1,1,1] to record"betting progression"data
put 0 in record"betting progression"data index
// *** THIS LIST DETERMINES YOUR PROGRESSION ***
set list [2,3,4] to record"progression"data
{
Try this one [2,3,4,6,9,15,24,39]
Try this one [2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20]
}
put 1 in record"progression"data index
end

method "try to qualify"
begin
track last number for 4 times in record"last 4 numbers"layout
if record"last 4 numbers"layout count = 4
begin
// check that no numbers repeat in the 4 last spins
set flag "qualified" to true
put 1 in record"i"data
loop until record"i"data = 5
    begin
    put 100% of record"i"data in record"last 4 numbers"layout index
    copy record"last 4 numbers"layout to record"reference number"layout
    put 100% of record"i"data in record"j"data
    add 1 to record"j"data
    loop until record"j"data = 5
        begin
        put 100% of record"j"data in record"last 4 numbers"layout index
        if record"last 4 numbers"layout = record"reference number"layout
        begin
        set flag "qualified" to false
        end
        add 1 to record"j"data
        end
    add 1 to record"i"data
    end

// check that no numbers are the same as any number from last group that qualified
put 1 in record"i"data
loop until record"i"data = 5
    begin
    put 100% of record"i"data in record"last 4 numbers"layout index
    copy record"last 4 numbers"layout to record"reference number"layout
    put 1 in record"j"data
    loop until record"j"data = 5
        begin
        put 100% of record"j"data in record"last qualified group"layout index
        if record"last qualified group"layout = record"reference number"layout
        begin
        set flag "qualified" to false
        end
        add 1 to record"j"data
        end
    add 1 to record"i"data
    end

// if the group qualifies: make it the 'last qualifying group' for later reference
if flag "qualified" is true
    begin
    put 1 in record"i"data
    loop until record"i"data = 5
        begin
        put 100% of record"i"data in record"last 4 numbers"layout index
        put 100% of record"i"data in record"last qualified group"layout index
        copy record"last 4 numbers"layout to record"last qualified group"layout
        add 1 to record"i"data
        end
    end
end
end

method "calculate slow progression"
begin
add 1 to record"betting progression"data index
if record"betting progression"data index > record"betting progression"data count
    begin
    add 1 to record"progression"data index
    // stop loss at end of progression
    if record"progression"data index > record"progression"data count
        begin
        call "reset"
        exit
        end
    put 1 to record"betting progression"data index
    end
put 100% of record"progression"data to record"betting progression"data
end

method "bet"
begin
put 1 in record"i"data
loop until record"i"data = 5
    begin
    put 100% of record"betting progression"data index in record"temp"data
    put 100% of record"i"data in record"last 4 numbers"layout index
    put 100% of record"i"data in record"betting progression"data index
    put 100% of record"betting progression"data on record"last 4 numbers"layout
    add 1 to record"i"data
    put 100% of record"temp"data back into record"betting progression"data index
    end
end