Evo nešto od onoga što je rečeno:
sistem "Zechnas - Francisco Delaguagua v2.0"
{
Francisco Delaguagua je završio skoro slep zbog katarakte povezane sa drugima
ozbiljni nerešivi problemi sa vidom.
To je sistem koji je često koristio i za koji je tvrdio da je svoj.
Dinamika je toliko laka da nema potrebe objašnjavati kako funkcioniše.
Njeno objavljivanje je omaž ovom neumornom borcu protiv volana koji je imao,
Kao i svi, loši i dobri dani, ali je preživeo.
Zechnas/2014.
}
metod "glavni"
započeti
dok započinje novu sesiju
započeti
// Poziv na početak i opkladu na napredovanje.
pozovite "počni";
kraj
// Poziv potprograma
call "opklade";
pozovite "proverite";
kraj
metod "počni"
započeti
kopiraj listu [ugao(2:6),ugao(14:18),ugao(26:30),ugao(2:6),ugao(14:18),ugao(26:30),ugao(2:6 ), ugao (14:18), ugao (26:30) ,
korner (2:6), korner(14:18), korner(26:30), korner(2:6), korner(14:18), korner(26:30), korner(2:6), korner (14:18), ugao (26:30),
korner (2:6), korner(14:18), korner(26:30), korner(2:6), korner(14:18), korner(26:30), korner(2:6), korner (14:18), ugao (26:30),
korner (2:6), korner(14:18), korner(26:30), korner(2:6), korner(14:18), korner(26:30), korner(2:6), korner (14:18),ugao(26:30)] za rekordni "klizni" raspored;
kopiraj listu [ugao(1:5),ugao(13:17),ugao(25:29),ugao(1:5),ugao(13:17),ugao(25:29),ugao(1:5 ),korner(13:17),korner(25:29),
korner (1:5), korner(13:17), korner(25:29), korner(1:5), korner(13:17), korner(25:29), korner(1:5), korner (13:17),korner(25:29),
korner (1:5), korner(13:17), korner(25:29), korner(1:5), korner(13:17), korner(25:29), korner(1:5), korner (13:17),korner(25:29),
korner (1:5), korner(13:17), korner(25:29), korner(1:5), korner(13:17), korner(25:29), korner(1:5), korner (13:17),ugao(25:29)] za zapis "sliding2" raspored;
kopiraj listu [ugao(8:12),ugao(20:24),ugao(32:36),ugao(8:12),ugao(20:24),ugao(32:36),ugao(8:12 ),korner(20:24),korner(32:36),
korner (8:12), korner(20:24), korner(32:36), korner(8:12), korner(20:24), korner(32:36), korner(8:12), korner (20:24),korner(32:36),
korner (8:12), korner(20:24), korner(32:36), korner(8:12), korner(20:24), korner(32:36), korner(8:12), korner (20:24),korner(32:36),
korner (8:12), korner(20:24), korner(32:36), korner(8:12), korner(20:24), korner(32:36), korner(8:12), korner (20:24),ugao(32:36)] za zapis "sliding3" raspored;
kopiraj listu [ugao(7:11),ugao(19:23),ugao(31:35),ugao(7:11),ugao(19:23),ugao(31:35),ugao(7:11 ),korner(19:23),korner(31:35),
korner (7:11), korner(19:23), korner(31:35), korner(7:11), korner(19:23), korner(31:35), korner(7:11), korner (19:23), korner(31:35),
korner (7:11), korner(19:23), korner(31:35), korner(7:11), korner(19:23), korner(31:35), korner(7:11), korner (19:23), korner(31:35),
korner (7:11), korner(19:23), korner(31:35), korner(7:11), korner(19:23), korner(31:35), korner(7:11), korner (19:23),ugao(31:35)] za zapis "sliding4" raspored;
set lista [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1] zapis podataka „sekvence"; // Tipična progresija za igru desetina ili kolona.
staviti 1 u zapis "kliznog" indeksa rasporeda;
stavite 1 u zapis "sliding2" indeks rasporeda;
staviti 1 u zapis "sliding3" indeks rasporeda;
staviti 1 u zapis "sliding4" indeks rasporeda;
staviti 3 u kolonu b
kraj
metoda "provera"
započeti
//Provera dobitka
ako je neto > 0
započeti
staviti 1 u indeks podataka "sukcesije";
kraj
ako je neto < 0
//provera gubitka
započeti
dodati 1 u indeks podataka "sukcesije";
kraj
ako indeks podataka "sukcesije" zapisa > broj podataka "sukcesije".
započeti
staviti 1 u indeks podataka "sukcesije";
kraj
kraj
metoda "klađenja"
započeti
staviti 100% rekordnih podataka o "sukcesiji" u "kliznom" rasporedu zapisa;
stavite 100% rekordnih podataka "sucesije" u raspored "sliding2" zapisa;
stavi 100% rekordnih podataka o „sucesionosti" u rasporedu zapisa „corridizas3";
staviti 100% rekordnih podataka o „sucesionosti" u rasporedu zapisa „corridizas4";
staviti 3 u kolonu b
ako indeks "kliznog" rasporeda zapisa >= broj "kliznog" rasporeda zapisa
započeti
staviti 1 u zapis "kliznog" indeksa rasporeda;
kraj
drugo
započeti
dodati 1 u indeks "kliznog" rasporeda zapisa;
kraj
// 2
ako zapis "sliding2" laiout indek >= record "sliding2" laiout count
započeti
staviti 1 u zapis "sliding2" indeks rasporeda;
kraj
drugo
započeti
dodati 1 u zapis "sliding2" indeks rasporeda;
kraj
//3
ako zapis "klizajući" indeks rasporeda >= broj "sliding3" rasporeda
započeti
staviti 1 u zapis "sliding3" indeks rasporeda;
kraj
drugo
započeti
dodati 1 u zapis "sliding3" indeks rasporeda;
kraj
// 4
ako zapis "sliding4" laiout indek >= record "sliding4" laiout count
započeti
staviti 1 u zapis "sliding4" indeks rasporeda;
kraj
drugo
započeti
dodati 1 u zapis "sliding4" indeks rasporeda;
kraj
ako je bankroll > 0
započeti
prikaz
„Upravo ste osvojili najmanje 2 čipa.
To je bio minimum predviđen za sistem.
Sednica će biti zatvorena. Počnite ponovo."
kraj
ako je bankroll < -30
započeti
prikaz
„Upravo si dovoljno izgubio.
To je bio maksimum planiran za sistem.
Sednica će biti zatvorena. Počnite ponovo."
prekinuti sednicu
kraj
Kraj
Here is some of what was said:
system "Zechnas - Francisco Delaguagua v2.0"
{
Francisco Delaguagua has ended up almost blind due to cataracts associated with others
serious unsolvable vision problems.
This is a system that he used frequently and that he claimed as his own.
The dynamics are so easy that there is no need to explain how they work.
Its publication is a tribute to this tireless fighter against the wheel he had,
Like everyone, bad and good days, but he survived.
Zechnas/2014.
}
method "main"
begin
while starting a new session
begin
// Call to the start and progression bet.
call "begin";
end
// Call subroutines
call "bets";
call "check";
end
method "begin"
begin
copy list [corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6 ), corner(14:18), corner(26:30) ,
corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner (14:18),corner(26:30),
corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner (14:18),corner(26:30),
corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner (14:18),corner(26:30)] for record "sliding" layout;
copy list [corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5 ),corner(13:17),corner(25:29),
corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner (13:17),corner(25:29),
corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner (13:17),corner(25:29),
corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner (13:17),corner(25:29)] for record "sliding2" layout;
copy list [corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12 ),corner(20:24),corner(32:36),
corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner (20:24),corner(32:36),
corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner (20:24),corner(32:36),
corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner (20:24),corner(32:36)] for record "sliding3" layout;
copy list [corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11 ),corner(19:23),corner(31:35),
corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner (19:23),corner(31:35),
corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner (19:23),corner(31:35),
corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner (19:23),corner(31:35)] for record "sliding4" layout;
set list [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1] record "sequence" data; // Typical progression for dozens or columns game.
put 1 in record "sliding" layout index;
put 1 in record "sliding2" layout index;
put 1 in record "sliding3" layout index;
put 1 in record "sliding4" layout index;
put 3 in column b
end
method "check"
begin
//Gain check
if net > 0
begin
put 1 in record "succession" data index;
end
if net < 0
//loss check
begin
add 1 in record "succession" data index;
end
if record "succession" data index > record "succession" data count
begin
put 1 in record "succession" data index;
end
end
method "bets"
begin
put 100% record "succession" data in record "sliding" layout;
put 100% record "sucesion" data in record "sliding2" layout;
put 100% record "sucesion" data in record "corridizas3" layout;
put 100% record "sucesion" data in record "corridizas4" layout;
put 3 in column b
if record "sliding" layout index >= record "sliding" layout count
begin
put 1 in record "sliding" layout index;
end
else
begin
add 1 in record "sliding" layout index;
end
// 2
if record "sliding2" layout index >= record "sliding2" layout count
begin
put 1 in record "sliding2" layout index;
end
else
begin
add 1 in record "sliding2" layout index;
end
//3
if record "sliding" layout index >= record "sliding3" layout count
begin
put 1 in record "sliding3" layout index;
end
else
begin
add 1 in record "sliding3" layout index;
end
// 4
if record "sliding4" layout index >= record "sliding4" layout count
begin
put 1 in record "sliding4" layout index;
end
else
begin
add 1 in record "sliding4" layout index;
end
if bankroll > 0
begin
display
"You just won at least 2 chips.
It was the minimum provided for the system.
The session will be closed. Start again."
end
if bankroll < -30
begin
display
"You just lost enough.
It was the maximum planned for the system.
The session will be closed. Start again."
stop session
end
End
Aquí algo de lo dicho:
system "Zechnas - Francisco Delaguagua v2.0"
{
Francisco Delaguagua ha terminado casi ciego por unas cataratas asociadas a otros
graves problemas sin solución en la vista.
Este es un sistéma que el usaba con frecuencia y que se atribuía como propio.
La dinámica es tan fácil que no hay que exponer su funcionamiento.
Su publicación es un tributo a éste luchador incansable contra la rueda que tuvo,
como todos, dias malos y buenos, pero que sobrevivió.
Zechnas/2014.
}
method "main"
begin
while starting una new session
begin
// Llamada a la apuesta de inicio y progresion.
call "comenzar";
end
// LLamada subrutinas
call "apuestas";
call "chequeo";
end
method "comenzar"
begin
copy list [corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30) ,
corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),
corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30) ,
corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30),corner(2:6),corner(14:18),corner(26:30)] para record "corredizas" layout;
copy list [corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),
corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),
corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),
corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29),corner(1:5),corner(13:17),corner(25:29)] para record "corredizas2" layout;
copy list [corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),
corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),
corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),
corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36),corner(8:12),corner(20:24),corner(32:36)] para record "corredizas3" layout;
copy list [corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),
corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),
corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),
corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35),corner(7:11),corner(19:23),corner(31:35)] para record "corredizas4" layout;
set list [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1] record "sucesion" data; // Progresión típica para juego a docenas o columnas.
put 1 en record "corredizas" layout index;
put 1 en record "corredizas2" layout index;
put 1 en record "corredizas3" layout index;
put 1 en record "corredizas4" layout index;
put 3 en column b
end
method "chequeo"
begin
//Chequeo ganancia
if net > 0
begin
put 1 en record "sucesion" data index;
end
if net < 0
//Chequeo pérdida
begin
add 1 en record "sucesion" data index;
end
if record "sucesion" data index > record "sucesion" data count
begin
put 1 en record "sucesion" data index;
end
end
method "apuestas"
begin
put 100% record "sucesion" data en record "corredizas" layout;
put 100% record "sucesion" data en record "corredizas2" layout;
put 100% record "sucesion" data en record "corredizas3" layout;
put 100% record "sucesion" data en record "corredizas4" layout;
put 3 en column b
if record "corredizas" layout index >= record "corredizas" layout count
begin
put 1 en record "corredizas" layout index;
end
else
begin
add 1 en record "corredizas" layout index;
end
// 2
if record "corredizas2" layout index >= record "corredizas2" layout count
begin
put 1 en record "corredizas2" layout index;
end
else
begin
add 1 en record "corredizas2" layout index;
end
//3
if record "corredizas" layout index >= record "corredizas3" layout count
begin
put 1 en record "corredizas3" layout index;
end
else
begin
add 1 en record "corredizas3" layout index;
end
// 4
if record "corredizas4" layout index >= record "corredizas4" layout count
begin
put 1 en record "corredizas4" layout index;
end
else
begin
add 1 en record "corredizas4" layout index;
end
if bankroll > 0
begin
display
" Acaba de ganar mínimo 2 fichas.
Era lo mínimo previsto para el sistema.
La sesión se cerrará. Comience de nuevo."
end
if bankroll < -30
begin
display
" Acaba de perder lo suficiente.
Era lo máximo previsto para el sistéma.
La sesión se cerrará. Comience de nuevo."
stop session
end
End
Automatski prevedeno: