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.
A volte basta uno script facile per tutti.
- Creatore Discussione Missione Impossibile.
- Data di inizio
Codicebinario
Advanced Member >PLATINUM<
PRESO BA 55 4^ pos. determinata al 1° colpo....pronostico postato sul mio post "DIRETTRICI e segmenti"....segue aggiornamento.Poi ti dico se trovo qualcosa di interessante.Ciao.
Marcorun
Advanced Member >GOLD<
PROVA!!!!!
Codice:
Sub Main()
'metodo proposto da Antonio :laterali (Cinzia)
Dim nua(3),nub(3),nuc(3),nud(3),nue(3),ru(1),poste(3)
poste(1) = 1:poste(2) = 1 :poste(3) = 0.50
fin = EstrazioneFin
ini = fin - 27
For es = ini To fin: Messaggio(es)
r = 1
ru(1) = r
nua(1) = Estratto(es,r,1) - 1 : nua(2) = Estratto(es,r,1) : nua(3) = Estratto(es,r,1) + 1
nub(1) = Estratto(es,r,2) - 1 : nub(2) = Estratto(es,r,2) : nub(3) = Estratto(es,r,2) + 1
nuc(1) = Estratto(es,r,3) - 1 : nuc(2) = Estratto(es,r,3) : nuc(3) = Estratto(es,r,3) + 1
nud(1) = Estratto(es,r,4) - 1 : nud(2) = Estratto(es,r,4) : nud(3) = Estratto(es,r,4) + 1
nue(1) = Estratto(es,r,5) - 1 : nue(2) = Estratto(es,r,5) : nue(3) = Estratto(es,r,5) + 1
If nua(1) = 10 Then nua(1) = False
If nua(1) = 20 Then nua(1) = False
If nua(1) = 30 Then nua(1) = False
If nua(1) = 40 Then nua(1) = False
If nua(1) = 50 Then nua(1) = False
If nua(1) = 60 Then nua(1) = False
If nua(1) = 70 Then nua(1) = False
If nua(1) = 80 Then nua(1) = False
If nua(1) = 90 Then nua(1) = False
If nub(1) = 10 Then nub(1) = False
If nub(1) = 20 Then nub(1) = False
If nub(1) = 30 Then nub(1) = False
If nub(1) = 40 Then nub(1) = False
If nub(1) = 50 Then nub(1) = False
If nub(1) = 60 Then nub(1) = False
If nub(1) = 70 Then nub(1) = False
If nub(1) = 80 Then nub(1) = False
If nub(1) = 90 Then nub(1) = False
If nuc(1) = 10 Then nuc(1) = False
If nuc(1) = 20 Then nuc(1) = False
If nuc(1) = 30 Then nuc(1) = False
If nuc(1) = 40 Then nuc(1) = False
If nuc(1) = 50 Then nuc(1) = False
If nuc(1) = 60 Then nuc(1) = False
If nuc(1) = 70 Then nuc(1) = False
If nuc(1) = 80 Then nuc(1) = False
If nuc(1) = 90 Then nuc(1) = False
If nud(1) = 10 Then nud(1) = False
If nud(1) = 20 Then nud(1) = False
If nud(1) = 30 Then nud(1) = False
If nud(1) = 40 Then nud(1) = False
If nud(1) = 50 Then nud(1) = False
If nud(1) = 60 Then nud(1) = False
If nud(1) = 70 Then nud(1) = False
If nud(1) = 80 Then nud(1) = False
If nud(1) = 90 Then nud(1) = False
If nue(1) = 10 Then nue(1) = False
If nue(1) = 20 Then nue(1) = False
If nue(1) = 30 Then nue(1) = False
If nue(1) = 40 Then nue(1) = False
If nue(1) = 50 Then nue(1) = False
If nue(1) = 60 Then nue(1) = False
If nue(1) = 70 Then nue(1) = False
If nue(1) = 80 Then nue(1) = False
If nue(1) = 90 Then nue(1) = False
If nua(3) = 11 Then nua(3) = False
If nua(3) = 21 Then nua(3) = False
If nua(3) = 31 Then nua(3) = False
If nua(3) = 41 Then nua(3) = False
If nua(3) = 51 Then nua(3) = False
If nua(3) = 61 Then nua(3) = False
If nua(3) = 71 Then nua(3) = False
If nua(3) = 81 Then nua(3) = False
If nua(3) = 1 Then nua(3) = False
If nub(3) = 11 Then nub(3) = False
If nub(3) = 21 Then nub(3) = False
If nub(3) = 31 Then nub(3) = False
If nub(3) = 41 Then nub(3) = False
If nub(3) = 51 Then nub(3) = False
If nub(3) = 61 Then nub(3) = False
If nub(3) = 71 Then nub(3) = False
If nub(3) = 81 Then nub(3) = False
If nub(3) = 1 Then nub(3) = False
If nuc(3) = 11 Then nuc(3) = False
If nuc(3) = 21 Then nuc(3) = False
If nuc(3) = 31 Then nuc(3) = False
If nuc(3) = 41 Then nuc(3) = False
If nuc(3) = 51 Then nuc(3) = False
If nuc(3) = 61 Then nuc(3) = False
If nuc(3) = 71 Then nuc(3) = False
If nuc(3) = 81 Then nuc(3) = False
If nuc(3) = 1 Then nuc(3) = False
If nud(3) = 11 Then nud(3) = False
If nud(3) = 21 Then nud(3) = False
If nud(3) = 31 Then nud(3) = False
If nud(3) = 41 Then nud(3) = False
If nud(3) = 51 Then nud(3) = False
If nud(3) = 61 Then nud(3) = False
If nud(3) = 71 Then nud(3) = False
If nud(3) = 81 Then nud(3) = False
If nud(3) = 1 Then nud(3) = False
If nue(3) = 11 Then nue(3) = False
If nue(3) = 21 Then nue(3) = False
If nue(3) = 31 Then nue(3) = False
If nue(3) = 41 Then nue(3) = False
If nue(3) = 51 Then nue(3) = False
If nue(3) = 61 Then nue(3) = False
If nue(3) = 71 Then nue(3) = False
If nue(3) = 81 Then nue(3) = False
If nue(3) = 1 Then nue(3) = False
co = 1
Scrivi SiglaRuota(r) & " " & StringaEstratti(es,r)
ImpostaGiocata co,nua,ru,poste,18,2
co = co + 1
ImpostaGiocata co,nub,ru,poste,18,2
co = co + 1
ImpostaGiocata co,nuc,ru,poste,18,2
co = co + 1
ImpostaGiocata co,nud,ru,poste,18,2
co = co + 1
ImpostaGiocata co,nue,ru,poste,18,2
co = co + 1
Gioca es
'End If
Next
ScriviResoconto
End Sub
Missione Impossibile.
Banned
Ma vieni... Marco ottimo lavoro sapevo che ci riuscivi. Bravissimo. Ora con il programma ARN quando c'e' una direttrice che ci interessa si osserva le conferme in percentuali, quali delle direttrici e' la piu' probabile.Vi avevo messo un esempio a cagliari nei post precedenti. Grazie poi vi spieghero' altro... Ps:. i casi negativi sono dovuti senza scartare il caso anomalo anche se conferma che ottima con le conferme in %, che ci dava una direttrice con conferme basse.
...mi sembra tu abbia preso una strada tortuosa, nella compilazione dello script...
ti metto qui una soluzione al volo, giusto per limitare la lunga digitazione (ed evitare errori)
Un caro saluto
ti metto qui una soluzione al volo, giusto per limitare la lunga digitazione (ed evitare errori)
Un caro saluto
Codice:
Option Explicit
'Analisi esito direttrice estrazionale
'Ramco 20/01/2024
Sub Main()
Dim rt(1),nu(3),pt(1),clp,ru,Ini,fin,es,r,co,a,b,c,p,tmp
ru = ScegliRuota
pt(1) = 1: clp = InputBox("Per quanti colpi vuoi analizzare il gioco?","COLPI di GIOCO",36)
tmp = InputBox("Quante estrazioni esaminiamo?","ESTRAZIONI",60)
Ini = EstrazioneFin - tmp
fin = EstrazioneFin
For es = Ini To fin
For r = 1 To 11
If r = 11 Then r = 12
If r = ru Then
rt(1) = r
co = 0
For p = 1 To 5
a = Estratto(es,r,p): b = Fuori90(a + 1): c = Fuori90(a + 89)
If Cadenza(a) = 1 Then c = 0
If Cadenza(a) = 0 Then b = 0
nu(1) = a: nu(2) = b: nu(3) = c
co = co + 1
Scrivi: Scrivi "Data " & DataEstrazione(es) & " " & SiglaRuota(r) & " " & StringaEstratti(es,r) & " analisi " & p & "° estratto " & a
OrdinaMatrice nu,1
ImpostaGiocata co,nu,rt,pt,clp
Gioca es
Next
Scrivi String(100,"="): Scrivi
End If
Next
Next
ScriviResoconto
End SubMissione Impossibile.
Banned
Ramco certo qui in 2 cicli da 18= 36 estr. Hai una visuale piu' dettagliata da come si muovono le direttrici,riesci a farlo anche con le presenze?
Salutami Tutor e Grazie per il tuo intervento.
Marcorun
Advanced Member >GOLD<
Grazie....a me piace provarci sempre,anche quando so già che non sono all' altezza,ho aspettato un po' che qualcuno bravo come te venisse in supporto a Mission ......ma ho voluto dare una mano nel mio piccolo,visto che Mission ha condiviso la sua idea x tutti!
Codicebinario
Advanced Member >PLATINUM<
Ben ri-riletto Marco ! Come stai? Sono felicissimo del tuo intervento qui ! Un abbraccio.
futuro sempre a segno incrociando i dati 2 colpi e portato a casa il 47 troppo evidente per non giocarlo.buonasera a lor signori.
Futuro mi indica chiaramente il 47.48.42.44.49. in effetti manca il 47 in chiusura proprio su ba
dalle spie analizzate il 47 ha un certo impatto .incrociandolo con le direttrici dovrebbe cadere a breve assieme al 60
poi magari come spesso accade passano prima da FI sta a vedere....
Vedi l'allegato 2276382
Vedi l'allegato 2276383
non incollo le immagini di futuro che potete tranquillamente verificare.
deve cadere assieme al 60
sempre da futuro in decina
per la decina 50 .54.55.56 . altri metodi mi danno forti nelle spie il 56 e 57
azzardo: 46.47.48 60. 88.8 previsione elaborata con futuro 3 colpi
Missione Impossibile.
Banned
Non preoccuparti anche con il tuo lavoro se portato a 36 colpi ha gli stessi esiti.Grazie
Missione Impossibile.
Banned
Ottimo Lottoluke,in effetti il 47 secco l'ho preso anchio,devo aver fatto troppo male alla lottomatica,lo portavo avanti da 3 estrazioni
analizzando le spie con futuro sulle 3 ruote ba.ca.fi era davvero imbarazzante per quante volte lo ripetesse ,ba era in pole.
anche la terzina 6.60.66 ha dato il suo non male
Missione Impossibile.
Banned
Questo test,che poi e' diventato attuale in corso... ci ha regalato ambata 42 del 2x1 e ambata in direttrice 24.Caso chiuso con soddisfazione entro i termini stabiliti.
Missione Impossibile.
Banned
Bene Lottoluke,si continua cosi'prima o poi faremo il botto,non siamo mica qui a pettinare questa sezione.
Missione Impossibile.
Banned
Vedo con piacere che sei molto volenteroso,Futuro3 non da' solo le ambate... piu'avanti andremo sul pesante,da adesso si va' in un altro laghetto a...
Allegati
Missione Impossibile.
Banned
Cagliari con la decina 51-60 ci sta' facendo tribolare.
Per chi ha la costanza di portarla avanti con la doppia uscita del 51 ci conferma sempre il 53-56 2x1
Ristretta 53-56-54-58. per 5 colpi.
Per chi ha la costanza di portarla avanti con la doppia uscita del 51 ci conferma sempre il 53-56 2x1
Ristretta 53-56-54-58. per 5 colpi.
Missione Impossibile.
Banned
Azz. il laterale 14 mannaggia...Ho preso il 48 su Nazionale in prima posizione e ora aspetto 13 - Roma Torinoin 1-5/4 posizione per Roma e 3-2/5 per Torino.
Missione Impossibile.
Banned
Ultima estrazione Lotto
-
Estrazione del lotto
sabato 28 giugno 2025Bari4176540417Cagliari3452845455Firenze2160895103Genova3640460373Milano3280016812Napoli6334228510Palermo2185641565Roma4825424750Torino5125142028Venezia8248735329Nazionale4655103244Estrazione Simbolotto
Napoli
2501414538
