Sub main() 
            Dim ruote(2)
            Dim numeri1(5)
            Dim numeri2(5)
            Dim numeri3(5)
            Dim numeri4(4)
            Dim numeri5(4)
            Dim numeri6(4)
            Dim numeri7(4)
            Dim poste(5)
            Dim posta(1)
            posta(1)=5.1
            poste(2)=0.5
            poste(3)=0.3
            poste(4)=0.1
            poste(5)=0.1
            ruote(1)=1
            k=10
            y=2
            For n=7431 To EstrazioneFin
            If IndiceMensile(n)=1 Then
            numeri1(1)=Fuori90(Estratto(n,1,1)+16)
            numeri1(2)=Fuori90(Estratto(n,3,5)+53)
            numeri1(3)=Fuori90(Estratto(n,10,1)+25)
            numeri1(4)=Fuori90(Estratto(n,7,5)+29)
            numeri1(5)=Fuori90(Estratto(n,1,1)+38)
            EliminaRipetuti numeri1
            ImpostaGiocata 1,numeri1,ruote,poste,k,y
            numeri2(1)=Fuori90(Estratto(n,1,1)+2)
            numeri2(2)=Fuori90(Estratto(n,6,1)+5)
            numeri2(3)=Fuori90(Estratto(n,1,1)+16)
            numeri2(4)=Fuori90(Estratto(n,2,5)+37)           
            numeri2(5)=Fuori90(Estratto(n,8,3)+15)
            EliminaRipetuti numeri2
            ImpostaGiocata 2,numeri2,ruote,poste,k,y
            numeri3(1)=Fuori90(Estratto(n,1,1)+21)
            numeri3(2)=Fuori90(Estratto(n,5,1)+16)
            numeri3(3)=Fuori90(Estratto(n,1,3)+27)
            numeri3(4)=Fuori90(Estratto(n,4,1)+40)
	      numeri3(5)=Fuori90(Estratto(n,1,1)+32)
            EliminaRipetuti numeri3
            ImpostaGiocata 3,numeri3,ruote,poste,k,y
            For i=1 To 6
            For a=1 To 6
            Next
            Next
            Gioca n
            End If
            Next
            ScriviResoconto
            End Sub








sab 02.04.2005  [7431]
  G  1:  ATQC          70.21.69.13.02   Ba    4/10    
     A  13.70.69.21      su Ba    4° colpo   [7435/16.04.2005]
     T  13.70.69.21      su Ba    4° colpo   [7435/16.04.2005]
     Q  13.70.69.21      su Ba    4° colpo   [7435/16.04.2005]
     I4
  G  2:  ATQC          56.54.70.68.01   Ba    5/10    
     A  70.01            su Ba    5° colpo   [7436/20.04.2005]
     I5
  G  3:  ATQC          75.40.82.72.86   Ba    10/10    
     negativo
mer 04.05.2005  [7440]
  G  1:  ATQC          45.48.02.42.67   Ba    5/10    
     A  45.48            su Ba    5° colpo   [7445/21.05.2005]
     I5
  G  2:  ATQC          31.79.45.37.53   Ba    5/10    
     A  45.79            su Ba    5° colpo   [7445/21.05.2005]
     I5
  G  3:  ATQC          50.17.45.78.61   Ba    10/10    
     negativo
mer 01.06.2005  [7448]
  G  1:  ATQC          85.36.44.57.17   Ba    3/10    
     A  85.36            su Ba    3° colpo   [7451/11.06.2005]
     I3
  G  2:  ATQC          71.90.85.44.38   Ba    10/10    
     negativo
  G  3:  ATQC          90.11.67.65      Ba    10/10    
     negativo
sab 02.07.2005  [7459]
  G  1:  ATQC          35.56.43.75.57   Ba    10/10    
     A  35.75            su Ba   10° colpo   [7469/26.07.2005]

  G  2:  ATQC          21.28.35.55      Ba    2/10    
     A  21.28            su Ba    2° colpo   [7461/07.07.2005]
     I2
  G  3:  ATQC          40.03.56.52.51   Ba    10/10    
     negativo
mar 02.08.2005  [7472]
  G  1:  ATQC          82.37.90.10.14   Ba    3/10    
     A  14.82            su Ba    3° colpo   [7475/09.08.2005]
     I3
  G  2:  ATQC          68.73.82.25.36   Ba    10/10    
     negativo
  G  3:  ATQC          87.50.04.09.08   Ba    2/10    
     A  04.09.50.87      su Ba    2° colpo   [7474/06.08.2005]
     T  04.09.50.87      su Ba    2° colpo   [7474/06.08.2005]
     Q  04.09.50.87      su Ba    2° colpo   [7474/06.08.2005]
     I2
gio 01.09.2005  [7485]
  G  1:  ATQC          07.83.89.27.29   Ba    10/10    
     negativo
  G  2:  ATQC          83.25.07.26.50   Ba    10/10    
     negativo
  G  3:  ATQC          12.71.75.47.23   Ba    5/10    
     A  12.71            su Ba    5° colpo   [7490/13.09.2005]
     I5
sab 01.10.2005  [7498]
  G  1:  ATQC          05.03.23.57.27   Ba    10/10    
     negativo
  G  2:  ATQC          81.49.05.47.43   Ba    10/10    
     negativo
  G  3:  ATQC          10.79.56.23.21   Ba    4/10    
     A  10.56            su Ba    4° colpo   [7502/11.10.2005]
     I4
mer 02.11.2005  [7511]
  G  1:  ATQC          11.84.75.82.33   Ba    10/10    
     negativo
  G  2:  ATQC          87.62.11.77.44   Ba    10/10    
     A  44.62.77.87.11   su Ba   10° colpo   [7521/24.11.2005]
     T  44.62.77.87.11   su Ba   10° colpo   [7521/24.11.2005]
     Q  44.62.77.87.11   su Ba   10° colpo   [7521/24.11.2005]
     C  44.62.77.87.11   su Ba   10° colpo   [7521/24.11.2005]

  G  3:  ATQC          16.07.71.27      Ba    10/10    
     negativo
gio 01.12.2005  [7524]
  G  1:  ATQC          59.68.01.46.81   Ba    5/10    
     A  59.01.68         su Ba    5° colpo   [7529/13.12.2005]
     T  59.01.68         su Ba    5° colpo   [7529/13.12.2005]
     I5
  G  2:  ATQC          45.83.59.08.74   Ba    5/10    
     A  59.45            su Ba    5° colpo   [7529/13.12.2005]
     I5
  G  3:  ATQC          64.85.89.74.75   Ba    10/10    
     negativo
mar 03.01.2006  [7538]
  G  1:  ATQC          62.60.05.84      Ba    10/10    
     negativo
  G  2:  ATQC          48.86.62.57.46   Ba    2/10    
     A  86.48            su Ba    2° colpo   [7540/07.01.2006]
     I2
  G  3:  ATQC          67.29.62.83.78   Ba    10/10    
     negativo
gio 02.02.2006  [7551]
  G  1:  ATQC          10.09.13.46.32   Ba    10/10    
     negativo
  G  2:  ATQC          86.27.10.57.31   Ba    10/10    
     A  86.57.10.31.27   su Ba   10° colpo   [7561/25.02.2006]
     T  86.57.10.31.27   su Ba   10° colpo   [7561/25.02.2006]
     Q  86.57.10.31.27   su Ba   10° colpo   [7561/25.02.2006]
     C  86.57.10.31.27   su Ba   10° colpo   [7561/25.02.2006]

  G  3:  ATQC          15.45.62.68.26   Ba    10/10    
     negativo
gio 02.03.2006  [7563]
  G  1:  ATQC          20.87.03.09.42   Ba    9/10    
     A  42.87            su Ba    9° colpo   [7572/23.03.2006]
     I9
  G  2:  ATQC          06.82.20.35.67   Ba    10/10    
     negativo
  G  3:  ATQC          25.51.05.59.36   Ba    10/10    
     negativo
sab 01.04.2006  [7576]
  G  1:  ATQC          31.61.80.02.53   Ba    10/10    
     negativo
  G  2:  ATQC          17.67.31.55.58   Ba    10/10    
     negativo
  G  3:  ATQC          36.49.53.12.47   Ba    10/10    
     negativo
mar 02.05.2006  [7589]
  G  1:  ATQC          38.32.86.53.60   Ba    10/10    
     negativo
  G  2:  ATQC          24.47.38.13.86   Ba    10/10    
     negativo
  G  3:  ATQC          43.71.55.54      Ba    10/10    
     negativo
gio 01.06.2006  [7602]
  G  1:  ATQC          67.30.53.89      Ba    10/10    
     negativo
  G  2:  ATQC          53.71.67.02.80   Ba    10/10    
     negativo
  G  3:  ATQC          72.34.05.44.83   Ba    1/10    
     A  34.83.05         su Ba    1° colpo   [7603/03.06.2006]
     T  34.83.05         su Ba    1° colpo   [7603/03.06.2006]
     I1
sab 01.07.2006  [7615]
  G  1:  ATQC          61.75.01.14.83   Ba    10/10    
     negativo
  G  2:  ATQC          47.10.61.23.87   Ba    10/10    
     negativo
  G  3:  ATQC          66.74.44.86.77   Ba    10/10    
     negativo
mar 01.08.2006  [7628]
  G  1:  ATQC          09.33.70.05.31   Ba    1/10    
     A  31.33            su Ba    1° colpo   [7629/03.08.2006]
     I1
  G  2:  ATQC          85.50.09.36.75   Ba    10/10    
     negativo
  G  3:  ATQC          14.90.75.62.25   Ba    10/10    
     negativo
sab 02.09.2006  [7642]
  G  1:  ATQC          70.18.60.24.02   Ba    10/10    
     negativo
  G  2:  ATQC          56.50.70.74.12   Ba    10/10    
     negativo
  G  3:  ATQC          75.42.01.51.86   Ba    10/10    
     negativo
mar 03.10.2006  [7655]
  G  1:  ATQC          57.04.72.81.79   Ba    10/10    
     negativo
  G  2:  ATQC          43.58.57.62.66   Ba    10/10    
     negativo
  G  3:  ATQC          62.30.50.69.73   Ba    10/10    
     negativo
gio 02.11.2006  [7668]
  G  1:  ATQC          21.43.14.32      Ba    10/10    
     negativo
  G  2:  ATQC          07.14.21.68.70   Ba    10/10    
     negativo
  G  3:  ATQC          26.01.04.39.37   Ba    1/10    
     A  37.39            su Ba    1° colpo   [7669/04.11.2006]
     I1
sab 02.12.2006  [7681]
  G  1:  ATQC          79.17.25.76.11   Ba    10/10    
     negativo
  G  2:  ATQC          65.03.79.56.60   Ba    10/10    
     negativo
  G  3:  ATQC          84.61.87.26.05   Ba    10/10    
     negativo
mar 02.01.2007  [7694]
  G  1:  ATQC          58.89.07.28.80   Ba    10/10    
     negativo
  G  2:  ATQC          44.66.58.15.26   Ba    10/10    
     negativo
  G  3:  ATQC          63.71.21.30.74   Ba    10/10    
     negativo
gio 01.02.2007  [7707]
  G  1:  ATQC          37.16.61.79.59   Ba    10/10    
     negativo
  G  2:  ATQC          23.32.37.81.13   Ba    10/10    
     negativo
  G  3:  ATQC          42.60.51.24.53   Ba    10/10    
     negativo
gio 01.03.2007  [7719]
  G  1:  ATQC          71.32.38.31.03   Ba    10/10    
     negativo
  G  2:  ATQC          57.70.71.88.56   Ba    10/10    
     negativo
  G  3:  ATQC          76.11.56.35.87   Ba    10/10    
     negativo
mar 03.04.2007  [7733]
  G  1:  ATQC          41.33.01.66.63   Ba    10/10    
     negativo
  G  2:  ATQC          27.21.41.80.85   Ba    10/10    
     negativo
  G  3:  ATQC          46.43.51.55.57   Ba    10/10    
     negativo
mer 02.05.2007  [7745]
  G  1:  ATQC          28.61.15.37.50   Ba    10/10    
     negativo
  G  2:  ATQC          14.25.28.12.59   Ba    10/10    
     negativo
  G  3:  ATQC          33.22.19.64.44   Ba    10/10    
     negativo
lun 04.06.2007  [7759]
  G  1:  ATQC          55.21.44.77      Ba    10/10    
     negativo
  G  2:  ATQC          41.22.55.21.35   Ba    10/10    
     negativo
  G  3:  ATQC          60.14.65.36.71   Ba    10/10    
     negativo
mar 03.07.2007  [7772]
  G  1:  ATQC          39.18.67.03.61   Ba    10/10    
     negativo
  G  2:  ATQC          25.84.39.40.02   Ba    7/10    
     A  02.40            su Ba    7° colpo   [7779/19.07.2007]
     I7
  G  3:  ATQC          44.70.36.26.55   Ba    10/10    
     negativo
gio 02.08.2007  [7785]
  G  1:  ATQC          71.29.66.86.03   Ba    10/10    
     negativo
  G  2:  ATQC          57.21.71.77      Ba    10/10    
     negativo
  G  3:  ATQC          76.82.04.36.87   Ba    10/10    
     negativo
sab 01.09.2007  [7798]
  G  1:  ATQC          10.72.02.65.32   Ba    1/10    
     A  02.32            su Ba    1° colpo   [7799/04.09.2007]
     I1
  G  2:  ATQC          86.62.10.89.17   Ba    10/10    
     negativo
  G  3:  ATQC          15.53.73.67.26   Ba    3/10    
     A  53.26.73         su Ba    3° colpo   [7801/08.09.2007]
     T  53.26.73         su Ba    3° colpo   [7801/08.09.2007]
     I3
mar 02.10.2007  [7811]
  G  1:  ATQC          64.23.72.62.86   Ba    10/10    
     negativo
  G  2:  ATQC          50.28.64.90.10   Ba    9/10    
     A  90.50            su Ba    9° colpo   [7820/23.10.2007]
     I9
  G  3:  ATQC          69.24.11.54.80   Ba    10/10    
     negativo
ven 02.11.2007  [7824]
  G  1:  ATQC          47.35.04.34.69   Ba    6/10    
     A  34.35            su Ba    6° colpo   [7830/15.11.2007]
     I6
  G  2:  ATQC          33.77.47.49.08   Ba    10/10    
     negativo
  G  3:  ATQC          52.67.63.78      Ba    10/10    
     negativo
sab 01.12.2007  [7837]
  G  1:  ATQC          71.23.42.45.03   Ba    10/10    
     negativo
  G  2:  ATQC          57.11.71.05.79   Ba    2/10    
     A  05.71            su Ba    2° colpo   [7839/06.12.2007]
     I2
  G  3:  ATQC          76.02.15.27.87   Ba    10/10    
     negativo
mer 02.01.2008  [7850]
  G  1:  ATQC          56.03.85.83.78   Ba    10/10    
     negativo
  G  2:  ATQC          42.05.56.40.21   Ba    10/10    
     negativo
  G  3:  ATQC          61.32.49.73.72   Ba    7/10    
     A  73.61            su Ba    7° colpo   [7857/17.01.2008]
     I7
sab 02.02.2008  [7864]
  G  1:  ATQC          49.01.35.10.71   Ba    10/10    
     negativo
  G  2:  ATQC          35.23.49.15.24   Ba    10/10    
     negativo
  G  3:  ATQC          54.07.14.29.65   Ba    2/10    
     A  29.14            su Ba    2° colpo   [7866/07.02.2008]
     I2
sab 01.03.2008  [7876]
  G  1:  ATQC          87.51.86.66.19   Ba    10/10    
     negativo
  G  2:  ATQC          73.28.87.52.11   Ba    10/10    
     negativo
  G  3:  ATQC          02.46.04.43.13   Ba    10/10    
     negativo
mar 01.04.2008  [7889]
  G  1:  ATQC          77.12.13.83.09   Ba    10/10    
     negativo
  G  2:  ATQC          63.14.77.70.50   Ba    8/10    
     A  63.50            su Ba    8° colpo   [7897/19.04.2008]
     I8
  G  3:  ATQC          82.10.19.14.03   Ba    10/10    
     negativo
ven 02.05.2008  [7902]
  G  1:  ATQC          67.43.33.82.89   Ba    10/10    
     negativo
  G  2:  ATQC          53.76.67.13.54   Ba    10/10    
     negativo
  G  3:  ATQC          72.56.12.17.83   Ba    10/10    
     negativo
mar 03.06.2008  [7916]
  G  1:  ATQC          48.56.81.70      Ba    10/10    
     negativo
  G  2:  ATQC          34.31.48.80.47   Ba    10/10    
     negativo
  G  3:  ATQC          53.15.67.21.64   Ba    8/10    
     A  64.53            su Ba    8° colpo   [7924/21.06.2008]
     I8
mar 01.07.2008  [7928]
  G  1:  ATQC          17.77.38.90.39   Ba    6/10    
     A  39.77            su Ba    6° colpo   [7934/15.07.2008]
     I6
  G  2:  ATQC          03.59.17.21.86   Ba    10/10    
     negativo
  G  3:  ATQC          22.54.40.67.33   Ba    10/10    
     negativo
sab 02.08.2008  [7942]
  G  1:  ATQC          11.67.56.71.33   Ba    3/10    
     A  11.67            su Ba    3° colpo   [7945/09.08.2008]
     I3
  G  2:  ATQC          87.54.11.27.15   Ba    10/10    
     negativo
  G  3:  ATQC          16.87.33.27      Ba    10/10    
     negativo
mar 02.09.2008  [7955]
  G  1:  ATQC          14.73.51.49.36   Ba    3/10    
     in corso (3° su 10)
  G  2:  ATQC          90.34.14.71.15   Ba    3/10    
     in corso (3° su 10)
  G  3:  ATQC          19.22.49.46.30   Ba    3/10    
     in corso (3° su 10)


=======================================
  Resoconto complessivo di 3 giocate
=======================================
Resoconto totale giocate
Risultati generali

               Casi esaminati:           126  
                     in corso:             3  
                  casi finali:           123  
                     positivi:            32  
                     negativi:            91  
          Pronostici generati:           126  
          Pronostici vincenti:  32  (25,4 %)  
          Estrazioni di gioco:          1073  
Tentativi (scontrini giocati):          1073  
 Vincite (scontrini vincenti):  32  (2,98 %)  
                 Attesa media:          4,81  




Resoconto totale giocate
Dettaglio Ruote (Pronostici)

 Ruota       Vincenti  Giocati  
------------------------------
  Bari  32 ( 2,98 % )     1073  
Totale  32 ( 2,98 % )     1073  




Resoconto totale giocate
Resoconto economico

   Sorte  Spese [€]  Real.   Vincite [€]           -6%  Guadagno [€]  
--------------------------------------------------------------------
  Ambata       0,00      0          0,00          0,00          0,00  
    Ambo     536,50     66        833,33        783,33        246,83  
   Terno     321,90     31      4.185,00      3.933,90      3.612,00  
Quaterna     107,30     12     28.800,00     27.072,00     26.964,70  
Cinquina     107,30      2  1.200.000,00  1.128.000,00  1.127.892,70  
 E.Det.1       0,00      0          0,00          0,00          0,00  
 E.Det.2       0,00      0          0,00          0,00          0,00  
 E.Det.3       0,00      0          0,00          0,00          0,00  
 E.Det.4       0,00      0          0,00          0,00          0,00  
 E.Det.5       0,00      0          0,00          0,00          0,00  
 Totale:   1.073,00         1.233.818,33  1.232.745,33  1.158.716,23  




Resoconto totale giocate
Dettaglio Successi

Giocata  Successi  Colpo   Perc.    Entro  
-----------------------------------------
  Tutte         4      1  12,5 %   12,5 %  
  Tutte         5      2  15,6 %   28,1 %  
  Tutte         4      3  12,5 %   40,6 %  
  Tutte         2      4   6,3 %   46,9 %  
  Tutte         6      5  18,8 %   65,6 %  
  Tutte         2      6   6,3 %   71,9 %  
  Tutte         2      7   6,3 %   78,1 %  
  Tutte         2      8   6,3 %   84,4 %  
  Tutte         2      9   6,3 %   90,6 %  
  Tutte         3     10   9,4 %  100,0 %