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
    sabato 18 ottobre 2025
    Bari
    23
    03
    54
    34
    30
    Cagliari
    49
    14
    25
    09
    37
    Firenze
    32
    45
    15
    59
    29
    Genova
    03
    66
    68
    90
    85
    Milano
    88
    15
    21
    41
    27
    Napoli
    79
    72
    84
    27
    01
    Palermo
    23
    03
    73
    25
    04
    Roma
    11
    67
    24
    13
    59
    Torino
    72
    59
    84
    75
    26
    Venezia
    81
    08
    18
    76
    25
    Nazionale
    58
    69
    62
    17
    70
    Estrazione Simbolotto
    08
    26
    28
    22
    40
Indietro
Alto