X Maxma62

[Roby]

Ciao max, potresti farmi un altro listato per un nuovo metodo ?

Ho tratto questa formula tra isotopi,e gemelli...e va bè è un po'

lunga ....,se puoi il metodo è questo :

Sempre all'ultima del mese con il fuori 90, si prende :

il 3° estratto di BA + il 4° di MI + 28 = Prima ambata

il 2° estratto di CA + il 3° di NA + 89 = Seconda ambata

Giochiamo cosi le due ambate su TO.

Poi per A,T,Q,C, ci giochiamo la solita lunghetta aggiungendo

i fissi : 5-30-31-61-68-81, ...se puoi grazie .

Comunque le ambate sono quasi infallibile, su 24 mesi, 23 a segno!

Ciao pasquale

 

[maxma62]

Finche' sono semplici i listati, penso di cavarmela a farli.
Controlla se va bene.
Il listato:

Sub main()
Dim ruote(10)
Dim ruote2(10)
Dim numeri1(10) 'giocata 1
Dim numeri2(2) 'giocata 2
Dim numeri3(2) 'giocata 3
Dim numeri4(2) 'giocata 4
Dim numeri5(2) 'giocata 5
Dim numeri6(2) 'giocata 6
Dim numeri7(2) 'giocata 7
Dim numeri8(2) 'giocata 8
Dim numeri9(2) 'giocata 9
Dim numeri10(2) 'giocata 10
Dim numeri11(2) 'giocata 11
Dim numeri12(2) 'giocata 12
Dim numeri13(2) 'giocata 13
Dim numeri14(10) 'giocata 14

Dim posta1(5)
Dim posta2(5)
Dim posta3(5)

posta1(1)=1
posta1(2)=1

posta2(2)=1

posta3(2)=2
posta3(3)=1
posta3(4)=0.5
posta3(5)=0.5

ruote(1)=9 'to

co=14 'colpi gioco

For es=EstrazioneFin-200 To EstrazioneFin
If IndiceMensile(es+1)=1 Then 'ultima estr. mensile

Scrivi String(65,"*")
Scrivi " < metodo di pasquale59 >",1
Scrivi String(42,"-")& "gioca da "&dataestrazione(es+1,1)
Scrivi

a=Fuori90(Estratto(es,1,3)+Estratto(es,5,4)+28)'1a ambata
b=Fuori90(Estratto(es,2,2)+Estratto(es,6,3)+89)'2a ambata
c=5 'puoi cambiarli
d=30 'puoi cambiarli
e=31 'puoi cambiarli
f=61 'puoi cambiarli
g=68 'puoi cambiarli
h=81 'puoi cambiarli

numeri1(1)=a 'ambate
numeri1(2)=b
ImpostaGiocata 1,numeri1,ruote,posta1,co,2
numeri2(1)=a 'ambo
numeri2(2)=c
ImpostaGiocata 2,numeri2,ruote,posta2,co,2
numeri3(1)=a
numeri3(2)=d
ImpostaGiocata 3,numeri3,ruote,posta2,co,2
numeri4(1)=a
numeri4(2)=e
ImpostaGiocata 4,numeri4,ruote,posta2,co,2
numeri5(1)=a
numeri5(2)=f
ImpostaGiocata 5,numeri5,ruote,posta2,co,2
numeri6(1)=a
numeri6(2)=g
ImpostaGiocata 6,numeri6,ruote,posta2,co,2
numeri7(1)=a
numeri7(2)=h
ImpostaGiocata 7,numeri7,ruote,posta2,co,2
numeri8(1)=b
numeri8(2)=c
ImpostaGiocata 8,numeri8,ruote,posta2,co,2
numeri9(1)=b
numeri9(2)=d
ImpostaGiocata 9,numeri9,ruote,posta2,co,2
numeri10(1)=b
numeri10(2)=e
ImpostaGiocata 10,numeri10,ruote,posta2,co,2
numeri11(1)=b
numeri11(2)=f
ImpostaGiocata 11,numeri11,ruote,posta2,co,2
numeri12(1)=b
numeri12(2)=g
ImpostaGiocata 12,numeri12,ruote,posta2,co,2
numeri13(1)=b
numeri13(2)=h
ImpostaGiocata 13,numeri13,ruote,posta2,co,2
numeri14(1)=a 'lunghetta
numeri14(2)=b
numeri14(3)=c
numeri14(5)=d
numeri14(6)=e
numeri14(7)=f
numeri14(8)=g
numeri14(9)=h
ImpostaGiocata 14,numeri14,ruote,posta3,co,3

Gioca es
End If
Next
ScriviResoconto
End Sub

ciao, max

 

[pasquale59]

.....grazie max,prima o poi imparerò,....hai visto

su CA è riuscito l'ambo in lunghetta 15 - 88 ?...ti ricordi

che l'avevo previsto?...