Ciao Lottomagia, qual'è il programma con cui effettui queste ricerche??
Io ho preparato due listati x L8+ dei metodi sopra citati:
3°mese- 7 ambi secchi X-1 colpo FI--by LOTTOMAGIA
'Amici del forum la tecnica che vi espongo è di origine matematica e 'ricava 7 ambi secchi da porre in gioco sulle ruote principali di 'FIRENZE per un periodo massimo di 1 estrazione.
'ITER OPERATIVO
'Alla TERZA estrazione mensile dovremo addizionare a determinati 'estratti alcuni fissi sommativi onde ottenere 7 ambi secchi . Di seguito 'espongo l'impianto di gioco :
'1° Ambo: 1° Ba X 36 ** 5° Na X 5
'2° Ambo: 1° Ba + 14 ** 4° Ba + 81
'3° Ambo: 1° Ba + 39 ** 2° Ba + 71
'4° Ambo: 1° Ba + 3 ** 1° Ba + 40
'5° Ambo: 1° Ba + 18 ** 1° Ba + 28
'6° Ambo: 1° Ba + 27 ** 1° Ba + 33
'7° Ambo: 1° Ba + 34 ** 1° Ba + 38
'FIRENZE ambi secchi
'BY LOTTOMAGIA
Sub main()
'
Dim r(10)
Dim r1(10)
Dim aa(10)
Dim posta(5)
posta(2)=1
r(1)=3
r1(1)=11
k=1
y=2
For n=7695 To EstrazioneFin
If IndiceMensile
=3 Then
aa(1)=Fuori90(Estratto(n,1,1)*36)
aa(2)=Fuori90(Estratto(n,6,5)*5)
EliminaRipetuti aa
ImpostaGiocata 1,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,1,1)+14)
aa(2)=Fuori90(Estratto(n,1,4)+81)
EliminaRipetuti aa
ImpostaGiocata 2,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,1,1)+39)
aa(2)=Fuori90(Estratto(n,1,2)+71)
EliminaRipetuti aa
ImpostaGiocata 3,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,1,1)+3)
aa(2)=Fuori90(Estratto(n,1,1)+40)
EliminaRipetuti aa
ImpostaGiocata 4,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,1,1)+18)
aa(2)=Fuori90(Estratto(n,1,1)+28)
EliminaRipetuti aa
ImpostaGiocata 5,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,1,1)+27)
aa(2)=Fuori90(Estratto(n,1,1)+33)
EliminaRipetuti aa
ImpostaGiocata 6,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,1,1)+34)
aa(2)=Fuori90(Estratto(n,1,1)+38)
EliminaRipetuti aa
ImpostaGiocata 7,aa,r,posta,k,y
For a=1 To 1
For b=1 To 1
ImpostaInterruzioni a,b,2
Next
Next
Gioca n
End If
Next
ColoreTesto 2
Scrivi String(70,"=")&"listato by DjNomade ",1
ColoreTesto 0
ScriviResoconto
End Sub
---------------------------------------------
4°mese- 6 ambi secchi X-1 colpo BA--by LOTTOMAGIA
'Amici del forum la tecnica che vi espongo è di origine matematica e 'ricava 6 ambi secchi da porre in gioco sulle ruote principali di 'BARI per un periodo massimo di 9 estrazioni.
'ITER OPERATIVO
'Alla Quarta estrazione mensile dovremo addizionare a determinati 'estratti alcuni fissi sommativi onde ottenere 4 ambi secchi . Di seguito 'espongo l'impianto di gioco :
'1° Ambo: 2° Ca X 30 ** 3° Na X 76
'2° Ambo: 2° Ca + 38 ** 1° Ba + 36
'3° Ambo: 2° Ca + 61 ** 1° Ca + 69
'4° Ambo: 2° Ca + 81 ** 4° Ca + 88
'5° Ambo: 2° Ca + 19 ** 1° Ba + 45
'6° Ambo: 2° Ca + 24 ** 1° Ba + 12
'BARI ambi secchi
'lottomagia
Sub main()
'
Dim r(10)
Dim r1(10)
Dim aa(10)
Dim posta(5)
posta(2)=1
r(1)=1
r1(1)=11
k=1
y=2
For n=7695 To EstrazioneFin
If IndiceMensile
=4 Then
aa(1)=Fuori90(Estratto(n,2,2)*30)
aa(2)=Fuori90(Estratto(n,6,3)*76)
EliminaRipetuti aa
ImpostaGiocata 1,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,2,2)+38)
aa(2)=Fuori90(Estratto(n,1,1)+36)
EliminaRipetuti aa
ImpostaGiocata 2,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,2,2)+61)
aa(2)=Fuori90(Estratto(n,2,1)+69)
EliminaRipetuti aa
ImpostaGiocata 3,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,2,1)+81)
aa(2)=Fuori90(Estratto(n,2,4)+88)
EliminaRipetuti aa
ImpostaGiocata 4,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,2,2)+19)
aa(2)=Fuori90(Estratto(n,1,1)+45)
EliminaRipetuti aa
ImpostaGiocata 5,aa,r,posta,k,y
aa(1)=Fuori90(Estratto(n,2,2)+19)
aa(2)=Fuori90(Estratto(n,1,1)+12)
EliminaRipetuti aa
ImpostaGiocata 6,aa,r,posta,k,y
For a=1 To 1
For b=1 To 1
ImpostaInterruzioni a,b,2
Next
Next
Gioca n
End If
Next
ColoreTesto 2
Scrivi String(70,"=")&"listato by DjNomade ",1
ColoreTesto 0
ScriviResoconto
End Sub
Spero di aver fatto cosa gradita