numeretti magici AMBO - contiene listato

[kribio2]

Ciao a tutti, provate ad evidenziare su una qualsiasi estrazione l'uscita sulle varie ruote dei cosiddetti numeretti ovvero i numeri della decina 0 quindi i seguenti numeri 1,2,3,4,5,6,7,8 e 9...

poi verificate che vi siano le seguenti condizioni, i numeri sortiti:
- devono trovarsi in posizione isotopa;
- non devono essere uguali (esempio 7 e 7, 1 e 1);

Se ad esempio trovassimo sulla ruota di CA il num. 6 e in posizione isotopa, sulla ruota di PA il num. 3, allora ci sarebbe da fare il seguente calcolo:

6-3=3 (si parte dal numero più grande tra i due e si fa la differenza)

si pongono in gioco 63 e 36 (costituiti dall'unione delle due cifre e dal vertibile)

per calcolare gli ultimi due numeri invece facciamo 63-3=60 (63 è come già detto l'unione delle due cifre al quale si sottrae il 3)

e poi 36+3=39 (36 è il vertibile al quale stavolta aggiungiamo il 3)

risultato si pongono in gioco sulle due ruote di rilevamento 5 numeri per l'uscita dell'ambo i seguenti numeri

3.63.36.60.39

e se vogliamo, in fase di recupero, si possono giocare gli stessi numeri a tutte le ruote per la sorte del terno.

Nel caso appena descritto l'ambo a ruota si è fatto attendere 5 colpi.

allego un file dove sono riportati altri tre casi con delle immagini...

Credo che un listatino possa essere utile per testare meglio l'efficacia del metodo.

Chiedo a quanti sanno creare i listati di darmi una mano per poter condividere con tutti i risultati.
grazie

Kribio2

 

[Baffoblu]

Listato corretto con aggiunta del numeretto 9


Buon divertimento...

Sub Main()
    Dim idEstr
    Dim Inizio
    Dim Fine
    Dim ruote(10)
    Dim ruota(1)
    Dim posta(10)
    Dim poste(10)
    Dim r1
    Dim r2
    Dim p1
    Dim p2
    Dim nAnalisi
    Dim nColpiDiGioco
    Dim n(5)
    posta(2) = 1
    poste(2) = 1
    poste(3) = 1
    nAnalisi = CInt(InputBox(" Quante estrazioni vuoi controllare ? ",,"50"))
    nColpiDiGioco = CInt(InputBox(" Per quanti colpi vuoi giocare ? ",,"9"))
    Inizio = EstrazioneFin - nAnalisi
    Fine = EstrazioneFin
    co = 0
    For idEstr = Inizio To Fine
        Messaggio "elab. estr. [" &(idEstr) & "] di " & DataEstrazione(idEstr,1)
        Call AvanzamentoElab(Inizio,Fine,idEstr)
        ruote(1) = r1
        ruote(2) = r2
        ruota(1) = 11
        For r1 = 1 To 10
            For r2 = r1 + 1 To 10
                For p1 = 1 To 4
                    For p2 = 1 To 5
                        a = Estratto(idEstr,r1,p1)
                        b = Estratto(idEstr,r2,p2)
                        If a < 10 Then
                            If b < 10 Then
                                If a <> b Then
                                    If p1 = p2 Then
                                        c = Massimo(a,b)
                                        d = Minimo(a,b)
                                        e = Abs(c - d)
                                        k = c * 10
                                        k1 = k + d
                                        k2 = Vert(k1)
                                        k3 = k1 - e
                                        k4 = k2 + e
                                        n(1) = k1
                                        n(2) = k2
                                        n(3) = k3
                                        n(4) = k4
                                        n(5) = e
                                        '---------------
                                        If k1 > 90 Then
                                            w1 = Fuori90(k1)
                                            w = d * 10
                                            w2 = w + c
                                            wz = k1 - e
                                            w3 = Fuori90(wz)
                                            w4 = Fuori90(w2 + e)
                                            n(1) = w1
                                            n(2) = w2
                                            n(3) = w3
                                            n(4) = w4
                                            n(5) = e
                                            'EliminaRipetuti n
                                        End If
                                        ruote(1) = r1
                                        ruote(2) = r2
                                        ruota(1) = 11
                                        co = co + 1
                                        Scrivi String(100,"°") & " Caso n°" & co,1
                                        Scrivi DataEstrazione(idEstr) & " -- " & SiglaRuota(r1) & " - " & StringaEstratti(idEstr,r1) & " -- " & SiglaRuota(r2) & " - " & StringaEstratti(idEstr,r2),1
                                        Scrivi
                                        ColoreTesto 1
                                        Scrivi "Rintracciati " & a & " e " & b & " in " & p1 & "° posizione Isotopa",1
                                        Scrivi
                                        Scrivi "Previsione :   " & n(1) & " - " & n(2) & " - " & n(3) & " - " & n(4) & " - " & n(5),1
                                        ColoreTesto 0
                                        Scrivi String(65,"="),1
                                        ImpostaGiocata 1,n,ruote,posta,nColpiDiGioco,2
                                        ImpostaGiocata 2,n,ruota,poste,nColpiDiGioco
                                        Gioca idEstr,1
                                    End If
                                End If
                            End If
                        End If
                        If ScriptInterrotto Then Exit For
                    Next
                Next
            Next
        Next
    Next
    Scrivi
    Scrivi String(100,"*")
    ColoreTesto 2
    Scrivi" casi trovati : " & co,1
    ColoreTesto 0
    Scrivi String(100," * ")
    TestoInBandaPassante(" LISTATO BY  B A F F O B L U "),1,3,0
    ScriviResoconto
End Sub

 

[kribio2]

Intanto grazie mille Baffoblu per la disponibilità.
Volevo precisare che nel caso del numeretto "9" il calcolo dovrebbe essere il seguente: es. 9 e 1 diff.=8 poi 91 (1 calcolato con il fuori 90) e 19 sono i secondi numeri; poi 91-8=83 e 19+8=27 quindi i num. in gioco sono 8, 1, 19, 83 e 27.
Ho visto le statistiche di gioco e non credo che il trend possa cambiare con questa modifica, tuttavia il gioco è affascinante proprio per questo... ci sono molte giocate che si concludono con esiti positivi (ambi e terni) quindi... va bene anche così.

Baffoblu, visto che sei così bravo con il lavoro di analisi e per la compilazione dei listati, potresti suggerirmi qualche lettura (non so se c'è qualche riferimento sul forum) per poterci capire qualcosa...
Grazie grazie grazie...
Kribio2

 

[Y10]

Bel metodino , un grazie a Kribio e al mitico Baffoblù.

 

[Baffoblu]

Intanto grazie mille Baffoblu per la disponibilità.
Volevo precisare che nel caso del numeretto "9" il calcolo dovrebbe essere il seguente: es. 9 e 1 diff.=8 poi 91 (1 calcolato con il fuori 90) e 19 sono i secondi numeri; poi 91-8=83 e 19+8=27 quindi i num. in gioco sono 8, 1, 19, 83 e 27.
Ho visto le statistiche di gioco e non credo che il trend possa cambiare con questa modifica, tuttavia il gioco è affascinante proprio per questo... ci sono molte giocate che si concludono con esiti positivi (ambi e terni) quindi... va bene anche così.

Baffoblu, visto che sei così bravo con il lavoro di analisi e per la compilazione dei listati, potresti suggerirmi qualche lettura (non so se c'è qualche riferimento sul forum) per poterci capire qualcosa...
Grazie grazie grazie...
Kribio2

Il listato che ho messo in precedenza è stato corretto, con l'aggiunta del numeretto 9

C'è una guida di base agli script che ho fatto tempo fa, la trovi nell'area download....

Cerca "guida allo script di spaziometria" di Baffoblu

Puoi cominciare da quella perchè è una guida molto elementare.

Ci sarebbero dei video di LuigiB, ma trattano argomenti avanzati e non so
piu che fine hanno fatto, sicuramente in qualche post dell'area download,
ma dove di preciso non so, tieni presente che sono stati fatti un annetto fa,
quindi chissa dove stanno ora....

 

[kribio2]

grazie

 

[giluge]

x baffoblu
l'ho eseguito
guarda, e' normale che segni 93 come numero e in altra prev,91?

02.05.2012 -- CA - 89.01.14.06.57 -- VE - 25.47.58.09.32Rintracciati 6 e 9 in 4° posizione IsotopaPrevisione : 6 - 69 - 93 - 72 - 3

 

[Baffoblu]

x baffoblu
l'ho eseguito
guarda, e' normale che segni 93 come numero e in altra prev,91?

02.05.2012 -- CA - 89.01.14.06.57 -- VE - 25.47.58.09.32Rintracciati 6 e 9 in 4° posizione IsotopaPrevisione : 6 - 69 - 93 - 72 - 3

No, non è normale.

Listato corretto !

Non ho fatto altro che fare il fuori90.

ma spesso in questi casi si ha un doppione, dato che mi sono attenuto a quello che dice l'autore, aspettiamo che dice a riguardo.

 

[kribio2]

Ciao Giluge, ho letto il tuo post ed ho fatto manualmente i calcoli: parto dall'estrazione di VE che contiene il numeretto più grande "9" al quale sottraggo il numeretto "6" di CA

quindi 9-6=3(primo numero da giocare)

x il secondo e terzo numero 96 (fuori 90) 6 e 69

quarto numero 6 (sarebbe il 96 con il fuori 90)-3=3 (è effettivamente un doppione del 3 già uscito)

quinto numero 69+3=72



mi torna tutto ma non capisco da dove esca fuori il "91" in "altra previsione"....

 

[lorelai]

potreste essere cosi gentili da farci sapere quali previsioni sono in gioco? grazie anche a nome di chi non sa leggere gli script..

 

[kribio2]

Scusa Lorelai ma anche io oltre ad essere nuovo del forum non ho molta dimestichezza con i famigerati script tant'è che ho chiesto aiuto a Baffoblu il quale gentilmente ha preparato un listato sulla base delle indicazion che gli ho dato. Comunque, stando al listato attualmente seguiamo la seguente previsione

Numeri in gioco : 06.69.03.72.03 su CA VE per Ambo
In corso per altre 8 estrazioni

Numeri in gioco : 06.69.03.72.03 su TT per Ambo,Terno
In corso per altre 8 estrazioni

Ciao Kribio2

 

[lorelai]

ti ringrazio....
ciaoooo

 

[kribio2]

Lorelai, per essere precisi, ho aggioranto l'ottimo programma SpazioMettria con l'ultima estrazione del lotto ed è stata generata anche la seguente previsione...

Numeri in gioco : 05.59.01.63.04 su GE RO per Ambo
In corso per altre 9 estrazioni

Numeri in gioco : 05.59.01.63.04 su TT per Ambo,Terno
In corso per altre 9 estrazioni


Ciao
Kribio2

 

[giluge]

No, non è normale.

Listato corretto !

Non ho fatto altro che fare il fuori90.

ma spesso in questi casi si ha un doppione, dato che mi sono attenuto a quello che dice l'autore, aspettiamo che dice a riguardo.

grazie baffo
forse avevo il vecchio listato
ora non esce ne' 93, ne' 91
ancora un grazie

 

[kribio2]

Estrazione di ieri sera .... AMBO

Previsione : 86 - 68 - 84 - 70 - 2
=================================================================
Estrazione generatrice del pronostico 08532 [ 55 - 08/05/2012]
G 0001
Numeri in gioco : 86.68.84.70.02 su BA NA per Ambo
In corso per altre 7 estrazioni
G 0002
Numeri in gioco : 86.68.84.70.02 su TT per Ambo,Terno
V N. [86.68.84.70.02 ] [TT] [FI][68 .. .. 70 ..] C. 2 Ambo 08534 [ 57 - 12/05/2012]