Ruleteros
Si quiere ver todo el contenido del foro registrese como usuario.

No tendrá publicidad y podrá intercambiar ideas y opiniones con usuarios con su misma inquietud.

Si no, solo podrá acceder a una visión limitada del contenido de estos foros.


If you want to see the entire contents of this forum you must register.

Don't have advertising will be able to exchange ideas and opinions with users with the same curiosity

If not registered, can access only a limited view of the contents of these forums.

Continuando la navegación, usted acepta la utilización de las cookies que los servicios de terceros puedan establecer. Mas información
Hora del foro
Aviso!! Announcement!!
Para ver el contenido del foro en su totalidad, debe estar registrado, sino tendra una version REDUCIDA del mismo.

To view the contents of the forum in its entirety, your must be registered, your not be registered will have a version thereof REDUCED.
Conectarse

Recuperar mi contraseña

Estadísticas
Tenemos 2609 miembros registrados.
El último usuario registrado es oleadamazinger.

Nuestros miembros han publicado un total de 36397 mensajes en 2672 argumentos.

Sistema Zechnas Repleno

Ver el tema anterior Ver el tema siguiente Ir abajo

Sistema Zechnas Repleno

Mensaje por zechnas el Vie Dic 16, 2011 6:48 pm

system "Zechnas-Repleno"
{

SISTEMA: Zechnas-Repleno. (**)
PROPOSITO: Ganar en lo único de lo que la Ruleta no puede escapar : De las
repeticiones; En éste caso de los plenos.
OBJETIVO : Conseguir lo antes posible una repetición de un pleno.
PROGRESION: Suave, solo compensa los atrasos hasta 6 fichas en pleno.
VALORACION : (**)

}
method "main"
begin
while starting a new session
begin
call "a";
end

call "b";
call "c";
call "d";
end

method "a"
begin
set list [(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3,3,3,3,3,4,4,4,4,4,4,4,4,5,5,5,
5,5,5,6,6,6,6,6) ] en record "e" data;
put 1 en record "e" data index;
end

method "b"
begin
if net > 0
begin
put 1 en record "e" data index;
call "premio"
end
if net < 0
begin
if record "e" data index >= record "e" data count
begin
put 1 en record "e" data index;
end

else
begin
add 1 en record "e" data index;

end
end
end

method "c"
begin
copy last number para record "ulti" layout;
copy neighbors de record "natu" layout para record "vecinos" layout
end

method "d"
begin
put 100% del record "e" data en record "ulti" layout;
end

method "premio"
begin
if net > 0
begin
if bankroll > record "acierto" data
begin
display
" Ya obtuvo ganancia.Termine sesión,
deje pasar unas bolas y comience de nuevo.
, _ ,
( o o )
/'` ' `'\
| ''''''' |
|\\'''//|
oo^oo........Zechnas."

end
end
end
avatar
zechnas
Platino
Platino

Cantidad de envíos : 1710
Fecha de inscripción : 17/09/2010
Localización : Gibraltar

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.