A volte basta uno script facile per tutti.

[Pandit]

Vi metto un listato dove potete scegliere le due ruote, quella di base e quella secondaria più
i colpi di gioco... Non è quella che è stata postata più sopra, perchè i calcoli di ricerca sono quelli dell'anno scorso e se avete letto, ogni sei mesi vengono cambiati. Però nello script altri parametri potete cambiarli.. Spero vada bene

Anticipazione (Spoiler)

' " Tabella con scelta Ruote per base di ricerca, Indice Mensile e colpi di gioco by Pandit",1
Sub Main
Dim Nu(2),Ru(3),T,abb1,abb(4),Ru1(1),bb(4)
Ini = EstrazioneFin - 500
fin = EstrazioneFin
x = CInt(InputBox("Quanti colpi di gioco?",,17))'
x1 = CInt(InputBox("Quale ruota di nrilevazione?",,6))'
x2 = CInt(InputBox("Quale seconda ruota?",,7))'
x3 = CInt(InputBox("Quale estrazione Mensile?",,3))'
r1 = x1
r2 = x2
p1 = 1
T = Array(T,"Estrazione"," Ruote "," Numeri in Gioco","Verifica Risultati","Colpo","Con Abbinamenti","Risultati Superiori","Colpo")
Call InitTabella(T,RGB(0,71,171),,3,6,"Times")
For es = Ini To fin
If IndiceMensile(es) = x3 Then
a = Estratto(es,r1,p1)
Nu(1) = Fuori90(Estratto(es,r1,p1) + 12)
Nu(2) = Fuori90(Vert(Nu(1)))
Ru(1) = r1
Ru(2) = r2
Call VerificaEsito(Nu,Ru,es + 1,1,x,,esito,clp,esA,id)
abb(1) = 90 - Nu(1)
abb(2) = 90 - Nu(2)
bb(1) = 90 - Nu(1)
bb(2) = 90 - Nu(2)
bb(3) = Nu(1)
bb(4) = Nu(2)
Call VerificaEsito(bb,Ru,es + 1,1,x,,esito,clp1,esB,id)
T = Array(T,GetInfoEstrazione(es),StringaRuote(Ru),StringaNumeri(Nu),esA,clp,StringaNumeri(bb),esB,clp1)
Call AddRigaTabella(T)
Call SetColoreCella(1,RGB(250,250,210),RGB(0,0,0))
Call SetColoreCella(2,RGB(0,255,0),RGB(0,0,0))
Call SetColoreCella(3,RGB(238,130,238),RGB(0,0,0))
Call SetColoreCella(4,RGB(175,238,238),RGB(0,0,0))
Call SetColoreCella(5,RGB(250,250,210),RGB(0,0,0))
Call SetColoreCella(6,RGB(238,130,238),RGB(0,0,0))
Call SetColoreCella(7,RGB(175,238,238),RGB(0,0,0))
Call SetColoreCella(8,RGB(250,250,210),RGB(0,0,0))
End If
Next
'" by Pandit"
CreaTabella
End Sub

 

[Codicebinario]

Buona domenica a tutti gli abitanti del 3D,facciamo il punto di questa "proposta di gioco" :

Colpo 1 estraz. del 5/09 : BA ambo secco 84.18 sulle 4 ambate proposte.Estratto a MI 5.
Colpo 2 estraz. del 6/09 : Estratti CA 71 GE 48
Colpo 3 estraz. del 7/06 : Estratti CA 71 GE 87 NA 52 RM 56 e ambo in lunghetta 56.12

(in verde le sortite elencate)

Ad oggi abbiamo 2 ambi (uno sulle ambate e uno in lunghetta) e 9 ambate,il tutto indicato a ruota......

Buona domenica a tutti e FORZA LUNA ROSSA,FACCI SOGNARE !!!!!!

Colpo 4 estraz.del 10/09 : NA 80 RM 15 estratti PA 66 estratto e ambo in lunghetta 66.63

Ad oggi 10/09 abbiamo : 3 ambi (2 sulle lunghette e uno 1 sulle ambate) 11 ambate prese in 4 colpi,il tutto indicato a ruota.Considererei chiusa per le ambate indicate a K4,ottimo responso delle urne,mentre per le lunghette andrei avanti per tutto il mese,A Voi la scelta.Continuerò ad aggiornare anche le ambate ,ma solo a titolo statistico,se volete continuare fate voi.
Già sapete che non amo innamorarmi dei numerelli proposti,ma lascio a Voi tutti la scelta.
Cià a tutti gli abitanti nel 3D.Alla prossima visione del"folle"

 

[Codicebinario]

Buona domenica a tutti gli abitanti del 3D,facciamo il punto di questa "proposta di gioco" :

Colpo 1 estraz. del 5/09 : BA ambo secco 84.18 sulle 4 ambate proposte.Estratto a MI 5.
Colpo 2 estraz. del 6/09 : Estratti CA 71 GE 48
Colpo 3 estraz. del 7/06 : Estratti CA 71 GE 87 NA 52 RM 56 e ambo in lunghetta 56.12
colpo 4 estraz. del 10/09 Estratti NA 80 RM 15 PA 66 estratto e ambo in lunghetta 63.66

(in verde le sortite elencate)

Ad oggi abbiamo 3 ambi (uno sulle ambate e due in lunghetta) e 12 ambate,il tutto indicato a ruota......

Buona domenica a tutti e FORZA LUNA ROSSA,FACCI SOGNARE !!!!!!

la scaletta colorata la potete trovare al post 2663 .

 

[Antonin]

Siete veramente bravi
Buonanotte