Script numeri spia, mo ve spiego....

[Roby]

Ciao ragazzi, prima di postare ho fatto una ricerca sul forum ma non ho trovato nulla.

Sto cercando uno script che mi consenta di fare questo:

Dopo l'uscita di un determinato numero su una ruota, lo script mi deve dire quali numeri (max 4 o 5) sono piu frequenti su di un'altra ruota.

ESEMPIO PRATICO:

Esce il 90 a palermo
SCRIPT ELABORA .. .. .. e mi dice quali numeri sono piu frequenti a MILANO dopo l'uscita del 90 a palermo entro tot colpi.

Vorrei che lo script avesse le maschere che chiedono all'utente le varie cose. E quindi ...

MASCHERE:
Quale numero spia?
In quale ruota?
Quanti numeri vuoi?
In quale ruota li cerco?
Entro quanti colpi?

Io avevo trovato questo script
http://forum.lottoced.com/topic.asp?TOPIC_ID=128313
ma il lavoro lo fa solo su una ruota, o meglio cerca in una ruota, ed in quella ruota mi da i numeri da giocare.

Qualcuno potrebbe aiutarmi, nonostante lo studio del codice(ancora molto a rilento per mancanza di tempo) non mi posso ritenere indipendente.

Help please. Grazie a tutti!

 

[imported_n/a]

Up.

 

[LuigiB]

ciao ,la funzione numeri spia del programma fa proprio quello che chiedi , non l'avevi vista ?

 

[imported_n/a]

Ciao Luigi e grazie per avermi risposto. In realtà no. Mi ero cosi fissato sugli script, che non ci ho pensato!!! Che scemo.
Ora sono al lavoro, ma spero di provarlo subito stasera.
Ti tengo aggiornato.
Grazie mille

 

[imported_n/a]

Bene.... ho controllato la funzione "Numeri spia", ma purtroppo non fa cio che volevo in uno script.

Luigi la funzione che mi hai consigliato, lavora sempre su una ruota.

RIPORTO LA MIA RICHIESTA SPERANDO CHE QUALCUNO POSSA AIUTARMI:

Dopo l'uscita di un determinato numero su una ruota, lo script mi deve dire quali numeri (max 4 o 5) sono piu frequenti su di un'altra ruota.

ESEMPIO PRATICO:

Esce il 90 a palermo
SCRIPT ELABORA .. .. .. e mi dice quali numeri sono piu frequenti a MILANO dopo l'uscita del 90 a palermo entro tot colpi.

Vorrei che lo script avesse le maschere che chiedono all'utente le varie cose. E quindi ...

MASCHERE:
Quale numero spia?
In quale ruota?
Quanti numeri vuoi?
In quale ruota li cerco?
Entro quanti colpi?

 

[claudio8]

Comincia con questo senza input box.

Trova per tutti i numeri spia, da 1 a 90, i numeri che soddisfano la % minima da te impostata.
Puoi cambiare la ruota di ricerca e la % minima.
Se ti va bene facciamo le modifiche del caso.

Sub Main()
Dim ruote(1)
Dim poste(2)
Dim n(90)
poste(1) = 1
ruote(1) = r
r = 1	 ' RUOTA DA CONSIDERARE
c = 10 'NUMERO COLPI
ini = 6584 'ESTRAZIONE DI PARTENZA
fin = EstrazioneFin
For spia = 1 To 90 'INTERVALLO N°SPIA DA CONSIDERARE
casi = 0
For i = 1 To 90
n(i) = 0
Next
For es = ini To fin
Messaggio "Spia : " & CInt(spia) & " Estrazione : " & DataEstrazione(es)
	For p = 1 To 5
		a = Estratto(es,r,p)
		If a = spia Then
			casi = casi + 1
			ess = es + c
			If ess > fin Then ess = fin End If
			For x = es + 1 To ess
				For pp = 1 To 5
					b = Estratto(x,r,pp)
					For y = 1 To 90
						If b = y Then n(y) = n(y) + 1 End If
					Next
				Next
			Next
		End If
	Next
Next
For y = 1 To 90
perc = Int((n(y)/casi)*100)
If perc >= 80 Then ' % MINIMA DA CONSIDERARE
Scrivi "Ruota: " & NomeRuota(r) & "   Numero Spia: " & CInt(spia) & "  Colpi: " & CInt(c)
Scrivi
Scrivi "Casi: " & CInt(casi) & "     N° " & CInt(y) & "  Uscito n° " & CInt(n(y)) & " volte       " & CInt(perc) & "%"
Scrivi "********************************************************"
End If
Next
Next
End Sub

Buona ricerca, a buon rendere.

Lo spot che conosciamo dice "Ti Piace vincere facile ? " che tradotto in pratica significa "Ti Piace..rebbe vincere facile !!!"

 

[imported_n/a]

Ciao Claudio, direi che hai inteso ciò che vorrei.

In pratica il procedimento è corretto, ma se fosse possibile (spero di non risultare troppo presuntuoso) vorrei che l'output fosse piu particolareggiato.

Del tipo...

OUTPUT
Ruota: Cagliari Numero Spia: 3 USCITO DOVE? Colpi: 10
Casi: 87 N° 79 Uscito n° 70 volte 80%

pensi che si possa fare?
E comunque grazie tanto già per questo.

 

[imported_n/a]

Claudio nun te scurdà de me. Sta casa aspietta a te.


<center>BUONA PASQUA</center>

 

[Leonardo Giammalvo]

La variabile r non definita dello script non mi funziona

 

[claudio8]

quote:Originally posted by Leonardo Giammalvo

La variabile r non definita dello script non mi funziona

Devi remmare con l'apice o cancellare la riga

Option Explicit

 

[claudio8]

quote:Originally posted by mazinga73

Claudio nun te scurdà de me. Sta casa aspietta a te.


<center>BUONA PASQUA</center>

Scusa ma non ho avuto tempo per vedere altro, appena posso lo riguardo.
ciao