A volte basta uno script facile per tutti.

[Missione Impossibile2]

Ecco l aggiornamento della tabella mensile Di Missione Impossibile2.
Sapete gia' come usarla.
Si potrebbe fare anche uno script per chi ne ha voglia ovviamente.
Vedi l'allegato 2288360

1° colpo il vertibile 10 ma il n°1 e' il principale obiettivo

 

[Missione Impossibile2]

Bene Pandit, potete inserire nello script, anziche Napoli,mettete Palermo ricerca ini 1530 da sempre i risultati mensile al 100%

 

[Pandit]

Quindi aggiungo PA a BA e VE per Ambata e per sorti maggiori mettendo la ricerca a 1530 a ritroso.

 

[Pandit]

Versione con Variazioni richieste da Serafino1:

Anticipazione (Spoiler)

Sub Main()
Scrivi " Metodo Semestrale delle Spie --*-- per Missione 2 --*-- by Pandit --*-- ",1,- 1,4
Scrivi
Dim poste(5),n(6),Ru(4)
Dim R(3),posta(5)
Dim n1(3),r1,p1
poste(1) = 1
posta(2) = 1
'poste(3) = 0.50
ini = EstrazioneFin - 1530
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio es
If IndiceMensile(Es) = 1 Then
'***
For r1 = 1 To 1
For p1 = 1 To 1
a = Estratto(es,r1,p1)
ok = 0
n1(1) = Fuori90(a + 54)
n1(2) = Fuori90(Vert(n1(1)))
ok = 1
'***
n(1) = n1(1)
n(2) = 90 -(n1(1))
n(3) = 90 -(n(4))
n(4) = n1(2)
EliminaRipetuti n
'***
R(1) = 1:R(2) = 10:R(3) = 7
Ru(1) = 7:Ru(2) = 1:Ru(3) = 10:Ru(4) = 11
If ok = 1 Then
co = co + 1
ColoreTesto 1
Scrivi String(60,"-") & " Caso n°" & Co,1
ColoreTesto 0
Scrivi(" n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
Scrivi " " & SiglaRuota(r1) & " ",1,0
ImpostaGiocata 1,n1,R,poste,15',1
ImpostaGiocata 2,n,Ru,posta,15
Gioca es,1
End If
Next
Next
End If
Next
ScriviResoconto
End Sub

 

[plutone 101]

Attenzione la decina 20 29 su bari manca per estratto da 18 estrazioni. È probabile l' uscita di uno o più estratti.

 

[Baciccia4251]

Attenzione la decina 20 29 su bari manca per estratto da 18 estrazioni. È probabile l' uscita di uno o più estratti.

 

[Missione Impossibile2]

TORINO
Ambata secca 64
2x1
63-65
Ambi secchi
64-63
64-65
Terzina x ambo terno
63-64-65

x 6 colpi.

Al 6° colpo ambata 63 previsione chiusa!

 

[Pandit]

Per le prossime... BA.VE Ambate 88.89 e accoppiate per sorti maggiori 01 e 02
per chi vuole di più sempre BA.VE Ambate 33.39 e accoppiate per sorti maggiori 57 e 51

Baciccia4251 ottimo quel 29....​

Buon fine settimana a TT.

 

[Baciccia4251]

Per le prossime... BA.VE Ambate 88.89 e accoppiate per sorti maggiori 01 e 02
per chi vuole di più sempre BA.VE Ambate 33.39 e accoppiate per sorti maggiori 57 e 51

Baciccia4251 ottimo quel 29....​

Ho giocato a Bari 21.22.24.29 sono usciti 61.66.69 che sono il complemento a 90 di 21.24.29.

Ho notato, nelle previsioni fatte e non giocate che accade spesso, a me perlomeno, che i complementari prendano il posto del/dei numero/i giocato/i. Forse è un caso, però mi sembra interessante. Anche se non so come studiarlo e tantomeno come sfruttarlo.

 

[Pandit]

Puoi, se vuoi, controllare quali sono i più Frequenti sulla Ruota di gioco, spesso funziona...
Poi come sai di certo non c'è nulla, ognuno si appoggia alla propria esperienza.
In effetti molti invece guardano gli scompensi..

 

[Missione Impossibile2]

Buongiorno per Pandit,ho visto che sei bravo con gli script.
Potresti fare per tutti uno script in decine naturali, l'uscita di 4 volte per ogni singolo numero.
Esempio: bari decina 1-10 in ordine in 18 estrazioni reali,osservando questo quadro,possiamo decidere quale numero ha 4 uscite
e usarlo come spia.
1- uscito 4 volte
2- uscito 3 volte e cosi' via fino a 10. Ti allego un esempio:

Poi su 10 numeri in decina per ambo sviluppa 45 ambi,cosi avremo un quadro completo delle coppie del 2x1 e controllare ogni singolo numero segnalato + volte nelle 45 combinazioni,esempio il 10 viene segnalato 8 volte il 9 viene segnalato 7 volte,come vedi nelle immagini il mio programma me li segnala automaticamente ad ogni estrazione nuova.
Confido in te Grazie.
Come vedi nel quadro delle 18 estrazioni,lui conteggia tutti i 90 numeri,quesllo che faremo noi,nel quadro deve ordinare tutte le decine da 1-10 alla 81-90.

 

[Pandit]

Ti ringrazio per la Fiducia, ma al momento non sono all'altezza di fare uno script con le caratteristiche che richiedi, ci sto provando ma trovo ostacoli che per me al momento sono difficilmente superabili...

 

[Missione Impossibile2]

Ti ringrazio per la Fiducia, ma al momento non sono all'altezza di fare uno script con le caratteristiche che richiedi, ci sto provando ma trovo ostacoli che per me al momento sono difficilmente superabili...

Ti ringrazio lo stesso Pandit,era per semplificare la ricerca a tutti per avere le conferme di un numero uscito piu'volte rispetto all altro.

 

[Pandit]

Ho uno script di Mike58 se può essere utile, con scelta Uscite e Ruote..

Anticipazione (Spoiler)

Sub Main
'Mike58
Dim Nu(1),Ru(1),T
Dim qtEs,R,qFr,Ini,fin,k,n,rit,max,Incr,fre,Tot,MedFre,ic
qtEs = CInt(InputBox("Quante Estrazioni a Ritroso",,18))
R = ScegliRuota
qFr = CInt(InputBox("Quale presenza superiore > a : ",,4))
Ini = EstrazioneFin - qtEs
fin = EstrazioneFin
Tot = fin - Ini + 1
T = Array(T,"Numero","Presenza","Ritardo Corrente","Ritardo Storico","IncrMax","Indice di Convenienza")
Call InitTabella(T,,,,,"Arial Black")
For n = 1 To 90
Nu(1) = n
Ru(1) = R
Call StatisticaFormazioneTurbo(Nu,Ru,1,rit,max,Incr,fre,Ini,fin)
MedFre = Dividi(Tot,fre)
ic = Round(Dividi (rit,MedFre) ,2)
If fre >= qFr Then
T = Array(T,Nu(1),fre,rit,max,Incr,ic)
Call AddRigaTabella(T)
End If
Next
Scrivi "Ruota analizzata................ " & NomeRuota(R),1
Scrivi "Totali estrazioni analizzati.... " & Tot,1
Call CreaTabella(2)
End Sub

 

[Missione Impossibile2]

Per quanto riguarda le cadenze possiamo usare la stessa spia esempio: esce il 49
4+9=13
1+3= 4 si utilizza la cadenza (4) un altro modo per vedere i numeri con conferme.
Le combinazioni per ambo sono 36 tabelle.
Osserviamo il 34 e il 74.
il 34 nel conteggio di 36 combinazioni e' presente con 8 conferme ed esce il 13/07/2024
Il 74 nel conteggio di 36 combinazioni e' presente con 7 conferme ed esce il 23/07/2024
Cosi come le figure e le decine.Spero di avere fatto cosa gradita a tutti.

 

[Missione Impossibile2]

Vi ricordo il metodo mensile!
BA/VE (napoli facoltativo)
44-49 ambate ambo ambetto.
Notte

44 a Bari e ambetto con il 45 al 6° colpo

 

[Baciccia4251]

L'8 agosto ho giocato 22 a Bari e 33.34.35 a Cagliari (prob. uscita superiore al 90% secondo la MIA statistica).
Sono usciti il 22 a Cagliari e 34.35 a Bari. Scambio di Ruota.
Oggi il 10 agosto, ho giocato 21.22.24.29.57 a Bari. Sono usciti 29 e 57. Ma il 21.22.24 sono usciti a Cagliari!
Il 21.22.24 li ho presi su tutte, ma su 10 numeri solo per terno e sorti superiori.
Il famoso fattore K! Non era più possibile protrarre ulteriormente l'uscita di certi numeri (puoi prendere in giro la statistica, non la fisica, di cui alcuni hanno sorriso, non comprendendo una bella mazza). Difatti sono usciti. Ma nel posto sbagliato.
Quando in gioco ci sono miliardi, fatti simili non sono inusuali. I numeri si possono indovinare il fattore K no.
Pubblicherò gli scontrini giocati. Non per farmi bello. La vincita non copre totalmente la spesa di queste ultime estrazioni. Solo per evitare che qualcuno malpensante, biricchino, pensi che le mie siano solo parole.
Per le prossime estrazioni sono curioso di vedere il comportamento dei numeri 22 e 86 a Bari che, secondo la MIA statistica dovrebbero essere già usciti (almeno uno) due estrazioni fa.
Per concludere, a meno di fattori K sorprendenti un numero tra 22 e 86 a bari dovrebbe uscire entro poche estrazioni, vedremo.
Baciccia

 

[Pandit]

Ebbravo Baciccia4251 è così che si comincia...

 

[claudio8]

Ba

Se posso... Un regalino per Ferragosto..Però se funziona vorrei un Like..
O se vi piace... Metodo T3

Anticipazione (Spoiler)

'Metodo T3 by Pandit
Sub Main
Dim Nu(6),Ru(3),T,abb1,abb2,abb3,abb4,Ru1(1)
x2 = CInt(InputBox(" Quanti colpi di gioco?",,17))
Ini = EstrazioneFin - 350
fin = EstrazioneFin
r1 = 3
r2 = 4
p1 = 2
p2 = 5
colpi = x2
T = Array(T,"Estrazione","Ruote"," 2 x A","Verifica Ambata","Colpo","Abbin.","Abbin.")
Call InitTabella(T,RGB(0,71,171),,3,6,"swift")
For es = Ini To fin
If IndiceMensile(es) = 1 Then
a = Fuori90(Estratto(Es,R,3) + (Estratto(Es,R1,3)))
c = Fuori90(a * 2):e = Fuori90(a + c)
f = Fuori90(c + e): g = 90 - f
h = Fuori90(Vert(g))
Nu(1) = g
Nu(2) = h
EliminaRipetuti Nu
Ru(1) = r1
Ru(2) = r2
Ru1(1) = r3
Call VerificaEsito(Nu,Ru,es + 1,1,colpi,,esito,clp,esA,id)
Call Abbinamenti(Nu(1),abb1,8072,fin,r1)
ReDim aN(4)
For k1 = 1 To 2
aN(k1) = abb1(k1,1)
Next
ReDim aM(4)
Call Abbinamenti(Nu(1),abb3,8072,fin,r2)
For k3 = 1 To 2
aM(k3) = abb3(k3,1)
Next
T = Array(T,GetInfoEstrazione(es),StringaRuote(Ru),StringaNumeri(Nu),esA,clp,StringaNumeri(aN,,1),_
StringaNumeri(aM,,1))
Call AddRigaTabella(T)
Call SetColoreCella(1,RGB(205,201,201),RGB(0,0,0))
Call SetColoreCella(2,RGB(255,255,0),RGB(0,0,0))
Call SetColoreCella(3,RGB(255,0,0),RGB(0,0,0))
Call SetColoreCella(4,RGB(0,255,0),RGB(0,0,0))
Call SetColoreCella(5,RGB(190,190,190),RGB(0,0,0))
Call SetColoreCella(6,RGB(255,255,0),RGB(0,0,0))
Call SetColoreCella(7,RGB(255,255,0),RGB(0,0,0))
Call SetColoreCella(8,RGB(255,255,0),RGB(0,0,0))
Call SetColoreCella(9,RGB(255,255,0),RGB(0,0,0))
End If
Next
CreaTabella
End Sub

Senza polemiche, Controlla lo script che non è attualmente corretto, ti consiglio di usare Option Explicit

'Metodo T3 by Pandit
Sub Main
     Dim Nu(6),Ru(3),T,abb1,abb2,abb3,abb4,Ru1(1)
     colpi = CInt(InputBox(" Quanti colpi di gioco?",,17))
     Ini = EstrazioneFin - 350
     fin = EstrazioneFin
     r1 = 3
     r2 = 4
     p1 = 2
     p2 = 5
     'colpi = x2
     T = Array(T,"Estrazione","Ruote"," 2 x A","Verifica Ambata","Colpo","Abbin.","Abbin.")
     Call InitTabella(T,RGB(0,71,171),,3,6,"swift")
     For es = Ini To fin
          If IndiceMensile(es) = 1 Then
               a = Fuori90(Estratto(Es,R,3) +(Estratto(Es,R1,3)))
              
               c = Fuori90(a * 2):e = Fuori90(a + c)
               f = Fuori90(c + e): g = 90 - f
               h = Fuori90(Vert(g))
               Nu(1) = g
               Nu(2) = h
               EliminaRipetuti Nu
               Ru(1) = r1
               Ru(2) = r2
               Ru1(1) = r3
               Call VerificaEsito(Nu,Ru,es + 1,1,colpi,,esito,clp,esA,id)
               Call Abbinamenti(Nu(1),abb1,8072,fin,r1)
               ReDim aN(4)
               For k1 = 1 To 2
                    aN(k1) = abb1(k1,1)
               Next
               ReDim aM(4)
               Call Abbinamenti(Nu(1),abb3,8072,fin,r2)
               For k3 = 1 To 2
                    aM(k3) = abb3(k3,1)
               Next
               T = Array(T,GetInfoEstrazione(es),StringaRuote(Ru),StringaNumeri(Nu),esA,clp,StringaNumeri(aN,,1),_
               StringaNumeri(aM,,1))
               Call AddRigaTabella(T)
               Call SetColoreCella(1,RGB(205,201,201),RGB(0,0,0))
               Call SetColoreCella(2,RGB(255,255,0),RGB(0,0,0))
               Call SetColoreCella(3,RGB(255,0,0),RGB(0,0,0))
               Call SetColoreCella(4,RGB(0,255,0),RGB(0,0,0))
               Call SetColoreCella(5,RGB(190,190,190),RGB(0,0,0))
               Call SetColoreCella(6,RGB(255,255,0),RGB(0,0,0))
               Call SetColoreCella(7,RGB(255,255,0),RGB(0,0,0))
               Call SetColoreCella(8,RGB(255,255,0),RGB(0,0,0))
               Call SetColoreCella(9,RGB(255,255,0),RGB(0,0,0))
          End If
     Next
     CreaTabella
      Scrivi "Le Ruote usate sono: R=  " & SiglaRuota( R ) & " e R1= " & SiglaRuota ( R1)
End Sub

 

[claudio8]

Ciccio90, Pandit e scarfacetony solo ambata (senza polemica).

44 a Bari e ambetto con il 45 al 6° colpo