GENTILMENTE

[Roby]

COME SI FA A TRADURRE I LISTATI IN L8?

GRAZIE INFINITE E SCUSATE LA MIA IGNORANZA

 

[lottosenior]

La lettera M individua l'ambata
le lettere A,T,Q indicano una giocata di ambo terno, o quaterna.
Il numero tra () tipo (A6) indica il numero di estrazioni di attesa (6 nell'esempio) prima di iniziare il gioco rispetto a quella di calcolo.
L8 oggi si chiama Lottodesk(è stato aggiornato per il gioco di molte se non tutte le lotterie internazionali, e le varianti italiane rispetto al vecchio L8 sono poche).
E' un magnifico programma dedicato completamente all'analisi del database di tutte le estrazioni. Un po' difficile per chi non ha una minima esperienza di programmazione, ma contiene una serie di comandi già pronti per le comuni operazioni lottologiche sui numeri.
Non vi è nulla di meglio al mondo per testare metodi o intuizioni sulle estrazioni passate.
Un programma (script) ben scritto dovrebbe dare in uscita un "listato" di facile lettura, spesso non è così.

Ti metto qui il listato di uno script ben fatto dall'amico ramco per una mia richiesta sui numeri primi.

*************************************************************************************

N° - 5 Numeri su Ge che al 24.02.2009 hanno avuto 2 sortite tra 8025 e 8030
03 - 02 - Primo
21 - 02 -
31 - 02 - Primo
44 - 02 -
78 - 02 -

mar 24.02.2009 [8030]
G 1: MA 03.21.31.44.78 Ge 18/18(A6)
M 21 su Ge 7° colpo [8043/26.03.2009]
M 03 su Ge 8° colpo [8044/28.03.2009]
M 44 su Ge 12° colpo [8048/07.04.2009]
M 03 su Ge 14° colpo [8050/11.04.2009]
M 78 su Ge 17° colpo [8053/18.04.2009]

G 2: M 03.31 Ge 8/12(A6)
M 03 su Ge 8° colpo [8044/28.03.2009]
I8
*************************************************************************************

N° - 5 Numeri su Ge che al 21.04.2009 hanno avuto 2 sortite tra 8049 e 8054
25 - 02 -
38 - 02 -
67 - 02 - Primo
71 - 02 - Primo
72 - 02 -

mar 21.04.2009 [8054]
G 1: MA 25.38.67.71.72 Ge 2/18(A6)
M 71.72 su Ge 2° colpo [8062/09.05.2009]
A 71.72 su Ge 2° colpo [8062/09.05.2009]
I2
G 2: M 67.71 Ge 2/12(A6)
M 71 su Ge 2° colpo [8062/09.05.2009]
I2
*************************************************************************************

N° - 5 Numeri su Ge che al 20.06.2009 hanno avuto 2 sortite tra 8075 e 8080
03 - 02 - Primo
21 - 02 -
31 - 02 - Primo
44 - 02 -
78 - 02 -

sab 20.06.2009 [8080]
G 1: MA 03.21.31.44.78 Ge 14/18(A6)
M 21 su Ge 7° colpo [8093/21.07.2009]
M 03 su Ge 8° colpo [8094/23.07.2009]
M 44 su Ge 12° colpo [8098/01.08.2009]
M 03 su Ge 14° colpo [8100/06.08.2009]
in corso (14° su 18)
G 2: M 03.31 Ge 8/12(A6)
M 03 su Ge 8° colpo [8094/23.07.2009]
I8


=======================================
Resoconto complessivo di 2 giocate
=======================================
Resoconto totale giocate
Risultati generali

Casi esaminati: 8
in corso: 1
casi finali: 7
positivi: 7
negativi: 0
Pronostici generati: 8
Pronostici vincenti: 15 (187,5 %)
Estrazioni di gioco: 56
Tentativi (scontrini giocati): 56
Vincite (scontrini vincenti): 15 (26,79 %)
Attesa media: 8,20




Resoconto totale giocate
Dettaglio Ruote (Pronostici)

Ruota Vincenti Giocati
-------------------------------
Genova 15 ( 26,79 % ) 56
Totale 15 ( 26,79 % ) 56




Resoconto totale giocate
Resoconto economico

Sorte Spese [€

 

[giordy58]

TI RINGRAZIO PER LA RISPOSTA, MA IL TUO LISTATO E'SCRITTO BENE SI RIESCE A CAPIRE, MA QUESTO LISTATO CHE HO TROVATO IN GIRO COME SI FA A TRADURLO?????

SEMBRA UNA SCRIYYURA ALIENA.....


Spero Vi saranno Gradite

La 1^ Distanza 1 e 27

Sub main()
Dim nu1(10),nu2(10),nu3(10),nu4(4)
Dim ruote(10)
Dim posta(1),poste(2),post(3),pos(5)
posta(1)=1oste(2)=1
poste(2)=0.5ost(3)=1.5
pos(2)=3os(3)=0.8os(4)=0.2

fin=EstrazioneFin
ini=fin-100
For es=ini To fin
AvanzamentoElab ini,fin,es

For r1=1 To 11
For p1=1 To 4
For p2=p1+1 To 5
n1=Estratto(es,r1,p1)
n2=Estratto(es,r1,p2):ds1=Distanza(n1,n2)
For r2=r1+1 To 11
If r2=11 Then r2=12
For p3=1 To 4
For p4=p3+1 To 5
n3=Estratto(es,r2,p3)
n4=Estratto(es,r2,p4):ds2=Distanza(n3,n4)

If ds1=1 And ds2=27 Or ds1=27 And ds2=1 And p1=p3 And p2=p4 Then

casi=casi+1:Scrivi String(75,"="),1
Scrivi DataEstrazione(es,1)&" < "&siglaRuota(r1)& " "& StringaEstratti(es,r1)&_
" > ambo distanza 1 O 27 < "&Format2(n1)&"."&Format2 (n2)&" >"
Scrivi DataEstrazione(es,1)&" < "&siglARuota(r2)& " "& StringaEstratti(es,r2)&_
" > ambo distanza 1 O 27 < "&Format2(n3)&"."&Format2 (n4)&" >"
Scrivi String(65,"-")&" caso n° "&(casi)
ruote(1)=r1:ruote(2)=r2:ruote(3)=0: k=14:co=0



nu2(1)=8
nu2(2)=53
nu2(3)=3
nu2(4)=83

co=co+1
ImpostaGiocata co,nu2,ruote,poste,k

nu1(1)=8
nu1(2)=53
nu1(3)=3
nu1(4)=38
nu1(5)=83
nu1(6)=88



co=co+1
ImpostaGiocata co,nu1,ruote,poste,k




Gioca es

End If
Next:Next:Next
Next:Next:Next:next
ScriviResoconto



End Sub


<b>La 2^

Sub main()
Dim ruote(3),posta(5),nu1(10),nu2(10),poste(5),ruota(3),nu3(10)
posta(2)=1oste(1)=1
dis=9
k=9
ce=50
ini=EstrazioneFin -ce
fin=EstrazioneFin
For es =ini To fin:Messaggio es
For r1=1 To 10
For p1=1 To 5
a=Estratto(es,r1,p1)
For r2=r1+1 To 10
If r2=11 Then r2=11
For p2=1 To 5

b=Estratto(es,r2,p2)

If Distanza(a,b)=45 And p1=p2 Then
casi=casi+1:Scrivi String(65,"•"),1
Scrivi DataEstrazione(es,1)&" [ "&siglaRuota(r1)&" - "& StringaEstratti(es,r1)&_
" ] "&format2(a)&" "&(p1)&"^ pos."
Scrivi DataEstrazione(es,1)&" [ "&siglaRuota(r2)&" - "& StringaEstratti(es,r2)&_
" ] "&format2(b)&" "&(p2)&"^ pos."
Scrivi String(52,"-")&" caso n° "&(casi)
ruote(1)=r1:ruote(2)=r2:ruota(1)=11
c1=DiametraleD(a):c2=DiametraleD(b):c3=Diametrale(c1):c4=Diametrale(c2):c5=DiametraleD(c3):c6=DiametraleD(c4)
nu2(1)=c1:nu2(2)=c2
ImpostaGiocata 1,nu2,ruote,poste,k
nu1(1)=c1:nu1(2)=c2:nu1(3)=c3
nu1(4)=c4:nu1(5)=c5:nu1(6)=c6
ImpostaGiocata 2,nu1,ruote,posta,k



Gioca es
End If

Next:Next:Next:Next:next
ScriviResoconto
Scrivi "distanza 7 ",1



End Sub

 

[imported_n/a]

Ti interessano le traduzioni per cosa ricercano i due listati o il resoconto che i due listati danno?
Ciao

sgrunt

 

[lottosenior]

Non è una scrittura aliena.
servono circa 70 euro per acquistare il programma Lottodesk e soltanto con quello,lo "script" che hai pubblicato può essere eseguito e produrre il "listato".
Sul tipo di quello che ti ho postato.
Il codice che mi hai fatto vedere è un esempio di "script" e cioè un vero e proprio programma che analizza l'archivio estrazioni secondo certe condizioni volute da un metodo e impostate dal programmatore.
Come ti ho già detto., Gli script sono sotanzialmente programmi in visual basic arricchiti con le funzioni specifiche per il lotto prodotte dagli autori del programma Lottodesk.
Ma senza "l'attrezzo" Lottodesk (circa 75 euro per l'acquisto in rete) non puoi fare nulla.
Ciao,
Giuseppe.





Hasta la victoria siempre

 

[lottosenior]

Car()Giordy,

Eccoti un esempio di una parte del listato (lunghissimo) prodotto dal primo dei due "script" che hai postato.
Realizzato con la versione DEMO del Lottodesk.



===========================================================================
mar 04.08.2009 < Na 89.80.08.88.25 > ambo distanza 1 O 27 < 89.88 >
mar 04.08.2009 < Nz 31.34.04.70.85 > ambo distanza 1 O 27 < 31.04 >
----------------------------------------------------------------- caso n° 273
mar 04.08.2009 [8099]
G 1: A 08.53.03.83 Na Nz 1/14
in corso (1° su 14)
G 2: A 08.53.03.38.83.88 Na Nz 1/14
in corso (1° su 14)
===========================================================================
mar 04.08.2009 < Pa 68.40.21.69.16 > ambo distanza 1 O 27 < 68.69 >
mar 04.08.2009 < Ve 86.24.48.51.60 > ambo distanza 1 O 27 < 24.51 >
----------------------------------------------------------------- caso n° 274
mar 04.08.2009 [8099]
G 1: A 08.53.03.83 Pa Ve 1/14
in corso (1° su 14)
G 2: A 08.53.03.38.83.88 Pa Ve 1/14
in corso (1° su 14)
===========================================================================
mar 04.08.2009 < Pa 68.40.21.69.16 > ambo distanza 1 O 27 < 68.69 >
mar 04.08.2009 < Nz 31.34.04.70.85 > ambo distanza 1 O 27 < 31.04 >
----------------------------------------------------------------- caso n° 275
mar 04.08.2009 [8099]
G 1: A 08.53.03.83 Pa Nz 1/14
in corso (1° su 14)
G 2: A 08.53.03.38.83.88 Pa Nz 1/14
in corso (1° su 14)
===========================================================================
gio 06.08.2009 < Ge 71.06.16.70.30 > ambo distanza 1 O 27 < 71.70 >
gio 06.08.2009 < Ro 07.49.70.53.29 > ambo distanza 1 O 27 < 07.70 >
----------------------------------------------------------------- caso n° 276
gio 06.08.2009 [8100]
G 1: A 08.53.03.83 Ge Ro 0/14
i.c. (14 colpi)
G 2: A 08.53.03.38.83.88 Ge Ro 0/14
i.c. (14 colpi)
===========================================================================
gio 06.08.2009 < Ge 71.06.16.70.30 > ambo distanza 1 O 27 < 71.70 >
gio 06.08.2009 < To 46.32.59.83.50 > ambo distanza 1 O 27 < 32.59 >
----------------------------------------------------------------- caso n° 277
gio 06.08.2009 [8100]
G 1: A 08.53.03.83 Ge To 0/14
i.c. (14 colpi)
G 2: A 08.53.03.38.83.88 Ge To 0/14
i.c. (14 colpi)


=======================================
Resoconto complessivo di 2 giocate
=======================================
Resoconto totale giocate
Risultati generali

Casi esaminati: 554
in corso: 108
casi finali: 446
positivi: 251
negativi: 195
Pronostici generati: 1108
Pronostici vincenti: 409 (36,9 %)
Estrazioni di gioco: 6890
Tentativi (scontrini giocati): 13780
Vincite (scontrini vincenti): 409 (2,97 %)
Attesa media: 7,23




Resoconto totale giocate
Dettaglio Ruote (Pronostici)

Ruota Vincenti Giocati
----------------------------------
Bari 60 ( 3,92 % ) 1532
Cagliari 43 ( 3,45 % ) 1248
Firenze 34 ( 2,83 % ) 1202
Genova 36 ( 2,77 % ) 1300
Milano 44 ( 3,97 % ) 1108
Napoli 38 ( 4,00 % ) 950
Palermo 28 ( 2,28 % ) 1226
Roma 36 ( 3,09 % ) 1166
Torino 40 ( 2,92 % ) 1368
Venezia 33 ( 2,18 % ) 1516
Nazionale 17 ( 1,46 % ) 1164
Totale 409 ( 2,97 % ) 13780




Resoconto totale giocate
Resoconto economico

Sorte Spese [€] Real. Vincite [€] -6% Guadagno [€]

 

[giordy58]

GRAZIE INFINITE GIUSEPPE.