AMBATA SECCA +AMBO STRATOSFERICO 1° colpo

[claudio8]

NON PRENDETE SERIAMENTE QUESTO SCRIPT.... E' un o scherzo

Anch'io vi regalo un lavoro sublime.

UNA SENSAZIONALE SCOPERTA - AMBATA MICIDIALE TROVATA CON SPAZIOMETRIA di LuigiB analizzando la famosa TAVOLA REALE

E' un metodo di matematica radiante che azzecca l'ambata al 1° colpo utile, funziona dal 1945 ed è a dir poco stupefacente

Sub Main()
Dim n1,n2
Dim am(10)
Dim ruota(10)
Dim posta(5)
posta(1) = 1
ini = 8000 '3861 (05/01/1945 1a estrazione a 10 ruote)
For n = ini To EstrazioneFin
Messaggio DataEstrazione
For r = 1 To 10
For p = 1 To 5
'Do While RAD10(n,t,r,n1,n2) = True
'If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 40)
'If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 70)
'zz = Posizione(n,r,ar(1))
'xx = Posizione(n,r,ar(1))
'If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 10)
'Loop
Do While RAD20(n,t,r,n1,n2) = True
If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 50)
If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 80)
zz = Posizione(n,r,ar(1))
xx = Posizione(n,r,ar(1))
If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 20)
Loop
a = Estratto(n,r,p)
Do While RAD30(n,t,r,n1,n2) = True
If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 60)
If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 90)
zz = Posizione(n,r,ar(1))
xx = Posizione(n,r,ar(1))
If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 30)
Loop
'Do While RAD40(n,t,r,n1,n2) = True
'If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 70)
'If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 10)
'zz = Posizione(n,r,ar(1))
'xx = Posizione(n,r,ar(1))
'If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 40)
'Loop
'Do While RAD50(n,t,r,n1,n2) = True
'If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 80)
'If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 20)
'zz = Posizione(n,r,ar(1))
'xx = Posizione(n,r,ar(1))
'If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 50)
'Loop
'Do While RAD60(n,t,r,n1,n2) = True
'If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 90)
'If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 30)
'zz = Posizione(n,r,ar(1))
'xx = Posizione(n,r,ar(1))
'If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 60)
'Loop
b = Estratto(n+1,r,p)
'Do While RAD70(n,t,r,n1,n2) = True
'If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 10)
'If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 40)
'zz = Posizione(n,r,ar(1))
'xx = Posizione(n,r,ar(1))
'If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 70)
'Loop
Do While RAD80(n,t,r,n1,n2) = True
If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 20)
If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 50)
zz = Posizione(n,r,ar(1))
xx = Posizione(n,r,ar(1))
If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 80)
Loop
If a = b Then
Do While RAD90(n,t,r,n1,n2) = True
If n1 = Fuori90(n2 + 30) Then ar(1) = Fuori90(n2 + 60)
If n1 = Fuori90(n2 + 60) Then ar(1) = Fuori90(n2 + 30)
zz = Posizione(n,r,ar(1))
xx = Posizione(n,r,ar(1))
If zz > 0 Or xx > 0 Then t = Fuori90(n2 + 90)
Loop
Scrivi "**************************************************************"
ColoreTesto 2

Scrivi " Estrazione positiva rilevata del " & DataEstrazione & " num. " & b & " in gioco su " & SiglaRuota(r)
Scrivi
ColoreTesto 0
ruota(1) = r
am(1) = a
ImpostaGiocata 1,am,ruota,posta,3,1
Gioca n
End If
Next
Next
Next
TestoInBandaPassante "SENSAZIONALE SCOPERTA - AMBATA MICIDIALE TROVATA CON SPAZIOMETRIA di LuigiB analizzando la famosa TAVOLA REALE - (funziona dal 1939 anno di sua invenzione) - non facciamoco burlare dai venditori di fumo - TENETEVI PRONTI E'IN CORSO LO STUDIO DElL'AMBO STRATOSFERICO ",1,3,0
ScriviResoconto
End Sub
Function RAD10(estrazione,tentativo,byref ruota,byref numero1,byref numero2)
Dim trovati,r,i,j
trovati = 0
For r = 1 To 10
For i = 1 To 4
For j = i + 1 To 5
a = Estratto(estrazione,r,i)
b = Estratto(estrazione,r,j)
If Distanza(a,b) = 30 Then
trovati = trovati + 1
If trovati = tentativo Then
numero1 = Estratto(estrazione,r,i)
numero2 = Estratt

 

[violaviolaviola]

capito niente..ovvio..nn sono un'esperta
ma se mi fai vincere va bene
( )


viola
"La pace non è una vuota parola, ma una forma di comportamento"

 

[baffetto]

idem come violaviolaviola ciao

 

[rabberto]

Ottimo claudio8 questo sistema e bellissimo grazie sei grande , e possbile avere L'AMBO STRATOSFERICO per favore grazie ciao.

 

[vidoque]

CIAO CLAUDIO TI AUGURO CHE TU POSSA TROVARE LA VIA GIUSTA PER PRENDERE L'AMBO SECCO AD OGNI ESTRAZIONE.


saluti giuseppe

 

[PLINIUS]

Ottimo. Non sono un esperto. E' possibile avere l'ambo stratosferico?
Grazie per il lavoro svolto.
A presto
PLINIUS

 

[marco6474]

Impressionante claudio8
ho caricato l0 script
vediamo la prossima previsione.
ciao Marco

 

[imported_n/a]

Ciao Luigi,
ho tentato di capirci qualcosa ma....
praticamente non ci ho capito una mazza
nessun caso negativo dal 1945
Secondo me....faresti meglio a togliere lo script,
altrimenti la lottomatica fallisce

Entertainment Group

 

[marco6474]

A quando la prossima ambata claudio8!
Ciao MArco

 

[iris59]

Interessa tantissimo anche a me,solo che di questi script io non ci capisco proprio nulla.
Saresti cosi gentile da spiegarci il metodo.
grazie davvero tanto.

iris59

 

[keeper]

caro prof. claudio8 ma da quale cilcindro li tiri fuori

 

[pigi]

X CLAUDIO8
E TU CI CHIEDI SE CI INTERESSA?

MA CERTO CHE CI INTERESSA , SEI DAVVERO GRANDE , GRAZIE.

GIORGIO

giorgio's

 

[Lady Oscar]

Stratosfericamente parlando .. .. ... COMPLIMENTI.

(mannaggia lo sapevo che dovevo studiare di piu la matematica )

 

[TheJackal]

<center>

</center>

 

[Roby]

Tornate sulla terra...................

Blackmore

 

[esselotto]

 

[esselotto]

AH CLAUDIO METODO OTTIMO
UN VERO CAPOLAVORO DI INGEGNERIA LOTTISTICA



CHISSA' L'AMBO

 

[esselotto]

USANDO IL TUO SCRIPT HO TIRATO FUORI
UN'ALTRO CAPOLAVORO
LA CINQUINA SECCA AL 1° COLPO


HA LA STESSA PERCENTUALE DI VINCITA DELLA TUA AMBATA SECCA SU 100 CASI GIOCABILI O NEGATIVI /size=5]

 

[Zagor]

Mille grazie Claudio , bellissimo metodo. Aspetto se vorrai quello per Ambo.

Un saluto e buona giornata.

Mauro

"Non datemi un pesce , ma insegnatemi a pescare"

 

[Zagor]

quote:Originally posted by esselotto

USANDO IL TUO SCRIPT HO TIRATO FUORI
UN'ALTRO CAPOLAVORO
LA CINQUINA SECCA AL 1° COLPO


HA LA STESSA PERCENTUALE DI VINCITA DELLA TUA AMBATA SECCA SU 100 CASI GIOCABILI O NEGATIVI /size=5]

Grande pure tu Esselotto.

Un saluto e buona giornata.

Mauro

"Non datemi un pesce , ma insegnatemi a pescare"