Sistema Zechnas Terminator V5.1

system "Zechnas-Terminator v5.1"

{ SISTEMA: Zechnas-Terminator v5.1
PROPOSITO: Despues de una serie corta de 6 bolas apostar a las terminaciones
durmientes entre el 0 y el 5.
OBJETIVO : Acertar en una sola apuesta por serie, la siguiente a la que se
realiza la apuesta, cerrar serie y comenzar nuevo juego.

}

method "main"
begin
While starting a New Session
Begin
Put 1 en record "apuesta" data
Copy List [0,10,20,30] to record "cero" layout
copy list [1,11,21,31] to record "uno" layout
copy list [2,12,22,32] to record "dos" layout
copy list [3,13,23,33] to record "tres" layout
copy list [4,14,24,34] to record "cuatro" layout
copy list [5,15,25,35] to record "cinco" layout
copy list [6,16,26,36] to record "seis" layout
copy list [7,17,27] to record "siete" layout
copy list [8,18,28] to record "ocho" layout
copy list [9,19,29] to record "nueve" layout

display
" Para sesiones cortas puede aumentar la apuesta.
Si desea jugar más tiempo debería disminuirla.
Las sesiónes terminarán automáticamente cada vez
que desaparezcan las apuestas; Si desea proseguir,
comienze otra nueva.
, _ ,
( o o )
/'` ' `'\
| ''''''' |
|\\'''//|
oo^oo........Zechnas."


Input Data "Cuanto desea apostar por número ?" to record "apuesta" data
end

// Apuestas para el cero.

if record "cero" layout list tiene not hit en 6 bolas
begin
Put 100% of record "apuesta" data to record "cero" layout list


if record "cero" layout list tiene not hit en 7 bolas
begin
Put 100% of record "apuesta" data to record "cero" layout list


if record "cero" layout list tiene not hit en 8 bolas
begin
Put 100% of record "apuesta" data to record "cero" layout list


if record "cero" layout list tiene not hit en 9 bolas
begin
Put 100% of record "apuesta" data to record "cero" layout list


if record "cero" layout list tiene not hit en 10 bolas
begin
Put 100% of record "apuesta" data to record "cero" layout list


if record "cero" layout list tiene not hit en 11 bolas
begin
Put 100% of record "apuesta" data to record "cero" layout list
end
end
end
end
end
end

// Apuestas para el uno

if record "uno" layout list tiene not hit en 6 bolas
begin
Put 100% of record "apuesta" data to record "uno" layout list


if record "uno" layout list tiene not hit en 7 bolas
begin
Put 100% of record "apuesta" data to record "uno" layout list


if record "uno" layout list tiene not hit en 8 bolas
begin
Put 100% of record "apuesta" data to record "uno" layout list


if record "uno" layout list tiene not hit en 9 bolas
begin
Put 100% of record "apuesta" data to record "uno" layout list


if record "uno" layout list tiene not hit en 10 bolas
begin
Put 100% of record "apuesta" data to record "uno" layout list


if record "uno" layout list tiene not hit en 11 bolas
begin
Put 100% of record "apuesta" data to record "uno" layout list
end
end
end
end
end


// Apuestas para el 2

if record "dos" layout list tiene not hit en 6 bolas
begin
Put 100% of record "apuesta" data to record "dos" layout list


if record "dos" layout list tiene not hit en 7 bolas
begin
Put 100% of record "apuesta" data to record "dos" layout list


if record "dos" layout list tiene not hit en 8 bolas
begin
Put 100% of record "apuesta" data to record "dos" layout list


if record "dos" layout list tiene not hit en 9 bolas
begin
Put 100% of record "apuesta" data to record "dos" layout list
end

if record "dos" layout list tiene not hit en 10 bolas
begin
Put 100% of record "apuesta" data to record "dos" layout list


if record "dos" layout list tiene not hit en 11 bolas
begin
Put 100% of record "apuesta" data to record "dos" layout list
end
end
end
end
end
end

// Apuestas para el 3


if record "tres" layout list tiene not hit en 6 bolas
begin
Put 100% of record "apuesta" data to record "tres" layout list


if record "tres" layout list tiene not hit en 7 bolas
begin
Put 100% of record "apuesta" data to record "tres" layout list


if record "tres" layout list tiene not hit en 8 bolas
begin
Put 100% of record "apuesta" data to record "tres" layout list


if record "tres" layout list tiene not hit en 9 bolas
begin
Put 100% of record "apuesta" data to record "tres" layout list


if record "tres" layout list tiene not hit en 10 bolas
begin
Put 100% of record "apuesta" data to record "tres" layout list


if record "tres" layout list tiene not hit en 11 bolas
begin
Put 100% of record "apuesta" data to record "tres" layout list
end
end
end
end
end
end


// Apuestas para el 4


if record "cuatro" layout list tiene not hit en 6 bolas
begin
Put 100% of record "apuesta" data to record "cuatro" layout list


if record "cuatro" layout list tiene not hit en 7 bolas
begin
Put 100% of record "apuesta" data to record "cuatro" layout list


if record "cuatro" layout list tiene not hit en 8 bolas
begin
Put 100% of record "apuesta" data to record "cuatro" layout list


if record "cuatro" layout list tiene not hit en 9 bolas
begin
Put 100% of record "apuesta" data to record "cuatro" layout list


if record "cuatro" layout list tiene not hit en 10 bolas
begin
Put 100% of record "apuesta" data to record "cuatro" layout list


if record "cuatro" layout list tiene not hit en 11 bolas
begin
Put 100% of record "apuesta" data to record "cuatro" layout list

end
end
end
end
end
end

// Apuestas para el 5


if record "cinco" layout list tiene not hit en 6 bolas
begin
Put 100% of record "apuesta" data to record "cinco" layout list

if record "cinco" layout list tiene not hit en 7 bolas
begin
Put 100% of record "apuesta" data to record "cinco" layout list


if record "cinco" layout list tiene not hit en 8 bolas
begin
Put 100% of record "apuesta" data to record "cinco" layout list


if record "cinco" layout list tiene not hit en 9 bolas
begin
Put 100% of record "apuesta" data to record "cinco" layout list


if record "cinco" layout list tiene not hit en 10 bolas
begin
Put 100% of record "apuesta" data to record "cinco" layout list


if record "cinco" layout list tiene not hit en 11 bolas
begin
Put 100% of record "apuesta" data to record "cinco" layout list

end
end
end
end
end
end

end