Novità

La solita cortesia

Alien.

Advanced Premium Member
uno script.




grazie.
 
ColoreTesto 1
Scrivi "------------ L'ambo ripetuto PARI O DISPARI di Osvaldo Manara -----"
Scrivi " List. DjNomade "
Scrivi
ColoreTesto 0
Sub Main()
Dim num(10)
Dim nu1(7)
Dim nu2(7)
Dim nu3(8)
Dim nu4(8)
Dim nu5(8)
Dim ruote(10)
Dim ruote2(10)
ruote2(10) = 11
Dim posta(2),poste(2)
posta(1) = 11
poste(2) = 1
Dim post(4)
post(2) = 1.5
post(3) = 0.5
fin = EstrazioneFin
ini = fin - 50
t = 0
For es = ini To fin
Messaggio CStr(EstrazioneFin - es)
k = 12
For r = 1 To 10
For p = 1 To 4
For q = p + 1 To 5
n1 = Estratto(es,r,p)
b = Estratto(es,r,q)
For r1 = r + 1 To 12
If r1 = 11 Then r1 = 12
For pp = 1 To 4
For qq = pp + 1 To 5
c = Estratto(es,r1,pp)
d = Estratto(es,r1,qq)
sm1 = Fuori90(n1 + b)
b2 = sm1/2
a2 = Fuori90(45 + b2)'58
a3 = Distanza(a2,n1)'58-24=34
a4 = Distanza(a2,b)'58-2=34'ambata
a5 = Abs(n1 - b)
If((c = n1 And d = b) Or(c = b And d = n1)) And pari(sm1) = True And a3 = a4 Then ' se i numeri sono uguali
t = t + 1
Scrivi String(44,"=") & " caso n° " &(t),1
Scrivi DataEstrazione(es) & " " & Left(NomeRuota(r),3) & " " & Format2(n1) & " " & Format2(b) & " * " & Left(NomeRuota(r1),3) & " " & _
Format2(c) & " " & Format2(d) & " Somma " & Format2(sm1)
Scrivi
ruote(1) = r
ruote(2) = r1
nu1(1) = a4
ImpostaGiocata 1,nu1,ruote,posta,k
nu2(1) = a4
nu2(2) = n1
ImpostaGiocata 2,nu2,ruote,poste,k
nu2(1) = a4
nu2(2) = b
ImpostaGiocata 3,nu2,ruote,poste,k
nu2(1) = a4
nu2(2) = sm1
ImpostaGiocata 4,nu2,ruote,poste,k
nu2(1) = a4
nu2(2) = a5
ImpostaGiocata 5,nu2,ruote,poste,k
Gioca es,1
End If
Next
Next
Next
Next
Next
Next
Next
ScriviResoconto,0
ColoreTesto 1 :Scrivi "------------ L'ambo ripetuto PARI O DISPARI di Osvaldo Manara -----",1
Scrivi " List. DjNomade "
Scrivi
End Sub
 
Ciao *black ,grazie.
Ma facendo un controllo dello script
Estrazione generatrice del pronostico 10332 [152 - 09/11/2023]
G 0001 Numeri in gioco : 03 su NA RO per Estratto

V N. [03 ] [RO] [.. .. .. 03 ..] C. 1 Estratto 10333 [153 - 10/11/2023]
V N. [03 ] [RO] [03 .. .. .. ..] C. 8 Estratto 10340 [160 - 23/11/2023]

In corso per altre 1 estrazioni
G 0002 Numeri in gioco : 03.01 su NA RO per Ambo
In corso per altre 1 estrazioni
G 0003 Numeri in gioco : 03.85 su NA RO per Ambo
In corso per altre 1 estrazioni
G 0004 Numeri in gioco : 03.86 su NA RO per Ambo
In corso per altre 1 estrazioni
G 0005 Numeri in gioco : 03.84 su NA RO per Ambo
In corso per altre 1 estrazioni
============================================ caso n° 21
11.11.2023 Cag 22 66 * Mil 22 66 Somma 88

non torna con quanto ha detto GERONIMO'S

Preciso che non sempre la previsione da tanto , ma difficilmente non da esito ..anzi a volte da molto .... per esempio
09 11 23 NA RO 01 85 prev. NA RO NAZ 84 ambata / 86 68 / 41 80
11 11 2° clp TERNO SECCO A TT 84 41 80 + 84 AMBATA A NA
16 11 4°CLP AMBO SECCO 68 86 ROMA
23 11 8°CLP AMBO SECCO A TT 84 86
24 11 9°CLP AMBATA 84 RO
SEMPRE IL 09 11 23 FI GE 34 46 prev 12 AMBATA / 80 08 / 35 02
14 11 3° CLP AMBO SECCO TT 12 35
16 11 4° CLP AMBO SECCO FI 80 08


Forse.............non si è capito bene la spiegazione di GERONIMO'S


SI PUò VERIFICARE PERCHE NON MI PARE MALVAGIO IL SUO PENSIERO.

GRAZIE.
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 06 ottobre 2026
    Bari
    50
    20
    35
    06
    04
    Cagliari
    22
    56
    17
    89
    74
    Firenze
    44
    41
    61
    08
    02
    Genova
    55
    90
    74
    42
    52
    Milano
    03
    80
    84
    33
    87
    Napoli
    27
    30
    50
    80
    87
    Palermo
    61
    31
    40
    48
    42
    Roma
    79
    58
    44
    52
    51
    Torino
    46
    05
    40
    39
    52
    Venezia
    39
    22
    68
    21
    27
    Nazionale
    54
    84
    43
    06
    12
    Estrazione Simbolotto
    36
    45
    21
    43
    12
Indietro
Alto