LOTTO MATEMATICO & STATISTICO
Vuoi reagire a questo messaggio? Crea un account in pochi clic o accedi per continuare.
Cerca
 
 

Risultati per:
 


Rechercher Ricerca avanzata

ESTRAZIONI LOTTO
Ultimi argomenti
» N° Spia 50 R.Sp. GE R.Gio. TO
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyLun 6 Mag - 20:43:10 Da Imaging

» Ultima del Mese BARI
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyGio 2 Mag - 20:36:20 Da DjNomade

» N°Spia 50 R.S. Genova R.G. Torino
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyMer 24 Apr - 23:12:26 Da Imaging

» il forum si è trasferito
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyMer 24 Apr - 21:43:17 Da Marco

» il forum si è trasferito
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyMer 24 Apr - 21:42:25 Da Marco

» il forum si è trasferito
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyMer 24 Apr - 21:41:36 Da Marco

» N°Spia 50 R.S. Genova R.G. Torino
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyVen 19 Apr - 19:18:07 Da Imaging

» Ho aperto un nuovo sito
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyMar 9 Apr - 15:43:08 Da Lory

» Spia 77 in 3° posiz a tutte o Naz. Gioco Bari 4 colpi
LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... EmptyMar 2 Apr - 20:57:27 Da DjNomade


LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Andare in basso

LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... Empty LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Messaggio Da *Olga* il Sab 4 Ott - 19:05:03

 .......mi chiedevo, se è possibile fare lo SCRIPT / o un programmino dell genere /

 che calcolava la seguente condizione :::


L'USCITA SU 2 RUOTE DIVERSE E  NELLA STESSA ESTRAZIONE
3 NUMERI X PARTE , TRA I QUALI INTERCORRE
IN SENSO VERTICALE LA DISTANZA "30".  ed
I 6 NUMERI  APPARTENGANO AD UNA STESSA TRIPLA FIGURALE...

  ad es.   MI 40-28-49.......
                 NA 88-10-79......

   tutti i numeri appartengono alla stessa tripla  1--4--7....


  SE e possibile.....  

VI RINGRAZIO   .....
*Olga*
*Olga*

Messaggi : 1239
Data d'iscrizione : 31.12.13
Età : 59
Località : Lazio VT

Torna in alto Andare in basso

LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... Empty Re: LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Messaggio Da DjNomade il Sab 4 Ott - 23:23:08

Per L8+ mi è venuto cosi.......
Ciauz


Spoiler:

Sub main()
Dim n(6)
Dim nn(1)
Dim nu(6)
Dim ruota(2)
Dim ruote(10)
Dim post(1)
Dim posta(5)
Dim poste(5)
post(1)=1
posta(2)=1
poste(2)=1
poste(3)=1
ruote(1)=11

For es= EstrazioneFin-110 To EstrazioneFin

For r= 1 To 9
For p1= 1 To 3
For p2= p1+1 To 4
For p3= p2+1 To 5
n(1)=Estratto(es,r,p1)
n(2)=Estratto(es,r,p2)
n(3)=Estratto(es,r,p3)
For r1=r+1 To 10
For p4= 1 To 3
For p5= p4+1 To 4
For p6= p5+1 To 5
n(4)=Estratto(es,r1,p4)
n(5)=Estratto(es,r1,p5)
n(6)=Estratto(es,r1,p6)
If stessatripla(n(1),n(2),n(3),n(4),n(5),n(6)) Then
If (Distanza(n(1),n(4))=30 and  Distanza(n(2),n(5))=30 and  Distanza(n(3),n(6))=30)_
Or (Distanza(n(1),n(4))=30 and  Distanza(n(2),n(6))=30 and  Distanza(n(3),n(5))=30)_
Or (Distanza(n(1),n(5))=30 and  Distanza(n(2),n(4))=30 and  Distanza(n(3),n(6))=30)_
Or (Distanza(n(1),n(5))=30 and  Distanza(n(2),n(6))=30 and  Distanza(n(3),n(4))=30)_
Or (Distanza(n(1),n(6))=30 and  Distanza(n(2),n(4))=30 and  Distanza(n(3),n(5))=30)_
Or (Distanza(n(1),n(6))=30 and  Distanza(n(2),n(5))=30 and  Distanza(n(3),n(4))=30)Then
ColoreTesto 1 : Scrivi
Scrivi "******************************************************************"  
Scrivi DataEstrazione(es)&"  "& FormatSpace(NomeRuota(r),10)&" "& Format2(n(1))&" "& Format2(n(2))&" "& Format2(n(3))
Scrivi DataEstrazione(es)&"  "& FormatSpace(NomeRuota(r1),10)&" "& Format2(n(4))&" "& Format2(n(5))&" "& Format2(n(6))

ruota(1)=r :ruota(2)=r1

End If
End If
Next
Next
Next  
Next  
Next  
Next  
Next  
Next
Next  

'ScriviResoconto
End Sub
'---------
Function StessaTripla(n1,n2,n3,n4,n5,n6)
If Distanza(Figura(n1),Figura(n2))= 3 Or Distanza(Figura(n1),Figura(n2))= 6 Or Distanza(Figura(n1),Figura(n2))=0 Then
If Distanza(Figura(n2),Figura(n3))= 3 Or Distanza(Figura(n2),Figura(n3))= 6 Or Distanza(Figura(n2),Figura(n3))=0 Then
If Distanza(Figura(n3),Figura(n4))= 3 Or Distanza(Figura(n3),Figura(n4))= 6 Or Distanza(Figura(n3),Figura(n4))=0 Then
If Distanza(Figura(n4),Figura(n5))= 3 Or Distanza(Figura(n4),Figura(n5))= 6 Or Distanza(Figura(n4),Figura(n5))=0 Then
If Distanza(Figura(n5),Figura(n6))= 3 Or Distanza(Figura(n5),Figura(n6))= 6 Or Distanza(Figura(n5),Figura(n6))=0 Then
StessaTripla=True
End If
End If
End If
End If
End If
End Function
DjNomade
DjNomade

Messaggi : 335
Data d'iscrizione : 03.07.14

Torna in alto Andare in basso

LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... Empty Re: LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Messaggio Da Blackmore il Dom 5 Ott - 0:56:19

Ciao Olga, se le richieste le fai nella sezione script
sono piu' visibili, sono entrato qui per caso Laughing
Comunque ci ha già pensato DJ Wink
GoodNight !!!!!

Blackmore

Messaggi : 387
Data d'iscrizione : 11.06.14

Torna in alto Andare in basso

LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... Empty Re: LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Messaggio Da *Olga* il Lun 6 Ott - 8:36:22

acc....DJ   sei   piu veloce della luce......grazie   tante  x l'impegno.....ma  mi spiace....la mia SPAZIOMETRIA  nn legge script dell'L8.......c'ho provato   e nulla......dopo 3 min di attesa   mi dà la pagina  bianca  con i bordi gialli  e la scritta OUTPUT...e basta....
 vediamo  se ci si riesce farlo x la SPAZIO...


x Black.....nn c'ho pensato  di quella sezione....kiedo  scusa...ma  la cosa  nn era urgente,,,pure se lo leggete tra  3 gg    sarà   uguale....grazie    a tutti.......
*Olga*
*Olga*

Messaggi : 1239
Data d'iscrizione : 31.12.13
Età : 59
Località : Lazio VT

Torna in alto Andare in basso

LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... Empty Re: LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Messaggio Da Blackmore il Lun 6 Ott - 18:02:15

Olga prova a mettere inizio 8180 e fine 8190
in 800 estrazioni ci sono solo 2 casi, o forse 1 non ricordo, e ci vuole 1 ora per elaborare

Blackmore

Messaggi : 387
Data d'iscrizione : 11.06.14

Torna in alto Andare in basso

LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... Empty Re: LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Messaggio Da *Olga* il Lun 6 Ott - 19:33:10

axx........allora  molliamolo.....


Grazie  mille, Black......
*Olga*
*Olga*

Messaggi : 1239
Data d'iscrizione : 31.12.13
Età : 59
Località : Lazio VT

Torna in alto Andare in basso

LA DOMANDA X VOI, SCIENZIATI DEL LOTTO... Empty Re: LA DOMANDA X VOI, SCIENZIATI DEL LOTTO...

Messaggio Da Contenuto sponsorizzato


Contenuto sponsorizzato


Torna in alto Andare in basso

Torna in alto


 
Permessi di questa sezione del forum:
Non puoi rispondere agli argomenti in questo forum