system "Zechnas El Carpio 1989 Inverso v1.0"

[zechnas]

system "Zechnas El Carpio 1989 Inverso v1.0"
{
  Record permanencias seguidas sin perder: 25
}

method "main"
begin
while starting a new session begin
set list [1,2,3,4,5,6,7] to Record "apuesta" Data
put 1 en record "apuesta" data index;
Input Dropdown
" /___________[ Zechnas ]______________/
[ Ayudando a mejorar el juego ]/
==============================

Comenzamos. SELECCIONE APUESTAS:
1:= Negro - Columna C
2:= Rojo - Columna B " en record "chances" data; end

if net > 0 begin
put 1 en record "apuesta" data index;
Input Dropdown
"/___________[ Zechnas ]______________/
[ Ayudando a mejorar el juego ]/
==============================

¡¡ Ha ganado !!. SELECCIONE APUESTAS:
1:= Negro - Columna C
2:= Rojo - Columna B " en record "chances" data; end

if net < 0 begin add 1 record "apuesta" data index; end

if record "apuesta" data index > 7 begin
put 1 en record "apuesta" data index;
Input Dropdown
"/___________[ Zechnas ]______________/
[ Ayudando a mejorar el juego ]/
==============================

Ha superado el límite de apuestas.
SELECCIONE APUESTAS:
  1:= Negro - Columna C
2:= Rojo - Columna B " en record "chances" data; end

If record "chances" data = 1 begin
put 100% del record "apuesta" data en List[black,column c]; end
If record "chances" data = 2 begin
put 100% del record "apuesta" data en List[Red,column b]; end




End

[zechnas]

-