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
    sabato 06 giugno 2026
    Bari
    79
    44
    34
    76
    86
    Cagliari
    16
    76
    87
    84
    37
    Firenze
    70
    35
    43
    72
    04
    Genova
    38
    59
    06
    79
    55
    Milano
    40
    68
    61
    88
    83
    Napoli
    37
    61
    90
    22
    14
    Palermo
    31
    45
    90
    44
    26
    Roma
    72
    04
    06
    41
    23
    Torino
    65
    62
    34
    06
    86
    Venezia
    34
    64
    59
    49
    71
    Nazionale
    07
    25
    36
    38
    08
    Estrazione Simbolotto
    Napoli
    45
    41
    35
    11
    09
Indietro
Alto