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ì 05 giugno 2026
    Bari
    11
    36
    33
    25
    57
    Cagliari
    57
    04
    70
    22
    73
    Firenze
    39
    71
    83
    31
    72
    Genova
    79
    89
    18
    80
    05
    Milano
    15
    68
    19
    49
    87
    Napoli
    10
    56
    66
    58
    07
    Palermo
    50
    27
    19
    06
    75
    Roma
    60
    24
    39
    79
    62
    Torino
    75
    47
    41
    84
    45
    Venezia
    56
    08
    84
    38
    09
    Nazionale
    61
    62
    68
    30
    75
    Estrazione Simbolotto
    Napoli
    07
    25
    29
    22
    10
Indietro
Alto