Novità

cinque chiama nove

bibbolotto

Advanced Member >PLATINUM<
attendete sulla ruota di palermo l uscita di un ambo in fig.5

quindi mettete in gioco la fig 9 per ambo e terno sulla stessa ruota
non giocare se nella stessa estrazione vi e' oltre l ambo di fig 5 anche un numero di fig 9

ho controllato 2013 2014 ottimo!
 
ciao bibbo, grazie per quello che ci proponi infatti mi stavo chiedendo quando ci avresti deliziato di qualche altra tua ricerca sempre interessanti, per quanto riguarda questo, per quanti colpi si dovrebbero giocare?
 
estr 15 marzo 2013 palermo 59 87 77 3 42 come vedi 59 e 77 sono di fig 5

estr 18 marzo 2013 palermo 18 20 6 72 14 come vedi ambo in fig 9 18 72

volendo insistere estr 20 marzo palermo 78 56 38 36 90 ambo 36 90 di fig 9

altri esempi sono del 2013
 
Ciao, di seguito lo script:
Codice:
Sub Main()
	Scrivi " ** Figura5 chiama Figura9 su PA ** di bibbolotto scripted by DDBid ",1 ' - http://forum.lottoced.com/f8/cinque-chiama-nove-112144/#post1266416 -
	Scrivi
	Dim ruote(10),CinqueNumeri
	Dim n(3),num(10)
	Dim poste(10)
	poste(2) = 4
	poste(3) = 1
	ab = InputBox("Quante estrazioni controllo a ritroso?","Analisi archivio",150)
	klp = InputBox("Per quanti colpi vuoi giocare?","Colpi",6)
	fin = EstrazioneFin
	ini = fin - ab
	r = 7 'PA
	For es = ini To fin
		Call AvanzamentoElab(ini,fin,es)
		Messaggio es
		For p = 1 To 4
			a = Estratto(es,r,p)
			If Figura(a) = 5 Then
				For p2 = p + 1 To 5
					b = Estratto(es,r,p2)
					If Figura(b) = 5 Then
						GetArrayNumeriRuota es,r,CinqueNumeri
						If((Figura(CinqueNumeri(1)) <> 9) And(Figura(CinqueNumeri(2)) <> 9) And(Figura(CinqueNumeri(3)) <> 9) And(Figura(CinqueNumeri(4)) <> 9) And(Figura(CinqueNumeri(5)) <> 9)) Then
							num(1) = 9
							num(2) = 18
							num(3) = 27
							num(4) = 36
							num(5) = 45
							num(6) = 54
							num(7) = 63
							num(8) = 72
							num(9) = 81
							num(10) = 90
							ruote(1) = r
							cs = cs + 1
							Scrivi String(106,"=") & " Caso n°" & Format2(cs),1 :ColoreTesto 1
							Scrivi DataEstrazione(es) & " - " & NomeRuota(r) & " - " & StringaEstratti(es,r) & " - Estratto il numero in Fig.5 [" & Format2(a) & "] in " & Format2(p) & "° pos." & " - Estratto il numero in Fig.5 [" & Format2(b) & "] in " & Format2(p2),1
							ColoreTesto 0
							ImpostaGiocata 1,num,ruote,poste,klp,3
							Gioca es,1
						End If
					End If
				Next
			End If
		Next
	Next
	Scrivi:Scrivi
	ScriviResoconto
End Sub
Grazie bibbolotto per aver condiviso la tua ricerca!
 

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 25 luglio 2025
    Bari
    53
    75
    06
    08
    43
    Cagliari
    62
    52
    59
    55
    72
    Firenze
    54
    13
    56
    14
    62
    Genova
    07
    84
    21
    58
    20
    Milano
    27
    28
    62
    61
    04
    Napoli
    16
    43
    31
    68
    50
    Palermo
    72
    34
    60
    40
    66
    Roma
    46
    72
    66
    36
    11
    Torino
    77
    29
    23
    11
    48
    Venezia
    24
    77
    41
    48
    21
    Nazionale
    70
    83
    17
    40
    71
    Estrazione Simbolotto
    Nazionale
    09
    13
    05
    38
    03
Indietro
Alto