-
.
Per quanto riguarda i Listati L8+ dei metodi presenti in questa Sezione,preciso che sono stati trovati in rete senza saperne l'Autore( trovati in un unico pacchetto, zippato): se qualcuno riesce ad indentificarsi nell'autore,e' pienamente autorizzato a rivendicarne il proprio operato.Sono pubblicati su questo Forum solo ed esclusivamente per essere messi a disposizione di tutti,ogni consiglio e modifica e' ben accetto,grazie..
FULMINE ( Osvaldo Manara )
IL FULMINE è un procedimento che ricava un'ambata più tre ambi secci su due ruote .
Tale metodo si basa sulla ormai famosa "LA LEGGE DEL TERZO"volgarmente conosciuta come "CALORE DEI NUMERI".
Quando nel quadro estrazionale si verifica una formazione di quattro elementi facenti parte della stessa cadenza o stessa figura, l'elemento più grande tende a "riprodursi" in un breve lasso di tempo: da una a massimo di quattro settimane, spesso in ambo secco.
Per sfruttare questo fenomeno, non tanto facile a manifestarsi, occorre rispettare delle regole molto importanti, senza le quali il metodo non garantisce il riprodursi fulminero dell'elemento più grande.
Le regole suddette sono:
1°) i quattro elementi devono essere disposti ciclometricamente ordinati.
2°) I quattro elementi devono essere disposti in senso crescente, oppure decrescente.
3°) Gli ambi devono essere uniti.
4°) Gli ambi devono essere isotopi.
5°) Le ruote devono essere continue.
6°) Gli ambi in cadenza sono più efficaci di quelli in figura.
Osservando scrupolosamente questi fattori, la previsione che si ricaverà sarà infallibile.
Di seguito, invece, sono riportati i casi in cui la previsione perde di potenza estrattiva:
1°) Se l'ambata è presente nelle quattro estrazioni precedenti;
2°) Se oltre la formazione è presente un altro elemento della stessa figura o della cadenza;
3°) Se è presente il vertibile della nostra ambata nella stessa estrazione;
4°) Se gli ambi non sono uniti.
Di fronte a questi casi consiglio la massima prudenza.
Dopo avere dato uno sguardo alle condizioni necessarie affinchè una previsione sia giocabile, passiamo a spiegare la tecnica.
Per spiegare la tecnica si espongono due esempi: il primo cioè permette di ricavare la previsione, partendo da elementi che hanno la stessa finale o meglio dire la stessa cadenza;
dal secondo si ricava la previsione con elementi della stessa figura.
ESEMPIO CON ELEMENTI DELLA STESSA CADENZA
Estrazione del 02 Dicembre 1998
Sulla ruota di Milano troviamo:
67-47
mentre sulla ruota di Palermo:
77-57
Come si nota i numeri sono tutti in cadenza 7.
Si dispongono gli elementi considerati nel quadrato di cui si parlava prima:
77 - .. - 47
10 - 20 - 10
67 - .. - 57
Come si può ben notare i numeri, sono in ordine progressivo, partendo dal vertice in alto a destra.
Dopo ciò, si passa alle varie operazioni da svolgere.
Si opera per prima con la somma orizzontale:
77+47=124
e
67+57=124
Il 124 lo si scrive solo una volta.
Si esegue ora la distanza in verticale:
da 47 a 57 = 10
e
da 67 a 77 = 10
Anche in questo caso il 10 si scrive una sola volta.
Ora si fa la distanza in diagonale:
da 47 a 67 = 20
e
da 57 a 77 = 20
Il 20 lo si scrive una sola volta.
A questo punto faremo la somma dei tre risultati ricavati:
124+10+20 = 154
Si divide il numero 154 per 2:
154 : 2 = 77
Il numero venuto fuori dalla divisione, altro non è che il numero più grande della formazione presa in esame: sarà sempre così, altrimenti si è sbagliato qualcosa nei calcoli precedenti.
Pertanto la previsione da mettere in gioco è:
Milano - Palermo
77 Ambata
77-47
77-57 / 77-67
Ambi secchi
77-47-57-67
Quartina per Ambo e Terno
Come si può verificare l'esito è stato:
Al 4° colpo 77-67 ambata ed ambo secco più ambo in quartina sulla ruota di Palermo!!!
ESEMPIO CON ELEMENTI DELLA STESSA FIGURA
Estrazione del 09 Dicembre 1998
Sulla ruota di Roma si trova:
73-82
Sulla ruota diVenezia:
19-28
Elementi appartenenti tutti alla fig. 1.
Si dispongono gli elementi in ordine progressivo in senso orario, nel solito quadrato:
82 - .. - 19
09 - 54 - 09
73 - .. - 28
Si eseguono le stesse operazioni che si sono svolte nell'esempio precedente:
Somma orizzontale:
82+19=101
e
28+73= 101
Distanza verticale: da
19 a 28=9
e
da 73+82=9
Distanza diagonale: da
19 a 73=54
e
da 28 a 82=54
Si ricorda che i numeri ricavati con le somme orizzontali (10), le distanze verticali (9) e le distanze diagonali (54) vanno scritte ina sola volta.
Infine esegui la somma dei risultati ottenuti con le operazioni di cui sopra:
101+9+54=164
Risultato che diviso per 2 fa:
164:2=82
Il risultato ottenuto ci garantisce che le operazioni svolta sono corrette, infatti 82 è l'elemento più grande della formazione.
Pertanto la previsione sarà:
Roma - Venezia
82-19 ambata
82-28 / 19-73
Ambi secchi
82-19-28-73
Quartina per Ambo e Terno
Anche in questo caso la previsione è stata "fulminea":
Al 2° colpo 82 ambata sulla ruota di Venezia.
Infine si riporta di seguito un altro caso, il quale ha dato un esito fenomenale.
Estrazione del 02 Dicembre 1998
Sulla ruota di Milano:
09-39
Mentre sulla ruota di Venezia:
29-59
si dispongono nel quadrato:
59 - .. - 9
20 - 30 - 30
39 - .. - 29
Si passa alle operazioni:
Somma orizzontale:
59+9=68
e 39+29=68
Come sempre il 68 si scrive una sola volta.
Distanza verticale: da
39 a 59=20
e
da 09 a 29=20
Il 20 si scrive ua sola volta.
Distanza diagonale: da 09 a 39=30
da 29 a 59=30
Il 30 si scrive una sola volta.
Si esegue adesso la somma dei risultati ottenuti:
68+20+30= 118
Risultato che diviso x due dà:
118:2=59
Tale risultato garantisce l'esistenza dell'armonia, in quanto è il numero più alto della formazione presa in esame.
La previsione quindi è:
Milano - Venezia
59 Ambata
59-9
59-9 / 29-39
Ambi secchi
59-9-29-39
Quartina per Ambo e Terno
L'esito come dicevo prima è stato strabiliante:
al 7° colpo sulla ruota di
Venezia:
59-29-39
Ambata + 2 Ambi + Terno in quartina
Ecco il Listato l8+:CODICESub main()
Scrivi "FULMINE di OSVALDO MANARA",1
Dim n,t,r1,r2,n1,n2,n3,n4
Dim x(10), am(10), am1(10), am2(10)
Dim ruota(2),ruote(10), posta(5), poste(5), poste1(5)
poste1(1)=1
posta(2)=1.5
posta(3)=0.4
posta(4)=0.1
poste(2)=1
For n=8200 To EstrazioneFin
Messaggio DataEstrazione(n) : t=1
Do While DISAMBO(n,t,r1,n1,n2,r2,n3,n4)=True
ruota(1)=r1
ruota(2)=r2
ruote(1)=r1
ruote(2)=r2
ruote(3)=11
ruote(4)=12
x(1)=n1
x(2)=n2
x(3)=n3
x(4)=n4
If NumeriRipetuti(x)=False Then
OrdinaMatrice x,1
y1=Fuori90(x(4)+x(1))
y2=Fuori90(x(2)+x(3))
y3=Distanza(x(4),x(3))
y4=Distanza(x(1),x(2))
y5=Distanza(x(4),x(2))
y6=Distanza(x(1),x(3))
If y1=y2 And y3=y4 And y5=y6 Then
Scrivi "----------------------------------------------------------" : ColoreTesto 2
Scrivi " RUOTA ESTRATTI ORDINATI Somma Oriz. D.V - D.D." : ColoreTesto 0
Scrivi FormatSpace(NomeRuota(r1),10)&" "&format2(CInt(n1))&" "&format2(CInt(n2))& " "&_
Format2(x(4))&" "& Format2(x(1))&" "& FormatSpace(y1,3)&" "& FormatSpace(y3,3)&" "& FormatSpace(y5,3),1
Scrivi FormatSpace(NomeRuota(r1+1),10)&" "&format2(CInt(n3))&" "&format2(CInt(n4))& " "&_
Format2(x(3))&" "& Format2(x(2))&" "& FormatSpace(y2,3)&" "& FormatSpace(y4,3)&" "& FormatSpace(y6,3),1
Scrivi
am(1)=x(4)
ImpostaGiocata 1,am,ruota,poste1,16
am1(1)=x(4)
am1(2)=x(1)
ImpostaGiocata 2,am1,ruote,poste,16
am1(2)=x(2)
ImpostaGiocata 3,am1,ruote,poste,16
am1(2)=x(3)
ImpostaGiocata 4,am1,ruote,poste,16
am2(1)=x(1)
am2(2)=x(2)
am2(3)=x(3)
am2(4)=x(4)
'ImpostaGiocata 5,am2,ruote,posta,16
Gioca n
End If
End If
t=t+1
Loop
Next
ScriviResoconto
End Sub
Function DISAMBO(estrazione, tentativo, byref ruota1, byref numero1, byref numero2, byref ruota2, byref numero3, byref numero4)
Dim trovati,r,rr,i,ii,j,jj
trovati=0
For r= 1 To 9
For i= 1 To 4
For j=i+1 To 5 '* 1a
a=Estratto (estrazione,r,i)
b=Estratto(estrazione,r,j)
c1=Cadenza(a)
c2=Cadenza(b)
d1=Figura(a)
d2=Figura(b)
For rr=r+1 To 10
aa=Estratto(estrazione,rr,i)
bb=Estratto(estrazione,rr,j)
cc1=Cadenza(aa)
cc2=Cadenza(bb)
dd1=Figura(aa)
dd2=Figura(bb)
If (c1=c2 And cc1=cc2 And c1=cc1) Or (d1=d2 And dd1=dd2 And d1=dd1) Then
trovati=trovati+1
If trovati=tentativo Then
numero1=a
numero2=b
numero3=aa
numero4=bb
ruota1=r
ruota2=rr
DISAMBO=True
Exit Function
End If
End If
Next
Next
Next
Next '* 2a
DISAMBO=False
End Function
Sono graditi i vostri voti per aiutare questo Forum a crescere.Grazie!
clicca qui
Saluti,sean69!!
. -
Passione_segreta.
User deleted
Sean sbaglia la ruota controlla. . -
Passione_segreta.
User deleted
adesso è ok :
Sub main()
Scrivi "FULMINE di OSVALDO MANARA",1
Dim n,t,r1,r2,n1,n2,n3,n4
Dim x(10), am(10), am1(10), am2(10)
Dim ruota(2),ruote(10), posta(5), poste(5), poste1(5)
poste1(1)=1
posta(2)=1.5
posta(3)=0.4
posta(4)=0.1
poste(2)=1
For n=8200 To EstrazioneFin
Messaggio DataEstrazione(n) : t=1
Do While DISAMBO(n,t,r1,n1,n2,r2,n3,n4)=True
ruota(1)=r1
ruota(2)=r2
ruote(1)=r1
ruote(2)=r2
ruote(3)=11
ruote(4)=12
x(1)=n1
x(2)=n2
x(3)=n3
x(4)=n4
If NumeriRipetuti(x)=False Then
OrdinaMatrice x,1
y1=Fuori90(x(4)+x(1))
y2=Fuori90(x(2)+x(3))
y3=Distanza(x(4),x(3))
y4=Distanza(x(1),x(2))
y5=Distanza(x(4),x(2))
y6=Distanza(x(1),x(3))
If y1=y2 And y3=y4 And y5=y6 Then
Scrivi "----------------------------------------------------------" : ColoreTesto 2
Scrivi " RUOTA ESTRATTI ORDINATI Somma Oriz. D.V - D.D." : ColoreTesto 0
Scrivi FormatSpace(NomeRuota(r1),10)&" "&format2(CInt(n1))&" "&format2(CInt(n2))& " "&_
Format2(x(4))&" "& Format2(x(1))&" "& FormatSpace(y1,3)&" "& FormatSpace(y3,3)&" "& FormatSpace(y5,3),1
Scrivi FormatSpace(NomeRuota(r2),10)&" "&format2(CInt(n3))&" "&format2(CInt(n4))& " "&_
Format2(x(3))&" "& Format2(x(2))&" "& FormatSpace(y2,3)&" "& FormatSpace(y4,3)&" "& FormatSpace(y6,3),1
Scrivi
am(1)=x(4)
ImpostaGiocata 1,am,ruota,poste1,9
am1(1)=x(4)
am1(2)=x(1)
ImpostaGiocata 2,am1,ruote,poste,9
am1(2)=x(2)
ImpostaGiocata 3,am1,ruote,poste,9
am1(2)=x(3)
ImpostaGiocata 4,am1,ruote,poste,9
am2(1)=x(1)
am2(2)=x(2)
am2(3)=x(3)
am2(4)=x(4)
'ImpostaGiocata 5,am2,ruote,posta,9
Gioca n
End If
End If
t=t+1
Loop
Next
ScriviResoconto
End Sub
Function DISAMBO(estrazione, tentativo, byref ruota1, byref numero1, byref numero2, byref ruota2, byref numero3, byref numero4)
Dim trovati,r,rr,i,ii,j,jj
trovati=0
For r= 1 To 9
For i= 1 To 4
For j=i+1 To 5 '* 1a
a=Estratto (estrazione,r,i)
b=Estratto(estrazione,r,j)
c1=Cadenza(a)
c2=Cadenza(b)
d1=Figura(a)
d2=Figura(b)
For rr=r+1 To 10
aa=Estratto(estrazione,rr,i)
bb=Estratto(estrazione,rr,j)
cc1=Cadenza(aa)
cc2=Cadenza(bb)
dd1=Figura(aa)
dd2=Figura(bb)
If (c1=c2 And cc1=cc2 And c1=cc1) Or (d1=d2 And dd1=dd2 And d1=dd1) Then
trovati=trovati+1
If trovati=tentativo Then
numero1=a
numero2=b
numero3=aa
numero4=bb
ruota1=r
ruota2=rr
DISAMBO=True
Exit Function
End If
End If
Next
Next
Next
Next '* 2a
DISAMBO=False
End Function. -
.
Buona sera. qualcuno cortesemente potrebbe aggiornare questo script? grazie mille .
IL LOTTO DI SEAN69 
Archivio Listati L8+ - Listati e Metodi dei Grandi Lottologi e degli 899,Raccolta Listati..
Metodo FULMINE Osvaldo Manara |
Offline
Web