 |
|
 |
|
| METODO 3° PALERMO ZERATO - |
| Precedente
:: Successivo |
mariano.manciocchi
 Inviato:
Lun 09 Apr, 2018 18:10 |
|
|
|
METODO 3° PALERMO ZERATO
RUOTE DI GIOCO
PALERMO CAGLIARI TORINO NAZIONALE
RUOTA DI CALCOLO PALERMO
RILEVAMENTO SPIA ZERATO IN TERZA POSIZIONE PALERMO
PROCEDURA
RILEVARE LO ZERATO IN TERZA POSIZIONE A PALERMO
TRASFORMARE LO ZERATO IN FIGURA E RILEVARE IL SUO VERTIBILE CHE SARANNO MESSI IN GIOCO PER SORTE CAPOGIOCO O ESTRATTI SULLE RUOTE DI GIOCO .
LA FIGURA RILEVATA VERRA' PORTATA A COMPLEMENTO 90 E QUESTO NUMERO FINALE SARA IL PRIMO ABBINAMENTO .
TRASFORMARE IN VERTIBILE IL PRIMO ABBINAMENTO E QUESTO SARA' IL SECONDO ABBINAMENTO .
ESEMPIO
ESTRAZIONE DEL 17 FEBBRAIO 2018
RILEVATO SPIA 30 IN TERZA POSIZIONE PALERMO
30 = FIGURA 3 CAPOGIOCO
30 = SECONDO CAPOGIOCO
1° ABBINAMENTO COMPLEMENTO A 90 DEL 3 = 80-3 = 87
2° ABBINAMENTO VERTIBILE 87 = 78
PREVISIONE IN GIOCO CAGLIARI PALERMO TORINO SARA'
3 ESTRATTO 30 ESTRATTO ABBINATI 78-87
30-78__30-87__3-78__ 3-87__3-30
OPPURE RIUNITA AMBO TERNO 3-30-78-87
BUONE VINCITE
_________________
MANCIOCCHI MARIANO
|
|
Esperto
Registrato: 11/02/16 02:38
Messaggi: 692
Residenza: ITALIA
|
_________________
MANCIOCCHI MARIANO |
|
 |
 |
 |
|
| DjNomade
Inviato:
Lun 09 Apr, 2018 20:20 |
|
|
|
Per chi usa L8+ salvo errori e omissioni questo è il listato
Ciauz
| Codice: |
'http://www.lottoamicinews.net/forum/viewtopic.php?t=60507
'09/04/2018
Sub main()
Dim ruote(10)
Dim n(12)
Dim ambata(2)
Dim am1(10),am2(10),am3(10),am4(10),am5(10)
Dim posta(2)
Dim poste(2)
Dim poste1(4)
posta(1)=1
posta(2)=1
poste(2)=1
poste1(2)=1.50
poste1(3)=.50
k=9
Scrivi
Scrivi String(30," ")&"******* METODO 3° PALERMO ZERATO di MARIANO MANCIOCCHI******",1
Scrivi
Scrivi String(30," ")&"******* List, DjNomade",1
ColoreTesto 2
Scrivi
Scrivi String(50," ")&" ",1
ColoreTesto 1
Scrivi
Scrivi String(88,"*")&" ",1
ColoreTesto 0
t=0
ini=EstrazioneFin-60
fin=EstrazioneFin
For es=ini To fin
For r=7 To 7
For p= 3 To 3
a=Estratto(es,r,p)
If Cadenza(a)=0 Then
t=t+1
Scrivi"-------------------------------------------------------------------Giocata n°"& Format2(t),1
Scrivi DataEstrazione(es)&" "& SiglaRuota(r)& " "& StringaEstratti(es,r)&"----> "& Format2(a),1
scrivi
n1=Figura(a)
n2=Vert(n1)
n3=90-n1
n4=Vert(n3)
ruote(1)=2
ruote(2)=r
ruote(3)=9
ruote(4)=12
am1(1)=n1
am1(2)=n2
ImpostaGiocata 1,am1,ruote,posta,k
am1(1)=n1
am1(2)=n3
ImpostaGiocata 2,am1,ruote,poste,k
am1(1)=n1
am1(2)=n4
ImpostaGiocata 3,am1,ruote,poste,k
am1(1)=n2
am1(2)=n3
ImpostaGiocata 4,am1,ruote,poste,k
am1(1)=n2
am1(2)=n4
ImpostaGiocata 5,am1,ruote,poste,k
Gioca es
End If
Next
Next
Next
ScriviResoconto
End Sub
|
|
|
Esperto
Registrato: 11/05/14 00:02
Messaggi: 2128
|
|
|
|
|
|
|
| mariano.manciocchi
Inviato:
Mer 11 Apr, 2018 17:24 |
|
|
|
| DjNomade ha scritto: |
Per chi usa L8+ salvo errori e omissioni questo è il listato
Ciauz
| Codice: |
'http://www.lottoamicinews.net/forum/viewtopic.php?t=60507
'09/04/2018
Sub main()
Dim ruote(10)
Dim n(12)
Dim ambata(2)
Dim am1(10),am2(10),am3(10),am4(10),am5(10)
Dim posta(2)
Dim poste(2)
Dim poste1(4)
posta(1)=1
posta(2)=1
poste(2)=1
poste1(2)=1.50
poste1(3)=.50
k=9
Scrivi
Scrivi String(30," ")&"******* METODO 3° PALERMO ZERATO di MARIANO MANCIOCCHI******",1
Scrivi
Scrivi String(30," ")&"******* List, DjNomade",1
ColoreTesto 2
Scrivi
Scrivi String(50," ")&" ",1
ColoreTesto 1
Scrivi
Scrivi String(88,"*")&" ",1
ColoreTesto 0
t=0
ini=EstrazioneFin-60
fin=EstrazioneFin
For es=ini To fin
For r=7 To 7
For p= 3 To 3
a=Estratto(es,r,p)
If Cadenza(a)=0 Then
t=t+1
Scrivi"-------------------------------------------------------------------Giocata n°"& Format2(t),1
Scrivi DataEstrazione(es)&" "& SiglaRuota(r)& " "& StringaEstratti(es,r)&"----> "& Format2(a),1
scrivi
n1=Figura(a)
n2=Vert(n1)
n3=90-n1
n4=Vert(n3)
ruote(1)=2
ruote(2)=r
ruote(3)=9
ruote(4)=12
am1(1)=n1
am1(2)=n2
ImpostaGiocata 1,am1,ruote,posta,k
am1(1)=n1
am1(2)=n3
ImpostaGiocata 2,am1,ruote,poste,k
am1(1)=n1
am1(2)=n4
ImpostaGiocata 3,am1,ruote,poste,k
am1(1)=n2
am1(2)=n3
ImpostaGiocata 4,am1,ruote,poste,k
am1(1)=n2
am1(2)=n4
ImpostaGiocata 5,am1,ruote,poste,k
Gioca es
End If
Next
Next
Next
ScriviResoconto
End Sub
|
|
grazie dj
|
|
Esperto
Registrato: 11/02/16 02:38
Messaggi: 692
Residenza: ITALIA
|
_________________
MANCIOCCHI MARIANO |
|
|
|
|
|
|
|
|
|
|
|
 |
|
 |
|
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.0991s (PHP: 100% - SQL: 0%) - SQL queries: 24 - 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 |
