SI RICHIEDE LISTATO PER QUERSTO METODO

[Roby]

BUONASERA HO TROVATO NEL WEB QUESTO METODO VI CHIEDO GENTILMENTE UN LISTATO GRAZIE

Ad ogni estrazione, si prendono in considerazione il Terzo estratto della ruota di Milano (A) ed il terzo estratto della ruota di Napoli (B).

All'estratto A sottrarremo 10 e 20.

A - 10

A - 20

All' estratto B sommeremo 1.

B + 1

Otterremo così 4 numeri:

A-10, A-20, B, B+1

e giocheremo i seguenti ambi secchi su tutte le ruote per max 2 colpi:

(A-10 , B), (A-20 , B), (A-10 , B+1), (A-20, B+1)

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."

 

[ilgobbo60]

quote:Originally posted by Erasmus

BUONASERA HO TROVATO NEL WEB QUESTO METODO VI CHIEDO GENTILMENTE UN LISTATO GRAZIE

Ad ogni estrazione, si prendono in considerazione il Terzo estratto della ruota di Milano (A) ed il terzo estratto della ruota di Napoli (B).

All'estratto A sottrarremo 10 e 20.

A - 10

A - 20

All' estratto B sommeremo 1.

B + 1

Otterremo così 4 numeri:

A-10, A-20, B, B+1

e giocheremo i seguenti ambi secchi su tutte le ruote per max 2 colpi:

(A-10 , B), (A-20 , B), (A-10 , B+1), (A-20, B+1)

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."

Salve Erasmus lo posterei pure ... ma visto il casino successo
non vorrei tirarmi dietro le ire del TRIO lescano
Un Saluto da ilgobbo60
PS:Kissà se mi bannano anche questa volta

 

[JackMan]

x Erasmus e tutti
copiate e distribuite è libero senza copyright freee
ciao

Sub main()
Dim ruote(1),rtt(2)
Dim nu(2),nu1(4)
Dim poste(2)
poste(2)=1 
ruote(1)=11' 
rtt(1)=11 :rtt(2)=12

ee=CInt(InputBox("Quante estrazioni vuoi esaminare ?","Estrazioni",50))
k=CInt(InputBox("Per quante estrazioni deve durare il gioco ?","Colpi di gioco",3))

casi=0
fin=EstrazioneFin 
ini=fin-ee 

For es=ini To fin 
	Messaggio "elab. del "&dataestrazione(es)

a=Estratto(es,5,3) :b=Estratto(es,6,3)
Scrivi "------------------ x Erasmus -----------------------"
Scrivi "(A-10 , B) : (A-20 , B): (A-10 , B+1) : (A-20, B+1)"
Scrivi "----------------------------------------------------"

nu(1)=Fuori90(a-10)
nu(2)=b
ImpostaGiocata 1,nu,ruote,poste,k,2
nu(1)=Fuori90(a-20)
nu(2)=b
ImpostaGiocata 2,nu,ruote,poste,k,2
nu(1)=Fuori90(a-10)
nu(2)=Fuori90(b+1)
ImpostaGiocata 3,nu,ruote,poste,k,2
nu(1)=Fuori90(a-20)
nu(2)=Fuori90(b+1)
ImpostaGiocata 4,nu,ruote,poste,k,2
nu1(1)=Fuori90(a-10)
nu1(2)=Fuori90(a-20)
nu1(3)=Fuori90(b+1)
nu1(4)=b
ImpostaGiocata 5,nu1,rtt,poste,k,2
Gioca es

Next
ScriviResoconto
End Sub

------------------ x Erasmus -----------------------
(A-10 , B) : (A-20 , B): (A-10 , B+1) : (A-20, B+1)
----------------------------------------------------
sab 14.08.2010  [8260]
  G  1:  A    42.83         Tu       3/3    
     negativo
  G  2:  A    32.83         Tu       3/3    
     negativo
  G  3:  A    42.84         Tu       3/3    
     negativo
  G  4:  A    32.84         Tu       3/3    
     negativo
  G  5:  A    42.32.84.83   Tu Nz    3/3    
     negativo
------------------ x Erasmus -----------------------
(A-10 , B) : (A-20 , B): (A-10 , B+1) : (A-20, B+1)
----------------------------------------------------
mar 17.08.2010  [8261]
  G  1:  A    28.05         Tu       3/3    
     negativo
  G  2:  A    18.05         Tu       3/3    
     negativo
  G  3:  A    28.06         Tu       3/3    
     negativo
  G  4:  A    18.06         Tu       3/3    
     negativo
  G  5:  A    28.18.06.05   Tu Nz    3/3    
     negativo
------------------ x Erasmus -----------------------
(A-10 , B) : (A-20 , B): (A-10 , B+1) : (A-20, B+1)
----------------------------------------------------
gio 19.08.2010  [8262]
  G  1:  A    72.62      Tu       3/3    
     negativo
  G  2:  A    62         Tu       3/3    
     negativo
  G  3:  A    72.63      Tu       3/3    
     negativo
  G  4:  A    62.63      Tu       3/3    
     negativo
  G  5:  A    72.62.63   Tu Nz    3/3    
     negativo
------------------ x Erasmus -----------------------
(A-10 , B) : (A-20 , B): (A-10 , B+1) : (A-20, B+1)
----------------------------------------------------
sab 21.08.2010  [8263]
  G  1:  A    23      Tu       3/3    
     negativo
  G  2:  A    23      Tu       3/3    
     negativo
  G  3:  A    24      Tu       3/3    
     negativo
  G  4:  A    24      Tu       3/3    
     negativo
  G  5:  A    24.23   Tu Nz    3/3    
     A  24.23            su Tu (Fi)    3° colpo   [8266/28.08.2010]

------------------ x Erasmus -----------------------
(A-10 , B) : (A-20 , B): (A-10 , B+1) : (A-20, B+1)
----------------------------------------------------
mar 24.08.2010  [8264]
  G  1:  A    52      Tu       3/3    
     negativo
  G  2:  A    52      Tu       3/3    
     negativo
  G  3:  A    53      Tu       3/3    
     negativo
  G  4:  A    53      Tu       3/3    
     negativo
  G  5:  A    53.52   Tu Nz    3/3    
     negativo
------------------ x Erasmus -----------------------
(A-10 , B) : (A-20 , B): (A-10 , B+1) : (A-20, B+1)
----------------------------------------------------
gio 26.08.2010  [8265]
  G  1:  A    11      Tu       3/3    
     negativo
  G  2:  A    11      Tu       3/3    
     negativo
  G  3:  A    12      Tu       3/3    
     negativo
  G  4:  A    12      Tu       3/3    
     negativo
  G  5:  A    12.11   Tu Nz    3/3    
     negativo
------------------ x Erasmus -----

 

[imported_n/a]

grazie sei un signore come sempre!!!


Metodi ne ho tantissimi (non miei) ..... molti davvero ottimi!!!

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."

 

[JackMan]

quote:Originally posted by Erasmus

grazie sei un signore come sempre!!!


Metodi ne ho tantissimi (non miei) ..... molti davvero ottimi!!!

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."

grazie
se ti servono altri sai dove trovarmi
ciao

"...Studia il passato per conservare il futuro...."

 

[imported_n/a]

ti mando la mia super raccolta di metodi.....

Alias Armageddon...
"...Studia il passato se vuoi prevedere il futuro...."