Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
Ciao a tutti posto la previsione del metodo 1°estrato di Bari prima estrazione del mese regalato al forum da Vecchione.
BARI 83 x diciotto colpi.
Spero di aver fatto casa gradita.
Buona sera,grazie a Disaronno che ha modificato lo script del metodo di Vecchione abbiamo una previsione da abbinare per ambo ed è la seguente:
BARI 83-85 PER AMBO ------(ci proviamo?)
certamente si continua per ambata 83 sempre per BARI.
Saluti a tutti e grazie a Vecchione per il metodo e a Disaronno per avre fatto lo script e la modifica.
Saluti a tutti Serpico
Salve,seguo i metodi postati da Vecchione,se posso essere utile, i colpi sono sempre 18.
Da altro metodo sempre ultima estrazione ma primo di bari vi è anche la seguente previsione ROMA n.10----sempre per 18 colpi.
Stasera prima estrazione del mese vi sarà altra previsione sempre per 18 colpi.
In sostanza il Sig.Vecchione ha fatto TRE REGALI AL FORUM .
Uno per l'ultima estrazione del mese rilevazione 1° estratto di Bari
Uno per la prima estrazione del mese rilevazione 1° estratto di Bari
Uno per l'ultima estrazione del mese rilevazione 1° estratto di Cagliari che la Gentilissima Abitte ha gia postato.
Ho chiesto autorizzazione al Sig:Vecchione per postare queste previsioni ogni mese.
DOPO VEDREMO CON IL VOSTRO AIUTO DI TROVARE EVENTUALI ABBINAMENTO PER AMBO O DI GIOCARE LE PREVISIONI PER ESTRATTO DETERMINATO SPERANDO DI INDOVINARE LA POSIZIONE.
TUTTO QUESTO PER CERCARE DI TOGLIERE QUALCOSA ALLA LOTTOMATICA CERCANDO DI SPENDERE POCO (UNA AMBATA PER RUOTA).
Spero di non aver disturbato o creato confusione.
un saluto a tutti Serpico
Salve Cri 76, ti indico i giorni in cui sono stati pubblicati i due metodi spia di Bari il primo il 14-3-2011 e il secondo il 21-10-2011 io non sono capace di pubblicare i metodi perchè allora ho scaricato i metodi e quindi faccio di volta in volta le previsioni in modo Cartaceo.
Spero che se fai le ricerche a ritroso li trovi ancora pubblicati .Più di questo non so fare.
Buona serata serpico
buonasera ,
vi allego lo script della metodologia del sig.Vecchione, cosi visionerete le statistiche ed le future previsioni.
Se ci sono degli sbagli scausatemi, sono alle prime armi.
Spero di aver fatto cosa gradita.
Sub Main()
Dim ruota(1)
Dim nu1(1)
Dim posta(1)
posta(1) = 1
ce = CInt(InputBox("da quale estrazione vuoi iniziare il controllo ? "," ID Estrazione ",8476))
k = CInt(InputBox(" Per quanti colpi?"," Colpi di gioco ",18))
ini = EstrazioneIni + ce
fin = EstrazioneFin
Scrivi " Ricerca ambate - La Macchina Del Tempo by Antonio vecchione ",1
Scrivi String(77,"="),1
Scrivi " Resoconto da " & DataEstrazione(ini) & " a " & _
DataEstrazione(fin) & " (" &(fin) & " estr.)",1
For es = ini To Fin
Messaggio " elab. estr. [" &(es) & "] del " & DataEstrazione(es)
AvanzamentoElab Ini,fin,es
If IsUltimaDelMese(es) Then
a = Estratto(es,CA_,1)
ok = 0
If a = 01 Then: n1 = Fuori90(Estratto(es,MI_,1) + 68):ruota(1) = BA_:e = Estratto(es,MI_,1):r = MI_= 1:x = 68
k = 1
If a = 02 Then: n1 = Fuori90(Estratto(es,GE_,1) + 60):ruota(1) = PA_:e = Estratto(es,GE_,1):r = GE_= 1:x = 60
k = 1
If a = 03 Then: n1 = Fuori90(Estratto(es,VE_,5) + 84):ruota(1) = RO_:e = Estratto(es,VE_,5):r = VE_= 5:x = 84
k = 1
If a = 04 Then: n1 = Fuori90(Estratto(es,NA_,3) + 68):ruota(1) = TO_:e = Estratto(es,NA_,3):r = NA_= 3:x = 68
k = 1
If a = 05 Then: n1 = Fuori90(Estratto(es,NA_,4) + 81):ruota(1) = FI_:e = Estratto(es,NA_,4):r = NA_= 4:x = 81
k = 1
If a = 06 Then: n1 = Fuori90(Estratto(es,BA_,2) + 69):ruota(1) = GE_:e = Estratto(es,BA_,2):r = BA_= 2:x = 69
k = 1
If a = 07 Then: n1 = Fuori90(Estratto(es,MI_,5) + 79):ruota(1) = RO_:e = Estratto(es,MI_,5):r = MI_= 5:x = 79
k = 1
If a = 08 Then: n1 = Fuori90(Estratto(es,BA_,1) + 86):ruota(1) = FI_:e = Estratto(es,BA_,1):r = BA_= 1:x = 86
k = 1
If a = 09 Then: n1 = Fuori90(Estratto(es,VE_,4) + 88):ruota(1) = MI_:e = Estratto(es,VE_,4):r = VE_= 4:x = 88
k = 1
If a = 10 Then: n1 = Fuori90(Estratto(es,BA_,4) + 64):ruota(1) = BA_:e = Estratto(es,BA_,4):r = BA_= 4:x = 64
k = 1
If a = 12 Then: n1 = Fuori90(Estratto(es,MI_,4) + 81):ruota(1) = BA_:e = Estratto(es,MI_,4):r = MI_= 4:x = 81
k = 1
If a = 13 Then: n1 = Fuori90(Estratto(es,BA_,5) + 77):ruota(1) = RO_:e = Estratto(es,BA_,5):r = BA_= 5:x = 77
k = 1
If a = 14 Then: n1 = Fuori90(Estratto(es,FI_,5) + 81):ruota(1) = NA_:e = Estratto(es,FI_,5):r = FI_= 5:x = 81
k = 1
If a = 15 Then: n1 = Fuori90(Estratto(es,TO_,2) + 78):ruota(1) = MI_:e = Estratto(es,TO_,2):r = TO_= 2:x = 78
k = 1
If a = 16 Then: n1 = Fuori90(Estratto(es,PA_,4) + 81):ruota(1) = TO_:e = Estratto(es,PA_,4):r = PA_= 4:x = 81
k = 1
If a = 17 Then: n1 = Fuori90(Estratto(es,FI_,2) + 88):ruota(1) = RO_:e = Estratto(es,FI_,2):r = FI_= 2:x = 88
k = 1
If a = 18 Then: n1 = Fuori90(Estratto(es,VE_,1) + 85):ruota(1) = NA_:e = Estratto(es,VE_,1):r = VE_= 1:x = 85
k = 1
If a = 19 Then: n1 = Fuori90(Estratto(es,RO_,1) + 75):ruota(1) = NA_:e = Estratto(es,RO_,1):r = RO_= 1:x = 75
k = 1
If a = 20 Then: n1 = Fuori90(Estratto(es,CA_,2) + 73):ruota(1) = BA_:e = Estratto(es,CA_,2):r = CA_= 2:x = 73
k = 1
If a = 21 Then: n1 = Fuori90(Estratto(es,GE_,5) + 79):ruota(1) = GE_:e = Estratto(es,GE_,5):r = GE_= 5:x = 79
k = 1
If a = 22 Then: n1 = Fuori90(Estratto(es,NA_,2) + 83):ruota(1) = MI_:e = Estratto(es,NA_,2):r = NA_= 2:x = 83
k = 1
If a = 23 Then: n1 = Fuori90(Estratto(es,TO_,5) + 76):ruota(1) = TO_:e = Estratto(es,TO_,5):r = TO_= 5:x = 76
k = 1
If a = 24 Then: n1 = Fuori90(Estratto(es,FI_,4) + 64):ruota(1) = PA_:e = Estratto(es,FI_,4):r = FI_= 4:x = 64
k = 1
If a = 25 Then: n1 = Fuori90(Estratto(es,CA_,1) + 73):ruota(1) = TO_:e = Estratto(es,CA_,1):r = CA_= 1:x = 73
k = 1
If a = 26 Then: n1 = Fuori90(Estratto(es,BA_,2) + 65):ruota(1) = TO_:e = Estratto(es,BA_,2):r = BA_= 2:x = 65
k = 1
If a = 27 Then: n1 = Fuori90(Estratto(es,CA_,3) + 87):ruota(1) = CA_:e = Estratto(es,CA_,3):r = CA_= 3:x = 87
k = 1
If a = 28 Then: n1 = Fuori90(Estratto(es,CA_,1) + 71):ruota(1) = TO_:e = Estratto(es,CA_,1):r = CA_= 1:x = 71
k = 1
If a = 29 Then: n1 = Fuori90(Estratto(es,VE_,1) + 64):ruota(1) = MI_:e = Estratto(es,VE_,1):r = VE_= 1:x = 64
k = 1
If a = 30 Then: n1 = Fuori90(Estratto(es,CA_,3) + 86):ruota(1) = VE_:e = Estratto(es,CA_,3):r = CA_= 3:x = 86
k = 1
If a = 31 Then: n1 = Fuori90(Estratto(es,NA_,1) + 84):ruota(1) = CA_:e = Estratto(es,NA_,1):r = NA_= 1:x = 84
k = 1
If a = 32 Then: n1 = Fuori90(Estratto(es,NA_,4) + 78):ruota(1) = GE_:e = Estratto(es,NA_,4):r = NA_= 4:x = 78
k = 1
If a = 33 Then: n1 = Fuori90(Estratto(es,VE_,5) + 77):ruota(1) = PA_:e = Estratto(es,VE_,5):r = VE_= 5:x = 77
k = 1
If a = 34 Then: n1 = Fuori90(Estratto(es,BA_,2) + 63):ruota(1) = CA_:e = Estratto(es,BA_,2):r = BA_= 2:x = 63
k = 1
If a = 35 Then: n1 = Fuori90(Estratto(es,FI_,5) + 84):ruota(1) = MI_:e = Estratto(es,FI_,5):r = FI_= 5:x = 84
k = 1
If a = 36 Then: n1 = Fuori90(Estratto(es,RO_,4) + 79):ruota(1) = GE_:e = Estratto(es,RO_,4):r = RO_= 4:x = 79
k = 1
If a = 37 Then: n1 = Fuori90(Estratto(es,GE_,5) + 46):ruota(1) = MI_:e = Estratto(es,GE_,5):r = GE_= 5:x = 46
k = 1
If a = 38 Then: n1 = Fuori90(Estratto(es,TO_,4) + 89):ruota(1) = TO_:e = Estratto(es,TO_,4):r = TO_= 4:x = 89
k = 1
If a = 39 Then: n1 = Fuori90(Estratto(es,FI_,1) + 66):ruota(1) = TO_:e = Estratto(es,FI_,1):r = FI_= 1:x = 66
k = 1
If a = 40 Then: n1 = Fuori90(Estratto(es,TO_,4) + 85):ruota(1) = FI_:e = Estratto(es,TO_,4):r = TO_= 4:x = 85
k = 1
If a = 41 Then: n1 = Fuori90(Estratto(es,FI_,3) + 85):ruota(1) = RO_:e = Estratto(es,FI_,3):r = FI_= 3:x = 85
k = 1
If a = 42 Then: n1 = Fuori90(Estratto(es,TO_,1) + 51):ruota(1) = MI_:e = Estratto(es,TO_,1):r = TO_= 1:x = 51
k = 1
If a = 43 Then: n1 = Fuori90(Estratto(es,BA_,1) + 01):ruota(1) = VE_:e = Estratto(es,BA_,1):r = BA_= 1:x = 01
k = 1
If a = 44 Then: n1 = Fuori90(Estratto(es,GE_,3) + 83):ruota(1) = GE_:e = Estratto(es,GE_,3):r = GE_= 3:x = 83
k = 1
If a = 45 Then: n1 = Fuori90(Estratto(es,VE_,5) + 86):ruota(1) = TO_:e = Estratto(es,VE_,5):r = VE_= 5:x = 86
k = 1
If a = 46 Then: n1 = Fuori90(Estratto(es,CA_,3) + 84):ruota(1) = BA_:e = Estratto(es,CA_,3):r = CA_= 3:x = 84
k = 1
If a = 47 Then: n1 = Fuori90(Estratto(es,BA_,4) + 74):ruota(1) = VE_:e = Estratto(es,BA_,4):r = BA_= 4:x = 74
k = 1
If a = 48 Then: n1 = Fuori90(Estratto(es,TO_,3) + 87):ruota(1) = PA_:e = Estratto(es,TO_,3):r = TO_= 3:x = 87
k = 1
If a = 49 Then: n1 = Fuori90(Estratto(es,BA_,4) + 74):ruota(1) = TO_:e = Estratto(es,BA_,4):r = BA_= 4:x = 74
k = 1
If a = 50 Then: n1 = Fuori90(Estratto(es,RO_,5) + 88):ruota(1) = CA_:e = Estratto(es,RO_,5):r = RO_= 5:x = 88
k = 1
If a = 51 Then: n1 = Fuori90(Estratto(es,CA_,1) + 55):ruota(1) = NA_:e = Estratto(es,CA_,1):r = CA_= 1:x = 55
k = 1
If a = 52 Then: n1 = Fuori90(Estratto(es,NA_,2) + 83):ruota(1) = CA_:e = Estratto(es,NA_,2):r = NA_= 2:x = 83
k = 1
If a = 53 Then: n1 = Fuori90(Estratto(es,RO_,3) + 84):ruota(1) = CA_:e = Estratto(es,RO_,3):r = RO_= 3:x = 84
k = 1
If a = 54 Then: n1 = Fuori90(Estratto(es,BA_,1) + 19):ruota(1) = CA_:e = Estratto(es,BA_,1):r = BA_= 1:x = 19
k = 1
If a = 55 Then: n1 = Fuori90(Estratto(es,NA_,3) + 79):ruota(1) = GE_:e = Estratto(es,NA_,3):r = NA_= 3:x = 79
k = 1
If a = 56 Then: n1 = Fuori90(Estratto(es,GE_,5) + 89):ruota(1) = CA_:e = Estratto(es,GE_,5):r = GE_= 5:x = 89
k = 1
If a = 57 Then: n1 = Fuori90(Estratto(es,CA_,1) + 84):ruota(1) = TO_:e = Estratto(es,CA_,1):r = CA_= 1:x = 84
k = 1
If a = 58 Then: n1 = Fuori90(Estratto(es,BA_,3) + 74):ruota(1) = PA_:e = Estratto(es,BA_,3):r = BA_= 3:x = 74
k = 1
If a = 59 Then: n1 = Fuori90(Estratto(es,CA_,3) + 75):ruota(1) = FI_:e = Estratto(es,CA_,3):r = CA_= 3:x = 75
k = 1
If a = 60 Then: n1 = Fuori90(Estratto(es,BA_,3) + 82):ruota(1) = FI_:e = Estratto(es,BA_,3):r = BA_= 3:x = 82
k = 1
If a = 61 Then: n1 = Fuori90(Estratto(es,RO_,3) + 89):ruota(1) = GE_:e = Estratto(es,RO_,3):r = RO_= 3:x = 89
k = 1
If a = 62 Then: n1 = Fuori90(Estratto(es,VE_,3) + 88):ruota(1) = NA_:e = Estratto(es,VE_,3):r = VE_= 3:x = 88
k = 1
If a = 63 Then: n1 = Fuori90(Estratto(es,BA_,1) + 75):ruota(1) = GE_:e = Estratto(es,BA_,1):r = BA_= 1:x = 75
k = 1
If a = 64 Then: n1 = Fuori90(Estratto(es,MI_,1) + 87):ruota(1) = GE_:e = Estratto(es,MI_,1):r = MI_= 1:x = 87
k = 1
If a = 65 Then: n1 = Fuori90(Estratto(es,RO_,2) + 87):ruota(1) = FI_:e = Estratto(es,RO_,2):r = RO_= 2:x = 87
k = 1
If a = 66 Then: n1 = Fuori90(Estratto(es,CA_,5) + 84):ruota(1) = CA_:e = Estratto(es,CA_,5):r = CA_= 5:x = 84
k = 1
If a = 67 Then: n1 = Fuori90(Estratto(es,GE_,1) + 83):ruota(1) = TO_:e = Estratto(es,GE_,1):r = GE_= 1:x = 83
k = 1
If a = 68 Then: n1 = Fuori90(Estratto(es,TO_,2) + 84):ruota(1) = CA_:e = Estratto(es,TO_,2):r = TO_= 2:x = 84
k = 1
If a = 70 Then: n1 = Fuori90(Estratto(es,TO_,3) + 89):ruota(1) = NA_:e = Estratto(es,TO_,3):r = TO_= 3:x = 89
k = 1
If a = 71 Then: n1 = Fuori90(Estratto(es,NA_,1) + 77):ruota(1) = FI_:e = Estratto(es,NA_,1):r = NA_= 1:x = 77
k = 1
If a = 72 Then: n1 = Fuori90(Estratto(es,GE_,5) + 73):ruota(1) = FI_:e = Estratto(es,GE_,5):r = GE_= 5:x = 73
k = 1
If a = 73 Then: n1 = Fuori90(Estratto(es,BA_,1) + 80):ruota(1) = PA_:e = Estratto(es,BA_,1):r = BA_= 1:x = 80
k = 1
If a = 74 Then: n1 = Fuori90(Estratto(es,TO_,3) + 65):ruota(1) = BA_:e = Estratto(es,TO_,3):r = TO_= 3:x = 65
k = 1
If a = 75 Then: n1 = Fuori90(Estratto(es,NA_,1) + 86):ruota(1) = FI_:e = Estratto(es,NA_,1):r = NA_= 1:x = 86
k = 1
If a = 76 Then: n1 = Fuori90(Estratto(es,TO_,1) + 87):ruota(1) = CA_:e = Estratto(es,TO_,1):r = TO_= 1:x = 87
k = 1
If a = 77 Then: n1 = Fuori90(Estratto(es,BA_,1) + 19):ruota(1) = GE_:e = Estratto(es,BA_,1):r = BA_= 1:x = 19
k = 1
If a = 78 Then: n1 = Fuori90(Estratto(es,CA_,1) + 87):ruota(1) = PA_:e = Estratto(es,CA_,1):r = CA_= 1:x = 87
k = 1
If a = 79 Then: n1 = Fuori90(Estratto(es,BA_,1) + 30):ruota(1) = PA_:e = Estratto(es,BA_,1):r = BA_= 1:x = 30
k = 1
If a = 80 Then: n1 = Fuori90(Estratto(es,GE_,1) + 87):ruota(1) = GE_:e = Estratto(es,GE_,1):r = GE_= 1:x = 87
k = 1
If a = 81 Then: n1 = Fuori90(Estratto(es,BA_,1) + 24):ruota(1) = PA_:e = Estratto(es,BA_,1):r = BA_= 1:x = 24
k = 1
If a = 82 Then: n1 = Fuori90(Estratto(es,CA_,1) + 20):ruota(1) = MI_:e = Estratto(es,CA_,1):r = CA_= 1:x = 20
k = 1
If a = 83 Then: n1 = Fuori90(Estratto(es,FI_,5) + 86):ruota(1) = PA_:e = Estratto(es,FI_,5):r = FI_= 5:x = 86
k = 1
If a = 84 Then: n1 = Fuori90(Estratto(es,FI_,1) + 87):ruota(1) = CA_:e = Estratto(es,FI_,1):r = FI_= 1:x = 87
k = 1
If a = 85 Then: n1 = Fuori90(Estratto(es,BA_,1) + 71):ruota(1) = PA_:e = Estratto(es,BA_,1):r = BA_= 1:x = 71
k = 1
If a = 86 Then: n1 = Fuori90(Estratto(es,GE_,4) + 56):ruota(1) = TO_:e = Estratto(es,GE_,4):r = GE_= 4:x = 56
k = 1
If a = 87 Then: n1 = Fuori90(Estratto(es,BA_,1) + 47):ruota(1) = CA_:e = Estratto(es,BA_,1):r = BA_= 1:x = 47
k = 1
If a = 88 Then: n1 = Fuori90(Estratto(es,CA_,5) + 80):ruota(1) = GE_:e = Estratto(es,CA_,5):r = CA_= 5:x = 80
k = 1
If a = 89 Then: n1 = Fuori90(Estratto(es,BA_,2) + 64):ruota(1) = CA_:e = Estratto(es,BA_,2):r = BA_= 2:x = 64
k = 1
If a = 90 Then: n1 = Fuori90(Estratto(es,GE_,1) + 70):ruota(1) = FI_:e = Estratto(es,GE_,1):r = GE_= 1:x = 70
k = 1
If ok = 1 Then
casi = casi + 1
Scrivi String(67,"=") & " caso n° " &(casi)
ColoreTesto 1
Scrivi DataEstrazione(es,1) & " [ " & SiglaRuota(CA_) & " - " & StringaEstratti(es,CA_) & _
" ] Numero Spia [ " & Format2(a) & " ] in [ " & Format2(1) & "° ] Posizione"
Scrivi DataEstrazione(es,1) & " [ " & SiglaRuota(r) & " - " & StringaEstratti(es,r) & _
" ] Numero Estratto [ " & Format2(e) & " ] in [ " & Format2(p) & "° ] Posizione - Sommare [ + " & Format2(x) & " ] "
ColoreTesto 0
Scrivi String(77,"-")
nu1(1) = n1
ImpostaGiocata es,nu1,ruota,posta,k,1
Gioca es,True,,1
End If
End If
Next
Scrivi String(77,"=") & "",1
ScriviResoconto
Scrivi " Ricerca ambate - La Macchina Del Tempo by Antonio vecchione ",1
End Sub
Ciao su diversi giornali di lotto danno 83 BA molto forte come ambata ciao
rosablu