 |
|
 |
|
| METODO E PREVISIONE DEL 14 LUGLIO 2014 - |
| Precedente
:: Successivo |
Nando
 Inviato:
Mar 15 Lug, 2014 05:37 |
|
|
|
METODO E PREVISIONE DEL 14 LUGLIO 2014
IL METODO E' PERPETUO
LA PREVISIONE VALE PER 9 COLPI
|
|
Site Admin
Registrato: 10/07/05 20:29
Messaggi: 31531
|
_________________
Tutto è probabile, niente è certo |
|
 |
 |
 |
|
| Lory1966
Inviato:
Mer 16 Lug, 2014 15:10 |
|
|
|
GRAZIE NANDO 
|
|
Studioso
Registrato: 02/05/14 14:29
Messaggi: 8706
Residenza: Liguria
|
|
|
|
|
|
|
| DjNomade
Inviato:
Mer 16 Lug, 2014 18:49 |
|
|
|
Per chi usa L8+ salvo errori e omissioni questo è il listato
Ciauz
| Codice: |
'15/07/2014
Scrivi "============================= L'11 ACCENDE LA FANTASIA ",1
Scrivi "=============================SE ESCE SPIA 11 A BARI by NANDO MANICCIA",1
Scrivi "================================================ List. DjNomade",1
Scrivi String(70,"="),1
Sub main()
Dim posta(5)
Dim poste(5),postee(5)
Dim ruote(10),ruota(5)
Dim am(10),cinq(10)
posta(1)=1
poste(2)=1
postee(2)=1
postee(3)=1
cont=0
casi=0
k=12
fin=EstrazioneFin
ini=8166
For es=ini To fin
a=11 'numero spia
amb=01
abb1=70
abb2=37
abb3=85
abb4=88
If Posizione(es,1,a)>0 Then
cont=cont+1
Scrivi : ColoreTesto 2 : Scrivi String(40,32)&" Pronostico n° " &cont&"",1
ColoreTesto 0 : Scrivi
Scrivi DataEstrazione(es,1) & " < " & SiglaRuota(1) & " " & StringaEstratti(es,1),1
ruote(1)=1
ruote(2)=2 'si puo'aggiungere altre ruote
am(1)=amb
am(2)=amb
EliminaRipetuti am
ImpostaGiocata 1,am,ruotE,posta,k
am(1)=amb
am(2)=abb1
ImpostaGiocata 2,am,ruote,poste,k
am(1)=amb
am(2)=abb2
ImpostaGiocata 3,am,ruote,poste,k
am(1)=amb
am(2)=abb3
ImpostaGiocata 4,am,ruote,poste,k
am(1)=amb
am(2)=abb4
ImpostaGiocata 5,am,ruote,poste,k
cinq(1)=amb
cinq(2)=abb1
cinq(3)=abb2
'cinq(4)=abb3
'cinq(5)=abb4
ImpostaGiocata 6,cinq,ruote,postee,k
Gioca es
casi=casi+1
End If
Next
ScriviResoconto
Scrivi "============================= L'11 ACCENDE LA FANTASIA ",1
Scrivi "=============================SE ESCE SPIA 11 A BARI by NANDO MANICCIA",1
Scrivi "================================================ List. DjNomade",1
Scrivi String(70,"="),1
End Sub
|
|
|
Esperto
Registrato: 11/05/14 00:02
Messaggi: 2267
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
|
 |
|
Non puoi inserire nuovi Argomenti
Non puoi rispondere a nessun Argomento
Non puoi modificare i tuoi Messaggi
Non puoi cancellare i tuoi Messaggi
Non puoi votare nei Sondaggi
Non puoi allegare files
Non puoi downloadare gli allegati
|
Page generation time: 0.1437s (PHP: 100% - SQL: 0%) - SQL queries: 26 - GZIP enabled - Debug on
Jasidogdotcom template v.1.0.4 © jasidog.com
Powered by phpBB
2.0.16 © 2001, 2004 phpBB Group
Traduzione Italiana V-0.16 phpBB.it |
