4 flow system v2

Contenuto del file

system "4 flow system v2"
{
*************************************
*        System by Dimitri756       *
*         on the VIP Lounge         *
*************************************
          Rx-ed by St0rm0r
-------------------------------------
           00-c0mpatible
-------------------------------------
Record last X spins(even money)
Bet on the dominant color.
Zeros are ignored
Explanation on step progressions:
http://gambling.projectsydney.com/viewtopic.php?t=3445&highlight=
-------------------------------------
}
method "main"
begin
while starting a new session
    begin
    call "init"
    exit
    end

//do the tracking
track last number for 1 record"last N"layout
if record"last N"layout not = number 0 and record"last N"layout not = number 00
    begin
    track last red-black for record"X"data record"last RB"layout
    end
if record"last RB"layout count < record"X"data
    begin
    set flag "first pass" true
    exit
    end

add 100% net record"loss"data
if record"loss"data > 0
    begin
    put 0 record"loss"data
    end

// virtual loss
if flag "intention to bet" true
    begin
    put 1 record"last RB"layout index
    loop until record"last RB"layout index = record"last RB"layout count
        begin
        add 1 record"last RB"layout index
        end
    if record"last RB"layout is not found record"play"layout
        begin
        if record"P"data = 4
            begin
            put 100% record"3.On a loss goto step"data record"go"data
            end
        end
        else
        begin
        if record"P"data = 4
            begin
            if bankroll > record"new high"data
                begin
                put 100% bankroll in record"new high"data
                put 100% record"4.On a win with new high goto step"data record"go"data
                end
                else
                begin
                put 100% record"5.On a win without new high goto step"data record"go"data
                end
            end
        end
    end

// section 3: act on a loss
if net < 0
    begin
    if record"P"data = 2
        begin
        add 1 record"pro"data
        end
    if record"P"data = 3
        begin
        put 1 record"pro"data
        end
    end

// section 4:act on a win
if net > 0
    begin
    if record"P"data = 4
        begin

        end
        else
        begin
        call "reset"
        end
    end

//determine dominant color
set flag "intention to bet" false
put 0 record"red"data
put 0 record"black"data
put 1 record"last RB"layout index
loop until record"last RB"layout index > record"last RB"layout count
    begin
    if record"last RB"layout = red
        begin
        add 1 record"red"data
        end
    if record"last RB"layout = black
        begin
        add 1 record"black"data
        end
    add 1 record"last RB"layout index
    end
if record"red"data > record"black"data or record"red"data < record"black"data
    begin
    set flag "intention to bet" true
    end

//bet
if record"P"data = 1
    begin
    call "calculate bet"
    end
if record"P"data = 4
    begin
    call "update progression"
    put 100% record"2.units to bet"data on record"pro"data
    end

clear record"play"layout
if record"red"data > record"black"data
    begin
    copy red record"play"layout
    end
if record"red"data < record"black"data
    begin
    copy black record"play"layout
    end
put 100% record"pro"data record"play"layout
end

method "init"
begin
group
    begin
    display "4 FLOW SYSTEM v2"
    display "------------------------------------------------------------------"
    input data "Determine dominant color in last X spins: (e.g. 4)" record"X"data
    input dropdown "Progression:
    1:= use progression to cover losses in one spin
    2:= increase bet by one unit on a loss
    3:= bet flat
    4:= step progression" record"P"data
    end
if record"P"data = 4
    begin
    input dropdown "select your step progression:
    1:= 7 step Martingale Classic
    2:= 7 step Martingale / Fast grinder
    3:= 4 step Martingale / Slow grinder
    4:= 7 step Don�t Move Marti
    5:= Paired Martingale
    6:= D�Alembert
    7:= D�Alembert with reset on a new high
    8:= not a D�Alembert any more
    9:= Two step Parlay
    10:= Three step Hiccup Parlay
    11:= Stay Parlay
    12:= Two step Paroli
    13:= Two step Paroli Hang on �till profit
    14:= 1-3-2-6 system
    15:= 2 Up 2 Down system
    16:= 31 system
    17:= 2 step Alexembert
    18:= 3 step Alexembert
    19:= Fibonacci
    20:= Lucky 7
    21:= With your eyes wide shut
    22:= Catch the bullet
    23:= Timber
    24:= Down on Wallstreet
    25:= Just Created One
    26:= Perforated d�Alembert
    27:= Regression 2,1,2,3,3,4,5
    28:= Regression 2,1,2,3,4,5,7
    29:= Regression 2,1,2,3,5,8,13
    30:= Regression 3,2,3,5,6,7,8
    31:= Grabs positive
    32:= Grabs negative
    33:= Tier et Tout
    34:= ASM system
    35:= Gamblerb�s
    36:= Carsch
    37:= 1,2,3,5,8,13,21,34,55,100" record "SP"data
    end
call "select step progression"
put 1 record"go"data
put 100% bankroll record"new high"data
call "reset"
end

method "reset"
begin
put 0 record"loss"data
put 1 record"pro"data
end

//==============================================================================


// subroutines


method "calculate bet"
begin
put 100% record"loss"data record"pro"data
subtract 200% record"pro"data record"pro"data
add 1 record"pro"data
end

method "update progression"
begin
put 100% record"go"data record"2.units to bet"data index
put 100% record"go"data record"3.On a loss goto step"data index
put 100% record"go"data record"4.On a win with new high goto step"data index
put 100% record"go"data record"5.On a win without new high goto step"data index
end

method "select step progression"
begin
if record"SP"data = 1
    begin
    set list [ 1, 2, 4, 8,16,32,64] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 2
    begin
    set list [ 1, 2, 4, 8,16,32,64] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 6, 6, 6, 6, 6, 6, 6] record"5.On a win without new high goto step"data
    end
if record"SP"data = 3
    begin
    set list [ 1, 2, 4, 8] record"2.units to bet"data
    set list [ 2, 3, 4, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 3, 3, 3, 3] record"5.On a win without new high goto step"data
    end
if record"SP"data = 4
    begin
    set list [ 1, 2, 4, 8,16,32,64] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 1, 2, 3, 4, 5, 6, 7] record"5.On a win without new high goto step"data
    end
if record"SP"data = 5
    begin
    set list [ 1, 1, 2, 2, 4, 4, 8, 8,16,16,32,32,64,64] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 3, 1, 5, 1, 7, 1, 9, 1,11, 1,13] record"4.On a win with new high goto step"data
    set list [ 1, 1, 1, 3, 1, 5, 1, 7, 1, 9, 1,11, 1,13] record"5.On a win without new high goto step"data
    end
if record"SP"data = 6
    begin
    set list [ 1, 1, 2, 2, 4, 4, 8, 8,16,16,32,32,64,64] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 3, 1, 5, 1, 7, 1, 9, 1,11, 1,13] record"4.On a win with new high goto step"data
    set list [ 1, 1, 1, 3, 1, 5, 1, 7, 1, 9, 1,11, 1,13] record"5.On a win without new high goto step"data
    end
if record"SP"data = 7
    begin
    set list [ 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 1, 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14] record"5.On a win without new high goto step"data
    end
if record"SP"data = 8
    begin
    set list [ 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15] record"5.On a win without new high goto step"data
    end
if record"SP"data = 9
    begin
    set list [ 1, 2, 4] record"2.units to bet"data
    set list [ 1, 1, 1] record"3.On a loss goto step"data
    set list [ 2, 3, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 10
    begin
    set list [ 1, 2, 4, 8] record"2.units to bet"data
    set list [ 1, 1, 2, 3] record"3.On a loss goto step"data
    set list [ 2, 3, 4, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 11
    begin
    set list [ 1, 2, 4, 8] record"2.units to bet"data
    set list [ 1, 2, 3, 4] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 12
    begin
    set list [ 1, 2, 3] record"2.units to bet"data
    set list [ 1, 1, 1] record"3.On a loss goto step"data
    set list [ 2, 3, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 13
    begin
    set list [ 1, 2, 3] record"2.units to bet"data
    set list [ 1, 1, 1] record"3.On a loss goto step"data
    set list [ 2, 3, 1] record"4.On a win with new high goto step"data
    set list [ 1, 2, 3] record"5.On a win without new high goto step"data
    end
if record"SP"data = 14
    begin
    set list [ 1, 3, 2, 6] record"2.units to bet"data
    set list [ 1, 1, 1, 1] record"3.On a loss goto step"data
    set list [ 2, 3, 4, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 15
    begin
    set list [ 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9,10,10,11,11,12,12,
    13,13,14,14,15,15,16,16,17,17,18,18,19,19,20,20] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,
    26,27,28,29,30,31,32,33,34,35,36,37,38,39,40, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,
    24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39] record"4.On a win with new high goto step"data
    set list [ 1, 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,
    24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39] record"5.On a win without new high goto step"data
    end
if record"SP"data = 16
    begin
    set list [ 1, 1, 1, 2, 2, 4, 4, 8, 8] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9, 1] record"3.On a loss goto step"data
    set list [ 1, 3, 1, 5, 1, 7, 1, 9, 1] record"4.On a win with new high goto step"data
    set list [ 1, 3, 1, 5, 1, 7, 1, 9, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 17
    begin
    set list [ 1, 1, 3, 3, 5, 5, 7, 7, 9, 9,11,11,13,13,15,15,17,17,19,19,21,21,23,23,25,25] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 2, 1, 4, 1, 6, 1, 8, 1,10, 1,12, 1,14, 1,16, 1,18, 1,20, 1,22, 1,24, 1,26, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 18
    begin
    set list [ 1, 1, 1, 4, 4, 4, 7, 7, 7,10,10,10,13,13,13,16,16,16,19,19,19,22,22,22,
    25,25,25] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,
    26,27, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
    1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 1, 5, 6, 1, 8, 9, 1,11,12, 1,14,15, 1,17,18, 1,20,21, 1,23,24, 1,
    26,27, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 19
    begin
    set list [ 1, 1, 1, 1, 2, 2, 3, 3, 5, 5, 8, 8,13,13,21,21,34,34,55,55] record"2.units to bet"data
    set list [ 3, 3, 5, 5, 7, 7, 9, 9,11,11,13,13,15,15,17,17,19,19,20, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 2, 1, 4, 1, 6, 1, 8, 1,10, 1,12, 1,14, 1,16, 1,18, 1,20, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 20
    begin
    set list [ 5, 8,12,18,27,51,77] record"2.units to bet"data
    set list [ 1, 1, 1, 1, 1, 1, 1] record"3.On a loss goto step"data
    set list [ 2, 3, 4, 5, 6, 7, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 5, 6, 7, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 21
    begin
    set list [ 1, 2, 3, 4, 5] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 5, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 22
    begin
    set list [16, 8, 4, 2, 1] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 1, 2, 3, 4, 5] record"5.On a win without new high goto step"data
    end
if record"SP"data = 23
    begin
    set list [21,13, 8, 5, 3, 2, 1, 1] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 24
    begin
    set list [64,32,16, 8, 4, 2, 1] record"2.units to bet"data
    set list [ 1, 2, 3, 4, 5, 6, 7] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 5, 6, 7, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 25
    begin
    set list [ 1, 2, 3, 4, 8,16, 8, 8,16,16,32,32,64,64,100] record"2.units to bet"data
    set list [ 1, 1, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15, 15] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  1] record"4.On a win with new high goto step"data
    set list [ 2, 3, 1, 6, 6, 6, 8, 1,10, 1,12, 1,14, 1, 15] record"5.On a win without new high goto step"data
    end
if record"SP"data = 26
    begin
    set list [ 1, 2, 0, 4, 5, 0, 7, 8, 0,10,11, 0,13,14, 0] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,15, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14] record"4.On a win with new high goto step"data
    set list [ 1, 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14] record"5.On a win without new high goto step"data
    end
if record"SP"data = 27
    begin
    set list [ 2, 2, 2, 1, 2, 3, 3, 4, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] record"2.units to bet"data
    set list [ 2, 3,10, 1, 1, 1, 1, 1, 1,11,12,13,14,15,16,17,18,19, 1] record"3.On a loss goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"4.On a win with new high goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 28
    begin
    set list [ 2, 2, 2, 1, 2, 3, 4, 5, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] record"2.units to bet"data
    set list [ 2, 3,10, 1, 1, 1, 1, 1, 1,11,12,13,14,15,16,17,18,19, 1] record"3.On a loss goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"4.On a win with new high goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 29
    begin
   set list [ 2, 2, 2, 1, 2, 3, 5, 8,13, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] record"2.units to bet"data
    set list [ 2, 3,10, 1, 1, 1, 1, 1, 1,11,12,13,14,15,16,17,18,19, 1] record"3.On a loss goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"4.On a win with new high goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 30
    begin
    set list [ 3, 3, 3, 2, 3, 5, 6, 7, 8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0] record"2.units to bet"data
    set list [ 2, 3,10, 1, 1, 1, 1, 1, 1,11,12,13,14,15,16,17,18,19, 1] record"3.On a loss goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"4.On a win with new high goto step"data
    set list [ 4, 4, 4, 5, 6, 7, 8, 9, 1,11,12,13,14,15,16,17,18,19, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 31
    begin
    set list [ 5, 6, 7, 8, 9, 4, 3, 2, 1] record"2.units to bet"data
    set list [ 6, 1, 2, 3, 4, 7, 8, 9, 1] record"3.On a loss goto step"data
    set list [ 2, 3, 4, 5, 1, 1, 6, 7, 8] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 5, 1, 1, 6, 7, 8] record"5.On a win without new high goto step"data
    end
if record"SP"data = 32
    begin
    set list [ 5, 6, 7, 8, 9, 4, 3, 2, 1] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 1, 1, 6, 7, 8] record"3.On a loss goto step"data
    set list [ 6, 1, 2, 3, 4, 7, 8, 9, 1] record"4.On a win with new high goto step"data
    set list [ 6, 1, 2, 3, 4, 7, 8, 9, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 33
    begin
    set list [ 3, 6, 4, 8, 5,10, 7,14, 9,18,12,24,15,30,20,40,25,50] record"2.units to bet"data
    set list [ 2, 1, 4, 1, 6, 1, 8, 1,10, 1,12, 1,14, 1,16, 1,18, 1] record"3.On a loss goto step"data
    set list [ 3, 3, 5, 5, 7, 7, 9, 9,11,11,13,13,15,15,17,17, 1, 1] record"4.On a win with new high goto step"data
    set list [ 3, 3, 5, 5, 7, 7, 9, 9,11,11,13,13,15,15,17,17, 1, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 34
    begin
    set list [ 1, 1, 2, 2, 4, 4, 1, 2, 2, 4] record"2.units to bet"data
    set list [ 7, 1, 1, 3, 3, 3, 8, 9,10, 1] record"3.On a loss goto step"data
    set list [ 2, 3, 4, 5, 6, 6, 1, 1, 8, 8] record"4.On a win with new high goto step"data
    set list [ 2, 3, 4, 5, 6, 6, 1, 1, 8, 8] record"5.On a win without new high goto step"data
    end
if record"SP"data = 35
    begin
    set list [ 1, 2, 5,10, 7,11] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1] record"4.On a win with new high goto step"data
    set list [ 1, 1, 1, 1, 1, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 36
    begin
    set list [ 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 4, 6, 6, 6, 9, 9, 9,14,14,14,21,21,21,32,32,32] record"2.units to bet"data
    set list [ 2, 3, 4, 6, 4, 7, 9, 7,10,12,10,13,15,13,16,18,16,19,21,19,22,24,22,25, 1,25] record"3.On a loss goto step"data
    set list [ 1, 1, 5, 3, 1, 8, 6, 1,11, 9, 1,14,12, 1,17,15, 1,20,18, 1,23,21, 1,26,25, 1] record"4.On a win with new high goto step"data
    set list [ 1, 1, 5, 3, 1, 8, 6, 1,11, 9, 1,14,12, 1,17,15, 1,20,18, 1,23,21, 1,26,25, 1] record"5.On a win without new high goto step"data
    end
if record"SP"data = 37
    begin
    set list [ 1, 2, 3, 5, 8,13,21,34,55,100] record"2.units to bet"data
    set list [ 2, 3, 4, 5, 6, 7, 8, 9,10,  1] record"3.On a loss goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1,  1] record"4.On a win with new high goto step"data
    set list [ 1, 1, 1, 1, 1, 1, 1, 1, 1,  1] record"5.On a win without new high goto step"data
    end
end