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
    giovedì 09 gennaio 2025
    Bari
    47
    06
    65
    72
    48
    Cagliari
    75
    33
    52
    59
    73
    Firenze
    08
    05
    35
    74
    81
    Genova
    33
    59
    68
    27
    07
    Milano
    68
    12
    60
    51
    65
    Napoli
    49
    17
    10
    71
    87
    Palermo
    31
    64
    45
    04
    47
    Roma
    18
    84
    43
    28
    31
    Torino
    14
    23
    33
    16
    84
    Venezia
    39
    41
    08
    02
    86
    Nazionale
    63
    41
    58
    16
    01
    Estrazione Simbolotto
    Bari
    45
    03
    38
    41
    15
Indietro
Alto