Novità

Rrichiesta, script, figure, 5 estratti. Grazie!

  • Creatore Discussione Creatore Discussione irepi
  • Data di inizio Data di inizio

irepi

Junior Member
Chiedo cortesemente se e possibile 1 script che trasformi i 5 estratti in figure su 1 e piu ruote, oppure uno script su 2 ruote sempre che trasformi gli estratti in figure e li unisca.
Esempio bari estratti 51 21 68 46 81 figure 6 3 5 1 9
cagliari estratti 47 84 6 51 1 figure 2 3 6 6 1
unire 62 33 56 16 1 (? e' giusto mettere 1 oppure in questo caso unito sarebbe 91, quale devo considerare?)
 
Nessuno che mi possa aiutare?? ho cercato su Lottoced ma non ho trovato, io purtroppo non sono capace, so solo fare piccole variazioni.
 
Ciao,

normalmente quelli ... oltre il 90 passano per "Fuori" ... ho adottato, l' "Uno", come dal tuo esempio.

E' una bozza ... ma dovrebbe fare quanto avevi richiesto.

Codice:
'Per Irepi By Joe
Sub Main
	Ini = EstrazioneFin : Fin = EstrazioneFin
	For Es = Ini To Fin
	Scrivi DataEstrazione (Es),1
		For Ra = 1 To 9
			For Rb = Ra + 1 To 10
				Scrivi SiglaRuota(Ra) & "-" & SiglaRuota(Rb) & " ",1,0
				For P = 1 To 5
					Fa = Figura(Estratto(Es,Ra,P)) : Fb = Figura(Estratto(Es,Rb,P)) : Nn = Fa & Fb
					Scrivi Format2(Fuori90(Nn)) & " ",0,0
				Next : Scrivi 	
			Next
		Next
		
	Next	
End Sub

:) Buona serata a tutte/i.
 
Grazie Joe91, sei stato gentilissimo, se non chiedo troppo e' possibile fare la variazione per avere le previsioni e la statistica?:mad:
 
Ciao,

prova così:

Codice:
'Due Figure = Un Numero.  Per Irepi By Joe V.1.0 del 10/04/2014.
Sub Main
	Dim Nu(5),Ru(2),Rt(1),Po(5),Pt(5),Co : Rt(1) = 11: Co = 13
	Po(2) = 0.6 : Po(3) = 0.2 : Po(4) = 0.1 : Po(5) = 0.1
	Pt(3) = 0.8 : Pt(4) = 0.1 : Pt(5) = 0.1
	Ini = EstrazioneFin - 155 : Fin = EstrazioneFin
	IM = 13 : IM = CInt(InputBox("Es:" & IM & "° Estrazione","ESTRAZIONE (Mensile) CALCOLO  PRONOSTICO",IM))
	For Es = Ini To Fin : AvanzamentoElab Ini,Fin,Es
		If IndiceMensile(Es) = IM Then
			Scrivi DataEstrazione(Es),1
			J = 0 ' Azzera contatore giocate
			For Ra = 1 To 9 : Ru(1) = Ra
				For Rb = Ra + 1 To 10 : Ru(2) = Rb
					For P = 1 To 5
						Fa = Figura(Estratto(Es,Ra,P)) : Fb = Figura(Estratto(Es,Rb,P)) : Nn = Fa & Fb
						Nu(P) = Fuori90(Nn)
					Next
					J = J + 1 : ImpostaGiocata J,Nu,Ru,Po,Co,2
					'J = J + 1 : ImpostaGiocata J,Nu,Rt,Pt,Co,3 'Tutte
				Next
			Next
			Gioca Es,True
			Scrivi String(110,"="),1
		End If
	Next
	ScriviResoconto
End Sub

:) Buona Giornata.
 
:)Grazie!!! Gli esiti sembrano buoni, ma i numeri sono troppi e.........i soldi sono pochi per poterli giocare tutti. Ancora grazie per la tua disponibilita', buona giornata anche a te.
 
Buonasera Joe91, scusami se approfitto della tua pazienza, chiedo un'altra cortesia...anzie due, e' possibile modifice lo script con input box per la scelta delle ruote per la somma delle figure e quella di gioco?
Sempre se e' possibile, altrimenti ti ringrazio lo stesso per tutto quello che fai.
Ho provato ma purtroppo nn sono capace anche se seguo le tue lezioni, ma non abbastanza visto i risultati......forse un giorno riusciro anch io.
Grazie!
 
Ultima modifica:
Ciao & Buona Serata a tutte/i.

Dovrebbe essee qualcosa di simile:

Codice:
'Due Figure = Un Numero.  Per Irepi By Joe V.2.0 del 14/04/2014.
Sub Main
	Dim Nu(5),Ru(1),Rt(1),Po(5),Pt(5),Co : Rt(1) = 11: Co = 13
	Po(2) = 0.6 : Po(3) = 0.2 : Po(4) = 0.1 : Po(5) = 0.1
	Pt(3) = 0.8 : Pt(4) = 0.1 : Pt(5) = 0.1
	Ra  = InputBox ("Es: 1 = Bari","Prima Ruota",1) 
	Rb  = InputBox ("Es: 2 = Cagliari","Seconda Ruota",2)
	Ru(1) = InputBox ("Es: 12 = Nazionale","Ruota di Gioco",12)
	Ini = EstrazioneFin - 155 : Fin = EstrazioneFin
	IM = 13 : IM = CInt(InputBox("Es:" & IM & "° Estrazione","ESTRAZIONE (Mensile) CALCOLO  PRONOSTICO",IM))
	For Es = Ini To Fin : AvanzamentoElab Ini,Fin,Es
		If IndiceMensile(Es) = IM Then
			Scrivi DataEstrazione(Es),1
			J = 0 ' Azzera contatore giocate
					For P = 1 To 5
						Fa = Figura(Estratto(Es,Ra,P)) : Fb = Figura(Estratto(Es,Rb,P)) : Nn = Fa & Fb
						Nu(P) = Fuori90(Nn)
					Next
					J = J + 1 : ImpostaGiocata J,Nu,Ru,Po,Co,2
					'J = J + 1 : ImpostaGiocata J,Nu,Rt,Pt,Co,3 'Tutte			
			Gioca Es,True
			Scrivi String(110,"="),1
		End If
	Next
	ScriviResoconto
End Sub

:)
 
Ultima modifica:
Ciao.

Ho corretto un piccolo errore nel box per la seconda ruota.

Mentre mi permetto di evidenziare che inserendo 11

come ruota di gioco, otiiene la ricerca "a tutte".


Buona giornata.

:)
 
Grazie Joe91. Volevo correggerlo ma nn sapevo come fare.
Ho provato a fare una variazione (o un pasticcio???). Volevo impostare le figure in diagonale es. BA 27 CA 54 diventano 24 e 57 vorrei inserire anche i vertibili ma nn so come fare. Allego lo script con la variazione
Buona giornata:)

HTML:
'Due Figure = Un Numero.  Per Irepi By Joe V.2.0 del 14/04/2014.
Sub Main
	Dim Nu(5),Nu1(5),Ru(1),Rt(1),Po(5),Pt(5),Co : Rt(1) = 11: Co = 13
	Po(2) = 0.6 : Po(3) = 0.2 : Po(4) = 0.1 : Po(5) = 0.1
	Pt(3) = 0.8 : Pt(4) = 0.1 : Pt(5) = 0.1
	Ra  = InputBox ("Es: 1 = Bari","Prima Ruota",1) 
	Rb  = InputBox ("Es: 2 = Cagliari","Seconda Ruota",2)
	Ru(1) = InputBox ("Es: 12 = Nazionale","Ruota di Gioco",12)
	Ini = EstrazioneFin - 155 : Fin = EstrazioneFin
	IM = 13 : IM = CInt(InputBox("Es:" & IM & "° Estrazione","ESTRAZIONE (Mensile) CALCOLO  PRONOSTICO",IM))
	For Es = Ini To Fin : AvanzamentoElab Ini,Fin,Es
		If IndiceMensile(Es) = IM Then
			Scrivi DataEstrazione(Es),1
			J = 0 ' Azzera contatore giocate
					For P = 1 To 5
						Fa = Figura(Estratto(Es,Ra,P)) : Fb = Figura(Estratto(Es,Rb,P)) : Nn = Fa & Fb
						Nu(P) = Fuori90(Nn)
						Fa = Figura(Estratto(Es,Ra,P)) : ab = Figura(Estratto(Es,Rb,P)) : Nn = Ff & ab  '<<<variazione
						Nu1(P) = Fuori90(Nn)

					Next
					J = J + 1 : ImpostaGiocata J,Nu,Ru,Po,Co,2
					J = J + 1 : ImpostaGiocata J,Nu1,Ru,Po,Co,2

					'J = J + 1 : ImpostaGiocata J,Nu,Rt,Pt,Co,3 'Tutte			
			Gioca Es,True
			Scrivi String(110,"="),1
		End If
	Next
	ScriviResoconto
End Sub
 
Ciao.

Per la seconda richiesta non c'è problema. Ma non so a quale scritpt si riferisce.

Mentre, per quella al messaggio #11, penso che la parte "unitaria" dell' Estratto, a cui accenni,

lottologicamente (e in script), dovrebbe essere la Cadenza.

Ma, dividendo ogni estratto nella sua Cadenza e nella sua Figura per poi unire le cifre ... di fatto, li "raddoppi".

Quindi i 5 numeri, diventano 10 e lo script "deve" essere reimpostato.

Prima, però, dovresti stabilire quale script e come considerare tutto ciò.

In pratica .... non ho capito "cosa" mi hai chiesto.

:)
 
Ciao Jole91, Volevo correggerlo ma nn sapevo come fare e' riferito a quanto da te scritto nel msg 10:
Ho corretto un piccolo errore nel box per la seconda ruota.
Ho provato a fare una variazione (o un pasticcio???). Volevo impostare le figure in diagonale es. BA 27 CA 54 diventano 24 e 57 vorrei inserire anche i vertibili ma nn so come fare.... e' riferito alla variazione fatta da me all'ultimo script cioe' questa:
Fa = Figura(Estratto(Es,Ra,P)) : ab = Figura(Estratto(Es,Rb,P)) : Nn = Ff & ab '<<<variazione nello script inserita da me
Nu1(P) = Fuori90(Nn)
Scusami ma, nn sono esperta......ne' lottologicamente.... ne' con gli script....cosa significa: " la parte "unitaria" dell' Estratto"?
Grazie. Buona serata
 
Ultima modifica:
ottimo ,si potrebbe inserire quando sviluppa il metodo anche le ruote immesse la ruota DI GIOCO E L'ESTRAZIONE 1°,2° 13° ECC... GRAZIE.Con un po di pazienza rende bene....
 
Penso di aver capito "la parte unitaria" e riferito a unita' = cadenza.
Buona giornata
:)

Ciao Irepi ...

Si, esatto.

Se si dimentica per un attimo la lottologia, pertanto ... le ruote, i numeri sono: 27 e 54

2 decine e 7 unità il primo.

5 decine e 4 unità il secondo.

2 / 7 / 5 / 4 ... sono essi stessi "4 numeri". Meglio sarebbe dire "Cifre".

Fossero "Figure & Cadenze" (Lottologiche) anzicchè "Decine & Unita" (Matematiche) ...

sarebbero "diversi" nella sostanza, ma ... sempre "4 Cifre" nella quantità.

Componendole a coppie si ricavano 6 numeri giocabili ... in qualche modo.

Sono: 27 / 25 / 24 / 75 / 74 / 54.

In lottologia ... 6 Numeri per Estratto ... sono ormai, una lunghetta per le sorti superiori.

Moltiplicabili per 2,3, ... o più ruote (adiacenti, gemelle, diametrali, complementari ... ).

Se fossero una sestina "per Ambo", sarebbero praticamente ingiocabili "a Tutte".

Come pure 6 numeri per Estratto, a Ruota, sono perdenti, anche se estratti,

senza una progressione costosissima, già dopo il primo colpo di gioco.

E' certo che continuando a "moltiplicarli", ad esempio aggiungendo i Vertibili, o testandoli in più ruote,

i risultati che si otterranno "aumentano", secondo statistica.

E' matematicamente certo che quando saranno 90 numeri , si indovineranno SEMPRE

5 ESTRATTI, 10 AMBI .... 10 TERNI ... 5 QUATERNE ... UNA CINQUINA .... tutti i colpi, in ogni ruota.

Contestualmente, però, aumenta la spesa necessaria per sostenere la giocata.

In sintesi "il metodo" rende ... come tutti i metodi di questo tipo ... "Rende".

E' sempre possibile trovare risultati, tra le innumerevoli proposte di esso.

Ma questo, è a scapito della spesa che non è mai, praticamente, sostenibile.

"Grande" da un lato. Che dissipa tutto l'utile, nei risultati sicuramente perdenti, dall'altro.

Secondo le regole del gioco e di come ... troppo poco ... vengono pagate le vincite.

Quindi, questi metodi (non me ne vogliano) sono quelli tipici dei ciarlatani ... si aggiunge ... e si dimostra che ...

Sono fumo negli occhi, calcoli, spesso "difficili" da capire, fare, gestire ... risultati, di tanto in tanto.

Rendiconti sempre perdenti, se considerati, con il minimo di tempo perchè ciò accada.

"Guadagni", per loro, che li vendono, o spacciano, in qualche modo ... per vincenti.

Ai tapini malcapitati, rimane "il costo" per il medodo, "l'onere" del calcolo e/o per avere "i numeri" ...

... "la spesa, in ricevitoria" ... e l'avere, l'amara sorpresa.

Quando sarà, purtroppo tardi, e l'esito del gioco, una realtà ormai incontrovertibile dal nome: "Rimetterci".

Terminata la doverosa (ed a me, per primo) assai sgradita premessa ...

Si, ti posso aiutare ed è giusto ... provarci.

Bisogna sempre verificare se qualcosa, di interessante lo si può ricavare ... nonostante tutto.

Ma se mi consenti, quello che è difficile ... veramente difficile, (se non impossibile)

è trovare pochi numeri ... in poche ruote ... che in pochi colpi diano qualche risultato.

:) ... Con le scuse per il ritardo nella risposta.
 
Propongo dunque un abbattimento ... drastico.

Se è vero che 2 per 1 è uguale a 1 per 2 ... cioè 2, in matematica,

in Lottologia, se si prendono "2 Estrazioni" in una ruota ... alla fine, si ha una sola ruota.

Cosicchè in 2 Estrazioni ed in una Ruota, abbiamo 10 Estratti da cui si ricavano 10 Figure e 10 Cadenze.

Proporrei di provare a ricavare "il poronostico" quando, in due estrazioni,

si ricavano (in scompenso) una sola Figura ed una sola Cadenza, da comporre in un Unico Estratto, a Ruota,

secondo questa tavola:

Codice:
01 F1 + C1 => 11
02 F2 + C2 => 22
03 F3 + C3 => 33
04 F4 + C4 => 44
05 F5 + C5 => 55
06 F6 + C6 => 66
07 F7 + C7 => 77
08 F8 + C8 => 88
09 F9 + C9 => 09
10 F1 + C0 => 10
11 F2 + C1 => 21
12 F3 + C2 => 32
13 F4 + C3 => 43
14 F5 + C4 => 54
15 F6 + C5 => 65
16 F7 + C6 => 76
17 F8 + C7 => 87
18 F9 + C8 => 08
19 F1 + C9 => 19
20 F2 + C0 => 20
21 F3 + C1 => 31
22 F4 + C2 => 42
23 F5 + C3 => 53
24 F6 + C4 => 64
25 F7 + C5 => 75
26 F8 + C6 => 86
27 F9 + C7 => 07
28 F1 + C8 => 18
29 F2 + C9 => 29
30 F3 + C0 => 30
31 F4 + C1 => 41
32 F5 + C2 => 52
33 F6 + C3 => 63
34 F7 + C4 => 74
35 F8 + C5 => 85
36 F9 + C6 => 06
37 F1 + C7 => 17
38 F2 + C8 => 28
39 F3 + C9 => 39
40 F4 + C0 => 40
41 F5 + C1 => 51
42 F6 + C2 => 62
43 F7 + C3 => 73
44 F8 + C4 => 84
45 F9 + C5 => 05
46 F1 + C6 => 16
47 F2 + C7 => 27
48 F3 + C8 => 38
49 F4 + C9 => 49
50 F5 + C0 => 50
51 F6 + C1 => 61
52 F7 + C2 => 72
53 F8 + C3 => 83
54 F9 + C4 => 04
55 F1 + C5 => 15
56 F2 + C6 => 26
57 F3 + C7 => 37
58 F4 + C8 => 48
59 F5 + C9 => 59
60 F6 + C0 => 60
61 F7 + C1 => 71
62 F8 + C2 => 82
63 F9 + C3 => 03
64 F1 + C4 => 14
65 F2 + C5 => 25
66 F3 + C6 => 36
67 F4 + C7 => 47
68 F5 + C8 => 58
69 F6 + C9 => 69
70 F7 + C0 => 70
71 F8 + C1 => 81
72 F9 + C2 => 02
73 F1 + C3 => 13
74 F2 + C4 => 24
75 F3 + C5 => 35
76 F4 + C6 => 46
77 F5 + C7 => 57
78 F6 + C8 => 68
79 F7 + C9 => 79
80 F8 + C0 => 80
81 F9 + C1 => 01
82 F1 + C2 => 12
83 F2 + C3 => 23
84 F3 + C4 => 34
85 F4 + C5 => 45
86 F5 + C6 => 56
87 F6 + C7 => 67
88 F7 + C8 => 78
89 F8 + C9 => 89
90 F9 + C0 => 90

:)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 17 luglio 2025
    Bari
    22
    33
    04
    68
    47
    Cagliari
    09
    52
    27
    21
    47
    Firenze
    05
    33
    72
    17
    08
    Genova
    76
    67
    65
    68
    45
    Milano
    75
    52
    46
    34
    22
    Napoli
    40
    23
    71
    12
    22
    Palermo
    44
    89
    39
    01
    31
    Roma
    89
    04
    05
    82
    26
    Torino
    05
    59
    85
    88
    24
    Venezia
    69
    45
    75
    44
    30
    Nazionale
    28
    85
    16
    03
    83
    Estrazione Simbolotto
    Nazionale
    39
    26
    40
    23
    24

Ultimi Messaggi

Indietro
Alto