system "Nuffdark 18-21 v2"
{

}
method "main"
begin
while starting a new session
begin
    set flag "18/19" false
    set flag "20/21" false
    set flag "All" false

    set list [1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 4, 4, 5, 5, 6, 7, 8,
    9, 10, 11, 12, 14, 16, 18, 20, 22, 25, 28, 32, 36, 40, 45, 51, 57, 64, 72,
    81, 91, 103, 116, 130, 146, 165, 185, 208, 234, 264, 297, 334, 376, 423,
    475, 535, 602, 677, 762, 857, 964, 1084, 1220, 1372, 1544, 1737, 1954,
    2198, 2473, 2782, 3130, 3521, 3961, 4456, 5013, 5640, 6345, 7138, 8030,
    9034, 10163, 11434, 12863, 14471, 16280, 18315, 20604, 23180, 26077, 29337,
    33004, 37129, 41771, 46992, 52866, 59474, 66908, 75272] on record "progression2" data
    put 1 on record "progression2" data index

    set list [1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2,
    2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 6, 6, 6, 7, 7, 8, 8,
    9, 9, 10, 10, 11, 11, 12, 13, 14, 14, 15, 16, 17, 18, 19, 20, 21, 23, 24,
    25, 27, 28, 30, 32, 34, 36, 38, 40, 42, 45, 48, 50, 53, 56, 60, 63, 67, 71,
    75, 80, 84, 89, 94, 100, 106, 112, 119, 126, 133, 141, 149, 158, 167, 177,
    187, 198, 210, 222, 236, 249, 264, 280, 296, 313, 332, 351, 372, 394, 417,
    442, 468, 495, 524, 555, 588, 622, 659, 698, 739, 782, 828, 877, 929, 983,
    1041, 1102, 1167, 1236, 1308, 1385, 1467, 1553, 1644, 1741, 1844, 1952,
    2067, 2188, 2317, 2453, 2598, 2751, 2912, 3084, 3265, 3457, 3661, 3876,
    4104, 4345, 4601, 4872, 5158, 5462, 5783, 6123, 6483, 6865, 7268, 7696,
    8149, 8628, 9135, 9673, 10242, 10844, 11482, 12158, 12873, 13630, 14432,
    15281, 16180, 17131, 18139, 19206, 20336, 21532, 22799, 24140, 25560,
    27063, 28655, 30341, 32126, 34015, 36016, 38135, 40378, 42753, 45268, 47931, 50750] on record "progression1" data
    put 1 on record "progression" data index
    Input Dropdown "How do you want to play?


        1:= Flat Bet
        2:= Progression"

                to record "play" data
    if record "play" data = 1
        begin
        set flag "flat" true
        end
        else
        begin
        set flag "flat" false
        end
////////////////////////////////////////////////////////////////////////////////
    input dropdown "Which numbers back do you want to play?

        1:= 18 & 19
        2:= 20 & 21
        3:= 18, 19, 20, 21"

                to record "numbers to play" data

        If record "numbers to play" data = 1
            begin
            put 4 on record "1st number" data
            put 3 on record "2nd number" data
            set flag "18/19" true
            end

        if record "numbers to play" data = 2
            begin
            put 2 on record "1st number" data
            put 1 on record "2nd number" data
            set flag "20/21" true
            end

        if record "numbers to play" data = 3
            begin
            set flag "All" true
            end
        end

call "track"
call "eval"
call "bet"
end

method "track"
begin
track last number for 21 times on record "last#s" layout
end

method "eval"
begin
if net > 0
    begin
    put 1 on record "progression1" data index
    put 1 on record "progression2" data index
    end
if net < 0
    begin
    add 1 on record "progression1" data index
    add 1 on record "progression2" data index
    if record "progression1" data index > record "progression1" data count
        begin
        put 1 on record "progression1" data index
        end

    if record "progression2" data index > record "progression2" data count
        begin
        put 1 on record "progression2" data index
        end
    end
end

method "bet"
begin
if record "last#s" layout count >=21 and flag "flat" true and flag "18/19" true
    begin
    put 100% record "1st number" data on record "last#s" layout index
    put 1 on record "last#s" layout
    put 100% record "2nd number" data on record "last#s" layout index
    put 1 on record "last#s" layout
    end

if record "last#s" layout count >=21 and flag "flat" true and flag "20/21" true
    begin
    put 100% record "1st number" data on record "last#s" layout index
    put 1 on record "last#s" layout
    put 100% record "2nd number" data on record "last#s" layout index
    put 1 on record "last#s" layout
    end

if record "last#s" layout count >=21 and flag "flat" true and flag "All" true
    begin
    put 1 on record "last#s" layout index
    put 1 on record "last#s" layout
    put 2 on record "last#s" layout index
    put 1 on record "last#s" layout
    put 3 on record "last#s" layout index
    put 1 on record "last#s" layout
    put 4 on record "last#s" layout index
    put 1 on record "last#s" layout
    end

if record "last#s" layout count >=21 and flag "flat" false and flag "18/19" true
    begin
    put 100% record "1st number" data on record "last#s" layout index
    put 100% record "progression1" data on record "last#s" layout
    put 100% record "2nd number" data on record "last#s" layout index
    put 100% record "progression1" data on record "last#s" layout
    end

if record "last#s" layout count >=21 and flag "flat" false and flag "20/21" true
    begin
    put 100% record "1st number" data on record "last#s" layout index
    put 100% record "progression1" data on record "last#s" layout
    put 100% record "2nd number" data on record "last#s" layout index
    put 100% record "progression1" data on record "last#s" layout
    end

if record "last#s" layout count >=21 and flag "flat" false and flag "All" true
    begin
    put 1 on record "last#s" layout index
    put 100% record "progression2" data on record "last#s" layout
    put 2 on record "last#s" layout index
    put 100% record "progression2" data on record "last#s" layout
    put 3 on record "last#s" layout index
    put 100% record "progression2" data on record "last#s" layout
    put 4 on record "last#s" layout index
    put 100% record "progression2" data on record "last#s" layout
    end
end