Novità

Non riesco a integrare la tabella colorata in questo script...

lotto_tom75

Advanced Premium Member
Questo script genera tutte le formazioni di classe voluta per tutte le distanze da 1 a 89 e credo sia stato creato dal grande Joe che saluto. Ad ogni modo questo criptico ma molto interessante script prende in considerazione tutti i 90 numeri mentre a me servirebbe che potesse valutare anche solo un gruppo numerico di base ben specifico importabile appunto dall'ormai nota tabella colorata apposita. Un'ulteriore modifica che vorrei apportarvi e quella di non considerare l'inutile distanza 90 che ovviamente riporta solo lo stesso numero per il numero delle volte pari al valore della classe di sviluppo scelta.

Codice:
Sub Main
Q = 30 '<=== Inserisci "Quantità" Numeri in Lunghetta
For P = 1 To 90
AvanzamentoElab 1,90,P
'Scrivi String(Q*3 - 1,"=") & " PASSO " & Format2(P),1
For N = 1 To 90
Stringa = Format2(N) & "."
For L = 1 To Q
Stringa = Stringa & Format2(Fuori90(N + L*P)) & "."
Next
For LL = 3*Q To 3*Q Step 3
Scrivi Left(Stringa,LL - 1)
Next
'Scrivi
Next
Next
End Sub

Qualcuno/a riesce ad inserirvi questa opzione della tabella colorata e a rimuovere la distanza 90 dallo sviluppo? :rolleyes: :D

Thanks

:)
 
Ultima modifica:
Ciao, l'inutile distanza 90 (se ho capito bene la tua richiesta) la puoi togliere facendo

For P = 1 To 89

per la nota tabella colorata, non ho capito cosa intendi
 
Sull'eliminare l'ultima distanza 90. Hai perfettamente ragione grande salvo! Bastava quel semplicissimo step :eek::rolleyes::D

Per quanto riguarda l'implementazione della tabella colorata era per tentare di rilevare le distanze in un gruppo numerico diverso dai 90 numeri totali. Anche se ovviamente spesso accadrà di non rilevarle in modo omogeneo come avviene esaminando tutti i 90. E il trovarle o meno dipenderà dalla classe di sviluppo scelta. Ad esempio.... se inserisco da tabella colorata : 1,2,3,4,5,6,7,8,9,10 e poi chiedo lo sviluppo nelle varie distanze in classe 9 lo script mi dovrebbe trovare solo:

dist 1
1,2,3,4,5,6,7,8,9,10
2,3,4,5,6,7,8,9,10,1
ecc...

dist 2
1,3,5,7,9,1,3,5,7,9
3,5,7,9,1,3,5,7,9,1
ecc...

:p:)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 04 agosto 2026
    Bari
    40
    77
    49
    65
    43
    Cagliari
    75
    06
    03
    62
    15
    Firenze
    42
    04
    69
    27
    43
    Genova
    05
    47
    57
    50
    89
    Milano
    37
    88
    01
    85
    42
    Napoli
    33
    28
    45
    18
    23
    Palermo
    04
    70
    38
    58
    85
    Roma
    62
    18
    28
    59
    43
    Torino
    86
    24
    40
    34
    61
    Venezia
    25
    12
    78
    53
    39
    Nazionale
    49
    07
    65
    62
    70
    Estrazione Simbolotto
    Nazionale
    35
    24
    36
    05
    12

Ultimi Messaggi

Indietro
Alto