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
    sabato 21 giugno 2025
    Bari
    07
    03
    45
    25
    05
    Cagliari
    20
    73
    88
    50
    15
    Firenze
    04
    19
    09
    52
    55
    Genova
    21
    47
    65
    53
    24
    Milano
    11
    64
    70
    67
    51
    Napoli
    59
    66
    83
    33
    03
    Palermo
    61
    74
    28
    62
    04
    Roma
    25
    29
    15
    54
    44
    Torino
    34
    22
    30
    59
    28
    Venezia
    42
    75
    06
    83
    84
    Nazionale
    36
    67
    41
    54
    56
    Estrazione Simbolotto
    Napoli
    02
    40
    06
    26
    29
Indietro
Alto