terni che hanno lo stesso ritardo

[trivellatomariotretre33]

Ciao Joe 91 ti ringrazio per l'operato fantastico si può avere lo script ?
Ti ringrazio di cuore .

 

[Joe91]

Ciao Trivellato.

Lo script che ho fatto ed utilizzato per ottenere i risultati che

ho postato qui, ha come fine, velocità e precisione.

Contiene tipi di ricerca, che non voglio rendere pubblici.

Soprattutton non è utilizzabile da altri ... o per altro.

Quindi dovrai attendere qualcosa di più orientato all'utilizzo dei dati raccolti.

Come buona notizia ti posso scrvere che ieri sera ho provato

un altro algoritmo ed i risultati sembrano altrettanto buoni.

Quindi se ... vi farò avere il nuovo elaborato.

Intanto per provarlo sarebbe utile avere la possibilità di poter controllare

il suo funzionamento sia nella procedura di ricerca che nella simulazione del metodo.

su qualche caso reale.

Buona Domenica.

 

[trivellatomariotretre33]

GRAZIE Joe91 SEI GENTILE ,BUONA DOMENICA ANCHE A TE .
PS SCUSA Joe91 AVRESTI UNO SCRIPT CHE METTE IN GIOCO SU RUOTA O 2 RUOTE UNA TERZINA X AMBO SECCO ...ANCORA GRAZIE.

 

[Joe91]

GRAZIE Joe91 SEI GENTILE ,BUONA DOMENICA ANCHE A TE .
PS SCUSA Joe91 AVRESTI UNO SCRIPT CHE METTE IN GIOCO SU RUOTA O 2 RUOTE UNA TERZINA X AMBO SECCO ...ANCORA GRAZIE.

Ciao.

Innanzi tutto ...

Aggiorno il messaggio precedente, comunicando che ho dovuto riscrivere tutto dal principio,

perchè vi erano troppi casi non considerati correttamente.

Quindi ho privilegiato l'aspetto "qualità" della ricerca, mantenendo una discreta velocità.

E ... per quanto mi riguarda ... ora, funziona.

Si, probabilmente ho qualche script che gioca l' Ambo in Terzina ma faccio prima a riscriverlo

che a cercarlo ed adattarlo ... a quanto sopra.

Quindi appena possibile aggiungerò le istruzioni per la giocata

della Terzina, per Ambo nelle Ruote di rilevazione.

Cordiali saluti

 

[trivellatomariotretre33]

GRAZIE Joe91 RESTO IN ATTESA TI SALUTO CORDIALMENTE.

 

[Joe91]

Script

Script

Option Explicit
Sub Main
	'Ricerca Terno Polivalente + Verifica della Terzina per Ambo sulle 2 Ruote coinvolte.
	'Metodo Statistico di Trivellato. Script V.3.0. del 08/02/2015 By Joe
	Dim Ini,Fin,Es,K,R1,R2,SE,E,A,B,C,DE
	Dim Nu(3),Ru(2),Rr(1),Po(2),Co,Si : Rr(1) = 11 :Po(2) = 1 : Co = 30 : Si = 2
	Ini = 8000 : Fin = EstrazioneFin
	For Es = Ini To Fin : AvanzamentoElab Ini,Fin,Es
		For R1 = 1 To 10
			SE = StringaEstratti(Es,R1) : E = Split("0." & SE,".") : OrdinaMatrice E,False
			For A = 1 To 3 : Nu(1) = E(A)
				For B = A + 1 To 4 : Nu(2) = E(B)
					For C = B + 1 To 5 : Nu(3) = E(C)
						For R2 = R1 + 1 To 12 : If R2 = 11 Then R2 = 12
							If Posizione(Es,R2,Nu(1)) > 0 And Posizione(Es,R2,Nu(2)) > 0 And Posizione(Es,R2,Nu(3)) > 0 Then
								K = K + 1 : Scrivi String(102,"=") & FormatSpace(K,4,1),1 : ColoreTesto 1
								DE = Replace(DataEstrazione(Es),".","/")
								Scrivi DE & " " & StringaNumeri(Nu,"-",True) & Space(1),1,0
								Scrivi SiglaRuota(R1) & "_ " & SiglaRuota(R2) & "_ ",1
								Ru(1) = R1 : Ru(2) = R2 : ColoreTesto 0
								ImpostaGiocata 1,Nu,Ru,Po,Co,Si
								'ImpostaGiocata 2,Nu,Rr,Po,7,Si
								Gioca Es,True
							End If
						Next
					Next
				Next
			Next
		Next
	Next
	ScriviResoconto
End Sub

 

[trivellatomariotretre33]

GRAZIE Joe91 FANTASTICO MI PIACE SPERO CHE CONTINUI A SFORNARE VINCITE,
TI RINGRAZIO DISTINTAMENTE E ANCORA GRAZIE.

 

[oxygen]

Ciao a tutti, rileggendo il tread anche se in ritardo mi ricordo che Luigi aveva già fatto un ottimo lavoro sulle combinazioni polivalenti, come gli fu richiesto al tempo sul ritardo degli stessi numeri estratti nelle stessa estrazione e il ripetersi con analisi approfondita del loro riprodursi.
Cosa che forse è sfuggita a Joe ma potrebbe essere molto utile per la completezza del programma per la comparazione nonchè per la convergenza dei dati.
Saluti cordiali.

 

[Joe91]

Ok ...

Ti ringrazio per la segnalazione.