Novità

ci proviamo insieme?

6^ estrazione del mese a napoli

1° genova meno 1° palermo + 24
4° milano meno 5° torino + 89
4° palermo meno 1° roma + 1
5° bari meno 1° firenze + 31
1° genova meno 4° napoli + 30
4° napoli meno 4° palermo + 74

con carta e penna
esiti

14.01.2014 30 32 16 90 7 87 1° colpo ambo 16 87
13.02.2014 57 34 44 3 30 1° colpo ambo (previsione di 5 numeri in quanto uno era ripetuto)
13.03.2014 37 5 38 19 49 64 2° colpo quaterna 5 37 38 49
12.04.2014 75 39 14 2 36 71 sembra negativa
 
Codice:
Sub Main()
	Dim n(6),Ruote(12),Poste(4)
	'Poste(1) = 3
	Poste(2) = 3
	Poste(3) = 1
	Poste(4) = 0.5
	'Ruote(1) = 1
	'Ruote(2) = 2
	'Ruote(3) = 3
	'Ruote(4) = 4
	'Ruote(5) = 5
	Ruote(6) = 6
	'Ruote(7) = 7
	'Ruote(8) = 8
	'Ruote(9) = 9
	'Ruote(10) = 10
	'Ruote(12) = 12
	For es = EstrazioneFin - 200 To EstrazioneFin
		If IndiceMensile(es) = 6 Then
			K = K + 1 : Scrivi String(105,"=") & " " & K,1
			n(1) = Fuori90((Estratto(Es,4,1) - Estratto(Es,7,1)) + 24) 
			n(2) = Fuori90((Estratto(Es,5,4) - Estratto(Es,9,5)) + 89)
			n(3) = Fuori90(Estratto(Es,7,4) - Estratto(Es,8,1) + 1)
			n(4) = Fuori90(Estratto(Es,1,5) - Estratto(Es,3,1) + 31)
			n(5) = Fuori90(Estratto(Es,4,1) - Estratto(Es,6,4) + 30)
			n(6) = Fuori90(Estratto(Es,6,4) - Estratto(Es,7,4) + 74)
			ImpostaGiocata 1,n,Ruote,Poste,13
			Gioca Es,1
		End If
	Next
	ScriviResoconto
End Sub

Meglio Venezia o Palermo
 
Codice:
Sub Main()
	Dim n(6),Ruote(12),Poste(4)
	'Poste(1) = 3
	Poste(2) = 3
	Poste(3) = 1
	Poste(4) = 0.5
	'Ruote(1) = 1
	'Ruote(2) = 2
	'Ruote(3) = 3
	'Ruote(4) = 4
	'Ruote(5) = 5
	Ruote(6) = 6
	'Ruote(7) = 7
	'Ruote(8) = 8
	'Ruote(9) = 9
	'Ruote(10) = 10
	'Ruote(12) = 12
	For es = EstrazioneFin - 200 To EstrazioneFin
		If IndiceMensile(es) = 6 Then
			K = K + 1 : Scrivi String(105,"=") & " " & K,1
			n(1) = Fuori90((Estratto(Es,4,1) - Estratto(Es,7,1)) + 24) 
			n(2) = Fuori90((Estratto(Es,5,4) - Estratto(Es,9,5)) + 89)
			n(3) = Fuori90(Estratto(Es,7,4) - Estratto(Es,8,1) + 1)
			n(4) = Fuori90(Estratto(Es,1,5) - Estratto(Es,3,1) + 31)
			n(5) = Fuori90(Estratto(Es,4,1) - Estratto(Es,6,4) + 30)
			n(6) = Fuori90(Estratto(Es,6,4) - Estratto(Es,7,4) + 74)
			ImpostaGiocata 1,n,Ruote,Poste,13
			Gioca Es,1
		End If
	Next
	ScriviResoconto
End Sub

Meglio Venezia o Palermo

Sicuramente non ho ben spiegato il metodo e me ne scuso

dal tuo script (tra l'altro molte grazie) risulta
Estrazione generatrice del pronostico 08820 [ 31 - 13/03/2014]
G 0001 Numeri in gioco : 11.83.54.11.16.46 su NA per Ambo,Terno,Quaterna
Interrotta per raggiunta durata

Facendo conti carta e penna mi trovo una quaterna
13.03.2014 37 5 38 19 49 64 2° colpo quaterna 5 37 38 49

voglio precisare che eseguo le sottrazioni dal numero più grande al più grande al numero più piccolo
esempio 13.03.2014 1° genova (67) meno 1° palermo (80) + 24

80 meno 67 + 24 = 37 primo numero della sestina
e così a seguire
grazie
 
Codice:
Sub Main()
	Dim n(6),Ruote(12),Poste(4)
	'Poste(1) = 3
	Poste(2) = 3
	Poste(3) = 1
	Poste(4) = 0.5
	'Ruote(1) = 1
	'Ruote(2) = 2
	'Ruote(3) = 3
	'Ruote(4) = 4
	'Ruote(5) = 5
	Ruote(6) = 6
	'Ruote(7) = 7
	'Ruote(8) = 8
	'Ruote(9) = 9
	'Ruote(10) = 10
	'Ruote(12) = 12
	For es = EstrazioneFin - 200 To EstrazioneFin
		If IndiceMensile(es) = 6 Then
			K = K + 1 : Scrivi String(105,"=") & " " & K,1
			n(1) = Fuori90((Differenza(Estratto(Es,4,1),Estratto(Es,7,1))) + 24)
			n(2) = Fuori90((Differenza(Estratto(Es,5,4),Estratto(Es,9,5))) + 89)
			n(3) = Fuori90((Differenza(Estratto(Es,7,4),Estratto(Es,8,1))) + 1)
			n(4) = Fuori90((Differenza(Estratto(Es,1,5),Estratto(Es,3,1))) + 31)
			n(5) = Fuori90((Differenza(Estratto(Es,4,1),Estratto(Es,6,4))) + 30)
			n(6) = Fuori90((Differenza(Estratto(Es,6,4),Estratto(Es,7,4))) + 74)
			ImpostaGiocata 1,n,Ruote,Poste,13
			Gioca Es,1
		End If
	Next
	ScriviResoconto
End Sub

dovrebbe essere così ma comunque non si trovano gli ultimi tre numeri, dai un'occhiata anche tu
 
gentilissimo vengio scusa se ti faccio impazzire

ma in mezzo a tutta la robaccia che avevo in cantina (fatto pulizia totale) ho trovato una mia agenda di molti anni fa dove annotavo varie metodologie per il lotto. Alcune le ricordo (sono ancora un ragazzino di 51 anni) altre buio totale
Mi ha allora fatto sovvenire che gli ultimi tre numeri non sono altro che i vertibili di quelli trovati
puoi provare se è così?

ti inserisco la previsione del 14 gennaio 2014 per avere ulteriore conferma

14 gennaio 2014 30 22 16 90 7 87

grazieeeeee vengio
 
Codice:
Sub Main()
	Dim n(6),Ruote(12),Poste(4)
	'Poste(1) = 3
	Poste(2) = 3
	Poste(3) = 1
	Poste(4) = 0.5
	'Ruote(1) = 1
	'Ruote(2) = 2
	'Ruote(3) = 3
	'Ruote(4) = 4
	'Ruote(5) = 5
	Ruote(6) = 6
	'Ruote(7) = 7
	'Ruote(8) = 8
	'Ruote(9) = 9
	'Ruote(10) = 10
	'Ruote(12) = 12
	For es = EstrazioneFin - 200 To EstrazioneFin
		If IndiceMensile(es) = 6 Then
			K = K + 1 : Scrivi String(105,"=") & " " & K,1
			n(1) = Fuori90((Differenza(Estratto(Es,4,1),Estratto(Es,7,1))) + 24)
			n(2) = Fuori90((Differenza(Estratto(Es,5,4),Estratto(Es,9,5))) + 89)
			n(3) = Fuori90((Differenza(Estratto(Es,7,4),Estratto(Es,8,1))) + 1)
			n(4) = Fuori90(Vert((Differenza(Estratto(Es,1,5),Estratto(Es,3,1))) + 31))
			n(5) = Fuori90(Vert((Differenza(Estratto(Es,4,1),Estratto(Es,6,4))) + 30))
			n(6) = Fuori90(Vert((Differenza(Estratto(Es,6,4),Estratto(Es,7,4))) + 74))
			EliminaRipetuti n
			ImpostaGiocata 1,n,Ruote,Poste,13
			Gioca Es,1
		End If
	Next
	ScriviResoconto
End Sub

Adesso è ok.
 
scusa ma a me risultano diversi i tuoi numeri i primi tre vanno bene ma gli altri 3 sono: 72-63-17. Che mi rispondi? A me vengono questi 6 numeri: 75-39-14-72-63-17- Tu che ne pensi?
 
ciao deaebe come o capito io i ultimi 3 numeri devi fare i vertibili che sono 27|36|71 buona giornata a tutti
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 27 maggio 2025
    Bari
    15
    61
    19
    34
    80
    Cagliari
    69
    10
    33
    22
    25
    Firenze
    18
    55
    30
    29
    78
    Genova
    64
    18
    35
    56
    57
    Milano
    41
    86
    61
    17
    89
    Napoli
    87
    31
    27
    57
    16
    Palermo
    31
    69
    53
    64
    14
    Roma
    14
    24
    02
    08
    29
    Torino
    83
    04
    79
    49
    27
    Venezia
    19
    57
    53
    10
    33
    Nazionale
    14
    68
    86
    56
    58
    Estrazione Simbolotto
    Milano
    42
    04
    44
    34
    07

Ultimi Messaggi

Indietro
Alto