R
Roby
Guest
Replica.
BARI : alla 6° del mese x 11° C.
Sub main()
Dim ruote(10)
Dim numeri1(10)
Dim numeri2(10)
Dim poste(5)
Dim posta(5)
poste(1)=1
poste(2)=0
poste(3)=0
poste(4)=0
poste(5)=0
ruote(1)=1
For n=7301 To EstrazioneFin
If IndiceMensile=6 Then
numeri1(1)=Fuori90(Fuori90(Int(Fuori90(SommaEstratti(n,1))*9.95))+9)
ImpostaGiocata 1,numeri1,ruote,poste,11,1
Gioca n
End If
Next
ScriviResoconto
End Sub
1 Saluto
DendroAspys
[|)]
------------------------------------------
mer 21.01.2004 [7306]
G 1: M 56 Ba D: 11
E: 56 su Ba 10° colpo [7316/25.02.2004]
I10
sab 21.02.2004 [7315]
G 1: M 88 Ba D: 11
E: 88 su Ba 6° colpo [7321/13.03.2004]
I6
sab 20.03.2004 [7323]
G 1: M 87 Ba D: 11
E: 87 su Ba 2° colpo [7325/27.03.2004]
I2
mer 21.04.2004 [7332]
G 1: M 87 Ba D: 11
negativo
mer 19.05.2004 [7340]
G 1: M 16 Ba D: 11
E: 16 su Ba 4° colpo [7344/03.06.2004]
I4
sab 19.06.2004 [7349]
G 1: M 87 Ba D: 11
E: 87 su Ba 4° colpo [7353/03.07.2004]
I4
mer 21.07.2004 [7358]
G 1: M 38 Ba D: 11
E: 38 su Ba 5° colpo [7363/07.08.2004]
I5
sab 21.08.2004 [7367]
G 1: M 05 Ba D: 11
E: 05 su Ba 3° colpo [7370/01.09.2004]
I3
sab 18.09.2004 [7375]
G 1: M 15 Ba D: 11
E: 15 su Ba 8° colpo [7383/16.10.2004]
I8
mer 20.10.2004 [7384]
G 1: M 85 Ba D: 11
E: 85 su Ba 2° colpo [7386/27.10.2004]
I2
sab 20.11.2004 [7393]
G 1: M 36 Ba D: 11
E: 36 su Ba 3° colpo [7396/01.12.2004]
I3
sab 18.12.2004 [7401]
G 1: M 37 Ba D: 11
E: 37 su Ba 5° colpo [7406/05.01.2005]
I5
mer 19.01.2005 [7410]
G 1: M 48 Ba D: 11
E: 48 su Ba 8° colpo [7418/16.02.2005]
I8
sab 19.02.2005 [7419]
G 1: M 04 Ba D: 11
E: 04 su Ba 2° colpo [7421/26.02.2005]
I2
sab 19.03.2005 [7427]
G 1: M 18 Ba D: 11
E: 18 su Ba 7° colpo [7434/13.04.2005]
I7
mer 20.04.2005 [7436]
G 1: M 48 Ba D: 11
E: 48 su Ba 1° colpo [7437/23.04.2005]
I1
sab 21.05.2005 [7445]
G 1: M 28 Ba D: 11
E: 28 su Ba 10° colpo [7455/23.06.2005]
I10
sab 18.06.2005 [7453]
G 1: M 38 Ba D: 11
negativo
gio 14.07.2005 [7464]
G 1: M 46 Ba D: 11
E: 46 su Ba 2° colpo [7466/19.07.2005]
I2
sab 13.08.2005 [7477]
G 1: M 16 Ba D: 11
E: 16 su Ba 2° colpo [7479/18.08.2005]
I2
mar 13.09.2005 [7490]
G 1: M 64 Ba D: 11
E: 64 su Ba 11° colpo [7501/08.10.2005]
gio 13.10.2005 [7503]
G 1: M 56 Ba D: 11
E: 56 su Ba 1° colpo [7504/15.10.2005]
I1
sab 12.11.2005 [7516]
G 1: M 88 Ba D: 11
E: 88 su Ba 3° colpo [7519/19.11.2005]
I3
mar 13.12.2005 [7529]
G 1: M 07 Ba D: 11
E: 07 su Ba 8° colpo [7537/31.12.2005]
I8
sab 14.01.2006 [7543]
G 1: M 25 Ba D: 11
E: 25 su Ba 6° colpo [7549/28.01.2006]
I6
mar 14.02.2006 [7556]
G 1: M 06 Ba D: 11
E: 06 su Ba 8° colpo [7564/04.03.2006]
I8
mar 14.03.2006 [7568]
G 1: M 8
BARI : alla 6° del mese x 11° C.
Sub main()
Dim ruote(10)
Dim numeri1(10)
Dim numeri2(10)
Dim poste(5)
Dim posta(5)
poste(1)=1
poste(2)=0
poste(3)=0
poste(4)=0
poste(5)=0
ruote(1)=1
For n=7301 To EstrazioneFin
If IndiceMensile=6 Then
numeri1(1)=Fuori90(Fuori90(Int(Fuori90(SommaEstratti(n,1))*9.95))+9)
ImpostaGiocata 1,numeri1,ruote,poste,11,1
Gioca n
End If
Next
ScriviResoconto
End Sub
1 Saluto
DendroAspys
[|)]
------------------------------------------
mer 21.01.2004 [7306]
G 1: M 56 Ba D: 11
E: 56 su Ba 10° colpo [7316/25.02.2004]
I10
sab 21.02.2004 [7315]
G 1: M 88 Ba D: 11
E: 88 su Ba 6° colpo [7321/13.03.2004]
I6
sab 20.03.2004 [7323]
G 1: M 87 Ba D: 11
E: 87 su Ba 2° colpo [7325/27.03.2004]
I2
mer 21.04.2004 [7332]
G 1: M 87 Ba D: 11
negativo
mer 19.05.2004 [7340]
G 1: M 16 Ba D: 11
E: 16 su Ba 4° colpo [7344/03.06.2004]
I4
sab 19.06.2004 [7349]
G 1: M 87 Ba D: 11
E: 87 su Ba 4° colpo [7353/03.07.2004]
I4
mer 21.07.2004 [7358]
G 1: M 38 Ba D: 11
E: 38 su Ba 5° colpo [7363/07.08.2004]
I5
sab 21.08.2004 [7367]
G 1: M 05 Ba D: 11
E: 05 su Ba 3° colpo [7370/01.09.2004]
I3
sab 18.09.2004 [7375]
G 1: M 15 Ba D: 11
E: 15 su Ba 8° colpo [7383/16.10.2004]
I8
mer 20.10.2004 [7384]
G 1: M 85 Ba D: 11
E: 85 su Ba 2° colpo [7386/27.10.2004]
I2
sab 20.11.2004 [7393]
G 1: M 36 Ba D: 11
E: 36 su Ba 3° colpo [7396/01.12.2004]
I3
sab 18.12.2004 [7401]
G 1: M 37 Ba D: 11
E: 37 su Ba 5° colpo [7406/05.01.2005]
I5
mer 19.01.2005 [7410]
G 1: M 48 Ba D: 11
E: 48 su Ba 8° colpo [7418/16.02.2005]
I8
sab 19.02.2005 [7419]
G 1: M 04 Ba D: 11
E: 04 su Ba 2° colpo [7421/26.02.2005]
I2
sab 19.03.2005 [7427]
G 1: M 18 Ba D: 11
E: 18 su Ba 7° colpo [7434/13.04.2005]
I7
mer 20.04.2005 [7436]
G 1: M 48 Ba D: 11
E: 48 su Ba 1° colpo [7437/23.04.2005]
I1
sab 21.05.2005 [7445]
G 1: M 28 Ba D: 11
E: 28 su Ba 10° colpo [7455/23.06.2005]
I10
sab 18.06.2005 [7453]
G 1: M 38 Ba D: 11
negativo
gio 14.07.2005 [7464]
G 1: M 46 Ba D: 11
E: 46 su Ba 2° colpo [7466/19.07.2005]
I2
sab 13.08.2005 [7477]
G 1: M 16 Ba D: 11
E: 16 su Ba 2° colpo [7479/18.08.2005]
I2
mar 13.09.2005 [7490]
G 1: M 64 Ba D: 11
E: 64 su Ba 11° colpo [7501/08.10.2005]
gio 13.10.2005 [7503]
G 1: M 56 Ba D: 11
E: 56 su Ba 1° colpo [7504/15.10.2005]
I1
sab 12.11.2005 [7516]
G 1: M 88 Ba D: 11
E: 88 su Ba 3° colpo [7519/19.11.2005]
I3
mar 13.12.2005 [7529]
G 1: M 07 Ba D: 11
E: 07 su Ba 8° colpo [7537/31.12.2005]
I8
sab 14.01.2006 [7543]
G 1: M 25 Ba D: 11
E: 25 su Ba 6° colpo [7549/28.01.2006]
I6
mar 14.02.2006 [7556]
G 1: M 06 Ba D: 11
E: 06 su Ba 8° colpo [7564/04.03.2006]
I8
mar 14.03.2006 [7568]
G 1: M 8