RUBINO PANE PER I TUOI DENTI

adispo2000 · 2 Luglio 2019

http://www.playoptions.it/vbforum/showthread.php?1790-Teoria-dell-equilibrio-instabile-dei-numeri

POSSIAMO APPLICARLA A VARI MERCATI DI GIOCO....ANCHE A QUELLI A MONTEPREMI..........SOLO TU E CHI SAI TU POTETE SCRIPTARE IL TUTTO......

Immagini Allegate

Alien. · 2 Luglio 2019

Rubino · 2 Luglio 2019

Ciao
Per il trading di borsa il discorso non e' così semplice
perché chiusure di prezzo modeste possono essere manipolate regolarmente
da investitori istituzionali o broker a discapito dei piccoli investitori privati
anche solo negli ultimi 5 10 minuti di trattative di fine giornata

secondo il mio parere l equilibrio instabile nel trading azioni o indici
non funziona.
e come usare un solo indicatore.
risulta una indicazione unica ed è troppo poco per affidarsi ad essa.

le serie up down di poca entità o in un mercato laterale di una azione o indice
sono una serie lunga e continua di equilibri e falsi segnali.
infatti nessuna direzione viene presa tritandk chi sta in mezzo che spera
di salire o scendere, mentre passano diversi mesi e tutto rimane li com'e.

se parliamo di lotto o superenalotto o giochi viene usata come indicazione
da alcuni ma e alla pari del ritardo o della frequenza dei numeri sortiti nel
passato .

spiegami cosa vuoi sapere altrimenti si rischia di stare solo nel generico

già spaziometria ha la procedura per equilibrio instabile
cosa serve uno script.

adispo2000 · 2 Luglio 2019

QUELLO CHE VOLEVO SAPERE SE E' POSSIBILE CREARE UNO SCRIPT PER 'N' CICLI E CHE OGNI CICLO SIA FORMATO DA 'N' ESTRAZIONI, CON POSSIBILITA DI POTERLO PROVARE SUI DIVERSI ARCHIVI...DI SPAZIOM. E POTERLO USARE ANCHE CON ARCHIVI FORMATO .TXT IN QUANTO PER ESEMPIO NON C'E' IL MILIONDAY............POI MAGARI LA DISCUSSIONE POTRA' INTERESSARE A QUALCHE ALTRO UTENTE E METTERE NUOVE IDEE...

adispo2000 · 3 Luglio 2019

POI RUBINO.. come al solito sto' sempre a chiedere....scusatemi sempre del disturbo....sempre se' e possibile e fattibile creare uno script per filtrare dei file colonnali .txt , per vedere il rendimento di riduzione potendo utilizzare queste opzioni:
1- poter filtrare il file considerando la somma dei primi numeretti che formano una lunghezza tipo sestina 04-12-25-32-82-83 somma 0+1+2+3+8+8=somma 22 oppure;
2- poter filtrare il file considerando la somma dei secondi numeretti che formano una lunghezza tipo sestina 04-12-25-32-82-83 somma 4+2+5+2+2+3=somma 18 oppure;
3 - poter filtrare il file considerando la somma dei primi numeretti + secondi numeretti quindi 22+18=40.
quindi potendo scegliere tra le tre opzioni inserire il comnado min e max somma, non so' se sono stato chiaro...e grazie di tutto

Rubino · 3 Luglio 2019

POI RUBINO.. come al solito sto' sempre a chiedere....scusatemi sempre del disturbo....sempre se' e possibile e fattibile creare uno script per filtrare dei file colonnali .txt , per vedere il rendimento di riduzione potendo utilizzare queste opzioni:

1- poter filtrare il file considerando la somma dei primi numeretti che formano una lunghezza tipo sestina 04-12-25-32-82-83 somma 0+1+2+3+8+8=somma 22 oppure;

2- poter filtrare il file considerando la somma dei secondi numeretti che formano una lunghezza tipo sestina 04-12-25-32-82-83 somma 4+2+5+2+2+3=somma 18 oppure;

3 - poter filtrare il file considerando la somma dei primi numeretti + secondi numeretti quindi 22+18=40.

quindi potendo scegliere tra le tre opzioni inserire il comando min e max somma, non so' se sono stato chiaro...e grazie di tutto

disposizioni:
1) devi avere una cartella in questo percorso sul tuo pc
c:\temp

2) devi avere un file txt con nome Matrice
memorizzato nella directory c:\temp

perchè lo script cerca il file in questa cartella con questo percorso
c:\temp\matrice.txt

quindi devi avere o rinominare il tuo file colonnare con questo nome

lanci lo script

che ti chiede
vuoi la somma totale delle posizioni di tutti i numeretti ?
vuoi la somma di solo le posizioni dispari ?
vuoi la somma di solo le posizioni pari ?

poi vediamo se aggiungere solo alcune somme che tu vuoi o altro.

intanto se hai modo di provarlo, fammi sapere.

Codice:

Sub Main
   ''''''''''''' legge filtro MatriceCInquine MillionDay-Lotto
   '''''--------------------------------------------------------
   Dim sFileBd,Srecord,last,x,qt,t,cg,numeretto,hH,h,ts,tT,ct,K
   Dim file,record,lastult,selsom
   ''''file output dopo filtro Pilota
   Scrivi "Script Adispo-1",1
   sFileBd = "C:\temp\Matrice.txt"
   Call LeggiRigheFileDiTesto(sFileBd,Srecord)
   last = UBound(Srecord)
   ColoreTesto(2)
   Scrivi "Leggo combinazioni matrice ...." & last + 1,1
   '''''''''''''''''''''''''''''''''''''''''
   selsom = InputBox("Filtra Somma D=dispari P=pari  T=totale",,"T")
   Scrivi "Matrice -  " & sFileBd,1
   Scrivi "Totale Combinazioni " & last + 1,1
   Scrivi "Filtra Somma Numeretti D=Dispari P=Pari T=Totale   (SCELTO O RICHIESTO..." & selsom,1
   ColoreTesto(0)
   '''loop per leggere file e calcolare combinazioni come da parametri filtro impostati
   For x = 0 To last
      Messaggio(x & "../..  " & last+1)
      'arrays decodifica
      ReDim av(10)
      Call SplitByChar(Srecord(x),".",av)
      qt = UBound(av)
      ReDim NR(10)
      '''compondo arrays per numeretti
      hH = 0:ts = 0
      For h = 0 To qt
         hH = hH + 1
         NR(hH) = Left(Format2(av(h)),1)
         hH = hH + 1
         NR(hH) = Right(Format2(av(h)),1)
         '''' TOTALE
         If selsom = "T" Or selsom = "t" Then
            ts = ts + Int(av(h))
         End If
      Next
      ''''pari o dispari
      If selsom = "D" Or selsom = "d" Then
         For K = 0 To qt*2 + 2
            If dispari(K) = True Then
            ts = ts + Int(NR(K))
            End If
         Next
      End If
      If selsom = "P" Or selsom = "p" Then
        For K = 0 To qt*2 + 2
            If pari(K) = True Then
            ts = ts + Int(NR(K))
            End If
         Next
      End If
      ''''''CALCOLA SOMMA DISPARI O PARI O TOTALE
      '''''
      If selsom = "d" Or selsom = "D" Then
         Scrivi "  Somma Tot." & ts & "    " & NR(1) & "." & NR(2) & "." & NR(3) & "." & NR(4) & "." & NR(5) & "." & NR(6) & "." & NR(7) & "." & NR(8) & "." & NR(9) & "." & NR(10),1
         cg = cg + 1
      End If
      If selsom = "P" Or selsom = "p" Then
         Scrivi "  Somma Tot." & ts & "    " & NR(0) & "." & NR(1) & "." & NR(2) & "." & NR(3) & "." & NR(4) & "." & NR(5) & "." & NR(6) & "." & NR(7) & "." & NR(8) & "." & NR(9) & "." & NR(10),1,1
         cg = cg + 1
      End If
      If selsom = "T" Or selsom = "t" Then
         Scrivi "  Somma Tot." & ts & "    " & NR(1) & "." & NR(2) & "." & NR(3) & "." & NR(4) & "." & NR(5) & "." & NR(6) & "." & NR(7) & "." & NR(8) & "." & NR(9) & "." & NR(10),1
         ct = ct + 1
      End If
   Next
   Scrivi
   Scrivi "Totale combinazioni elab." & ct,1
   Scrivi
   Scrivi "Riepilogo combinazioni filtrate.." & cg,1
   Scrivi
   Scrivi "Tempo Elab." & TempoTrascorso
End Sub

adispo2000 · 3 Luglio 2019

Ciao Rubino..e grazie...ma ho un problema mi spunta:

adispo2000 · 3 Luglio 2019

il file che ho inserito per una prova e':
04 10 35 38 55
15 16 18 23 41
16 30 35 41 53
01 03 06 23 53
10 21 30 38 49
02 05 30 36 48
08 18 20 30 53
16 37 38 40 49
03 15 32 38 53
05 20 38 43 47
14 23 41 45 50
07 15 18 43 50
11 24 30 43 50
03 06 12 45 47
09 10 12 41 45
01 14 25 39 49
08 10 35 37 42
04 35 37 44 55
13 18 33 43 52
03 06 37 48 54
01 19 31 43 44
05 14 41 44 51
06 31 45 47 48
02 08 28 48 51
08 17 18 27 45
03 15 23 37 49
11 17 19 32 36
15 17 35 49 54
02 05 15 23 55
03 22 26 37 51
11 18 25 34 53
12 20 30 36 38
29 42 43 45 53
10 17 35 39 47
32 35 48 50 55
02 13 34 40 54

Rubino · 3 Luglio 2019

il file deve contenere i numeri divisi da 1 punto

04.10.35.38.55

15.16.18.23.41

oppure devi correggere questa riga dello script
devi togliere in pratica il punto, ma lasciare 1 spazio vuoto

Call SplitByChar(Srecord(x),".",av)

deve diventare

Call SplitByChar(Srecord(x)," ",av)

Rubino · 4 Luglio 2019

1) prevede sempre di leggere il file con numeri divisi da 1 punto

2) aggiornato con somma richiesta specifica da filtrare

domanda: il tutto è previsto per 10 numeretti, ma si può anche aumentarne, ma bisogna sapere
se serve perchè al lotto e MillionDay vengono estratte solo le cinquine.

Codice:

Option Explicit
Sub Main
   ''''''''''''' legge filtro MatriceCInquine MillionDay-Lotto
   '''''--------------------------------------------------------
   Dim sFileBd,Srecord,last,x,qt,t,cg,numeretto,hH,h,ts,tT,ct,K,z,quale
   Dim file,record,lastult,selsom,tsd,tsp
   ''''file output dopo filtro Pilota
   Scrivi "Script Adispo-1",1
   sFileBd = "C:\temp\Matrice.txt"
   Call LeggiRigheFileDiTesto(sFileBd,Srecord)
   last = UBound(Srecord)
   ColoreTesto(2)
   Scrivi "Leggo combinazioni matrice ...." & last + 1,1
   '''''''''''''''''''''''''''''''''''''''''
   selsom = InputBox("Filtra Somma D=dispari P=pari  T=totale",,"T")
   quale = CInt(InputBox("Somma Richiesta o Tutte = 0  ",,0))
   Scrivi "Matrice -  " & sFileBd,1
   Scrivi "Totale Combinazioni " & last + 1,1
   Scrivi "Filtra Somma Numeretti D=Dispari P=Pari T=Totale   (SCELTO O RICHIESTO..." & selsom,1
   Scrivi "Somma Specifica Richiesta.O TUTTE = 0    ( " & quale & " )",1
   Scrivi
   ColoreTesto(0)
   '''loop per leggere file e calcolare combinazioni come da parametri filtro impostati
   For x = 0 To last
      Messaggio(x & "../..  " & last + 1)
      'arrays decodifica
      ReDim av(10)
      Call SplitByChar(Srecord(x),".",av)
      qt = UBound(av)
      ReDim NR(10)
      '''compondo arrays per numeretti
      hH = 0:ts = 0:tsp=0:tsd=0
      For h = 0 To qt
         hH = hH + 1
         NR(hH) = Left(Format2(av(h)),1)
         hH = hH + 1
         NR(hH) = Right(Format2(av(h)),1)
         '''' TOTALE
         If selsom = "T" Or selsom = "t" Then
            ts = ts + Int(av(h))
         End If
      Next
      ''''pari o dispari
      If selsom = "D" Or selsom = "d" Or selsom = "T" Then
         For K = 0 To qt*2 + 2
            If dispari(K) = True Then
            tsd = tsd + Int(NR(K))
            End If
         Next
      End If
      If selsom = "P" Or selsom = "p" Or selsom = "T" Then
        For K = 0 To qt*2 + 2
            If pari(K) = True Then
            tsp = tsp + Int(NR(K))
            End If
         Next
      End If
      ''''''CALCOLA SOMMA DISPARI O PARI O TOTALE
      '''''
      If selsom = "d" Or selsom = "D" Then
      If quale = tsd Then
      ct = ct + 1
         Scrivi "  Somma POSD." & FormattaStringa(tsd,"=000") & "    " & NR(1) & NR(2) & "." & NR(3) &  NR(4) & "." & NR(5) & NR(6) & "." & NR(7) &  NR(8) & "." & NR(9) &  NR(10),1
      End If
         cg = cg + 1
      End If
      If selsom = "P" Or selsom = "p" Or selsom = "T" Then
       If quale = tsp Then
       ct = ct + 1
         Scrivi "  Somma POSP." & FormattaStringa(tsp,"000") & "    " & NR(1) & NR(2) & "." & NR(3) &  NR(4) & "." & NR(5) &  NR(6) & "." & NR(7) &  NR(8) & "." & NR(9) &  NR(10),1
      End If 
         cg = cg + 1
      End If
      If selsom = "T" Or selsom = "t" Then
         Scrivi "  Somma Tot." & FormattaStringa(ts,"000") & "   Somma PosD." & Format2(tsd) & "   Somma PosP." & Format2(tsp) & "   " & NR(1) &  NR(2) & "." & NR(3) & NR(4) & "." & NR(5) &  NR(6) & "." & NR(7) &  NR(8) & "." & NR(9) &  NR(10),1
         ct = ct + 1
         cg = cg + 1
      End If
   Next
   Scrivi
   Scrivi "Totale combinazioni elab." & ct,1
   Scrivi
   Scrivi "Riepilogo combinazioni filtrate.." & cg,1
   Scrivi
   Scrivi "Tempo Elab." & TempoTrascorso
End Sub

Rubino · 4 Luglio 2019

questo è output che ho preparato:
con i soliti problemi di visualizzazione sul forum, che attacca sconsideratamente i vari campi

[code[

Script Adispo-1
Leggo combinazioni matrice ....36
Matrice - C:\temp\Matrice.txt
Totale Combinazioni 36
Filtra Somma Numeretti D=Dispari P=Pari T=Totale (SCELTO O RICHIESTO...T
Somma Specifica Richiesta.O TUTTE = 0 ( 0 )
Somma Tot.142 Somma PosD.12 Somma PosP.22 04.10.35.38.55
Somma Tot.113 Somma PosD.09 Somma PosP.23 15.16.18.23.41
Somma Tot.175 Somma PosD.16 Somma PosP.15 16.30.35.41.53
Somma Tot.086 Somma PosD.07 Somma PosP.16 01.03.06.23.53
Somma Tot.148 Somma PosD.13 Somma PosP.18 10.21.30.38.49
Somma Tot.121 Somma PosD.10 Somma PosP.21 02.05.30.36.48
Somma Tot.129 Somma PosD.11 Somma PosP.19 08.18.20.30.53
Somma Tot.180 Somma PosD.15 Somma PosP.30 16.37.38.40.49
Somma Tot.141 Somma PosD.12 Somma PosP.21 03.15.32.38.53
Somma Tot.153 Somma PosD.13 Somma PosP.23 05.20.38.43.47
Somma Tot.173 Somma PosD.16 Somma PosP.13 14.23.41.45.50
Somma Tot.133 Somma PosD.11 Somma PosP.23 07.15.18.43.50
Somma Tot.158 Somma PosD.15 Somma PosP.08 11.24.30.43.50
Somma Tot.113 Somma PosD.09 Somma PosP.23 03.06.12.45.47
Somma Tot.117 Somma PosD.10 Somma PosP.17 09.10.12.41.45
Somma Tot.128 Somma PosD.10 Somma PosP.28 01.14.25.39.49
Somma Tot.132 Somma PosD.11 Somma PosP.22 08.10.35.37.42
Somma Tot.175 Somma PosD.15 Somma PosP.25 04.35.37.44.55
Somma Tot.159 Somma PosD.14 Somma PosP.19 13.18.33.43.52
Somma Tot.148 Somma PosD.12 Somma PosP.28 03.06.37.48.54
Somma Tot.138 Somma PosD.12 Somma PosP.18 01.19.31.43.44
Somma Tot.155 Somma PosD.14 Somma PosP.15 05.14.41.44.51
Somma Tot.177 Somma PosD.15 Somma PosP.27 06.31.45.47.48
Somma Tot.137 Somma PosD.11 Somma PosP.27 02.08.28.48.51
Somma Tot.115 Somma PosD.08 Somma PosP.35 08.17.18.27.45
Somma Tot.127 Somma PosD.10 Somma PosP.27 03.15.23.37.49
Somma Tot.115 Somma PosD.09 Somma PosP.25 11.17.19.32.36
Somma Tot.170 Somma PosD.14 Somma PosP.30 15.17.35.49.54
Somma Tot.100 Somma PosD.08 Somma PosP.20 02.05.15.23.55
Somma Tot.139 Somma PosD.12 Somma PosP.19 03.22.26.37.51
Somma Tot.141 Somma PosD.12 Somma PosP.21 11.18.25.34.53
Somma Tot.136 Somma PosD.12 Somma PosP.16 12.20.30.36.38
Somma Tot.212 Somma PosD.19 Somma PosP.22 29.42.43.45.53
Somma Tot.148 Somma PosD.12 Somma PosP.28 10.17.35.39.47
Somma Tot.220 Somma PosD.20 Somma PosP.20 32.35.48.50.55
Somma Tot.143 Somma PosD.13 Somma PosP.13 02.13.34.40.54
Totale combinazioni elab.36
Riepilogo combinazioni filtrate..72
Tempo Elab.00:00:03

[/code]

Rubino · 4 Luglio 2019

questo è esempio di posizione dispari

Script Adispo-1

Leggo combinazioni matrice ....36

Matrice - C:\temp\Matrice.txt Totale
Combinazioni 36
Filtra Somma Numeretti D=Dispari P=Pari T=Totale (SCELTO O RICHIESTO...d
Somma Specifica Richiesta.O TUTTE = 0 ( 10 )

Somma POSD.=010 02.05.30.36.48
Somma POSD.=010 09.10.12.41.45
Somma POSD.=010 01.14.25.39.49
Somma POSD.=010 03.15.23.37.49

Totale combinazioni elab.4
Riepilogo combinazioni filtrate..36
Tempo Elab.00:00:05

adispo2000 · 4 Luglio 2019

Ciao Rubino...allora nuovo problema:
sul file
04.10.35.38.55
15.16.18.23.41
16.30.35.41.53
01.03.06.23.53
10.21.30.38.49
02.05.30.36.48
08.18.20.30.53
16.37.38.40.49
03.15.32.38.53
05.20.38.43.47
14.23.41.45.50
07.15.18.43.50
11.24.30.43.50
03.06.12.45.47
09.10.12.41.45
01.14.25.39.49
08.10.35.37.42
04.35.37.44.55
13.18.33.43.52
03.06.37.48.54
01.19.31.43.44
05.14.41.44.51
06.31.45.47.48
02.08.28.48.51
08.17.18.27.45
03.15.23.37.49
11.17.19.32.36
15.17.35.49.54
02.05.15.23.55
03.22.26.37.51
11.18.25.34.53
12.20.30.36.38
29.42.43.45.53
10.17.35.39.47
32.35.48.50.55
02.13.34.40.54
01.14.18.32.47
03.06.15.38.45
02.07.32.48.50
05.12.22.24.40
04.14.20.35.48
06.15.27.37.41
04.27.44.49.51
03.07.25.47.51
08.09.14.20.40
09.16.22.27.46
06.11.15.28.50
09.10.15.37.49
04.13.35.44.50
06.19.28.41.50
03.30.31.41.48
06.18.20.22.35
09.16.27.32.51
03.11.13.36.55
06.20.38.45.50
05.23.51.53.54
05.21.26.28.48
03.06.19.22.41
14.16.17.46.54
02.28.29.31.34
03.05.27.36.50
06.10.17.29.36
29.35.36.41.55
01.25.35.42.55
12.26.27.37.43
02.07.09.33.50
15.18.29.31.34
20.23.24.27.42
21.23.31.42.43
03.10.13.30.31
09.31.34.36.45
03.08.09.31.50
28.40.41.44.46
47.48.50.54.55
05.17.38.40.50
02.17.21.32.53
09.11.23.32.38
09.34.37.41.45.
01.05.07.19.41
04.31.37.42.52
08.17.18.32.34
28.29.40.44.53
13.21.42.43.52
02.03.10.34.43
06.40.43.50.55
06.10.40.41.53
08.09.29.43.51
09.19.24.32.46
01.22.34.48.53
10.32.48.51.53
12.22.35.44.48
02.06.32.33.44
13.22.26.37.42
16.21.44.48.49
31.36.38.48.54
09.12.38.52.54
27.34.44.53.54
06.27.33.37.41
03.10.32.37.40
10.16.22.43.52
05.09.27.32.41
07.28.32.51.54
09.16.22.27.33.
19.26.38.48.54
01.27.38.41.55
08.23.29.40.51
22.29.39.49.53
06.08.12.48.52
03.10.19.40.44
01.34.36.42.44
01.14.22.30.46
04.07.28.39.53
18.26.28.29.43
23.28.31.51.52
02.03.29.33.48
20.32.38.44.45
03.44.46.50.55
03.13.23.31.54
09.16.30.39.47
05.07.09.10.50
17.18.21.23.35
10.24.32.44.45
19.31.47.52.55
03.13.31.42.55
03.12.14.31.47
02.03.27.29.41
06.12.18.19.22
05.19.34.35.42
01.03.22.39.54
38.40.44.46.50
04.07.42.43.54
12.14.21.34.38
11.21.32.41.50
12.30.33.38.55
04.13.25.40.51
14.24.29.32.52
03.13.38.39.53
21.26.28.33.39
05.07.11.33.38
08.17.29.32.53
01.05.21.27.44
12.25.26.32.44
10.17.25.43.50
13.30.41.51.53
24.33.36.37.47
17.24.38.50.53
06.07.33.48.50
19.29.36.38.44
09.18.27.47.51
01.02.09.26.41
07.12.22.48.50
01.09.39.43.51
14.42.43.48.53
01.04.13.29.30
11.20.30.49.54
16.24.25.28.43
19.30.45.50.51
07.21.26.39.54
11.27.28.37.43
01.02.18.22.31
20.25.37.43.48
04.22.24.31.46
09.23.30.36.53
03.17.33.38.51
19.21.42.48.53
04.19.20.35.43
18.21.39.41.43
11.14.20.23.46
03.12.20.35.53
02.27.47.52.54
05.11.22.28.40
17.36.42.45.53
04.31.37.40.43
03.08.22.27.34
11.30.37.53.54
04.35.44.51.55
05.08.17.29.49
32.33.39.43.45
02.06.10.19.49

Rubino · 4 Luglio 2019

ciao adispo, so che preparare la matrice è la parte più delicata.

ma basta guardare le righe che hai postato
ci sono due righe che contengono un punto finale oltre i numeri.

lo puoi vedere se selezioni tutte le cinquine postate o sul tuo file
vedi subito che ci sono due righe perchè il colore blu della selezione è più grande

09.34.37.41.45.
09.16.22.27.33.

togli il punto finale

Rubino · 4 Luglio 2019

ciao adispo
vediamo di far fare allo script un piccolo passettino per escludere dove possibile questi problemini.

non sapendo le tue matrici che userai , intendo la classe di sviluppo o per cosa ti deve servire
per il MillionDay? per il Lotto? per il Superenalotto e SiVinceTutto? , Vinci casa?

attualmente io non so a cosa ti stai impegnando.

ma vediamo se ti chiedo la classe come inputbox, posso prima di controllare la matrice, verificare la
quantità di numeri di ogni riga che siano tutti lunghi uguali,

se mi dici a cosa ti serve e per che gioco, posso fare questa modifica.

Rubino · 4 Luglio 2019

OKEY FATTO modifica

basta specificare la classe

esempio: classe 15 e con anche il punto finale che non dovrebbe esserci, quindi errore voluto per vedere se lo script
segnala ancora errore

Codice:

01.02.03.15.22.36.39.40.69.70.72.86.87.89.90.
01.02.04.11.16.21.27.31.36.61.69.71.77.81.88.
01.02.05.06.08.30.36.38.41.42.55.62.64.66.69.
01.02.06.08.30.36.38.41.42.55.62.64.66.69.79.
01.02.07.14.17.20.28.36.47.48.49.53.69.82.83.
01.02.09.13.19.25.29.34.36.43.46.54.68.69.88.
01.02.10.23.32.36.37.56.59.69.73.78.80.84.85.
01.02.12.24.36.45.50.51.52.57.63.65.69.74.76.
01.02.18.26.33.35.36.44.58.60.67.69.75.86.88.
01.03.04.06.13.14.32.36.41.46.47.56.57.70.74.
01.03.05.07.12.29.33.36.45.54.70.79.82.84.86.
01.03.08.09.27.28.36.42.43.53.58.70.77.78.85.
01.03.08.09.27.28.36.42.43.53.60.70.77.78.85.
01.03.10.18.21.24.30.34.36.51.55.59.67.70.71.
01.03.11.19.35.36.37.52.61.65.68.70.80.83.90.
01.03.16.17.25.26.36.38.48.50.62.63.70.75.90.
01.03.20.23.31.36.44.49.64.66.70.73.76.81.88.
01.04.05.07.15.28.34.35.36.53.76.79.82.88.90.
01.04.07.08.22.24.26.36.37.42.51.72.75.80.82.
01.04.09.12.17.18.23.36.40.43.45.48.67.73.87.
01.04.10.29.36.38.44.54.59.62.83.87.88.89.90.
01.04.19.33.36.39.50.63.64.66.68.78.85.86.88.
01.04.20.25.30.36.49.52.55.58.60.65.84.86.90.
01.05.09.14.21.36.37.43.44.47.50.63.71.79.80.
01.05.10.11.17.36.39.48.57.58.59.60.61.74.79.
01.05.13.23.26.27.36.46.52.65.73.75.77.79.89.
01.05.16.18.19.20.22.32.36.49.56.67.68.72.79.
01.05.24.25.31.36.40.51.78.79.81.83.85.87.90.
01.06.07.21.23.25.35.36.39.41.71.73.82.87.90.
01.06.09.11.20.24.33.36.41.43.49.51.61.86.89.
01.06.10.12.19.26.28.31.36.41.45.53.59.68.75.
01.06.10.12.19.26.28.36.45.53.59.68.75.81.87.
01.06.15.18.27.36.41.50.63.67.77.83.84.86.90.
01.06.16.29.36.37.40.41.54.58.60.76.80.87.88.
01.06.17.22.34.36.41.44.48.52.65.72.78.85.88.
01.06.20.29.30.31.34.35.36.41.49.54.55.81.83.
01.07.09.10.15.16.36.43.52.59.64.65.66.82.87.
01.07.11.13.18.36.38.46.61.62.67.76.78.82.85.
01.07.19.27.30.36.40.44.55.57.68.74.77.82.87.
01.07.31.32.34.36.50.56.58.60.63.81.82.89.90.
01.08.10.13.20.35.36.40.42.46.49.50.59.63.87.
01.08.11.12.15.25.32.36.42.44.45.56.61.87.88.
01.08.14.18.29.31.36.39.42.47.52.54.65.67.81.
01.08.15.17.19.21.36.42.48.68.71.76.84.89.90.
01.08.16.21.23.33.34.36.42.57.73.74.83.86.87.
01.09.22.31.35.36.38.43.57.62.72.74.81.84.90.
01.09.26.30.32.36.39.43.55.56.75.76.83.86.90.
01.10.14.22.25.27.33.36.47.59.60.72.76.77.86.
01.11.14.26.34.36.40.47.61.64.66.75.84.87.90.
01.11.22.23.28.29.30.36.50.53.54.55.61.63.72.
01.11.22.28.29.30.36.50.53.54.55.61.63.72.73.
01.12.13.21.22.36.45.46.58.60.64.66.71.72.83.
01.12.14.16.30.35.36.45.47.55.78.85.88.89.90.
01.12.20.27.34.36.37.38.39.45.49.62.77.80.90.
01.13.15.17.30.31.33.36.37.46.48.55.80.81.86.
01.13.16.24.28.33.36.39.44.46.51.53.84.88.90.
01.14.15.19.23.24.36.38.47.51.58.60.62.68.73.
01.15.20.21.26.29.36.49.54.57.71.74.75.78.85.
01.17.24.27.29.32.35.36.48.51.54.56.64.66.77.
01.18.25.28.36.37.53.57.64.66.67.74.80.88.89.
01.21.28.32.33.36.38.40.52.53.56.62.65.71.86.
02.03.04.10.12.26.34.45.69.70.75.78.83.85.90.
02.03.05.10.25.28.44.52.53.59.65.69.70.79.88.
02.03.06.07.09.18.31.37.41.43.67.69.70.80.81.
02.03.06.09.31.37.41.43.69.70.80.81.82.87.88.
02.03.08.11.13.17.23.24.42.46.48.51.61.69.70.
02.03.08.11.13.17.24.42.46.48.51.61.69.70.73.
02.03.14.21.29.35.38.47.54.62.69.70.71.76.90.
02.03.16.19.57.58.60.64.66.68.69.70.74.84.90.
02.03.20.27.30.32.33.49.50.55.56.63.69.70.77.
02.04.05.14.18.24.47.51.67.69.79.82.84.87.89.
02.04.06.15.23.29.33.41.52.54.65.69.73.86.88.
02.04.07.25.32.40.56.64.66.69.76.82.87.88.90.
02.04.08.09.20.39.42.43.44.49.57.69.74.88.90.
02.04.10.17.19.22.30.35.48.55.59.68.69.72.86.
02.04.13.28.37.38.46.50.53.58.60.62.63.69.80.
02.05.07.11.15.19.26.50.61.63.68.69.75.79.82.
02.05.09.16.17.33.43.48.69.76.78.79.85.86.88.
02.05.12.13.31.32.35.39.45.46.56.69.79.81.90.
02.05.20.21.23.34.40.49.58.60.69.71.73.79.87.
02.05.22.27.29.37.54.57.69.72.74.77.79.80.83.
02.06.10.14.16.34.39.41.47.50.59.63.69.88.90.
02.06.11.28.35.40.41.53.57.61.69.74.78.85.87.
02.06.12.17.25.27.41.45.48.58.60.69.77.89.90.
02.06.13.20.22.26.41.46.49.69.72.75.76.84.87.
02.06.19.21.24.32.41.44.51.56.68.69.71.83.88.
02.07.08.27.34.35.42.52.65.69.77.82.84.86.87.
02.07.10.13.21.33.46.57.59.69.71.74.82.86.89.
02.07.12.16.22.23.38.44.45.62.69.72.73.82.88.
02.07.24.29.30.39.51.54.55.58.60.69.78.82.85.
02.08.10.15.31.42.58.59.60.69.76.81.83.86.87.
02.08.12.14.19.33.37.40.42.45.47.68.69.80.86.
02.08.16.26.28.29.32.42.53.54.56.69.75.89.90.
02.08.18.21.22.25.42.50.63.67.69.71.72.78.85.
02.09.10.24.26.27.38.40.43.51.59.62.69.75.77.
02.09.11.14.22.32.43.47.52.56.58.60.61.65.69.
02.09.11.14.32.43.47.52.56.58.60.61.65.69.72.
02.09.12.15.21.28.30.43.45.53.55.69.71.84.87.
02.09.23.35.43.50.63.64.66.69.73.83.86.89.90.
02.10.11.12.18.20.29.45.49.54.59.61.64.66.67.
02.11.13.30.34.37.44.46.55.61.69.76.80.88.89.
02.11.25.33.38.39.61.62.69.83.84.86.87.88.90.
02.13.14.15.27.44.46.47.64.66.69.77.78.85.88.
02.13.16.18.30.40.46.52.55.65.67.69.83.87.90.
02.14.23.25.26.30.31.47.55.57.69.73.74.75.81.
02.15.16.20.24.25.35.37.49.51.69.80.86.88.90.
02.15.17.18.32.34.38.48.56.57.62.67.69.74.86.
02.17.21.26.37.39.48.52.64.65.66.69.71.75.80.
02.17.29.31.40.44.48.50.54.63.69.81.84.87.88.
02.18.19.23.27.28.39.53.67.68.69.73.76.77.87.
02.19.20.31.38.49.52.62.65.68.69.78.81.85.89.
02.22.24.28.31.33.34.51.53.64.66.69.72.81.86.
03.04.05.16.23.30.37.39.55.70.73.79.80.84.90.
03.04.07.15.17.21.44.48.58.60.70.71.82.86.88.
03.04.08.19.25.31.33.35.42.68.70.81.86.89.90.
03.04.09.10.11.43.50.59.61.63.70.76.84.86.88.
03.04.18.22.27.38.52.62.64.65.66.67.70.72.77.
03.04.19.20.24.28.29.40.49.51.53.54.68.70.87.
03.05.06.22.24.35.41.50.51.58.60.63.70.72.79.
03.05.08.18.26.40.42.57.67.70.74.75.76.79.87.
03.05.09.13.15.20.38.43.46.49.62.70.79.83.88.
03.05.11.21.32.56.61.64.66.70.71.78.79.85.89.
03.05.14.17.19.27.31.34.47.48.68.70.77.79.81.
03.06.08.12.16.20.21.41.42.45.49.52.65.70.71.
03.06.10.17.33.40.41.48.59.64.66.70.83.86.87.
03.06.11.26.27.29.39.41.44.54.61.70.75.77.88.
03.06.15.19.25.27.30.41.55.68.70.76.78.85.90.
03.06.23.28.34.38.41.53.62.70.73.84.87.89.90.
03.07.08.10.19.32.38.39.42.56.59.62.68.70.82.
03.07.11.20.22.25.34.49.57.61.70.72.74.79.82.
03.07.13.26.28.30.35.46.53.55.64.66.70.75.82.
03.07.14.23.40.47.50.52.63.65.70.73.78.82.85.
03.07.16.24.27.51.70.76.77.82.83.87.88.89.90.
03.08.14.22.30.42.44.47.55.70.72.83.84.87.88.
03.08.15.29.34.37.42.50.54.63.64.66.70.80.87.
03.09.12.14.24.25.39.43.45.47.51.64.66.70.87.
03.09.16.32.34.35.40.43.44.56.59.70.87.88.90.
03.09.17.29.30.43.48.52.54.55.57.65.70.74.89.
03.09.19.21.22.23.26.33.43.68.70.71.72.73.75.
03.10.12.15.23.27.35.45.57.59.70.73.74.77.86.
03.10.13.16.22.29.31.46.54.59.70.72.78.81.85.
03.10.14.20.26.37.47.49.58.59.60.70.75.80.89.
03.11.12.30.31.38.40.45.55.58.60.61.62.70.81.
03.11.14.15.16.18.28.33.47.53.61.67.70.86.87.
03.12.13.18.19.44.45.46.50.63.67.68.70.88.89.
03.12.17.22.28.32.37.45.48.53.56.70.72.76.80.
03.13.21.25.27.37.40.46.70.71.77.80.84.87.90.
03.13.33.34.39.46.52.58.60.65.70.76.86.87.88.
03.15.24.26.31.32.51.52.56.65.70.75.81.84.87.
03.17.18.20.35.39.48.49.67.70.78.82.84.85.90.
03.17.20.26.30.48.49.55.70.75.78.85.86.87.88.
03.18.23.25.29.32.54.56.58.60.67.70.73.83.86.
03.21.28.31.39.50.53.57.63.70.71.74.81.83.88.
03.24.33.37.38.44.51.57.62.70.74.78.80.85.86.
04.05.06.07.10.20.27.41.49.59.77.78.79.82.85.
04.05.08.17.32.42.48.50.52.56.63.65.79.83.90.
04.05.09.26.29.31.43.54.58.60.64.66.75.79.81.
04.05.11.13.22.33.40.44.46.61.72.79.86.87.88.
04.05.12.19.21.25.38.45.57.62.68.71.74.79.86.
04.06.07.12.35.37.41.44.45.64.66.80.84.86.88.
04.06.08.11.18.19.34.41.42.58.60.61.67.68.87.
04.06.09.14.16.22.25.28.41.43.53.72.81.83.90.
04.06.17.24.31.38.39.41.48.51.62.76.81.86.87.
04.06.21.26.30.40.41.50.55.63.71.75.87.88.89.
04.07.09.14.30.33.34.38.43.47.55.62.82.86.88.
04.07.11.12.28.39.45.52.53.61.65.82.86.88.89.
04.07.13.19.23.31.46.68.73.79.81.82.83.84.86.
04.07.16.18.29.35.50.54.57.63.67.74.82.88.90.
04.08.10.14.21.23.28.42.47.53.59.64.66.71.73.
04.08.12.13.27.29.30.42.45.46.54.55.76.77.86.
04.08.12.15.16.38.40.42.62.78.84.85.86.87.90.
04.09.13.21.24.35.43.46.51.52.65.71.78.85.86.
04.09.15.19.27.32.37.43.56.68.77.80.86.88.89.
04.10.12.16.24.32.33.45.51.56.58.59.60.86.87.
04.10.13.15.18.25.26.39.46.59.67.75.82.86.90.
04.10.31.34.37.40.41.52.57.59.65.74.80.81.87.
04.11.14.17.25.29.37.47.48.54.61.78.80.85.86.
04.11.15.24.30.51.55.57.61.64.66.74.83.88.90.
04.11.20.23.26.32.35.38.49.56.61.62.73.75.86.
04.12.14.15.20.22.31.45.47.49.50.63.72.81.86.
04.13.16.17.20.34.46.48.49.64.66.80.88.89.90.
04.14.16.19.26.44.47.52.65.68.75.76.86.88.90.
04.14.27.35.39.40.47.58.60.77.78.83.85.87.90.
04.17.26.27.28.33.48.53.57.74.75.77.84.86.90.
04.18.20.21.33.37.49.67.71.76.80.82.83.86.87.
04.18.28.30.31.32.44.53.55.56.67.78.81.85.88.
04.21.22.29.32.34.39.54.56.71.72.84.86.88.90.
04.22.23.57.58.60.72.73.74.76.78.85.88.89.90.
04.23.24.25.27.34.44.50.51.62.63.73.77.88.90.
05.06.09.19.39.40.41.43.52.65.68.79.84.87.90.
05.06.11.12.14.23.41.45.47.61.73.76.79.83.88.
05.06.13.17.18.21.28.29.46.48.53.54.67.71.79.
05.06.15.16.31.41.44.57.74.79.81.86.88.89.90.
05.06.25.26.32.33.34.37.41.56.75.79.80.86.90.
05.07.08.13.14.16.25.42.46.47.58.60.79.82.90.
05.07.09.23.24.28.32.43.51.53.56.57.73.74.79.
05.07.17.35.37.38.40.48.62.79.80.82.87.88.89.
05.07.18.34.39.44.64.66.67.79.82.83.86.88.90.
05.07.21.22.30.31.52.55.65.71.72.76.79.81.82.
05.08.09.10.12.22.34.42.43.45.59.72.79.89.90.
05.08.11.20.28.31.37.42.49.53.61.79.80.81.84.
05.08.15.21.24.27.33.39.42.51.71.77.79.86.90.
05.08.19.23.29.35.42.44.54.68.73.78.79.85.88.
05.09.11.18.25.27.30.35.43.55.61.67.77.79.82.
05.09.23.24.28.32.43.51.53.56.57.73.74.82.88.
05.10.13.19.24.37.46.51.59.64.66.68.76.79.80.
05.10.14.15.29.30.32.40.47.54.55.56.59.79.87.
05.10.16.21.26.35.59.71.72.75.79.83.84.86.88.
05.10.18.23.31.33.38.50.59.62.63.67.73.79.81.
05.11.16.24.29.34.38.51.52.54.61.62.65.79.90.
05.12.15.18.37.45.52.58.60.65.67.78.79.80.85.
05.12.16.27.28.40.45.50.53.63.64.66.77.79.87.
05.12.17.20.24.26.30.44.45.48.49.51.55.75.79.
05.13.17.18.21.28.29.41.46.48.53.54.67.71.79.
05.13.30.34.46.50.55.57.63.74.78.79.84.85.90.
05.14.20.33.35.47.49.52.57.64.65.66.74.79.86.
05.14.22.26.28.38.39.47.53.62.72.75.78.79.85.
05.15.17.22.23.25.48.64.66.71.72.73.79.84.86.
05.19.28.30.33.53.55.58.60.68.79.83.86.88.89.
05.20.25.29.39.49.50.54.63.76.79.86.88.89.90.
05.27.32.38.44.56.58.60.62.76.77.79.84.87.88.
06.07.08.28.33.41.42.44.50.53.63.76.82.86.88.
06.07.11.16.17.30.32.41.48.55.56.61.82.84.90.
06.07.12.13.15.24.34.40.41.45.46.51.82.87.88.
06.07.14.19.22.29.41.47.54.64.66.68.72.82.89.
06.07.26.38.41.52.57.58.60.62.65.74.75.82.83.
06.08.09.14.15.17.26.35.41.42.43.47.48.75.80.
06.08.10.24.25.29.41.42.51.54.57.59.74.84.90.
06.08.12.13.37.39.41.42.46.78.80.83.85.89.90.
06.08.22.23.27.31.32.40.41.42.56.72.73.77.81.
06.09.10.13.23.30.41.43.44.46.55.58.59.60.73.
06.09.12.29.32.38.41.43.45.50.54.56.62.63.78.
06.09.21.27.34.41.43.57.64.66.71.74.76.77.90.
06.09.29.32.38.41.43.45.50.54.56.62.63.85.86.
06.10.11.15.21.22.37.38.41.59.61.62.71.72.80.
06.10.18.32.35.41.52.56.59.65.67.76.82.89.90.
06.11.13.25.31.41.46.50.52.61.63.64.65.66.81.
06.12.18.22.30.33.39.41.45.55.57.67.72.74.86.
06.13.16.19.27.33.35.38.41.46.62.68.77.86.87.
06.14.18.20.25.38.40.41.44.47.49.62.67.87.88.
06.14.21.31.33.41.47.58.60.71.78.81.84.85.86.
06.14.24.27.28.30.37.41.47.51.52.53.55.65.77.
06.14.24.27.28.30.41.47.51.52.53.55.65.77.80.
06.15.20.28.32.39.41.49.53.56.58.60.64.66.87.
06.16.18.23.24.26.41.51.64.66.67.73.75.78.85.
06.17.19.20.23.37.41.48.49.50.57.63.68.73.74.
06.19.20.23.41.49.50.57.63.68.73.74.80.81.90.
07.08.09.11.21.29.40.42.43.54.61.71.82.83.87.
07.08.12.17.31.42.48.57.64.66.74.78.81.82.85.
07.08.15.18.20.23.30.42.49.55.67.73.82.88.89.
07.08.17.31.42.45.48.57.64.66.74.78.81.82.85.
07.09.12.19.20.35.43.45.49.58.60.68.76.82.90.
07.09.12.25.26.43.44.58.75.78.82.84.85.88.89.
07.09.13.17.22.27.39.43.46.48.50.63.72.77.82.
07.10.11.14.24.31.35.44.47.51.59.61.81.82.88.
07.10.12.25.30.37.45.50.55.59.63.80.82.83.87.
07.10.17.23.26.29.34.48.54.59.73.75.76.82.90.
07.10.18.22.28.40.53.58.59.60.67.72.82.84.87.
07.11.23.27.33.37.58.60.61.64.66.73.77.80.82.
07.12.14.18.21.26.27.32.45.47.56.67.71.75.77.
07.13.20.29.32.37.44.46.49.52.54.56.65.80.82.
07.14.15.21.25.34.47.52.59.65.71.83.87.89.90.
07.14.15.37.39.47.57.74.76.80.82.84.87.88.90.
07.15.22.32.33.35.56.72.78.82.83.85.86.87.90.
07.15.25.27.28.29.31.38.53.54.62.77.81.82.90.
07.16.19.21.28.34.37.53.68.71.78.80.82.85.88.
07.16.20.26.31.33.39.40.49.75.81.82.86.87.90.
07.17.18.19.24.25.33.48.51.52.65.67.68.82.86.
07.20.21.24.38.49.50.51.62.63.64.66.71.82.84.
08.09.13.18.32.33.42.43.46.56.64.66.67.84.86.
08.09.16.19.24.30.31.42.43.50.51.55.63.68.81.
08.09.23.25.37.38.42.43.52.62.65.73.76.80.86.
08.10.11.26.30.33.42.52.55.59.61.65.75.78.85.
08.10.16.17.18.27.37.42.44.48.59.67.77.80.88.
08.11.14.27.38.42.47.50.57.61.62.63.74.77.89.
08.11.16.22.35.39.42.58.61.64.66.72.76.86.90.
08.12.18.24.28.35.38.42.45.51.53.62.67.83.90.
08.12.23.26.39.42.45.50.58.60.63.73.75.84.90.
08.13.15.19.22.28.42.46.52.53.57.65.68.72.74.
08.13.21.26.31.34.38.42.44.46.62.71.75.81.88.
08.14.20.24.32.34.42.47.49.51.56.76.78.85.90.
08.17.20.22.29.33.38.42.48.49.54.58.60.62.72.
08.17.25.28.30.34.39.40.42.48.53.55.86.87.90.
08.19.20.25.26.27.42.49.64.66.68.75.77.83.86.
08.21.30.32.35.37.42.55.56.57.58.60.71.74.80.
08.24.40.42.44.51.52.58.60.64.65.66.87.88.89.
09.10.14.18.19.43.47.57.59.67.68.74.78.83.85.
09.10.17.20.21.25.31.32.43.48.49.56.59.71.81.
09.10.28.29.33.35.37.39.43.53.54.59.80.86.90.
09.11.12.13.16.26.37.43.45.46.57.61.74.75.80.
09.11.15.23.31.34.39.43.61.73.78.81.85.87.90.
09.11.17.19.28.38.43.44.48.53.61.62.64.66.68.
09.12.27.31.33.43.44.45.52.65.77.81.83.86.88.
09.13.14.28.31.40.43.46.47.53.76.81.87.89.90.
09.14.16.20.23.27.29.43.47.49.54.73.77.84.87.
09.15.18.22.24.29.43.44.51.54.67.72.76.79.88.
09.15.25.33.40.43.50.57.58.60.63.74.86.87.88.
09.16.18.21.33.38.39.43.58.60.62.67.71.89.90.
09.17.24.34.37.43.48.51.58.60.80.83.84.87.90.
09.18.20.26.28.34.43.49.50.52.53.63.65.67.75.
09.20.22.30.37.40.43.49.55.64.66.72.78.80.85.
09.21.22.26.38.43.62.64.66.71.72.75.86.87.88.
10.11.12.18.20.29.45.49.54.59.61.64.66.67.69.
10.11.13.27.28.32.34.46.53.56.59.61.77.83.88.
10.11.16.19.23.25.40.59.61.62.68.73.87.88.89.
10.11.22.27.37.58.59.60.61.65.77.80.86.88.90.
10.12.13.14.17.38.45.46.47.48.52.59.62.65.84.
10.12.21.39.40.44.45.59.71.76.78.85.87.88.90.
10.15.17.24.28.48.50.51.53.59.63.78.85.88.89.
10.15.19.20.33.34.44.49.52.59.68.84.86.88.90.
10.16.20.28.30.38.49.53.55.57.59.62.74.76.88.
10.19.21.27.29.50.52.54.58.59.63.65.68.71.77.
10.19.21.27.29.50.52.54.59.60.63.65.68.71.77.
10.20.22.23.24.39.49.51.52.59.65.72.73.83.87.
10.22.26.32.44.50.56.57.59.63.64.66.72.74.75.
10.25.34.35.38.58.59.60.62.64.66.78.85.86.88.
10.27.30.31.39.55.59.64.66.77.81.84.87.89.90.
11.12.17.21.33.34.35.45.48.50.61.63.71.86.90.
11.12.19.22.24.27.45.51.61.68.72.77.78.84.85.
11.13.14.19.20.21.30.39.46.47.49.55.61.68.71.
11.13.15.19.29.35.46.54.58.60.61.68.84.89.90.
11.15.17.20.27.40.48.49.52.61.65.76.77.87.88.
11.16.20.44.49.50.58.60.61.63.78.83.85.88.90.
11.17.18.22.26.31.48.61.67.72.75.81.83.89.90.
11.18.21.23.44.52.57.61.65.67.71.73.74.84.88.
11.18.24.32.37.39.40.50.51.56.61.63.67.80.87.
11.19.29.31.32.33.54.56.57.61.68.74.76.81.86.
11.21.24.25.26.28.51.53.58.60.61.71.75.76.90.
11.23.24.30.33.35.40.51.55.61.73.76.84.86.87.
12.13.17.19.32.46.48.50.56.63.68.78.80.85.87.
12.13.20.23.25.28.33.45.46.49.53.73.78.85.86.
12.14.21.26.27.32.45.47.56.71.75.77.79.82.88.
12.14.28.29.34.44.45.47.53.54.57.58.60.74.88.
12.15.16.17.19.29.39.45.48.54.64.68.83.85.88.
12.15.26.33.38.45.62.64.66.75.76.86.87.89.90.
12.16.18.25.31.34.41.45.67.76.81.82.84.86.87.
12.19.23.30.32.34.45.52.55.56.64.65.66.68.73.
12.20.32.40.45.49.56.57.74.83.84.87.88.89.90.
12.21.23.24.29.31.37.45.51.54.71.73.80.81.89.
12.22.25.26.29.35.40.45.52.54.65.72.75.87.90.
13.14.18.22.23.34.35.37.46.47.67.72.73.80.90.
13.14.24.26.29.33.46.47.50.51.54.63.75.83.86.
13.15.16.21.23.32.46.50.56.63.71.73.76.87.88.
13.17.19.26.32.40.46.48.56.58.60.68.75.78.85.
13.17.23.25.35.44.46.48.57.73.74.76.80.83.88.
13.18.20.24.27.31.46.49.51.57.58.60.67.74.77.
13.18.20.24.27.46.49.51.57.58.60.67.74.77.81.
13.22.24.25.30.32.38.46.51.55.56.62.72.89.90.
13.23.29.38.39.40.46.54.57.62.64.66.73.74.87.
14.16.17.21.22.24.40.47.48.51.57.71.72.74.87.
14.16.31.32.37.38.47.56.62.64.66.80.81.83.90.
14.17.18.30.47.48.50.55.58.60.63.64.66.67.76.
14.17.23.32.33.39.44.47.48.56.73.86.88.89.90.
14.19.25.28.32.35.47.50.53.56.63.68.84.87.90.
15.16.22.26.27.30.34.55.58.60.72.75.77.87.88.
15.18.19.21.31.35.40.64.66.67.68.71.81.87.90.

Rubino · 4 Luglio 2019

non viene segnalato nessun errore

lo script da risultato quanto segue:

Script Adispo-1 Leggo combinazioni matrice ....371 Matrice - C:\temp\Matrice.txt Matrice - classe 15 Totale Combinazioni 371 Filtra Somma Numeretti D=Dispari P=Pari T=Totale (SCELTO O RICHIESTO...T Somma Specifica Richiesta.O TUTTE = 0 ( 0 ) La Matrice arriva fino alle DECINE, i numeri devono essere divisi con 1 Punto e terminare senza spazi vuoti o punti Somma Tot.0721 Somma PosD.66 Somma PosP.61 01.02.03.15.22.36.39.40.69.70.72.86.87.89.90 Somma Tot.0596 Somma PosD.54 Somma PosP.56 01.02.04.11.16.21.27.31.36.61.69.71.77.81.88 Somma Tot.0525 Somma PosD.46 Somma PosP.65 01.02.05.06.08.30.36.38.41.42.55.62.64.66.69 Somma Tot.0599 Somma PosD.53 Somma PosP.69 01.02.06.08.30.36.38.41.42.55.62.64.66.69.79 Somma Tot.0556 Somma PosD.48 Somma PosP.76 01.02.07.14.17.20.28.36.47.48.49.53.69.82.83 Somma Tot.0536 Somma PosD.45 Somma PosP.86 01.02.09.13.19.25.29.34.36.43.46.54.68.69.88 Somma Tot.0725 Somma PosD.66 Somma PosP.65 01.02.10.23.32.36.37.56.59.69.73.78.80.84.85 Somma Tot.0677 Somma PosD.62 Somma PosP.57 01.02.12.24.36.45.50.51.52.57.63.65.69.74.76 Somma Tot.0698 Somma PosD.62 Somma PosP.78 01.02.18.26.33.35.36.44.58.60.67.69.75.86.88 Somma Tot.0500 Somma PosD.44 Somma PosP.60 01.03.04.06.13.14.32.36.41.46.47.56.57.70.74 Somma Tot.0626 Somma PosD.56 Somma PosP.66 01.03.05.07.12.29.33.36.45.54.70.79.82.84.86 Somma Tot.0618 Somma PosD.54 Somma PosP.78 01.03.08.09.27.28.36.42.43.53.58.70.77.78.85 Somma Tot.0620 Somma PosD.55 Somma PosP.70 01.03.08.09.27.28.36.42.43.53.60.70.77.78.85 Somma Tot.0550 Somma PosD.50 Somma PosP.50 01.03.10.18.21.24.30.34.36.51.55.59.67.70.71 Somma Tot.0711 Somma PosD.66 Somma PosP.51 01.03.11.19.35.36.37.52.61.65.68.70.80.83.90 Somma Tot.0620 Somma PosD.56 Somma PosP.60 01.03.16.17.25.26.36.38.48.50.62.63.70.75.90 Somma Tot.0725 Somma PosD.67 Somma PosP.55 01.03.20.23.31.36.44.49.64.66.70.73.76.81.88 Somma Tot.0633 Somma PosD.56 Somma PosP.73 01.04.05.07.15.28.34.35.36.53.76.79.82.88.90 Somma Tot.0567 Somma PosD.51 Somma PosP.57 01.04.07.08.22.24.26.36.37.42.51.72.75.80.82 Somma Tot.0523 Somma PosD.45 Somma PosP.73 01.04.09.12.17.18.23.36.40.43.45.48.67.73.87 Somma Tot.0774 Somma PosD.70 Somma PosP.74 01.04.10.29.36.38.44.54.59.62.83.87.88.89.90 Somma Tot.0780 Somma PosD.70 Somma PosP.80 01.04.19.33.36.39.50.63.64.66.68.78.85.86.88 Somma Tot.0715 Somma PosD.66 Somma PosP.55 01.04.20.25.30.36.49.52.55.58.60.65.84.86.90 Somma Tot.0600 Somma PosD.54 Somma PosP.60 01.05.09.14.21.36.37.43.44.47.50.63.71.79.80 Somma Tot.0615 Somma PosD.54 Somma PosP.75
etc.….

Rubino · 4 Luglio 2019

Codice:

Option Explicit
Sub Main
   '''''''''SERVE PRINCIPALMENTE per leggere filtro MatriceCInquine MillionDay-Lotto
   '''''ma può leggere anche matrici fino alla decina
   '''''--------------------------------------------------------
   Dim sFileBd,Srecord,last,x,qt,t,cg,numeretto,hH,h,ts,tT,ct,K,z,quale
   Dim file,record,lastult,selsom,tsd,tsp,Classe,riga,lb
   ''''file output dopo filtro Pilota
   Scrivi "Script Adispo-1",1
   sFileBd = "C:\temp\Matrice.txt"
   Call LeggiRigheFileDiTesto(sFileBd,Srecord)
   last = UBound(Srecord)
   ColoreTesto(2)
   Scrivi "Leggo combinazioni matrice ...." & last + 1,1
   '''''''''''''''''''''''''''''''''''''''''
   Classe = CInt(InputBox("Classe Matrice  da   4-5-6-7-8-9-10-fino 20  ",,5))
   selsom = InputBox("Filtra Somma D=dispari P=pari  T=totale",,"T")
   quale = CInt(InputBox("Somma Richiesta o Tutte = 0  ",,0))
   Scrivi "Matrice -  " & sFileBd,1
   Scrivi "Matrice - classe " & Classe,1
   Scrivi "Totale Combinazioni " & last + 1,1
   Scrivi "Filtra Somma Numeretti D=Dispari P=Pari T=Totale   (SCELTO O RICHIESTO..." & selsom,1
   Scrivi "Somma Specifica Richiesta.O TUTTE = 0    ( " & quale & " )",1
   Scrivi "La Matrice arriva fino alle VENTINE, i numeri devono essere divisi con 1 Punto e terminare senza spazi vuoti o punti",1
   ColoreTesto(0)
   '''loop per leggere file e calcolare combinazioni come da parametri filtro impostati
   For x = 0 To last
      Messaggio(x & "../..  " & last + 1)
      'arrays decodifica
      ReDim av(50)
      riga = ""
      lb =(Classe*2) +(Classe - 1)
      riga = Left(Srecord(x),lb)
      Call SplitByChar(riga,".",av)
      qt = UBound(av)
      ReDim NR(50)
      '''compondo arrays per numeretti
      hH = 0:ts = 0:tsp = 0:tsd = 0
      For h = 0 To qt
         hH = hH + 1
         NR(hH) = Left(Format2(av(h)),1)
         hH = hH + 1
         NR(hH) = Right(Format2(av(h)),1)
         '''' TOTALE
         If selsom = "T" Or selsom = "t" Then
            ts = ts + Int(av(h))
         End If
      Next
      ''''pari o dispari
      If selsom = "D" Or selsom = "d" Or selsom = "T" Then
         For K = 0 To qt*2 + 2
            If dispari(K) = True Then
               tsd = tsd + Int(NR(K))
            End If
         Next
      End If
      If selsom = "P" Or selsom = "p" Or selsom = "T" Then
         For K = 0 To qt*2 + 2
            If pari(K) = True Then
               tsp = tsp + Int(NR(K))
            End If
         Next
      End If
      ''''''CALCOLA SOMMA DISPARI O PARI O TOTALE
      '''''
      If selsom = "d" Or selsom = "D" Then
         If quale = tsd Then
            ct = ct + 1
            Scrivi "   Somma PosD." & Format2(tsd) & "   " & riga
         End If
         cg = cg + 1
      End If
      If selsom = "P" Or selsom = "p" Or selsom = "T" Then
         If quale = tsp Then
            ct = ct + 1
            Scrivi "   Somma PosP." & Format2(tsp) & "   " & riga
         End If
         cg = cg + 1
      End If
      If selsom = "T" Or selsom = "t" Then
         Scrivi "  Somma Tot." & FormattaStringa(ts,"0000") & "   Somma PosD." & Format2(tsd) & "   Somma PosP." & Format2(tsp) & "   " & riga
         ct = ct + 1
         cg = cg + 1
      End If
   Next
   Scrivi
   Scrivi "Totale combinazioni elab." & x,1
   Scrivi
   Scrivi "Riepilogo combinazioni filtrate.." & ct,1
   Scrivi
   Scrivi "Tempo Elab." & TempoTrascorso
End Sub

Alien. · 5 Luglio 2019

errore in :

tsd = tsd + Int(NR(K))

Rubino · 5 Luglio 2019

Alien
con quali dati?

matrice classe?

dispari somma richiesta?

dammi elemento per capire.

RUBINO PANE PER I TUOI DENTI

Super Member >PLATINUM<

Advanced Premium Member

Rubino

Guest

Super Member >PLATINUM<

Super Member >PLATINUM<

Rubino

Guest

Super Member >PLATINUM<

Allegati

Super Member >PLATINUM<

Rubino

Guest

Rubino

Guest

Rubino

Guest

Rubino

Guest

Super Member >PLATINUM<

Allegati

Rubino

Guest

Rubino

Guest

Rubino

Guest

Rubino

Guest

Rubino

Guest

Advanced Premium Member

Rubino

Guest