Novità

x rubino da claudio

prova a controllare e dimmi cosa devo mettere o modificare.

questa tabella con 90 fissi orizzontali , anche se si usasse un font più piccolo è quasi illeggibile .


Codice: 
Coestratti   ---- F  i  s  s  i   
Co 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 
01 00 | 00 | 00 | 01 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 01 | 00 | 01 | 01 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 
02 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 02 | 00 | 00 | 00 | 01 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 
03 00 | 00 | 00 | 00 | 01 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 01 | 00 | 02 | 01 | 01 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 
04 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 
05 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 
06 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 
07 00 | 00 | 00 | 00 | 01 | 01 | 00 | 01 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 01 | 00 | 00 | 00 | 00 | 01 | 00 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 02 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 01 | 01 | 02 | 00 | 00 | 00 | 00 | 01 | 01 | 01 | 01 | 00 | 00 | 01 | 00 | 01 | 00 | 00 | 
08 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 |
 
Ti rimando lo script che ho modificato sulla base della tua impostazione eliminando i vari - if.. else ... end - perchè la formula "ix = Fuori90(90 -(Estratto(es,r1,1) - mt(i,2)))" comprende la gestione di un numero maggiore di mt(i,2).

Ho inserito i coestratti secondo quanto intendevo.

Adesso bisognerebbe solo capire se è possibile impostare la tabella nella modalità da me richiesta con l'estetica di quella attuale esistente in questo script perchè l'ultima propostami è brutta illeggibile e poco intuitiva.

Ti ringrazio ancora per l'aiuto.
Ciao
Ps: :D:DSan Gennaro ha fatto il miracolo 56 a NA :D:D

Grazie

Codice: 
Sub Main()
	Dim Coestr(90)
	Dim FissiA(90)
	Dim Fissi01(90)
	Dim Fissi02(90)
	Dim Fissi03(90)
	Dim Fissi04(90)
	Dim Fissi05(90)
	Dim Fissi06(90)
	Dim Fissi07(90)
	Dim Fissi08(90)
	Dim Fissi09(90)
	Dim Fissi10(90)
	Dim rut(10),rutt(10),ru(10),rru(10)
	Dim clp,tes,a,b,cs_el,ambata,casi
	Verif = 1 'CInt(InputBox("Quante volte vuoi verifiche gli esiti ?","Verifiche",1))
	casi = CInt(InputBox("Quanti casi vuoi ogni verifica ?","Casi di verifica",15))
	testo = 1	'InputBox("Vuoi elenco-output dei casi ? ( 1=Si   0=No )","Elenco Casi",1)
	tes = 0	'CInt(InputBox("Totale estr. da fine arch. a inizio spia caso ?" & Chr(13) & _
	'Chr(13) & "( considerare entrambe comprese per escludere il nuovo caso )","SOLO per ANALISI",1))			'<-----estrazioni da togliere
	'	'la riga sopra serve per staccare l'analisi dall'ultima estrazione in archivio, potremo così vedere
	'	'nelle estrazioni che decidiamo di mettere nell'inputbox (valore tes), quali numeri sono già sortiti...
	'	-------------------------------------------------------------------------------------------------
	r1 = CInt(InputBox("Ruota di sortita 1^ spia " & Chr(13) & Chr(13) & "( 1 Ba.   2 Ca.   3 Fi.     4 Ge. )" & Chr(13) & _
	"( 5 Mi.    6 Na.  7 Pa.    8 Ro. )" & Chr(13) & "( 9 To. 10 Ve. 11 TT. 12 Naz.)","1^ RUOTA - SPIA 1",1)) '						'<-----Ruota1
	p1 = CInt(InputBox("Posizione estratto ruota di   " & FormatSpace(NomeRuota(r1),7,- 1) & Chr(13) & Chr(13) & "(1.2.3.4.5)","POSIZ. 1^ SPIA",2))'  '<-----Posiz1
	r2 = CInt(InputBox("Ruota di sortita 2^ spia " & Chr(13) & Chr(13) & "( 1 Ba.   2 Ca.   3 Fi.     4 Ge. )" & Chr(13) & _
	"( 5 Mi.    6 Na.  7 Pa.    8 Ro. )" & Chr(13) & "( 9 To. 10 Ve. 11 TT. 12 Naz.)","2^ RUOTA - SPIA 2",2))'						'<-----Ruota2
	p2 = CInt(InputBox("Posizione estratto ruota di   " & FormatSpace(NomeRuota(r2),7,- 1) & Chr(13) & Chr(13) & "(1.2.3.4.5)","POSIZ. 2^ SPIA",3))'	'<-----Posiz1
	passo = CInt(InputBox("Distanza negativa tra estrazioni di rilevamento spie.","DISTANZA ESTRAZIONI ",1))
	clp = CInt(InputBox("Numero colpi di gioco","COLPI di GIOCO",10))	 ' 10 <--COLPI 'provato = 10, ha dato max-pres 4 il 57-46-90 centrando l'ambo 38 46
	prec = 2 	'CInt(InputBox("Numero colpi precedenti la Spia x verifica presenza ambata ?.","Presenza di ambata",2))
	'
	For cs_el = 1 To verif 	' questo  "For"  serve per ripetere le verifiche del Metodo che si sta Costruendo
		ReDim mt(4005,4),n(2),n1(2),nn(2),mt1(90,3),mt2(4005,4),nn2(2),mt3(90,3),nn3(2),mt4(90,3)
		ReDim mtt(4005,4)
		cs1 = casi + cs_el ' Casi richiesti + casi elencati
		ru(1) = r1 'CInt(InputBox("RUOTE DI RICERCA DEI + FREQ. ","1° RUOTA",r1))
		ru(2) = r2 'CInt(InputBox("RUOTE DI RICERCA DEI + FREQ. ","2° RUOTA",r2))
		rut(1) = r1 	'eval(CInt(InputBox(" RUOTA SINGOLA X FREQ. ","1° RUOTA",r1))) frequenti sulle ruote di esito
		rutt(1) = r2	'eval(CInt(InputBox(" RUOTA SINGOLA X FREQ. ","2° RUOTA",r2))) frequenti sulle ruote di esito
		rru(1) = 11 'freq a tutte
		'	 					'BLOCCO FOR x DETERMINARE L'INIZIO ESTRAZIONI SULLA BASE DEI CASI IMPOSTATI
		cc = 0						' imposto il contatore dei casi  cc = 0
		tme1 = 0						' totale-meno-estrazioni1 riferito alle estrazioni
		For es = EstrazioneFin - tes To 1 Step - 1 'legge le estrazioni dall'ultima - tes alla 1a , si ferma al n. casi richiesti e rileva il tme1
			a = Estratto(es,r1,p1) 			' definisco gli estratti da trovare
			b = Estratto(es - passo,r2,p2) 	' co
 
x rubino:
:D:Dcome volevasi dimostrare, per Kulo, caso o miracolo :D:D:
Codice: 
CASO SPIA  28.05.2011  8383  BA  68.10.20.22.51 | 51 - 51 | NA  85.50.79.10.51 -> Ambata |  51 - 56 | - caso escluso dall'elaborazione della verifica - 10 casi - 7 colpi.
****************************************************************************************************************************************************************
Riepilogo fissi e presenze Posizionali 5 + 5 
 Fisso    Coest    Ambata    1° R1    2° R1    3° R1    4° R1    5° R1    1° R2    2° R2    3° R2    4° R2    5° R2   01    1  2  1     1     02  2             03   1   1  1  1  1    1  1  1  04   1  1   1  1  1   1    1  05   2  1  1  1   2    1   2  06   1   2   1  1   1   2  1  07     2   1     1    08  1  1  2   3  1  1   1    1  09    1   1    1  1     10  1  1  1  1   1  1   2  2  1  1  11  1  1   1   1  1  2     1  12     1  1       1   13      1         14  1  1      1  1   1   1  15    1    3     1  1   16  1        2  1     17  3    1      1   1   18   1   2  2   1     1  1  19   1   1   3  1   2   1  1  20   2   1  1   2    1   2  21  1        1   1    22  1   1  1  1  2    2  2  1   23  1   1      1      24   3  1  1  1  1  3   1  1  3  3  25  1    2  1    1   1    26   1      1  1     1  27   1     1  1  1  1    1  28  2  1  2  1    1  1  1    1  29      2    3    1   30  1    2   1   1  2     31   2    1   2     2  2  32   1  1    1  1     1  1  33  1   2   1     3   2   34     1  1  1   2  1  2    35  1   1      3  1  1  1   36  1    1   1     1    37   1   1  1   1  1  1   2  1  38  2  1    2  1  1  1  1    1  39   1  1    1  1  1   1   1  40  1  1  1     1  1  1    1  41    1   1  1      1   42    2  1  5    1      43     1  1  1    1  2  2   44  2  2  2     2  1  1    2  45  2  1     1  1      1  46   1     1  1   1   1  1  47  2   2      1    1   48   1      1   1  1  1  1  49    1  1          50       1    1  3    51     1     1  1     52      1     2     53  1  1      1  2     1  54    1   1    1   1    55   2     1  2    3  1  2  56      2         57  1  1  1    1  1   1    1  58  1    1  2    1  1     59  1  1   1    1  2    1  1  60         1    1   61    2   2  2   1  1  1  1   62  2  2  2  1  1   2   2  2   2  63   1  2   1  1  1  2     1  64   1     1  1   1  1   1  65    1      1      66    1  1       2  3   67   1     1  1   1   1  1  68  1   1   1  1        69   1   1  1   1  1  1  2   1  70  1   2  1  1  3   1      71  1   1  2   1   1  1  1  1   72  1   1  1   1   1  2     73    2  1   2     1  1   74  1  1    1   1     1  1  75  1      4   2    2   76  2  1  1  1    1    1  1  1  77  2  1  1  1  2  1  1    2   1  78  1  1   4    1  1   1  2  1  79   1      1   3    1  80   1  2    1  1  1   1  2  1  81    1   1  1    1  1  1   82  1  1  1  1    1  1   1   1  83   1   1    1    1  1  1  84  1  1  1   1  2  1    2  1  1  85  1     1    1    2   86  2  1  1  2  1  1  1   3  3   1  87  1  1   1    1  1  1  1   1  88  1  1    1  1  1  1  1   1  1  89  1   1  1          90    1  2  2    2   2  2

com l'ambata 51 - 56 BA NA potevano abbinarsi il 3°R1+42 = 62 ,2°R1+78 = 88 e 4°R1+75 = 7 ... ambo secco 56-62.... sarà per la prossima volta

Ps: Per chi legge : Non è sempre domenica, non facciamoci illusioni.
però... tentar non nuoce.
 
Ciao Claudio
a noi interessa poco se "per Kulo,caso o miracolo":)
L'importante è andare alla cassa. VERO ? :D:D

Un saluto per il caro Fillotto,Keeper,Rubino,Angie e tutti gli altri.
:):):):)
 
vorrei sapere se nella tabella riepilogativa che ti ho postato con lo script i dati sono esatti, perchè mi pare di intravvedere che la tua disposizione invece ne calcola altri.

quindi oltre all'output che ritieni da modificare vorrei sapere cosa c'è dentro.

qui i dati sono giusti o è solo un esempio con delle colonne in più rispetto al precedente?</u>
out1m.jpg
[/URL]

Uploaded with ImageShack.us[/img]


dico questo perchè
in questa tua risposta,
mi pare che ci siano delle differenze

Codice: 
CASO SPIA  28.05.2011  8383  BA  68.10.20.22.51 | 51 - 51 | NA  85.50.79.10.51 -> Ambata |  51 - 56 | - caso escluso dall'elaborazione della verifica - 10 casi - 7 colpi.
****************************************************************************************************************************************************************
Riepilogo fissi e presenze Posizionali 5 + 5 
 Fisso    Coest    Ambata    1° R1    2° R1    3° R1    4° R1    5° R1    1° R2    2° R2    3° R2    4° R2    5° R2   01    1  2  1     1     02  2             03   1   1  1  1  1    1  1  1  04   1  1   1  1  1   1    1  05   2  1  1  1   2    1   2  06   1   2   1  1   1   2  1  07     2   1     1    08  1  1  2   3  1  1   1    1  09    1   1    1  1     10  1  1  1  1   1  1   2  2  1  1  11  1  1   1   1  1  2     1  12     1  1       1   13      1         14  1  1      1  1   1   1  15    1    3     1  1   16  1        2  1     17  3    1      1   1   18   1   2  2   1     1  1  19   1   1   3  1   2   1  1  20   2   1  1   2    1   2  21  1        1   1    22  1   1  1  1  2    2  2  1   23  1   1      1      24   3  1  1  1  1  3   1  1  3  3  25  1    2  1    1   1    26   1      1  1     1  27   1     1  1  1  1    1  28  2  1  2  1    1  1  1    1  29      2    3    1   30  1    2   1   1  2     31   2    1   2     2  2  32   1  1    1  1     1  1  33  1   2   1     3   2   34     1  1  1   2  1  2    35  1   1      3  1  1  1   36  1    1   1     1    37   1   1  1   1  1  1   2  1  38  2  1    2  1  1  1  1    1  39   1  1    1  1  1   1   1  40  1  1  1     1  1  1    1  41    1   1  1      1   42    2  1  5    1      43     1  1  1    1  2  2   44  2  2  2     2  1  1    2  45  2  1     1  1      1  46   1     1  1   1   1  1  47  2   2      1    1   48   1      1   1  1  1  1  49    1  1          50       1    1  3    51     1     1  1     52      1     2     53  1  1      1  2     1  54    1   1    1   1    55   2     1  2    3  1  2  56      2         57  1  1  1    1  1   1    1  58  1    1  2    1  1     59  1  1   1    1  2    1  1  60         1    1   61    2   2  2   1  1  1  1   62  2  2  2  1  1   2   2  2   2  63   1  2   1  1  1  2     1  64   1     1  1   1  1   1  65    1      1      66    1  1       2  3   67   1     1  1   1   1  1  68  1   1   1  1        69   1   1  1   1  1  1  2   1  70  1   2  1  1  3   1      71  1   1  2   1   1  1  1  1   72  1   1  1   1   1  2     73    2  1   2     1  1   74  1  1    1   1     1  1  75  1      4   2    2   76  2  1  1  1    1    1  1  1  77  2  1  1  1  2  1  1    2   1  78  1  1   4    1  1   1  2  1  79   1      1   3    1  80   1  2    1  1  1   1  2  1  81    1   1  1    1  1  1   82  1  1  1  1    1  1   1   1  83   1   1    1    1  1  1  84  1  1  1   1  2  1    2  1  1  85  1     1    1    2   86  2  1  1  2  1  1  1   3  3   1  87  1  1   1    1  1  1  1   1  88  1  1    1  1  1  1  1   1  1  89  1   1  1          90    1  2  2    2   2  2   



com l'ambata 51 - 56 BA NA potevano abbinarsi il 3°R1+42 = 62 ,2°R1+78 = 88 e 4°R1+75 = 7 ... ambo secco 56-62.... sarà per la prossima volta



ultimo domanda:
ma come ci arrivi a selezionare il 3°R1+42 * 2°R1+78 * 4°R1+75

sarò duro di comprendonio, ma non capisco cosa hanno queste posizioni meglio di altre.
a meno che, è perchè il mio output è sbagliato e tu ci arrivi tramite il
 
Ho appena terminato di visionare lo script per ambata su coppia di estratti di cui 1 capogioco che mi avevi indicato ed ho trovato che
alla data di ieri, ultima estrazione esclusa, la formazione 56-62 su Na (capogioco 56) aveva un valore di n.Estrazioni t.di
Attesa = 0,602200000000003, valore positivo ed inferiore ad 1.
Ti chiedo quini se è una casualità o se può essere un indice da tenere in considerazione ?

Ho letto il tuo ultimo e mi accingo a verificare nella tabella riepilogativa se i dati sono esatti.

Ciao
 
quote:Originally posted by rubino

vorrei sapere se nella tabella riepilogativa che ti ho postato con lo script i dati sono esatti - se ti riferisci a
questa che segue, non la considerare proprio perchè ha dei dati non ben visionabili(che non ho capito cosa siano e quindi neanche
controllato),
Codice: 
Coestratti   ---- F  i  s  s  i   
Co 01 | 02 | 03 | 04 | 05 | 06 | 07 | 08 | 09 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 
01 00 | 00 | 00 | 01 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 01 | 00 | 01 | 01 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 
02 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 02 | 00 | 00 | 00 | 01 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 
03 00 | 00 | 00 | 00 | 01 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 00 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 01 | 01 | 00 | 02 | 01 | 01 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 
04 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 
05 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 
....
....
....
89 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 
90 02 | 00 | 00 | 01 | 01 | 03 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 01 | 00 | 00 | 00 | 00 | 02 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 00 | 01 | 02 | 00 | 00 | 00 | 01 | 00 | 00 | 00 | 02 | 00 | 01 | 01 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 | 00 |
Clicca per espandere...
 
ciao claudio

ho cercato di girare in orizzontale la tabella, ma non sono riuscito, probabilmente bisognerebbe chiedere a luigi, se può impostare per i comandi relativi alla creazione delle tabelle

atitoli,avalori

la direzionalità

verticale - orizzontale.


comunque modificando per il momento lo script con semplice scrivi righe
sono riuscito ad ottenere questo output, che però se scorri sulla dx
vedi che mancano alcuni dati allineati sotto le relative 90 posizioni


nelle arrays ambata-coestr-fissi etc. non tutte le posizioni sono piene di valori, pertanto probabilmente quando si va a scrivere rimandano sulla sx.



Codice: 
Riepilogo fissi e presenze Posizionali 5 + 5 
 Fisso =   01  02  03  04  05  06  07  08  09  10  11  12  13  14  15  16  17  18  19  20  21  22  23  24  25  26  27  28  29  30  31  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50  51  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68  69  70  71  72  73  74  75  76  77  78  79  80  81  82  83  84  85  86  87  88  89  90
 Coestr=   02  01  01  01  03  02  02  02  03    01  01  01  01  01      02  01  01  02  02  01    01  02  01  01  01  01  03        02  01  01  02  02      01  03  02    04  01  03  01  02  01  01  01      01  04    01  01  02    02  01  02    01  01    01  02  01  02  02      01  01  02  01  01  03          02  01  01  04
 Ambata=   02  01  01  01  02  01      03  03    04      01    02  01  01  04  02        01    01  01  03  02  01  02    01  01  01    01  02  01  02  01  02  01    02    02  02    02  01  01    01    02  01  03  01  02    02  02  01    02    01  03  02  03  04  02    01    02  01  02  01  01  01    01  01    03  01  
 1°e R1=   03  02  01    01  03  01    01  01  01  01    01    01  03  01  01  01  02  02  01  01    01  01  01  01    01  02    01    01  02  01  02  01  03  03    02      02    03  01  02  01  01  02  01  01  03  03        01  02  01  01  02  01  01      02  02    03  04    03  01  01    02  01      03  01  02  02  01  01
 2°e R1=     01  05  01  01    01    04  03  02  02    03  01    02  01  04  01    01    02  01  03  02  03  02  02    02      01    01  01  01  01  03  01    01  01  02  02  02  01    01  04    01    01  02    03  01  01  02      01  02  01    01  01      01  01  01  02  03  02  02        03  01  01    01      02
 3°e R1=   01  02    02  02  01  03  05    01  02    03  01  01  01    04    01    01    01  01  02  01  01  02  02    01      02        01  03    02    01  02    01  02    02  02  01      01  01  02  03  03  01  01    02  02    03  02    01  01  01  01  03  01  02    01  02    02  02  02  03    01    01  01  02  01
 4°e R1=   02    01  03  01        02    02  02    01  01  02  01    02    01  02  01  03  03  02  01  02  01  02    01    02  01  01  02      03  01  02  01  01  03  02  01    01  02  01  03  02  03  03        03    01  01  02    01  01    02  03  02  01  02  01    02  02  01  01    02  01  01  02    02  01      01  
 5°e R1=   04    04      01    02    01  01  02  02      02        01  01  01  01  01  01  04  01    04  01  01  01  01  01    04  03  01  02  02  01  01            01  01  02  03    01  01  01  02  05  02  02  02  01  02  01    01  01  02  02  01  01  01  01  01  01  01  02  01  01  02  01  01        02  01  02  01  02  01
 1°e R2=   02      01  01  03  01  01  01    01  02  01  02    01  01    01  01    01  03  01  03  02  02  01    02  03        02  01  01  01    01  03    02  02  03  02  02  01  05    01    01  02  04  01  01        01  01    01  03  03  02  02    01  02  01    02  01    02  01    02  01    02  01    01  02  02    02
 2°e R2=   01    01    01  01    03  01  01      01  01  01  01    01  01  01  01  01  02  01  01  03  01    03  01  04  01  02  01  02  02  02  02  03    02  01  01  02    01    02  03  01  02    02  01  02  01  02    02  02      01  01  02  01    01    03  01      02    05    01  03  01  01      01  02  02  02    02  02
 3°e R2=   01  03        02  01  01  02  01  01    01  02    02  03  01  01    01  03  01  01  01  01      01  01    01
 
Grazie Rubino ma è quasi illegibile, senza allineamento non va bene,

aspettiamo Luigi, nel frattempo mi faccio delle verifiche paer capire quali possono essere i migliori fissi x gli abbin.

Non so se Hai visto l'ambata miracolo di BA Na 51-56, poteva essere abbinata al tuo probabile max 7 colpi dovrebbe dare esito di ambata

15 60 napoli x estratto
inoltre ho notato anche dal tuo script (vedi mio post sopra Posted - 01/06/2011 : 10:35:03) la cosa del 62, cosa ne pensi, semplice coincidenza.
Hai provato questo script con la previsione 5°BA e 5°NA ? che ne pensi?
 
X Rubino

Ti inserisco l'ultima versione dello script con alcuni aggiornamenti sulle tabelle riepilogo che insieme al valore di presenza, scrive il
numero somma ( che se si riesce a fare la rotazione occorre elminare x problemi di spazio sul video) inoltre ho attivato l'inputbox "Vuoi in elenco-output i dettagli dei casi ?" per vedere o no i fissi nel dettaglio per
tutti i casi, ci sono delle parti remmate che a fine lavoro dovranno essere eliminate, i titoli li ho trasformati nei valori effettivi.
Per quanto riguarda la rotazione della tabella, ho provato a seguire l'esempio di Luigi, ma non ho ancora risolto. La if per evidenziare
i valori min deve rimanere inalterata.
Aspetto una tua, grazie .. ci risentiamo domani pomeriggio, ciao.

Codice: 
Sub Main()
	ReDim Coestr(90)
	ReDim FissiA(90)
	ReDim Fissi01(90)
	ReDim Fissi02(90)
	ReDim Fissi03(90)
	ReDim Fissi04(90)
	ReDim Fissi05(90)
	ReDim Fissi06(90)
	ReDim Fissi07(90)
	ReDim Fissi08(90)
	ReDim Fissi09(90)
	ReDim Fissi10(90)
	Dim rut(10),rutt(10),ru(10),rru(10)
	Dim clp,tes,a,b,cs_el,ambata,ambatanew,casi
	Verif = 1 'CInt(InputBox("Quante volte vuoi verifiche gli esiti ?","Verifiche",1))
	casi = CInt(InputBox("Quanti casi vuoi ogni verifica ?","Casi di verifica",15))
	testo = InputBox("Vuoi in elenco-output i dettagli dei casi ? ( 1=Si   0=No )","Elenco Casi",0)
	tes = 0	'CInt(InputBox("Totale estr. da fine arch. a inizio spia caso ?" & Chr(13) & _
	'Chr(13) & "( considerare entrambe comprese per escludere il nuovo caso )","SOLO per ANALISI",1))			'<-----estrazioni da togliere
	'	'la riga sopra serve per staccare l'analisi dall'ultima estrazione in archivio, potremo così vedere
	'	'nelle estrazioni che decidiamo di mettere nell'inputbox (valore tes), quali numeri sono già sortiti...
	'	-------------------------------------------------------------------------------------------------
	r1 = CInt(InputBox("Ruota di sortita 1^ spia " & Chr(13) & Chr(13) & "( 1 Ba.   2 Ca.   3 Fi.     4 Ge. )" & Chr(13) & _
	"( 5 Mi.    6 Na.  7 Pa.    8 Ro. )" & Chr(13) & "( 9 To. 10 Ve. 11 TT. 12 Naz.)","1^ RUOTA - SPIA 1",1)) '						'<-----Ruota1
	p1 = CInt(InputBox("Posizione estratto ruota di   " & FormatSpace(NomeRuota(r1),7,- 1) & Chr(13) & Chr(13) & "(1.2.3.4.5)","POSIZ. 1^ SPIA",2))'  '<-----Posiz1
	r2 = CInt(InputBox("Ruota di sortita 2^ spia " & Chr(13) & Chr(13) & "( 1 Ba.   2 Ca.   3 Fi.     4 Ge. )" & Chr(13) & _
	"( 5 Mi.    6 Na.  7 Pa.    8 Ro. )" & Chr(13) & "( 9 To. 10 Ve. 11 TT. 12 Naz.)","2^ RUOTA - SPIA 2",2))'						'<-----Ruota2
	p2 = CInt(InputBox("Posizione estratto ruota di   " & FormatSpace(NomeRuota(r2),7,- 1) & Chr(13) & Chr(13) & "(1.2.3.4.5)","POSIZ. 2^ SPIA",3))'	'<-----Posiz1
	passo = CInt(InputBox("Distanza negativa tra estrazioni di rilevamento spie.","DISTANZA ESTRAZIONI ",1))
	clp = CInt(InputBox("Numero colpi di gioco","COLPI di GIOCO",10))	 ' 10 <--COLPI 'provato = 10, ha dato max-pres 4 il 57-46-90 centrando l'ambo 38 46
	prec = 2 	'CInt(InputBox("Numero colpi precedenti la Spia x verifica presenza ambata ?.","Presenza di ambata",2))
	'
	For cs_el = 1 To verif 	' questo  "For"  serve per ripetere le verifiche del Metodo che si sta Costruendo
		ReDim mt(4005,4),n(2),n1(2),nn(2),mt1(90,3),mt2(4005,4),nn2(2),mt3(90,3),nn3(2),mt4(90,3)
		ReDim mtt(4005,4)
		cs1 = casi + cs_el ' Casi richiesti + casi elencati
		ru(1) = r1 'CInt(InputBox("RUOTE DI RICERCA DEI + FREQ. ","1° RUOTA",r1))
		ru(2) = r2 'CInt(InputBox("RUOTE DI RICERCA DEI + FREQ. ","2° RUOTA",r2))
		rut(1) = r1 	'eval(CInt(InputBox(" RUOTA SINGOLA X FREQ. ","1° RUOTA",r1))) frequenti sulle ruote di esito
		rutt(1) = r2	'eval(CInt(InputBox(" RUOTA SINGOLA X FREQ. ","2° RUOTA",r2))) frequenti sulle ruote di esito
		rru(1) = 11 'freq a tutte
		'	 					'BLOCCO FOR x DETERMINARE L'INIZIO ESTRAZIONI SULLA BASE DEI CASI IMPOSTATI
		cc = 0						' imposto il contatore dei casi  cc = 0
		tme1 = 0						' totale-meno-estrazioni1 riferito alle estrazioni
		For es = EstrazioneFin - tes To 1 Step - 1 'legge le estrazioni dall'ultima - tes
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 14 gennaio 2025
    Bari
    41
    25
    12
    73
    55
    Cagliari
    54
    20
    48
    32
    67
    Firenze
    75
    23
    68
    10
    38
    Genova
    33
    27
    81
    70
    64
    Milano
    68
    01
    64
    86
    87
    Napoli
    47
    75
    45
    10
    21
    Palermo
    55
    86
    33
    53
    70
    Roma
    88
    78
    61
    06
    07
    Torino
    76
    08
    23
    61
    82
    Venezia
    25
    15
    49
    21
    81
    Nazionale
    70
    10
    32
    78
    07
    Estrazione Simbolotto
    Bari
    07
    14
    28
    45
    31
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto