pigreko73..
Member
..rivolgo questo quessito a Black..o ki kome lui sa elaborare gli script..se a questo script qui sotto
Sub Main()
Dim ruote(1)
Dim posta(1)
Dim n(1)
ruote(1) = 1
posta(1) = 1
ini = 7000' qui diminuisci se vuoi analizzare ancora piu indietro
fin = EstrazioneFin
For es = ini To fin
If IndiceMensile(es) = 1 Then
a = Estratto(es,1,1)
n(1) = Fuori90(a + 45)
ImpostaGiocata 1,n,ruote,posta,15,1
Gioca es
End If
Next
Scrivi
ScriviResoconto
End Sub
..io volessi aggiungere altri numeri sullo stesso estratto kome dovrei modifikare.. ti faccio un esempio..
..nel listato messo lo script mi permette di addizionare al primo estratto di BARI il numero 45.. se io oltre al 45 volessi addizionare altri due numeri esempio il primo di BARI +45 +26 +75 ke komando dovrei aggiungere allo script??
..grazie a ki vorrà rispondermi..!!!
Sub Main()
Dim ruote(1)
Dim posta(1)
Dim n(1)
ruote(1) = 1
posta(1) = 1
ini = 7000' qui diminuisci se vuoi analizzare ancora piu indietro
fin = EstrazioneFin
For es = ini To fin
If IndiceMensile(es) = 1 Then
a = Estratto(es,1,1)
n(1) = Fuori90(a + 45)
ImpostaGiocata 1,n,ruote,posta,15,1
Gioca es
End If
Next
Scrivi
ScriviResoconto
End Sub
..io volessi aggiungere altri numeri sullo stesso estratto kome dovrei modifikare.. ti faccio un esempio..
..nel listato messo lo script mi permette di addizionare al primo estratto di BARI il numero 45.. se io oltre al 45 volessi addizionare altri due numeri esempio il primo di BARI +45 +26 +75 ke komando dovrei aggiungere allo script??
..grazie a ki vorrà rispondermi..!!!