L' Ambata Determinata - Su Bari - Vincente Da 7 Mesi (Ultima del mese)

[nadin]

Ambata di mese agosto 70

 

[Aline]

Grazie

 

[roby57]

io vado vanti ancora con l'81 che non è uscita forse è arrivato il momento chissa?

 

[Pandit]

Ma volete uno script del Metodo?
se Xeroxs mi da il permesso, lo posto..

 

[Xeroxs]

Ma volete uno script del Metodo?
se Xeroxs mi da il permesso, lo posto..

Certo Non Ho Problemi, Ti Ringrazio anche Io.

 

[Pandit]

Ecco, guarda se Ti va bene.. io ho messo per 17 colpi, ma si può cambiare..

Anticipazione (Spoiler)

Sub Main
'Metodo Ambata Determinata - Su Bari - (Ultima del mese) by Xeroxs 2° 3° e 4° posizione
ColoreTesto 2 :Scrivi String(37,32) & "Ambata Determinata - Su Bari - by Xeroxs ",1
Scrivi
Dim nu(1),R(12),n(6)
Dim ini,fin,posta(1)
posta(1) = 1
ini = EstrazioneFin - 300
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio es
Call AvanzamentoElab(ini,fin,es)
If IsUltimaDelMese(es) Then
'If IndiceMensile(es) = 1 Then
a = Estratto(es,4,2)
b = Estratto(es,9,5)
c = Estratto(es,1,1)
d = Fuori90(((a + b) - c) + 88)
'***
nu(1) = d
'***
R(1) = 1:R(2) = 6
'***
ImpostaGiocata 1,nu,R,posta,17
Gioca es,1
Scrivi String(105,"-") : ColoreTesto 1
'End If
End If
Next
ScriviResoconto
End Sub

 

[Xeroxs]

Ecco, guarda se Ti va bene.. io ho messo per 17 colpi, ma si può cambiare..

Anticipazione (Spoiler)

Sub Main
'Metodo Ambata Determinata - Su Bari - (Ultima del mese) by Xeroxs 2° 3° e 4° posizione
ColoreTesto 2 :Scrivi String(37,32) & "Ambata Determinata - Su Bari - by Xeroxs ",1
Scrivi
Dim nu(1),R(12),n(6)
Dim ini,fin,posta(1)
posta(1) = 1
ini = EstrazioneFin - 300
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio es
Call AvanzamentoElab(ini,fin,es)
If IsUltimaDelMese(es) Then
'If IndiceMensile(es) = 1 Then
a = Estratto(es,4,2)
b = Estratto(es,9,5)
c = Estratto(es,1,1)
d = Fuori90(((a + b) - c) + 88)
'***
nu(1) = d
'***
R(1) = 1:R(2) = 6
'***
ImpostaGiocata 1,nu,R,posta,17
Gioca es,1
Scrivi String(105,"-") : ColoreTesto 1
'End If
End If
Next
ScriviResoconto
End Sub

Grazie anche a nome di tutti quelli che ne possono fare un buon uso.
Direi che è fatto bene, cosi chiunque può spaziare a sua discrezione

 

[Aline]

Complimenti

 

[andrea78]

Grazie Xeroxs preso semplice ma preso

 

[Abitte]

 

[Aline]

Buona Domenica,la nuova è 88 ? Grazie

 

[spike]

confermo

 

[Aline]

Grazie

 

[Abitte]

ed anche l'88 finalmente è arrivato!!!!Naturalmente in posizione......Xer for ever

 

[spike]

complimenti

 

[Aline]

Grazie complimenti alla prossima