system "24"
{
*************************************
*        System by geoff365         *
*         on the VIP Lounge         *
*************************************
          Rx-ed by St0rm0r
-------------------------------------
           00-c0mpatible
-------------------------------------
Back all numbers that showed in the last 24 spins.
or
Back the last 24 numbers that showed.
On a hit do the same again.
-------------------------------------
}
method "main"
begin
// do this once
while starting new session
    begin
    call "init"
    exit
    end
// do the tracking
track last number for 24 record"last 24N"layout
track last number for 1 record"last N"layout
if record"last N"layout is not found in record"24 unique"layout
    begin
    if record"24 unique"layout count = 24
        begin
        move list up by 1 on record"24 unique"layout
        end
    set max record"24 unique"layout index
    add 1 record"24 unique"layout index
    copy record"last N"layout record"24 unique"layout
    end
// on a win
if net > 0
    begin
    set flag "qualified" false
    end
// to qualify
if flag "qualified" false
    begin
    if record"G"data = 1
        begin
        if record"last 24N"layout count = 24
            begin
            duplicate record"last 24N" record"play"
            set flag "qualified" true
            end
        end
    if record"G"data = 2
        begin
        if record"24 unique"layout count = 24
            begin
            duplicate record"24 unique" record"play"
            set flag "qualified" true
            end
        end
    end
    // bet
if flag "qualified" true
    begin
    put 1 record"play"layout list
    end
end

// subroutines
method "init"
begin
group
    begin
    display "24"
    display"-----------------------------------------------------------------"
    input dropdown "Rules:
    1:= Back all numbers that showed in the last 24 spins.
    2:= Back the last 24 numbers that showed. " record"G"data
    end
end
