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ì 28 luglio 2026
    Bari
    82
    27
    80
    03
    69
    Cagliari
    23
    01
    08
    88
    72
    Firenze
    89
    69
    62
    56
    54
    Genova
    71
    75
    43
    38
    69
    Milano
    89
    71
    34
    29
    87
    Napoli
    55
    10
    18
    72
    85
    Palermo
    47
    09
    81
    12
    65
    Roma
    60
    35
    58
    68
    67
    Torino
    66
    38
    30
    73
    17
    Venezia
    88
    11
    13
    48
    21
    Nazionale
    79
    56
    73
    05
    39
    Estrazione Simbolotto
    Nazionale
    01
    29
    34
    28
    10

Ultimi Messaggi

Indietro
Alto