dgt error rx hi this dgt gives me an error someone can solve

[puntoit]

system "giocare contro le ultime 4 chance"
{
*************************************
*          System by tanta pazienza        *
*************************************

-------------------------------------
Somettiamo sulle ultime 4 chance e ignoriamo lo zero.
usiamo 3 tipi di scomessa: normale, martingale 1,2,4,8,16,32,64,128,256,512 e la  labby.
-------------------------------------
}
method "main"
begin
// do this once
while starting new session
    begin
    call "init"
    end


// act on a loss
if net < 0
    begin
    add 1 record"pro"data index
    if record"pro"data index > record"pro"data count
        begin
        put 1 record"pro"data index
        end
    set max record"labby"data index
    add 1 record"labby"data index
    put 100% record"unit"data record"labby"data
    end

// act on a win
if net > 0
    begin
    call "reset"
    if record"labby"data count < 3
        begin
        call "set labby here"
        end
        else
        begin
        clear record"temp"data
        put 2 record"labby"data index
        loop until record"labby"data index = record"labby"data count
            begin
            put 100% record"labby"data record"temp"data
            add 1 record"temp"data index
            add 1 record"labby"data index
            end
        duplicate record"temp" record"labby"
        end
    end

// act when not qualified
if flag "qualified" false
    begin
    clear record"bet on them"layout
    put 1 record"last 4EM"layout index
    loop until record"last 4EM"layout index > record"last 4EM"layout count
        begin
        if record"last 4EM"layout = red begin copy black record"bet on them"layout end
        if record"last 4EM"layout = black begin copy red record"bet on them"layout end
        if record"last 4EM"layout = even begin copy odd record"bet on them"layout end
        if record"last 4EM"layout = odd begin copy even record"bet on them"layout end
        if record"last 4EM"layout = high begin copy low record"bet on them"layout end
        if record"last 4EM"layout = low begin copy high record"bet on them"layout end
        add 1 record"bet on them"layout index
        add 1 record"last 4EM"layout index
        end
    put 0 record"pointer"data
    set flag "qualified" true
    end

// act when qualified
if flag "qualified" true
    begin
    //bet
    set max record"bet on them"layout index
    subtract 100% record"pointer"data record"bet on them"layout index
    if record"B"data = 1
        begin put 1 record"bet on them"layout end
    if record"B"data = 2
        begin put 100% record"pro"data record"bet on them"layout end
    if record"B"data = 3
        begin
        put 1 record"labby"data index
        put 100% record"labby"data record"unit"data
        if record"labby"data count > 1
            begin
            set max record"labby"data index
            add 100% record"labby"data record"unit"data
            end
        put 100% record"unit"data record"bet on them"layout
        end
    end

end
if number loss

// subroutines
method "init"
begin
group
    begin
    display "rmi(rror)227"
    display"------------------------------------------------------------------"
    input dropdown "Play:
    1:= red-black
    2:= even-odd
    3:= high-low" record"P"data
    input dropdown "Progression:
    1:= flat bet
    2:= 1,2,4,8,16,32,64,128,256,512
    3:= 0,1 labby" record"B"data
    end
set list [1,2,4,8,16,32,64,128,256,512] record"pro"data
call "set labby here"
call "reset"
end

method "reset"
begin
set flag "qualified" false
put 1 record"pro"data index
end

method "set labby here"
begin
set list [0,1] record"labby"data
end

[boyd30]

Is this a Martingale for red/black?

[puntoit]

Is this a Martingale for red/black?

no has three types of maneuver
1:= flat bet
2:= 1,2,4,8,16,32,64,128,256,512
3:= 0,1 labby" record"B"data