....un listato Carpe_diem

[aldinobis]

Bongiorno e bentrovati

X una ricerca avrei bisogno di un listato, per il lotto italiano,con queste caratteristiche

trova le estrazioni con un numero ripetuto (in qualsiasi pos.)su quattro ruote ,Nazionale ,compresa.

il range si puo' limitare agli ultimi 3 casi a ritroso

il numero trovato verra' usato come sommativo unico per generare per ogni ruota una nuova cinquina.

esempio:

ex 18 del 10-2-2022 --abbiamo RIPETUTO su FI-PA-RO-VE il n° 4
sommiamo il 4 ad ognuno dei 5 estratti delle 11 ruote
ogni cinquina generata la giochiamo virtualmente su Naz e tutte x tre colpi

l'osservazione continua , dei risultati, potra' ,eventualmente, darci qualche soddisfazione ,adrenalinica, futura

Ringrazio per anticipatamente , chi vorra' intervenire

Saluti

 

[claudio8]

È proprio il caso di dire che caso strano che deve combinarsi.
Defininsci anche la giocata e la/e ruote.

 

[aldinobis]

Ciao ,Claudio e grazie per l'intervento

Mi ero ripromesso di indicare come proseguire in seguito ,
in ogni caso le giocate virtuali delle cinquine generate da ogni singola ruota vanno giocate ,come gia' descritto, per tre colpi su NAZ E TT.
gli esiti positivi dei soli ambi e/o terni e le ruote andranno salvati in qualche modo e una volta ottenuti i risultati delle 11 giocate
bisognerebbe fare un riepilogo (il resoconto dei singoli resiconti )e da li estrarre la cinquina della ruota che ha prodotto il risultato migliore
e la/le ruota dove giocarli.....
nel caso indicato (ex 18 del 10-2-2022 --abbiamo RIPETUTO su FI-PA-RO-VE il n° 4)la migliore e' risultato la ruota di milano
dove sommando il 4 abbbiamo ottenuta la cinquina 83-36-85-26-51. con i risultati che potrai controllare facilmente .
a questo punto si aspetta la prossima condizione e si agisce di conseguenza.
la ruota di ricavo la conosciamo la cinquina l'otteniamo col nuovo num rip. e la/le ruote di gioco ce lo dice pure il riepilogo resoconto
naturalmente quando si trova la prima condizione ,pregressa,non avendo risultati pregressi la giocata e' di nessuna importanza.
forse chiedo troppo ,capisco benissimo le difficolta',ma credo che con le tue indiscusse e riconosciute capacita' si possa andare in porto.
Sempre a disposizione
Codiali saluti

 

[claudio8]

Perfetto adesso chi vuole può cimentarsi.

 

[salvo50]

Ciao a Tutti

Alla prima domanda si può inserire il numero dell'estrazione di inizio ricerca
Alla seconda domanda con risposta 1, si gioca per tutte le ruote più la Nazionale
con qualsiasi altro numero, si gioca solo nelle 4 ruote dove sono usciti i numeri uguali
Alla terza domanda si possono variare i colpi di gioco

La ricerca a ritroso di 3 estrazioni non l'ho messa

Ho fatto un controllo su 1000 estrazioni, ma escono solo ambi e qualche terno

FUNZIONA CON SPAZIOMETRIA

Option Explicit
Sub Main
   Dim FIn,Es,Ini,Clp,Salvo50,E1,E2,E3,E4
   Dim P1,P2,P3,P4,P5,P6,P7,P8,P9,Tutte
   Dim Sp,R1,R2,R3,R4,Caso,Casi,A1,B1,C1,D1
   Dim PentaA(5),PentaB(5),PentaC(5),PentaD(5)
   Dim Ruo(4),Posta(3),A(5),B(5),C(5),D(5),Z(5)
   Posta(2) = 1
   Posta(3) = 1
   Sp = " "
   FIn = EstrazioneFin
   Ini = InputBox("Inserisci l'estrazione che vuoi iniziare",Salvo50,10000)
   Tutte = InputBox(" Se vuoi giocare per tutte le ruote metti 1, altrimenti un qualsiasi altro numero ",,1)
   Clp = InputBox("Inserisci i colpi di gioco ?",,3)
   'Call ScegliRange(Ini,FIn,Ini,FIn)
   Scrivi Space(14) & " UN NUMERO UGUALE IN 4 RUOTE - di ALDINOBIS - SCRIPT Salvo50" & Space(14),1,,4,,3,,1
   For Es = Ini To FIn
      Messaggio Es
      AvanzamentoElab Ini,FIn,Es
      Caso = 0
      For R1 = 1 To 8
         For R2 = R1 + 1 To 9
            For R3 = R2 + 1 To 10
               For R4 = R3 + 1 To 12
                  If R4 = 11 Then R4 = 12
                  For P1 = 1 To 5
                     A(P1) = Estratto(Es,R1,P1)
                     A1 = Estratto(Es,R1,P1)
                     For P2 = 1 To 5
                        B(P2) = Estratto(Es,R2,P2)
                        B1 = Estratto(Es,R2,P2)
                        For P3 = 1 To 5
                           C(P3) = Estratto(Es,R3,P3)
                           C1 = Estratto(Es,R3,P3)
                           For P4 = 1 To 5
                              D(P4) = Estratto(Es,R4,P4)
                              D1 = Estratto(Es,R4,P4)
                              If A1 = B1 And A1 = C1 And A1 = D1 Then
                                 For P9 = 1 To 5
                                    PentaA(P9) = Fuori90(A(P9) + A1)
                                    PentaB(P9) = Fuori90(B(P9) + B1)
                                    PentaC(P9) = Fuori90(C(P9) + C1)
                                    PentaD(P9) = Fuori90(D(P9) + D1)
                                    Z(P9) = A1
                                 Next
                                 Caso = Caso + 1
                                 Casi = Casi + 1
                                 ColoreTesto 1
                                 Scrivi String(89,"o") & " Casi Totali " & FormattaStringa(Casi,"0000")
                                 ColoreTesto 2
                                 Scrivi String(80,"o") & " Estrazione " &(Es) & " caso " & FormattaStringa(Caso,"0000")
                                 ColoreTesto 0
                                 Scrivi(" Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
                                 Scrivi "  " & SiglaRuota(R1) & " ",1,0
                                 For P5 = 1 To 5
                                    E1 = Estratto(Es,R1,P5)
                                    If E1 = A1 Then
                                       ColoreTesto 2
                                    Else
                                       ColoreTesto 0
                                    End If
                                    Scrivi Format2(E1) & Sp,1,0
                                    ColoreTesto 0
                                 Next
                                 Scrivi
                                 Scrivi(" Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
                                 Scrivi "  " & SiglaRuota(R2) & " ",1,0
                                 For P6 = 1 To 5
                                    E2 = Estratto(Es,R2,P6)
                                    If E2 = B1 Then
                                       ColoreTesto 2
                                    Else
                                       ColoreTesto 0
                                    End If
                                    Scrivi Format2(E2) & Sp,1,0
                                    ColoreTesto 0
                                 Next
                                 Scrivi
                                 '
                                 Scrivi(" Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
                                 Scrivi "  " & SiglaRuota(R3) & " ",1,0
                                 For P7 = 1 To 5
                                    E3 = Estratto(Es,R3,P7)
                                    If E3 = C1 Then
                                       ColoreTesto 2
                                    Else
                                       ColoreTesto 0
                                    End If
                                    Scrivi Format2(E3) & Sp,1,0
                                    ColoreTesto 0
                                 Next
                                 Scrivi
                                 Scrivi(" Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
                                 Scrivi "  " & SiglaRuota(R4) & " ",1,0
                                 For P8 = 1 To 5
                                    E4 = Estratto(Es,R4,P8)
                                    If E4 = D1 Then
                                       ColoreTesto 2
                                    Else
                                       ColoreTesto 0
                                    End If
                                    Scrivi Format2(E4) & Sp,1,0
                                    ColoreTesto 0
                                 Next
                                 Scrivi
                                 Scrivi
                                 Scrivi Space(8) & SiglaRuota(R1) & Sp & StringaNumeri(A," ",True) & "+",1,0
                                 Scrivi Space(8) & SiglaRuota(R2) & Sp & StringaNumeri(B," ",True) & "+",1,0
                                 Scrivi Space(8) & SiglaRuota(R3) & Sp & StringaNumeri(C," ",True) & "+",1,0
                                 Scrivi Space(8) & SiglaRuota(R4) & Sp & StringaNumeri(D," ",True) & "+",1
                                 Scrivi Space(11) & StringaNumeri(Z," ",True) & Space(12) & StringaNumeri(Z," ",True),1,0
                                 Scrivi Space(12) & StringaNumeri(Z," ",True) & Space(12) & StringaNumeri(Z," ",True),1
                                 Scrivi Space(11) & StringaNumeri(PentaA," ",True) & Space(12) & StringaNumeri(PentaB," ",True),1,0,,1
                                 Scrivi Space(12) & StringaNumeri(PentaC," ",True) & Space(12) & StringaNumeri(PentaD," ",True),1,,,1
                                 Scrivi Space(35) & " In Blu le Cinquine Pronosticate",1,,,2
                                 Scrivi
                                 If Tutte = 1 Then
                                    Ruo(1) = TU_
                                    Ruo(2) = NZ_
                                 Else
                                    Ruo(1) = R1
                                    Ruo(2) = R2
                                    Ruo(3) = R3
                                    Ruo(4) = R4
                                 End If
                                 ImpostaGiocata 1,PentaA,Ruo,Posta,Clp
                                 ImpostaGiocata 2,PentaB,Ruo,Posta,Clp
                                 ImpostaGiocata 3,PentaC,Ruo,Posta,Clp
                                 ImpostaGiocata 4,PentaD,Ruo,Posta,Clp
                                 Gioca Es
                              End If
                           Next
                           If ScriptInterrotto Then Exit Sub
                        Next
                     Next
                  Next
               Next
            Next
         Next
      Next
      If ScriptInterrotto Then Exit Sub
   Next
   ScriviResoconto
   Scrivi TempoTrascorso
End Sub

 

[aldinobis]

Ciao Salvo50

Intanto grazie per il bel lavoro,

e' molto propabile che non mi sono spiegato bene,pero' le cinquine da generare sono 11 da BARI-CA...fino alla Naz.

e' importante per scoprire la piu' produttiva ....nel caso ci sia.

Saluti

 

[Zetrix]

aldinobis ti metto un mio script cosi puoi visualizzare e inserire qualsiasi algoritmo
che vuoi

Sub Main()
   Scrivi "GIOCA 1 CINQUINA A TUTTE ",0,1,7,4,4
   Scrivi "METODO NUMERO RIPETUTO 4 VOLTE",0,1,1,4,4
   Scrivi
   Dim poste(5)
   Dim ruota(5)
   Dim ambo(5)
   Dim a,b,c,d,e,f,g,h,i,l,m,n,o,p,q,r,s,t,u,v,z,w,y,j,k,x
   Dim colpi
   poste(2) = 1
   poste(3) = 1
   poste(4) = 1
   poste(5) = 1
   colpi = 0
   ini = EstrazioneFin - 11
   fin = EstrazioneFin
   For es = ini To fin
      Messaggio es
      Call AvanzamentoElab(Ini,Fin,es)
      For r = 1 To 12
         If r = 11 Then r = 12 End If
         ambo(1) = Fuori90(Estratto(es,r,1) + 4)
         ambo(2) = Fuori90(Estratto(es,r,2) + 4)
         ambo(3) = Fuori90(Estratto(es,r,3) + 4)
         ambo(4) = Fuori90(Estratto(es,r,4) + 4)
         ambo(5) = Fuori90(Estratto(es,r,5) + 4)
         ReDim MatriceCaselleDaEvid(5,1)
         ' primo elemento
         MatriceCaselleDaEvid(1,0) = r
         MatriceCaselleDaEvid(1,1) = 1
         ' secondo elemento
         MatriceCaselleDaEvid(2,0) = r
         MatriceCaselleDaEvid(2,1) = 2
         ' terzo elemento
         MatriceCaselleDaEvid(3,0) = r
         MatriceCaselleDaEvid(3,1) = 3
         ' quarto elemento
         MatriceCaselleDaEvid(4,0) = r
         MatriceCaselleDaEvid(4,1) = 4
         ' quinto elemento
         MatriceCaselleDaEvid(5,0) = r
         MatriceCaselleDaEvid(5,1) = 5
         Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
         Scrivi "" & "  algoritmo sommativo + 4    " & a & "" & b,0,1,1,4,3
         Scrivi
         ruota(1) = r
         ruota(2) = TT_
         ruota(3) = NZ_
         ImpostaGiocata 1,ambo,ruota,poste,colpi
         Gioca es,1,,1
         Scrivi
      Next
   Next
   ScriviResoconto
End Sub

 

[Sakti]

Ha già dato 3 ambi, 2 su Nazionale e 1 su tutte, niente male, niente male..
V N. [22.35.57.67.62 ] [NZ] [.. .. 22 .. 62] C. 2 Ambo 10053 [ 30 - 10/03/2022]
V N. [08.61.40.62.90 ] [TT] [FI][61 .. .. .. 40] C. 2 Ambo 10053 [ 30 - 10/03/2022]
V N. [08.61.40.62.90 ] [NZ] [.. 40 .. .. 62] C. 2 Ambo 10053 [ 30 - 10/03/2022]

 

[aldinobis]

ciao zetrix

bel listato ,ottima grafica
o visto che ricalcola e gioca ad ogni estrazione successiva alla data ini ,------a me sevirebbe che giocasse solo i tre colpi dall'ini
in questo modo il resoconto interesserebbe unicamente la data della condizione.

ancora grazie
saluti

 

[Zetrix]

ciao a tutti,
ciao aldinobis, devo vedere se posso modificare lo script perche adesso non so come si fa
ti metto un altro mio script questo script calcola se ce la condizione del numero ripetuto
quattro volte

Sub Main()
   Dim ruota(10)
   Dim posta(5)
   Dim n(10)
   Dim R1,R2,R3,R4,R5,R6,RX
   Dim a,b,c,d,e,f,g,h,i,l,m,o,p,q,r,s,t,u,v,z,w,y,j,k,x
   Dim Biv1,Biv2,Biv3,Biv4,Biv5
   posta(1) = 1
   k = 10 '<-------- numero colpi
   rs = InputBox("Quante estrazioni vuoi controllare?",,0)
   For es = EstrazioneFin - rs To EstrazioneFin
      AvanzamentoElab EstrazioneFin - rs,EstrazioneFin,es
      For p = 1 To 5
         For q = 1 To 5 '<----------------- ciclo posizione estratti prima ruota
            For v = 1 To 5
               For R1 = 1 To 8 '<---------------------------- ciclo prima ruota
                  a = Estratto(es,R1,p) '<------------------ estratto prima ruota
                  For R2 = R1 + 1 To 9 '<--------------------- ciclo seconda ruota
                     'If R2 = 11 Then R2 = 12 End If ' ------------ con numeri
                     b = Estratto(es,R2,p) '<------------- estratto secondo ruota
                     If a = b Then '<--------------------- se trova due estratti uguali cerca anche il terzo
                        For R3 = R2 + 1 To 10 '<------------- ciclo terza ruota
                           c = Estratto(es,R3,q) '<---- estratto terza ruota
                           If c = a Then '<------------- se trova anche il terzo uguale fà la giocata
                              For R4 = R3 + 1 To 12
                                 d = Estratto(es,R4,v)
                                 If d = c Then '<------------- se trova anche il quarto uguale fà la giocata
                                    If R4 = 11 Then R4 = 12 End If ' con numeri
                                    ReDim MatriceCaselleDaEvid(10,1)
                                    ' Primo elemento
                                    MatriceCaselleDaEvid(1,0) = R1 ' ruota 
                                    MatriceCaselleDaEvid(1,1) = p ' primo 
                                    ' secondo elemento
                                    MatriceCaselleDaEvid(2,0) = R2 ' ruota 
                                    MatriceCaselleDaEvid(2,1) = p ' secondo 
                                    ' terzo elemento
                                    MatriceCaselleDaEvid(3,0) = R3 ' ruota 
                                    MatriceCaselleDaEvid(3,1) = q ' terzo 
                                    ' quarto elemento
                                    MatriceCaselleDaEvid(4,0) = R4 ' ruota 
                                    MatriceCaselleDaEvid(4,1) = v ' quarto 
                                    ' quarto elemento
                                    MatriceCaselleDaEvid(5,0) = R5 ' ruota 
                                    MatriceCaselleDaEvid(5,1) = v ' quinto
                                    ' quarto elemento
                                    MatriceCaselleDaEvid(6,0) = R6 ' ruota 
                                    MatriceCaselleDaEvid(6,1) = v ' sesto 
                                    Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
                                    Scrivi
                                    ColoreTesto 2
                                    Scrivi "Numero " & a & " ripetuto a " & Left(NomeRuota(R1),2) & "-" & Left(NomeRuota(R2),2) & "-" & Left(NomeRuota(R3),2) & "-" & Left(NomeRuota(R4),2),0,0,6,0
                                    Scrivi
                                    Scrivi
                                    ruota(1) = R1 '  <----- prima ruota
                                    ruota(2) = R2 '  <----- seconda ruota
                                    ruota(3) = R3 '  <----- terza ruota
                                    ruota(4) = R4 '  <----- quarta ruota
                                    n(1) = Diametrale(a) '<--- numero da giocare
                                    ImpostaGiocata 1,n,ruota,posta,k,0 '<--- imposta la giocata
                                    Gioca es,1,,1 '<----------------------------- gioca la formazione impostata
                                    Scrivi
                                 End If
                              Next
                           End If
                        Next
                     End If
                  Next
               Next
            Next
         Next
      Next
   Next
End Sub

 

[Zetrix]

aldinobis comunque e raro che si verifica una condizione con quattro numeri
ripetuti tutt alpiu si possono verificare tre numeri ripetuti nelle estrazioni
ho una tecnica che lavora con tre numeri ripetuti questa tecnica me la chiesta
anche cinzia ma questa mia tecnica adesso non la voglio metterla nel forum
e questa mia tecnica puo lavorare anche in questo prospetto che si e verificata
la condizione con tre numeri ripetuti e due di esse devono essere isotopi
cioe nella stessa colonna e un altro numero si deve fare piu in la sarebbe fatti piu in la
e poi si deve fare un calcolo per ambo

 

[Zetrix]

aldinobis ho fatto una modifica allo script comunque puoi vedere solo la estrazione
che ti interessa dove si e verificata la condizione di gioco dei quattro numeri ripetuti
ho messo 3 colpi ma comunque non a dato queste vincite milionare ma solo ambi in cinquina
tra l'altro anche a tutte

Sub Main()
   Scrivi "GIOCA 1 CINQUINA A TUTTE ",0,1,7,4,4
   Scrivi "METODO NUMERO RIPETUTO 4 VOLTE",0,1,1,4,4
   Scrivi
   Dim poste(5)
   Dim ruota(5)
   Dim ambo(5)
   Dim a,b,c,d,e,f,g,h,i,l,m,n,o,p,q,r,s,t,u,v,z,w,y,j,k,x
   Dim colpi
   poste(2) = 1
   poste(3) = 1
   poste(4) = 1
   poste(5) = 1
   colpi = 3
   ini = EstrazioneFin - 12
   fin = EstrazioneFin
   For es = ini To fin
      Messaggio es
      Call AvanzamentoElab(Ini,Fin,es)
      For r = 1 To 12
         If r = 11 Then r = 12 End If
         a = 4 ' --> algoritmo sommativo
         ambo(1) = Fuori90(Estratto(es,r,1) + a)
         ambo(2) = Fuori90(Estratto(es,r,2) + a)
         ambo(3) = Fuori90(Estratto(es,r,3) + a)
         ambo(4) = Fuori90(Estratto(es,r,4) + a)
         ambo(5) = Fuori90(Estratto(es,r,5) + a)
         ReDim MatriceCaselleDaEvid(5,1)
         ' primo elemento
         MatriceCaselleDaEvid(1,0) = r
         MatriceCaselleDaEvid(1,1) = 1
         ' secondo elemento
         MatriceCaselleDaEvid(2,0) = r
         MatriceCaselleDaEvid(2,1) = 2
         ' terzo elemento
         MatriceCaselleDaEvid(3,0) = r
         MatriceCaselleDaEvid(3,1) = 3
         ' quarto elemento
         MatriceCaselleDaEvid(4,0) = r
         MatriceCaselleDaEvid(4,1) = 4
         ' quinto elemento
         MatriceCaselleDaEvid(5,0) = r
         MatriceCaselleDaEvid(5,1) = 5
         Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
         Scrivi "" & "  algoritmo sommativo + " & a & "  ",0,1,1,4,3
         Scrivi
         ruota(1) = r
         ruota(2) = TT_
         ruota(3) = NZ_
         ImpostaGiocata 1,ambo,ruota,poste,colpi
         Gioca es,1,,1
         Scrivi
      Next
   Next
   ScriviResoconto
End Sub

 

[Zetrix]

aldinobis ho aggiunto imputbox cosi e piu comodo senza scrivere l'algoritmo nello script

Sub Main()
   Scrivi "GIOCA 1 CINQUINA A TUTTE ",0,1,7,4,4
   Scrivi "METODO NUMERO RIPETUTO 4 VOLTE",0,1,1,4,4
   Scrivi
   Dim poste(5)
   Dim ruota(5)
   Dim ambo(5)
   Dim a,b,c,d,e,f,g,h,i,l,m,n,o,p,q,r,s,t,u,v,z,w,y,j,k,x
   Dim colpi
   Dim rv,rs
   poste(2) = 1
   poste(3) = 1
   poste(4) = 1
   poste(5) = 1
   x = InputBox("Quale algoritmo vuoi sommare ?",,0)
   rs = InputBox("Quante estrazioni vuoi controllare ?",,0)
   colpi = 3
   ini = EstrazioneFin - rs
   fin = EstrazioneFin
   For es = ini To fin
      Messaggio es
      Call AvanzamentoElab(Ini,Fin,es)
      For r = 1 To 12
         If r = 11 Then r = 12 End If
         a = x ' ---------> algoritmo sommativo
         ambo(1) = Fuori90(Estratto(es,r,1) + a)
         ambo(2) = Fuori90(Estratto(es,r,2) + a)
         ambo(3) = Fuori90(Estratto(es,r,3) + a)
         ambo(4) = Fuori90(Estratto(es,r,4) + a)
         ambo(5) = Fuori90(Estratto(es,r,5) + a)
         ReDim MatriceCaselleDaEvid(5,1)
         ' primo elemento
         MatriceCaselleDaEvid(1,0) = r
         MatriceCaselleDaEvid(1,1) = 1
         ' secondo elemento
         MatriceCaselleDaEvid(2,0) = r
         MatriceCaselleDaEvid(2,1) = 2
         ' terzo elemento
         MatriceCaselleDaEvid(3,0) = r
         MatriceCaselleDaEvid(3,1) = 3
         ' quarto elemento
         MatriceCaselleDaEvid(4,0) = r
         MatriceCaselleDaEvid(4,1) = 4
         ' quinto elemento
         MatriceCaselleDaEvid(5,0) = r
         MatriceCaselleDaEvid(5,1) = 5
         Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
         Scrivi "" & "  algoritmo sommativo + " & a & "  ",0,1,1,4,3
         Scrivi
         ruota(1) = r
         ruota(2) = TT_
         ruota(3) = NZ_
         ImpostaGiocata 1,ambo,ruota,poste,colpi
         Gioca es,1,,1
         Scrivi
      Next
   Next
   ScriviResoconto
End Sub

 

[aldinobis]

ciao Zetrix
ancora grazie per l'interessamento..
adesso posso studiare, senza carta e penna, molti piu' casi
cordiali saluti

 

[aldinobis]

Ciao,Salvo,Zetrix, e tutti

ho rivisto il tutto ,mo' sembra che le Venus si siano imballate.....a marzo 5 ex con 4 ripetuti
Quanto durera' ??? ....questo non si sa'.
so ' che molti odiano rimettere mano ai listati gia' fatti ,pero' siccome studiarli (si fa' per dire) e' il mio passatempo preferito
ho apportato qualche personalizzazione, maturata nel frattempo.
ho scoperto(oltre all'acqua calda divenuta ,ultimamente,oltremodo costosa) che con la "sottrazione" le cinquine sono piu produttive.
...si puo' giocare solo due colpi ,ogni cinquina sulle quattro ruote (del ripetente) senza tutte e Naz ,se non prevista.
casi facendo il mese di marzo finora sarebbe stato in guadagno .....a saperlo.
addirittura nel penultimo caso nelle quattro ruote c'era anche un'ambo ripetuto .....che ha prodotto l'emozione cercata ...
con l'ultima estrazione c'e' un fac simile tra ba-fi-mi-na
grazie a tutti e
buon proseguimento