10elotto

[Zetrix]

sequence number da ? 7
sequence ? 13
number sequence 7.20.33.46.59.72.85

nadin con le sequenze dei numeri abbiamo diverse sequence che calcola il 59..
adesso te mi dirai e come fai a sapere in quale sequence calcola il 59
semplice perche le ho calcolate tutte le sequenze da 1 a 90
e so gia il 59 in quale sequence calcola..

---------------------------------------------------------------------------------------
sequence 13

01.14.27.40.53.66.79.
02.15.28.41.54.67.80.
03.16.29.42.55.68.81.
04.17.30.43.56.69.82.
05.18.31.44.57.70.83.
06.19.32.45.58.71.84.
07.20.33.46.59.72.85.
08.21.34.47.60.73.86.
09.22.35.48.61.74.87.
10.23.36.49.62.75.88.
11.24.37.50.63.76.89.
12.25.38.51.64.77.90.
13.26.39.52.65.78.01.

-------------------------------------------------------------------------------------

 

[nadin]

Ma io dico, ma veramente sei un professore!!! Se non ancora, devi farlo! Bravissimo!!!

 

[Zetrix]

ciao nadin scusa per il ritardo ma ci sono stati problemi e non posso dirti di piu..
ti ho messo questa tecnica su ruota singola....a+b=c...

[MI] [.. .. .. 90 ..] C.6 Estratto 02058 [17/12/2022] [38.37.66.90.28]

[MI] [.. 86 .. .. ..] C.2 Estratto 02054 [09/12/2022] [61.86.40.81.70]
[VE] [.. .. 86 .. ..] C.2 Estratto 02054 [09/12/2022] [83.75.86.71.58]

[VE] [.. 46 .. .. ..] C.8 Estratto 02060 [22/12/2022] [59.46.50.77.55]

.............................................................................

[TT] [CA][90 .. 08 .. ..] C.3 Ambo 02055 [10/12/2022] [90.37.08.41.55]

[TT] [RO][.. 08 .. .. 86] C.2 Ambo 02054 [09/12/2022] [16.08.02.36.86]
[TT] [TO][08 .. .. .. 86] C.9 Ambo 02061 [24/12/2022] [08.56.20.85.86]

[TT] [CA][.. 08 46 .. ..] C.9 Ambo 02061 [24/12/2022] [51.08.46.24.54]
[TT] [GE][.. .. 46 08 ..] C.9 Ambo 02061 [24/12/2022] [62.28.46.08.67]

............................................................................

 

[nadin]

Buongiorno a tutti. Grazie mille Zetrix

 

[Zetrix]

ciao nadin ho fatto un altro disegno vediamo un po i risultati che a dato
questa combinazione di gioco..
nadin quanto devi fare a+b= c la somma a+b deve dare la c senza fare il fuori 90
nel prospetto ho messo il gioco completo poi e ovvio che si deve scegliere quale
numero si vuole giocare purtroppo quasi tutte le combinazioni di gioco sarebbe meglio
considerare anche le ruote diametrali perche spesso la ruota di calcolo trasmette ((())) onde radio
il gioco sulla ruota diametrale..
ma vediamo i risultati di questa combinazione di gioco..

[GE] [90 .. .. .. ..] C.1 Estratto 02056 [13/12/2022] [90.71.06.22.23]

[TO] [.. .. .. 14 ..] C.2 Estratto 02057 [15/12/2022] [71.57.11.14.20]
[TO] [14 .. .. .. ..] C.5 Estratto 02060 [22/12/2022] [14.39.41.31.69]

[GE] [.. .. .. 08 ..] C.6 Estratto 02061 [24/12/2022] [62.28.46.08.67]
[TO] [08 .. .. .. ..] C.6 Estratto 02061 [24/12/2022] [08.56.20.85.86]

...................................................................................

[TO][08 .. .. 85 ..] C.6 Ambo 02061 [24/12/2022] [08.56.20.85.86]

..................................................................................

 

[Zetrix]

nadin questa condizione di gioco sulla nazionale a dato il 4 68 a milano

a+b=c
2+38=40
1 numero 2+2=4
2 numero 38+38=76

abb 12+56=68

[TT] [MI][04 .. .. 68 ..] C.2 Ambo 02061 [24/12/2022] [04.07.77.68.09]

la nazionale non a una ruota diametrale per cui il gioco sulla nazionale
lo puo trasmettere su tutte le ruote da bari a venezia..

nadin sto vedendo se calcola il 59 su questa tecnica a+b=c
come ai visto il calcolo e facile si puo fare anche con carta e penna..

nadin non calcola il 59 e neanche il numeretto 1

 

[nadin]

Ho fatto adesso il calcolo con il tuo metodo a+b=c con fuori 90, e sono usciti due ambi uno sulla Nazionale 74-81 sei dicembre, ed un altro a Venezia 81-58 diciassette dicembre.

 

[nadin]

Questi calcoli veramente per me. Ti ringrazio!!!

 

[Zetrix]

Ge_______57_02_59_______
__________02_____02_______
Mi_______59_02_57_______

nadin questa condizione la sto seguendo dal 2 nov ma e tosto questo 59 a milano
se te avresti spaziometria vedresti anche i prospetti con le tabelle..e fa tante altre cose..
comunque aggiorniamo il 59 a milano e vediamo che possiamo giocare per stasera..

[GE] [.. .. .. .. 59] C.5 Estratto 02043 [12/11/2022] [84.30.05.27.59]

nadin il 59 e uscito a genova ma il 59 deve uscire a milano e qui noi lo dobbiamo vincere
chi vuole giocare l'estratto determinato in Pos il 59 a milano si puo giocare nella 3° Pos
ma a noi interessa l'abb con il 59 e adesso vediamo il prospetto per ambo..

asn = algoritmo system number

89 . 11 _____10_____ 8 . 2 _____
89 . 21 _____20_____ 8 . 3 _____
89 . 31 _____30_____ 8 . 4 _____
89 . 41 _____40_____ 8 . 5 _____
89 . 51 _____50_____ 8 . 6 _____
89 . 61 _____60_____ 8 . 7 _____
89 . 71 _____70_____ 8 . 8 _____
89 . 81 _____80_____ 8 . 9 _____
89 . 01 _____90_____ 8 . 1 _____

59.11 . 59.41 . 59.71 .
59.21 . 59.51 . 59.81 .
59.31 . 59.61 . 59.01 .

numero = 89 cadenza = 9 format = 80
numero = 89 figura = 8 format = 70
numero = 89 decina = 8 format = 70

[TT] [BA][.. .. 59 31 ..] C. 20 Ambo 02058 [17/12/2022] [74.15.59.31.77]
[TT] [NA][51 .. .. .. 59] C.17 Ambo 02055 [10/12/2022] [51.28.81.83.59]
TT] [NA][.. .. 81 .. 59] C. 17 Ambo 02055 [10/12/2022] [51.28.81.83.59]

allora nadin proviamo questi ambi a milano poi chi vuole li puo giocare anche a tutte

MI 59 ESTRATTO IN 3° POS
MI 59.01/59.11/59.71/59.88/

ma voglio aggiungere un altro abb con il 59
29.89.59=29+59=88

buona fortuna a tutti

 

[Zetrix]

Ho fatto adesso il calcolo con il tuo metodo a+b=c con fuori 90, e sono usciti due ambi uno sulla Nazionale 74-81 sei dicembre, ed un altro a Venezia 81-58 diciassette dicembre.

brava nadin ho visto il disegno che ai fatto sulle estrazioni..

 

[Zetrix]

________29+37__=__66________
________29+29__=__58________
________37+37__=__74________

[FI] [.. .. .. .. 74] C.7 Estratto 02059 [20/12/2022] [89.66.05.11.74]
[RO] [.. 74 .. .. ..] C.8 Estratto 02060 [22/12/2022] [82.74.52.05.07]

......................................................................................

[TT] [VE] [.. .. 81 .. 58] C.6 Ambo 02058 [17/12/2022] [63.45.81.34.58]
[TT] [NZ] [.. 74 .. 81 ..] C.1 Ambo 02053 [06/12/2022] [39.74.61.81.45]

......................................................................................

 

[i legend]

Ciao , ho visto che hai fatto la richiesta anche a gcarlo. Lo script t interessa oppure no ? Se no , come avevi detto non perdo tempo , altrimenti ci do un occhiata più tardi

Ciao.

 

[Zetrix]

ciao i legend se vuoi provaci ma se e complicato lascia stare
lo script mi sa che lo messo nel forum..

 

[i legend]

Ok.posso provarci . Non mi serve lo script. Ne faccio uno nuovo .

 

[Zetrix]

Option Explicit
Sub Main
   Dim R1,R2,R3,E,X,I,RB,RK,K,S,Q,F
   Dim nRighe,nColonne
   Dim nCaselleDaEvid
   Dim aQuadroNum
   Dim aNumDaEvid
   Dim stesto
   '
   nRighe = 12
   nColonne = 6
   ReDim aQuadroNum(nRighe,nColonne)
   ReDim aNumDaEvid(100,1) ' dato che non so a priori la quantita di numeri metto 100
   Q = InputBox("Inizia sequenza.....da 1 a 90 ?",,0)
   F = InputBox("Fine sequenza.......da 1 a 90 ?",,0)
   S = InputBox("Quale sequenza......1-2-3-4-5-6-7-8-9-10-11-12-13..?",,0)
   X = InputBox("Quante estrazioni vuoi controllare?",,0)
   For R1 = 1 To 12
      'If R1 = 11 Then R1 = 12 End If
      '
      For RK = S To S
         '
         For E = 1 To 5
            For K = Q To F Step RK
     
               stesto = Fuori90(Format2(K)) & "."
               Scrivi stesto,0,0
               '
       
               aQuadroNum(R1,E) = Estratto(EstrazioneFin - X,R1,E)
               '
               '
               If(aQuadroNum(R1,E)) = Fuori90(K) Then
                  nCaselleDaEvid = nCaselleDaEvid + 1
                  '
                  aNumDaEvid(nCaselleDaEvid,0) = R1
                  aNumDaEvid(nCaselleDaEvid,1) = E
                  '
                  '
               End If
               '--------------------------------------------
               If R1 = 12 Then ' -> disegna la nazionale
               End If
            Next
         Next
      Next
   Next
   ReDim aMatriceLegami(nCaselleDaEvid - 1,3)
   For R1 = 1 To nCaselleDaEvid - 1
      aMatriceLegami(R1,0) = aNumDaEvid(R1,0)
      aMatriceLegami(R1,1) = aNumDaEvid(R1,1)
      aMatriceLegami(R1,2) = aNumDaEvid(R1 + 1,0)
      aMatriceLegami(R1,3) = aNumDaEvid(R1 + 1,1)
   Next
   '-----------------------------
   '-----------------------------
   Call DisegnaEstrazioneQN(aQuadroNum,aNumDaEvid,aMatriceLegami,CLng(0))
   Call DisegnaEstrazione(EstrazioneFin - X,aNumDaEvid,aMatriceLegami,CLng(0))
   Scrivi
   Scrivi
   Scrivi "sequence number da ?  " & Q & "",0,0,6,2,3
   Scrivi
   Scrivi "sequence ?  " & S & "",0,0,3,2,3
   Scrivi
   Scrivi "number sequence " & "..." & "",0,0,4,7,3
   Scrivi
End Sub

i legend prova su questo script poi se puoi sistemare la sequenza dei numeri
forse e impostato male lo script ..

sequence number da ? 9
sequence ? 7
number sequence 9.16.23.30.37.44.51.58.65.72.79.86.9.16.23.30.37.44.51.58.65.72.79.86....

se imposto una sequenza lo script continua a scrivere sempre la stessa serie di numeri..

ok se vuoi fare uno nuovo ma deve fare le stesse cose che fa questo script..

 

[Zetrix]

sequence number da ? 4
sequence ? 5
number sequence 4.9.14.19.24.29.34.39.44.49.54.59.64.69.74.79.84.89

 

[Zetrix]

 

[i legend]

Ciao, lo script disegna anche i legami sulla ruota nazionale, come era stato richiesto inizialmente,
Hai detto che hai gia tutti gli script che ti calcolano le sequenze dei numeri in base a quello che ti interessa, pertanto non ho sviluppato quella parte
appena lanci lo script ti esce il form che richiede i numeri che vuoi evidenziare
Bisogna testare se va bene. e se li evidenzia tutti. Dalle prove che ho fatto io sembrerebbe ok, ma ripeto bisogna testarlo.
ecco lo script

Option Explicit
Sub Main
    ReDim aLung(0):Call ScegliNumeri(aLung)
    Dim idEstr:idEstr = EstrazioneFin
    Call GetStrinaNumeriDaEvidenziare(idEstr,aLung)
End Sub
Sub GetStrinaNumeriDaEvidenziare(idEstr,aLung)
    Dim r,e,p
    Dim nCaselleDaEvid
    ReDim aCeck(90),anTro(0) 
    ' azzero il vettore nel caso vengano passati piu aLung 
    For e = 1 To 90
        aCeck(e) = 0
    Next
    For e = 1 To UBound(aLung)
        aCeck(aLung(e)) = 1
    Next
    Dim aR:aR = Array(0,1,2,3,4,5,6,7,8,9,10,12)
    ReDim aNumDaEvid(55,1)
    For r = 1 To 11
        For p = 1 To 5
            e = Estratto(idEstr,aR(r),p)
            If aCeck(e) = 1 Then
                nCaselleDaEvid = nCaselleDaEvid + 1
                ReDim Preserve anTro(nCaselleDaEvid)
                anTro(nCaselleDaEvid) = e
                aNumDaEvid(nCaselleDaEvid,0) = r
                aNumDaEvid(nCaselleDaEvid,1) = p
            End If
        Next
    Next
    Call EliminaRipetuti(anTro,True)
    '  If UBound(anTro) >= 2 Then
    ReDim aMatriceLegami(nCaselleDaEvid - 1,3)
    For r = 1 To nCaselleDaEvid - 1
        aMatriceLegami(r,0) = aNumDaEvid(r,0)
        aMatriceLegami(r,1) = aNumDaEvid(r,1)
        aMatriceLegami(r,2) = aNumDaEvid(r + 1,0)
        aMatriceLegami(r,3) = aNumDaEvid(r + 1,1)
    Next
    Scrivi "Numero elementi lunghetta:        " & UBound(aLung)
    Scrivi "Lunghetta Spia:                    " & StringaNumeri(aLung,,True)
    Scrivi "Numeri trovati:                    " & UBound(anTro) & " -> [ " & StringaNumeri(anTro,,True) & " ]"
    Scrivi
    Call DisegnaEstrazione(idEstr,aNumDaEvid,aMatriceLegami,vbGreen)
    '  End If
End Sub

ho fatto una sub a parte in modo tale che puoi modificare lo script come meglio credi
anzicche usare la form potresti passargli tante lunghette alung quante vuoi tu

 

[Zetrix]

buongiorno a tutti. ciao i legend intanto grazie per lo script che ai fatto dopo vedrò meglio
lo script e se le richieste saranno soddisfatte poi ti farò sapere adesso devo aggiornare
il famoso 59 e si perche il 59 e diventata una star e neanche ieri il 59 non e uscito in nessuna ruota..
il banco lo marca stretto il 59..

 

[Zetrix]

nadin qua la situazione del 59 a milano la scelta per ambo si fa sempre piu difficile..
adesso vediamo un po la ciclometria i disegnamo questi numeri..