Tässä on joitain sanomista:
järjestelmä "Zechnas - Francisco Delaguagua v2.0"
{
Francisco Delaguagua on päätynyt lähes sokeaksi muiden ihmisten aiheuttaman kaihien vuoksi
vakavia ratkaisemattomia näköongelmia.
Tämä on järjestelmä, jota hän käytti usein ja jota hän väitti omakseen.
Dynamiikka on niin helppoa, ettei niiden toimintaa tarvitse selittää.
Sen julkaisu on kunnianosoitus tälle väsymättömälle taistelijalle pyörää vastaan,
Kuten kaikki, huonot ja hyvät päivät, mutta hän selvisi.
Zechnas/2014.
}
menetelmä "pää"
alkaa
kun aloitat uuden istunnon
alkaa
// Aloitus- ja etenemisveto.
soita "aloita";
loppu
// Kutsu aliohjelmia
soittaa "vedot";
soita "tarkista";
loppu
menetelmä "aloittaa"
alkaa
kopioi luettelo [kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6) ), kulma(14:18), kulma(26:30),
kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6),kulma (14:18),kulma(26:30),
kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6),kulma (14:18),kulma(26:30),
kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6),kulma(14:18),kulma(26:30),kulma(2:6),kulma (14:18),kulma(26:30)] tietueen "liukuva" asettelua varten;
kopioi luettelo [kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5) ),kulma(13:17),kulma(25:29),
kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5),kulma (13:17),kulma(25:29),
kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5),kulma (13:17),kulma(25:29),
kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5),kulma(13:17),kulma(25:29),kulma(1:5),kulma (13:17),kulma(25:29)] tietueen "sliding2"-asettelulle;
kopioi luettelo [kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12) ),kulma(20:24),kulma(32:36),
kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12),kulma (20:24),kulma(32:36),
kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12),kulma (20:24),kulma(32:36),
kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12),kulma(20:24),kulma(32:36),kulma(8:12),kulma (20:24),kulma(32:36)] tietueen "sliding3"-asettelulle;
kopioi lista [kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11) ),kulma(19:23),kulma(31:35),
kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11),kulma (19:23),kulma(31:35),
kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11),kulma (19:23),kulma(31:35),
kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11),kulma(19:23),kulma(31:35),kulma(7:11),kulma (19:23),kulma(31:35)] tietueen "sliding4"-asettelulle;
asettaa lista [1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1] tietue "sekvenssi" data; // Tyypillinen eteneminen kymmenien tai sarakkeiden peliin.
laita 1 tietueeseen "liukuva" asetteluindeksi;
laita 1 tietueeseen "sliding2" asetteluindeksi;
laita 1 tietueeseen "sliding3" asetteluindeksi;
laita 1 tietueeseen "sliding4" asetteluindeksi;
laita 3 sarakkeeseen b
loppu
menetelmä "tarkista"
alkaa
//Hanki tarkistus
jos netto > 0
alkaa
laita 1 tietueen "peräkkäisyyden" tietoindeksiin;
loppu
jos netto < 0
//tappion tarkistus
alkaa
lisää 1 tietueen "peräkkäisyyden" tietoindeksiin;
loppu
jos tietue "peräkkäisyys" -tietoindeksi > kirjaa "seuraus" -tietojen määrä
alkaa
laita 1 tietueen "peräkkäisyyden" tietoindeksiin;
loppu
loppu
menetelmä "vedot"
alkaa
laittaa 100 % tietueen "peräkkäisyyden" tiedot tietueen "liukuvaan" asetteluun;
laita 100 % tietueen "peräkkäisyys" tietueen "sliding2" -asetteluun;
laita 100 % tietueen "peräkkäisyys" tietueen "corridizas3" -asetteluun;
laita 100 % tietueen "peräkkäisyys" tietueen "corridizas4" -asetteluun;
laita 3 sarakkeeseen b
if record "liukuva" asetteluindeksi >= kirjaa "liukuvien" asettelujen määrä
alkaa
laita 1 tietueeseen "liukuva" asetteluindeksi;
loppu
muu
alkaa
lisää 1 tietueen "liukuva" asetteluindeksi;
loppu
// 2
if record "sliding2" layout index >= record "sliding2" layout count
alkaa
laita 1 tietueeseen "sliding2" asetteluindeksi;
loppu
muu
alkaa
lisää 1 tietueeseen "sliding2" asetteluindeksi;
loppu
//3
if record "sliding" layout index >= record "sliding3" layout count
alkaa
laita 1 tietueeseen "sliding3" asetteluindeksi;
loppu
muu
alkaa
lisää 1 tietueeseen "sliding3" asetteluindeksi;
loppu
// 4
if record "sliding4" layout index >= record "sliding4" layout count
alkaa
laita 1 tietueeseen "sliding4" asetteluindeksi;
loppu
muu
alkaa
lisää 1 tietueeseen "sliding4" asetteluindeksi;
loppu
jos pelikassa > 0
alkaa
näyttö
"Voit juuri vähintään 2 pelimerkkiä.
Se oli järjestelmän vähimmäismäärä.
Istunto suljetaan. Aloittaa uudelleen."
loppu
jos pelikassa < -30
alkaa
näyttö
"Hävisit juuri tarpeeksi.
Se oli järjestelmälle suunniteltu maksimi.
Istunto suljetaan. Aloittaa uudelleen."
lopeta istunto
loppu
Loppu
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
Automaattinen käännös: