Novità

A volte basta uno script facile per tutti.

 
Vedi Codicebinario,io ho fatto anche l amministratore su un mio forum,ne hanno fatto di tutto per farmelo chiudere.Pero' se stiamo dietro a questi venduti per pochi spiccioli per Invidia,anchio torno come novellino tanto per giocare,e lasciamo lo spazio ai venditori di fumo.Chiudo Scusandomi con chi credeva.Notte e arrangiatevi con le targhe!!!
 
Vedi Codicebinario,io ho fatto anche l amministratore su un mio forum,ne hanno fatto di tutto per farmelo chiudere.Pero' se stiamo dietro a questi venduti per pochi spiccioli per Invidia,anchio torno come novellino tanto per giocare,e lasciamo lo spazio ai venditori di fumo.Chiudo Scusandomi con chi credeva.Notte e arrangiatevi con le targhe!!!
Io idem....LOTTODEUS ormai scomparso dai radar.....Vado a sdraiarmi a divano tv...Ciao batter alla prossima...e,ribadisco,lo script che ti ho postato....guardalo bene e usalo meglio...Notte alla prossima.
 
Azzardo un pronostico . Provo

Ruota Nazionale spia 90 . Ambo e terno.

51 52 54 55 07 70

51 52 54 55 07 80

51 52 54 55 07 84

51 52 54 55 07 85

51 52 54 55 70 80

51 52 54 55 70 84

51 52 54 55 70 85

51 52 54 55 80 84

51 52 54 55 80 85

51 52 54 55 84 85

Ciao Eugenio e complimenti a Mission impossible
7 54 il regalino per Natale ve lo ho fatto puo dare comunque ancora . 🙂 🙂 🙂 🙂 🙂
 
Non ricordo quale script?
Questo...

Option Explicit
Sub Main

Dim Ini,Fin,Q
Dim CdP,P,R,K,N,Es,E,X
R = BA_ 'Ruota------------------------------->cambiare qui
CdP = 5 'Presenze-------------------------->cambiare per presenze
Fin = 10334'Ultima Estrazione Considerata
Q = 78 'Quantità Estrazioni
Ini = Fin + 1 - Q 'Calcolo Inizio Periodo--------> cambiare qui per cicli considerati
'
For N = 1 To 90
If EstrattoFrequenzaTurbo(R,N,Ini,Fin) = CdP Then
K = K + 1
ReDim Preserve L(K)
L(K) = N
End If
Next

ColoreTesto 2
Scrivi
Scrivi NomeRuota(R) & " ",True,False
Scrivi StringaNumeri(L,,True),True
Scrivi
ColoreTesto 0
For Es = Fin + 1 To Fin + 9
Scrivi DataEstrazione(Es) & " ",0,0
For P = 1 To 5
E = Estratto(Es,R,P)
For X = 1 To K
If E = L(X) Then ColoreTesto 2
Next
Scrivi Format2(E) & " ",0,0
ColoreTesto 0
Next
Scrivi
Next
End Sub
 
Questo script va' ad aggiungersi agli altri di "FUTURO2" io li uso in contemporanea.....fanne buon uso...e come dici tu"...a volte basta cambiare una data,il numero di cicli......"Ciaooooooo ! a tutti !
 
Molto interessante, io pero' purtroppo ci capisco poco negli script... Molto bello cosa è stato scritto in un post, riguardo l'aiuto agli altri. Scusate, sapreste per caso dirmi dai vostri sistemi dove si potrebbero giocare 1 2 3? E con cosa si potrebbero magari abbinare? Grazie per un eventuale risposta:)
 
Molto interessante, io pero' purtroppo ci capisco poco negli script... Molto bello cosa è stato scritto in un post, riguardo l'aiuto agli altri. Scusate, sapreste per caso dirmi dai vostri sistemi dove si potrebbero giocare 1 2 3? E con cosa si potrebbero magari abbinare? Grazie per un eventuale risposta:)
Purtroppo non ti posso aiutare, magari chi ha i tabulati della (PR) ti potrebbe indicare dove giocarli.
Li usavo una volta ora non li ho piu',Prova con Mastro geppetto lui sa come funzionano le bufale.
 

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 17 aprile 2026
    Bari
    31
    34
    54
    63
    51
    Cagliari
    54
    15
    14
    25
    40
    Firenze
    75
    79
    42
    26
    19
    Genova
    02
    67
    09
    42
    41
    Milano
    34
    68
    73
    79
    03
    Napoli
    47
    26
    31
    23
    63
    Palermo
    74
    64
    03
    75
    63
    Roma
    82
    60
    28
    73
    11
    Torino
    27
    30
    51
    75
    05
    Venezia
    21
    65
    43
    15
    87
    Nazionale
    48
    09
    72
    88
    29
    Estrazione Simbolotto
    Genova
    45
    15
    22
    05
    25
Indietro
Alto