Un regalo ideato da Antonin per tutti, programmato da Pandit

[Antonin]

Puoi provare le tue affermazioni su questo fronte, accetto la sfida, posta la tua bella vincita, e visibile mi raccomando, dimostra liberamente a che livello è il tuo "potere ".

Ne ho messe tante di vincite reali su questo forum, a differenza tua che non ho mai vista una, basta che osservi.

 

[salva 57]

lo script mi da errore
non puoi mettere semplicemente
che calcolo fai grazie antonin

 

[salva 57]

lo script mi da errore
non puoi mettere semplicemente
che calcolo fai grazie antonin

mi da errore alla riga 1o variabile non definita co=0 cosa devo scrivere ?

 

[Antonin]

lo script mi da errore
non puoi mettere semplicemente
che calcolo fai grazie antonin

calcolo errato leggi quelli sotto...

 

[Antonin]

mi da errore alla riga 1o variabile non definita co=0 cosa devo scrivere ?

Non so dirtelo lo script e' stato fatto da Pandit,hai copiato bene lo script?

 

[salva 57]

Certo salva 57,
al 1° del mese prendi il 1° estratto di Bari e il 5° di cagliari li sommi con il fuori 90.
esempio:
1° di Bari 15
2° di Cagliari 27
calcolo : 15+27= 42 con il suo vertibile 24

grazie sei stato gentilissimo antonin
adesso me lo guardo conpiacere

 

[Antonin]

grazie sei stato gentilissimo antonin
adesso me lo guardo conpiacere

No aspetta errore mio nel metodo,ne ho tanti che mi sono confuso.
devi prendere il 5° di bari con il 1° di cagliari
il 1° del mese a bari e' uscito il 20 in 5^ pos.
il 1° del mese a cagliari e' uscito il 9 in 1^ pos.
esempio:
20-9= 11 vertibile 19 quindi 11-19 Ba/Ca.

 

[salva 57]

No aspetta errore mio nel metodo,ne ho tanti che mi sono confuso.
devi prendere il 5° di bari con il 1° di cagliari
il 1° del mese a bari e' uscito il 20 in 5^ pos.
il 1° del mese a cagliari e' uscito il 9 in 1^ pos.
esempio:
20-9= 11 vertibile 19 quindi 11-19 Ba/Ca.

stranamente
il metodo sbagliato
di prima ho controllato
4 casi e tutti vincenti
adesso controllo questo grazie della collaborazione

 

[Antonin]

Questo e' lo script modificato da me quello solo per ambate.

Sub Main
' by Pandit for Antonin
Dim num(5),Ru(12),nu(2),R(5),n(6)
Dim poste(5),ini,fin,posta(1)
posta(1) = 1
poste(2) = 1
ini = EstrazioneFin - 1500
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,1,5) 'prima era a su (5)
b = Estratto(es,2,1) 'prima era a su (1)
If a > b Then
e = a - b
End If
If a < b Then
e = b - a
End If
f = Fuori90(Vert(e))
g = 90 -(e)
'P***
nu(1) = e
nu(2) = f
'P***
num(1) = e
num(2) = f
num(3) = g
'P***
R(1) = 1:R(2) = 2
'P***
'Ru(1) = 1:Ru(2) = 2:Ru(3) = 11
'P***
ImpostaGiocata 1,nu,R,posta,17
ImpostaGiocata 2,num,Ru,poste,17,2
Gioca es,1
ColoreTesto 1
Scrivi String(105,"=") : ColoreTesto 1
End If
Next
ScriviResoconto
End Sub

 

[Antonin]

Questo e' lo script modificato da me quello solo per ambate.

Sub Main
' by Pandit for Antonin
Dim num(5),Ru(12),nu(2),R(5),n(6)
Dim poste(5),ini,fin,posta(1)
posta(1) = 1
poste(2) = 1
ini = EstrazioneFin - 1500
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,1,5) 'prima era a su (5)
b = Estratto(es,2,1) 'prima era a su (1)
If a > b Then
e = a - b
End If
If a < b Then
e = b - a
End If
f = Fuori90(Vert(e))
g = 90 -(e)
'P***
nu(1) = e
nu(2) = f
'P***
num(1) = e
num(2) = f
num(3) = g
'P***
R(1) = 1:R(2) = 2
'P***
'Ru(1) = 1:Ru(2) = 2:Ru(3) = 11
'P***
ImpostaGiocata 1,nu,R,posta,17
ImpostaGiocata 2,num,Ru,poste,17,2
Gioca es,1
ColoreTesto 1
Scrivi String(105,"=") : ColoreTesto 1
End If
Next
ScriviResoconto
End Sub

Mancano 8 colpi per 11-19 a BA/CA ora si puo'attaccare con moderazione.Dal 2015 mai fallito,spero che non sia questo mese,ma non credo. Potrebbe dare felicita' a molte famiglie,ma vi prego siate prudenti.Grazie

 

[Antonin]

-7 colpi!