*** Sistéma Kilo

system "Kilo v1.0"
{
Una gran lección de Javimaimo de como se debe programar un sistéma tan seguido
por muchos jugadores y que proporciona muchos dias de beneficio si sabemos
gestionar bien cuando debemos parar.
El conocido sistéma kilo es totalmente mecánico y apuesta a los números ante-
rior y posterior, siempre, de los dos últimos salidos.
He introducido la salvedad de apostar doble si un número repite.
Este sistéma tiene algunas variantes, quizá ésta es la más utilizada.
No he puesto ningun tope de ganancias ni pérdidas. Solo la perícia del jugador
le hará retirarse cuando tiene las fichas de su previsión ganadas.
J.Zechnas/2010.
}
method "main"
begin
// Desarrollo de las apuestas.
if number 0 hit each
begin
copy list [36,1] record "ultimo" layout
end

if number 1 hit each
begin
copy list [0,2] record "ultimo" layout
end

if number 2 hit each
begin
copy list [1,3] record "ultimo" layout
end

if number 3 hit each
begin
copy list [2,4] record "ultimo" layout
end

if number 4 hit each
begin
copy list [3,5] record "ultimo" layout
end

if number 5 hit each
begin
copy list [4,6] record "ultimo" layout
end

if number 6 hit each
begin
copy list [5,7] record "ultimo" layout
end

if number 7 hit each
begin
copy list [6,8] record "ultimo" layout
end

if number 8 hit each
begin
copy list [7,9] record "ultimo" layout
end

if number 9 hit each
begin
copy list [8,10] record "ultimo" layout
end

if number 10 hit each
begin
copy list [9,11] record "ultimo" layout
end

if number 11 hit each
begin
copy list [10,12] record "ultimo" layout
end

if number 12 hit each
begin
copy list [11,13] record "ultimo" layout
end

if number 13 hit each
begin
copy list [12,14] record "ultimo" layout
end

if number 14 hit each
begin
copy list [13,15] record "ultimo" layout
end

if number 15 hit each
begin
copy list [14,16] record "ultimo" layout
end

if number 16 hit each
begin
copy list [15,17] record "ultimo" layout
end

if number 17 hit each
begin
copy list [16,18] record "ultimo" layout
end

if number 18 hit each
begin
copy list [17,19] record "ultimo" layout
end

if number 19 hit each
begin
copy list [18,20] record "ultimo" layout
end

if number 20 hit each
begin
copy list [19,21] record "ultimo" layout
end

if number 21 hit each
begin
copy list [20,22] record "ultimo" layout
end

if number 22 hit each
begin
copy list [21,23] record "ultimo" layout
end

if number 23 hit each
begin
copy list [22,24] record "ultimo" layout
end

if number 24 hit each
begin
copy list [23,25] record "ultimo" layout
end

if number 25 hit each
begin
copy list [24,26] record "ultimo" layout
end

if number 26 hit each
begin
copy list [25,27] record "ultimo" layout
end

if number 27 hit each
begin
copy list [26,28] record "ultimo" layout
end

if number 28 hit each
begin
copy list [27,29] record "ultimo" layout
end

if number 29 hit each
begin
copy list [28,30] record "ultimo" layout
end

if number 30 hit each
begin
copy list [29,31] record "ultimo" layout
end


if number 31 hit each
begin
copy list [30,32] record "ultimo" layout
end


if number 32 hit each
begin
copy list [31,33] record "ultimo" layout
end

if number 33 hit each
begin
copy list [32,34] record "ultimo" layout
end

if number 34 hit each
begin
copy list [33,35] record "ultimo" layout
end


if number 35 hit each
begin
copy list [34,36] record "ultimo" layout
end

if number 36 hit each
begin
copy list [35,0] record "ultimo" layout
end


// Apuesto al anterior y posterior del último número y del penúltimo número
put 1 record "penultimo" layout list
put 1 record "ultimo" layout list

// Usamos esta condición para doblar la apuesta cuando se repite un número
if record "ultimo" layout = record "penultimo" layout
begin
put 2 record "ultimo" layout list
end

// Preparo registros para la próxima apuesta: Las apuestas del último número
// pasan a ser las del penúltimo.
copy record "ultimo" layout record "penultimo" layout
add 1 record "ultimo" layout index
add 1 record "penultimo" layout index
copy record "ultimo" layout record "penultimo" layout
put 1 record "penultimo" layout index

End