Novità

X SOLARE UNA CORTESIA

chicco3

Advanced Member
Ciao solare leggendo nei vari post ho letto che hai un listato sulle frequenze abbinando ai capogiochi.Se puoi postarlo ti ringrazierei buona giornata
chicco
 

chicco3

Advanced Member
Ciao Rudi ho visto è ottimo caspita ma qui ci vuole un interprete x capire qualcosa.Ti volevo chiedere che non ricordo piu nel filtraggio i segni = <> <= >= cosa si riferiscono.Grazie e ti saluto con stima ciao chicco
 

solare

Advanced Member >PLATINUM<
Ciao Chicco3, ho trovato questo.

Sub Main()
Scrivi: Scrivi String(25," ") & "ABBINAMENTI + FREQUENTI CON IL CAPOGIOCO BY BLACKMORE * FORUM LOTTOPASSION *"
Scrivi
Dim mt(90,3),n(1),ru(1)
r = CInt(InputBox("RUOTA DI RICERCA ?","Blackmore",1))
a = CInt(InputBox("CAPOGIOCO ? ","Blackmore",90))
tot = CInt(InputBox("QUANTI ABBINAMENTI VUOI VEDERE ? " + Chr(13) + "METTERE 89 PER VEDERE TUTTI I NUMERI","Blackmore",10))
cont = CInt(InputBox("QUANTI CASI VUOI CONTROLLARE ? ","Blackmore",10))
ru(1) = r
caso = 0
fin = EstrazioneFin
ini = EstrazioneFin - cont
For es = EstrazioneFin To 1 Step - 1
If caso < cont Then
If Posizione(es,r,a) > 0 Then
caso = caso + 1
co = 0
For x = 1 To 90
n(1) = x
If n(1) <> a Then
co = co + 1
mt(co,1) = co
mt(co,2) = n(1)
fr = SerieFreq(es,es,n,ru,1)
mt(co,3) = mt(co,3) + fr
End If
Next
ColoreTesto 1
Scrivi "[N°" & es & "] " & DataEstrazione(es) & " " & SiglaRuota(r) & " " & StringaEstratti(es,r)
ColoreTesto 0
End If
End If
Next
OrdinaMatrice mt,- 1,3
Scrivi:Scrivi
Scrivi "RUOTA DI RICERCA/RILEVAMENTO: " & UCase(NomeRuota(r))
Scrivi "CAPOGIOCO: " & Format2(a)
Scrivi "CASI ESAMINATI: " & Format2(caso)
Scrivi "ABBINAMENTI + FREQUENTI CON IL CAPOGIOCO:":Scrivi
Scrivi String(59,"="),1
For co = 1 To tot
Scrivi "Il n° " & Format2(mt(co,2)) & " si è abbinato " & Format2(mt(co,3)) & " volte " & " su " & Format2(caso) & " casi [" & Format2(a) & "-" & Format2(mt(co,2)) & "]"
Next
Scrivi String(59,"="),1
End Sub
 

salvo50

Advanced Member >PLATINUM PLUS<
chicco3;n2120550 ha scritto:
Ciao Rudi ho visto è ottimo caspita ma qui ci vuole un interprete x capire qualcosa.Ti volevo chiedere che non ricordo piu nel filtraggio i segni = <> <= >= cosa si riferiscono.Grazie e ti saluto con stima ciao chicco

Ciao a Tutti.

= uguale
<> diverso
<= minore o uguale
>= maggiore o uguale
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 26 marzo 2024
    Bari
    30
    51
    17
    01
    53
    Cagliari
    13
    70
    25
    68
    47
    Firenze
    28
    30
    54
    70
    88
    Genova
    67
    87
    22
    03
    62
    Milano
    22
    34
    13
    47
    24
    Napoli
    20
    72
    59
    01
    52
    Palermo
    05
    72
    65
    52
    32
    Roma
    28
    43
    75
    54
    87
    Torino
    16
    08
    17
    24
    38
    Venezia
    67
    28
    55
    60
    29
    Nazionale
    15
    69
    22
    63
    39
    Estrazione Simbolotto
    Firenze
    44
    09
    31
    22
    16
Alto