qualcuno conosce questo tipo di script
- Codice: Seleziona tutto
Option Explicit
Sub Main()
Dim a, num1, num2
Dim Numeri(2)
Dim ProgE, ProgA
Metodo.Init "Metodo di esempio", csCasisticaON
Metodo.Ripetuti = csElimina
ProgE = Metodo.Progressione(1, 50)
ProgA = Metodo.Progressione(5, csPostaFissa)
For a = Estrazione.Inizio("2007") To Estrazione.Fine
If Estrazione.PrimaMese(a) Then
num1 = Estratti.Somma(a, csMI, 1, 5)
num2 = Vertibile(num1)
Numeri(1) = num1
Numeri(2) = num2
Metodo.GiocaPronostico 1, a+1, 6, ProgE, Numeri, csEstratto, csBA
If Metodo.Sortito(1) Then Metodo.StopGiocate
Metodo.GiocaPronostico 2, a+1, 9, ProgA, Numeri, csAmbo, csTutte
End If
Next
Metodo.Report
End Sub
è uno script di un programma x il lotto (VISUAL LOTTO.5),volevo sapere se qualcuno lo conosce,e se c'è una guida a riguardo.
GRAZIE....