Novità

Metodo fortissimo x ambata

solare

Advanced Member >PLATINUM<
Ciao, queto metodo l'ho trovato in questo forum pubblicato nel 2009 da Roby, se qualcuno fa lo script potrebbe essere utile a tutti.
[h=2]Metodo fortissimo per ambata su ruota![/h] 20-02-2009, 23:51



PRIMA OPERAZIONE Osservare il tipo di decina di una qualsiasi ruota che esce come primo estratto la prima estrazione del mese.

Esempio: voglio giocare le mie ambate su Bari? Bene, vado a vedere quale decina è sortita al primo posto nella prima estrazione del mese passato. Fatto ciò, comincio a scrivermi in ordine tutti gli estratti della stessa decina sortiti nell'arco del mese.

Esempio pratico: prendo la ruota di Bari il 2 settembre 2008 (prima estrazione di settembre), ho come primo estratto 88, quindi, l'ottantina sarà la mia decina.

ora mi segno tutti gli estratti che sono usciti in quel mese come ottantina: 88 - 83 - 89 - 82 - 87 - 88 - 81 - 84 - 87 -

Adesso, delle decine con cadenza identica, lascio solo quelli usciti la prima volta:

88 - 83 - 89 - 82 - 87 - 81 - 84

Le ambate saranno gli ultimi tre numeri: 87 - 81 - 84.

Ecco sortire l'87 al primo colpo. I colpi di gioco non vanno, in genere, oltre i 4/5, in qualche raro caso arrivano più in là, ma arrivano.

Ma guardate voi stessi cosa riesce a fare questo metodo. Sarebbe utile una statistica.

Speriamo che qualcuno di buona volontà... :)

Grazie e Ciao



Tag: Nessuno
 
R

Rubino

Guest
ciao solare

le decine sono quelle NATURALI o CABALISTICHE?

esempio NATURALE 21,22,23,24,25,26,27,28,29,30
esempio CABALISTICHE 20,21,22,23,24,25,26,27,28,29
 

solare

Advanced Member >PLATINUM<
Ciao Rubino, io l'ho provato manualmente "che fatica" non male il risultato ottenuto.
Se fossi possibile aggiungere la possibilità ciclica alle ambate sarebbe bello.
Mi spiego meglio avere per ogni singolo numero della terzina la frequenza negli ultimi 3/5 anni es. giugno che frequenza ha ottenuto negli ultimi 3 anni la terzina di bari ?
 
R

Rubino

Guest
una bozza della prima parte, spero questa sera di fare anche il pezzetto che hai detto della ciclica, altrimento per il fine settimana.

Codice:
Option Explicit
Sub Main()
   Dim n,ru,p,est,d,es,i,f,j,retestratti,retidestr,XI
   Dim an(3),ar(1)
   Scrivi "_____________________________________________________________________________"
   Scrivi "_____________________________________________________________________________"
   ru = InputBox("Ruota di gioco",,1)
   ar(1) = ru
   Dim ruote(10)
   For n = 8945 To EstrazioneFin
      es = n
      If IndiceMensile(n) = 1 Then
         ReDim ambate(20,2)
         f = 0
         est = ""
         For p = 1 To 5
            est = est & Format2(Estratto(n,ru,p)) & "."
         Next
         d = DecinaCabalistica(Left(Format2(Estratto(n,ru,1)),2))
         Scrivi "---------------------------------------------------------------------------------------------",1
         Scrivi n & " / " & DataEstrazione(n) & "...." & SiglaRuota(ru) & "..." & est & "..Dec." & d,1
         For es = n + 1 To n + 13
            If es >= EstrazioneFin Then Exit For
            For i = 1 To 5
               If DecinaCabalistica(Estratto(es,ru,i)) = Int(d) Then
                  Scrivi "Ambate Uscite nel mese stessa decina....." & es & "/" & DataEstrazione(es) & " ...Dec..." & Estratto(es,ru,i)
                  f = f + 1
                  ambate(f,1) = f
                  ambate(f,2) = Estratto(es,ru,i)
               End If
            Next
         Next
         Call OrdinaMatrice(ambate,- 1,1)
         If f >= 2 Then
            For j = 1 To 3
               ColoreTesto(2)
               Scrivi "---> Ambate per gioco prossimo mese....." & "..." & ambate(j,2)
               an(j) = ambate(j,2)
            Next
            '''verifica esito
            ColoreTesto(1)
            Call VerificaEsitoTurbo(an,ar,n + 13,1,13,,,,retestratti,retidestr)
            If retestratti <> "" Then
               Scrivi "----> Uscito estratto..." & retestratti & "  al conc." & retidestr & " / " & DataEstrazione(retidestr) & "... colpo n." & retidestr -(n + 12)
               ColoreTesto(0)
               XI = 1
            Else
               If Mese(n) = Month(Date) And Anno(n) = Year(Date) Then
                  Scrivi " In creazione combinazione per New Mese ",1
               Else
               Scrivi " Esito attualmente   NEGATIVA  in corso da n.colpi " & EstrazioneFin -(n + 12) & "  su  13 o Fine Mese Corrente",1

               End If
            End If
         End If
         End If
      Next
End Sub



non ho avuto tempo di fare dei controlli per quello che lo script rintraccia come combinazioni , se lo fai anche tu, mi facili il compito.

se i dati corrispondono a quelli giusti, suggerisci cosa vuoi vedere ulteriormente.
 
Ultima modifica di un moderatore:

solare

Advanced Member >PLATINUM<
Ho notato che l'autore del metodo non considera il 90 "vedi link"
A me sembra che bisogna considerare le decine cabalistiche mentre il listato sembra faccia l'opposto.
 
R

Rubino

Guest
Si ho impostato la decinanaturale ora correggo in decina cabalistica

nel caso del nr.90 come 1 estratto cosa si deve fare?
la decina è la zero o numeretti per interderci?

decina naturale è quella da 81:90
decina cabalistica è quella 90:09


ho aggiunto questi dati

Cattura3.GIF
 
Ultima modifica di un moderatore:

solare

Advanced Member >PLATINUM<
Allora se esce l'1 la decina sarà 1...……….9
se esce il 90 consideriamo 81....90 oppure 80...90
confido nella tua bravura
 
R

Rubino

Guest
Cattura1.GIF
 

Allegati

  • Cattura4.GIF
    Cattura4.GIF
    3,3 KB · Visite: 13
  • Cattura3.GIF
    Cattura3.GIF
    8,2 KB · Visite: 14
  • Cattura2.GIF
    Cattura2.GIF
    7 KB · Visite: 14
Ultima modifica di un moderatore:
R

Rubino

Guest
infatti guardando l'estrazione di questa sera è uscito il 21 a Genova, forse ne usciranno ancora altri.


ulteriore passettino avanti nello script (sempre di bozza stiamo parlando)
domani cercherò di mettere qualche valore statistico.




Codice:
Option Explicit
Sub Main()
   Dim n,ru,p,est,d,es,i,f,j,retestratti,retidestr,XI,k,mm
   Dim an(3),ar(1),colpo(14)
   Scrivi "_____________________________________________________________________________"
   Scrivi "_____________________________________________________________________________"
   ru = InputBox("Ruota di gioco",,1)
   ar(1) = ru
   Dim ruote(10)
   For n = 8945 To EstrazioneFin
      es = n
      If IndiceMensile(n) = 1 Then
         mm = Mid(DataEstrazione(es),4,2)
         ReDim ambate(20,2)
         f = 0
         est = ""
         For p = 1 To 5
            est = est & Format2(Estratto(n,ru,p)) & "."
         Next
         d = DecinaCabalistica(Left(Format2(Estratto(n,ru,1)),2))
         Scrivi "---------------------------------------------------------------------------------------------",1
         Scrivi n & " / " & DataEstrazione(n) & "...." & SiglaRuota(ru) & "..." & est & "..Dec.Cab." & d,1
         For es = n + 1 To n + 13
            If es > EstrazioneFin Then Exit For
            For i = 1 To 5
               If DecinaCabalistica(Estratto(es,ru,i)) = Int(d) Then
                  Scrivi "Ambate Uscite nel mese stessa decina....." & es & "/" & DataEstrazione(es) & " ...Dec..." & Estratto(es,ru,i)
                  f = f + 1
                  ambate(f,1) = f
                  ambate(f,2) = Estratto(es,ru,i)
               End If
            Next
         Next
         Call OrdinaMatrice(ambate,- 1,1)
         If f >= 2 Then
            For j = 1 To 3
               ColoreTesto(2)
               Scrivi "---> Ambate per gioco prossimo mese.." & MeseNome(mm + 1) & " ..." & "..." & ambate(j,2)
               an(j) = ambate(j,2)
            Next
            '''verifica esito
            ColoreTesto(1)
            Call VerificaEsitoTurbo(an,ar,n + 13,1,13,,,,retestratti,retidestr)
            If retestratti <> "" Then
               Scrivi "----> Uscito estratto..." & retestratti & "  al conc." & retidestr & " / " & DataEstrazione(retidestr) & "... colpo n." & retidestr -(n + 12)
               XI = 1
               colpo(retidestr -(n + 12)) = colpo(retidestr -(n + 12)) + 1
            Else
               If Mese(n) = Month(Date) And Anno(n) = Year(Date) Then
                  Scrivi " In creazione combinazione per New Mese ",1
               Else
                  If n > EstrazioneFin Then
                     Scrivi " Esito NEGATIVo nei 13 n.colpi ",1
                     colpo(14) = colpo(14) + 1
                     Exit For
                  End If
                  colpo(14) = colpo(14) + 1
                  Scrivi "Attualmente NEGATIVO da 13 n.colpi ",1
               End If
               ColoreTesto(0)
            End If
         End If
      End If
   Next
   ''''' riepilogo successi per ncolpo
   Scrivi
   ColoreTesto(2)
   Scrivi "Ruota di " & NomeRuota(ru),1
   Scrivi "Periodo da estraz.n.8946 " & DataEstrazione(8946) & " a  " & EstrazioneFin & " / " & DataEstrazione(EstrazioneFin),1
   ColoreTesto(0)
   Scrivi "Riepilogo successi per n.colpo di gioco",1
   For k = 1 To 13
      Scrivi "Colpo n." & Format2(k) & "...Successi..." & colpo(k),1
   Next
   Scrivi "----------   Negativi..." & colpo(14),1
End Sub
 
Ultima modifica di un moderatore:

solare

Advanced Member >PLATINUM<
Ciao, guardando ciò che riporta lo script qualcosa non va.
i numeri sortiti dal 1 maggio al 30 sono: 84-89-89-88-80-88-85-80-84-87 adesso ordino eliminando i doppioni. > 84-89-88-80-85-87 adesso scelgo da dx verso sx gli ultimi tre numeri che saranno da giocare : 87-85-80.
Questa è la procedura esatta secondo la mia interpretazione.
 
R

Rubino

Guest
io l'ho interpretato che sono gli ultimi 3 estratti usciti nel mese che sono validi per il prossimo per una eventuale ripetizione in pochi colpi

oppure mi devi spiegare cosa vuol dire chi ha fatto il metodo, perchè io non capisco cosa vuol dire:

"adesso delle decine con cadenza identica, lascio solo quelli usciti la prima volta."

81 84 87 sono gli ultimi 3 usciti
83 89 81 84 sono gli estratti usciti 1 sola volta




Cattura2.GIF
 

Allegati

  • Cattura.GIF
    Cattura.GIF
    30,5 KB · Visite: 13
Ultima modifica di un moderatore:
R

Rubino

Guest
Adesso, delle decine con cadenza identica, lascio solo quelli usciti la prima volta:
88 - 83 - 89 - 82 - 87 - 81 - 84
Le ambate saranno gli ultimi tre numeri: 87 - 81 - 84.
Ecco sortire l'87 al primo colpo. I colpi di gioco non vanno, in genere, oltre i 4/5, in qualche raro caso arrivano più in là, ma arrivano.

87 è uscito due volte nel mese ma è uno degli ultimi tre.

se tolgo i doppioni come dici te ed ordino in modo decrescente 89 88 87 84 83 82 81

avrei 81 82 83 invece propone 87 - 81 - 84,

questo riferito all'esempio di partenza di chi ha creato il metodo o almeno ha scritto quando ha proposto
questa idea.
 
Ultima modifica di un moderatore:
R

Rubino

Guest
Cattura5.GIF


84 89 89 88 80 88 80 84 87

84 89 88 80 84 87

ricavo sempre come ultimi 80 84 87


Cattura6.GIF



questo invece è relativo all'esempio attuale del mese di MAGGIO della ruota di bari a cui ha fatto riferimento

ma non capisco cosa non va.
 
Ultima modifica di un moderatore:

solare

Advanced Member >PLATINUM<
Questa è la previsione data dall'esempio riportata nel metodo:
Esempio pratico: prendo la ruota di Bari il 2 settembre 2008 (prima estrazione di settembre), ho come primo estratto 88, quindi, l'ottantina sarà la mia decina.

ora mi segno tutti gli estratti che sono usciti in quel mese come ottantina: 88 - 83 - 89 - 82 - 87 - 88 - 81 - 84 - 87 -

Adesso, delle decine con cadenza identica, lascio solo quelli usciti la prima volta:

88 - 83 - 89 - 82 - 87 - 81 - 84

Le ambate saranno gli ultimi tre numeri:
87 - 81 - 84.

Questa è la previsione data alla stessa data dal listato:


7955 / 02.09.2008....BA...88.28.22.02.38...Dec.9
Ambate Uscite nel mese stessa decina.....7956/04.09.2008 ...Dec...83
Ambate Uscite nel mese stessa decina.....7958/09.09.2008 ...Dec...89
Ambate Uscite nel mese stessa decina.....7958/09.09.2008 ...Dec...82
Ambate Uscite nel mese stessa decina.....7959/11.09.2008 ...Dec...87
Ambate Uscite nel mese stessa decina.....7962/18.09.2008 ...Dec...88
Ambate Uscite nel mese stessa decina.....7965/25.09.2008 ...Dec...81
Ambate Uscite nel mese stessa decina.....7965/25.09.2008 ...Dec...84
Ambate Uscite nel mese stessa decina.....7966/27.09.2008 ...Dec...87
Ambate Uscite nel mese stessa decina.....7968/02.10.2008 ...Dec...87
---> Ambate per gioco prossimo mese........87
---> Ambate per gioco prossimo mese........87
---> Ambate per gioco prossimo mese........84
Come puoi vedere non coincidono le previsioni.
 

solare

Advanced Member >PLATINUM<
BARI la previsione di maggio x giugno dovrebbe essere : 80-85-87
 
Ultima modifica:

solare

Advanced Member >PLATINUM<
ho ricontrollato facendo le prove a mano è esatta la previsione di bari 80-85-87
 
Ultima modifica:

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 28 marzo 2024
    Bari
    49
    73
    67
    86
    19
    Cagliari
    64
    36
    37
    02
    04
    Firenze
    66
    27
    44
    90
    17
    Genova
    09
    44
    78
    85
    19
    Milano
    70
    14
    47
    38
    27
    Napoli
    80
    29
    28
    45
    39
    Palermo
    54
    59
    78
    47
    62
    Roma
    17
    22
    49
    52
    88
    Torino
    71
    35
    75
    74
    60
    Venezia
    40
    84
    02
    63
    29
    Nazionale
    08
    13
    44
    69
    85
    Estrazione Simbolotto
    Firenze
    06
    35
    16
    18
    05
Alto