Novità

La speranza è l'ultima a morire... no perditempo

Bravo,....

La decina 21.30 NApoli
quadro probabilistico non è uguale al mio ed in più segue un output diverso e strano ,mentre la tabella percentuali è corretta, manaco le somme in verticale e orizzontale che hanno un loro significato.

Idem x TOrino la 41.50

PS digli al programmatore di modificare la grafica, sembra un listato scritto con la macchina da scrivere degli anni "60"
Questo è un listato trovato in rete che ,per quanto "anni 60",svolge egregiamente il suo compito.
In attesa di trovare programmatori all'altezza,
uso questo assieme ad altri prospetti,in primis quelli di PrevRaz.
Un saluto.
 
Salve Claudio8
la sua spiegazione non fa una grinza con uno ,che al mio posto, sicuramente capirebbe di più. Lo so, sono un pò ciuco, comunque cercherò di applicarmi anche se il tempo è tiranno.
Cmq ieri si è ripresentato l'81, di cui lei mi segnalò la ripetizione a breve. Grazie per la disponibilità.
 
Salve Claudio8
la sua spiegazione non fa una grinza con uno ,che al mio posto, sicuramente capirebbe di più. Lo so, sono un pò ciuco, comunque cercherò di applicarmi anche se il tempo è tiranno.
Cmq ieri si è ripresentato l'81, di cui lei mi segnalò la ripetizione a breve. Grazie per la disponibilità.
Grazie del "Lei", mi raccomando non perda questa abitudine.
Salve
 
PS digli al programmatore di modificare la grafica, sembra un listato scritto con la macchina da scrivere degli anni "60"

Se non sbaglio quell' out mi sembra l' out di uno script che feci fare una quindicina di anni fa da Robyca .

Ciao Eugenio
 
Comunque,volevo dire di non uscire dal seminato della discussione iniziata da Claudio8 e restare in tema
Grazie
 
Puoi pubblicare lo script di Rosanna . Perché se mi ricordo bene non è più attuale con le percentuali.Andavano per ogni ruota e decina aggiortnate con l' uscita delo nuovo lotto x.
 
se puo' esservi utile in attesa dello script di Ciccio

Codice:
Scrivi String(36," ") & "STATISTICHE LOTTO",1
ColoreTesto 2
Scrivi String(40," ") & "by Eu-Genio",1
ColoreTesto 1
Scrivi String(78,"=") & _
"listedRobyca",1
ColoreTesto 0
Sub Main()
Dim ru(1)
Dim nm(10)
Dim frq(10)
Dim nu(1)
Dim ne(2)
ru(1) = InputBox("INSERIRE IL NUMERO DELLA RUOTA !!!",,1)
ini = InputBox("NUMERO ESTRAZIONE INIZIO VERIFICA." & Chr(13) & Chr(13) & _
"Tenere presente che se il numero delle estr. in verifica" & _
" è inferiore a 500, certi numeri non riescono a fare i 18 " & _
"cicli",,EstrazioneFin - 1500)
ini = CInt(ini)
fin = InputBox("NUMERO ESTRAZIONE FINE VERIFICA." & Chr(13) & Chr(13) & _
"Cmq le percentuali sono sempre riferite ai cicli riportati" & _
" nella riga di mezzo, ovvero: Pres su ??",,EstrazioneFin)
fin = CInt(fin)
For numeri = 1 To 90
nu(1) = numeri
c1 = 0
Erase frq
Messaggio numeri & " " & UCase(NomeRuota(ru(1)))
For es = fin To ini Step - 1
ex = es + 1
Rem *************************
ey = es + 9
Rem ************************
If ex > fin Then ex = fin
If ey > fin Then ey = fin
If Posizione(es,ru(1),nu(1)) > 0 Then
c1 = c1 + 1
dnu = DecinaNaturale(nu(1))
co = 0
For x = 1 To 9
For y = 0 To 9
co = co + 1
If x = dnu + 1 Then
nm(y + 1) = co
End If
Next
Next
For n = 1 To 9
ne(1) = nm(n)
ne(2) = nm(n) + 1
fr = SerieFreq(ex - 6,ey,ne,ru,1)
If fr > 0 Then frq(n) = frq(n) + 1
Next
Rem *******************
If c1 = 18 Then Exit For
Rem ********************************
End If
Next
For x = 1 To 9
riga = riga & Format2(nm(X)) & "-" & Format2(nm(X) + 1) & " "
Next
ColoreTesto 2
Scrivi "Numero : " & nu(1),1
ColoreTesto 0
Scrivi "Decina nat: " & riga
For x = 1 To 9
per =((frq(X)*100)\c1)
If per > 80 Then ColoreTesto 1
If per > 90 Then ColoreTesto 2
rige = rige & Format2(per) & " "
rigi = rigi & Format2(frq(X)) & " "
Next
Scrivi "Pres su " & c1 & ": " & rigi
Scrivi "Percent % : " & rige,1
riga = "":rige = "":rigi = ""
Scrivi
ColoreTesto 2
Next
Scrivi String(78," ") & _
"listedRobyca",1
ColoreTesto 0
End Sub
 
scusa ma non era chiusa la previsione? e poi la cinquina dove sono stati presi gli altri numeri? grazie
 

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 20 marzo 2026
    Bari
    36
    23
    51
    64
    82
    Cagliari
    50
    33
    36
    90
    55
    Firenze
    49
    48
    53
    59
    54
    Genova
    16
    41
    73
    62
    34
    Milano
    43
    42
    59
    38
    75
    Napoli
    25
    58
    62
    38
    80
    Palermo
    84
    86
    88
    62
    22
    Roma
    83
    70
    67
    49
    66
    Torino
    29
    62
    21
    07
    37
    Venezia
    26
    23
    43
    42
    56
    Nazionale
    02
    59
    04
    47
    32
    Estrazione Simbolotto
    Firenze
    38
    11
    27
    10
    26
Indietro
Alto