Novità

Lo sapevate che...

CocoNut

CocoNut

Advanced Member >PLATINUM PLUS<
Su tutte le ruote (credo, ma occorre uno scripter), ad ogni estrazione,
prendendo i primi 2 numeri estratti, trasformandoli in figure e, unendo quest'ultime, saranno le ambate da porre in gioco della suddetta ruota.
Io come sempre ho scelto la mia: Bari!
....Voi, divertitevi!
 
Ultima modifica:
ora mi metto a controllare ma intanto ti ringrazio e ti auguro felice festa della donna DONNA;)
 
Quindi giocando su Bari prendi solo i primi 2° estratti di Bari, e metti in gioco le loro figure?
 
Spariti i posti di Ib....

Vabbè...alcuni esempi:

ESTRAZIONE - sabato 18 febbraio 2012

[TABLE="class: tblsUltimeEstrazioni tb100"]
[TR]
[TH]RUOTA[/TH]
[TH]1° estr.[/TH]
[TH]2° estr.[/TH]
[TH]3° estr.[/TH]
[TH]4° estr.[/TH]
[TH]5° estr.[/TH]
[/TR]
[TR="class: grey"]
[TD]Bari[/TD]
[TD="class: center"] 28[/TD]
[TD="class: center"] 35[/TD]
[TD="class: center"] 55[/TD]
[TD="class: center"] 52[/TD]
[TD="class: center"] 53[/TD]
[/TR]
[/TABLE]

2+8 = 10 figura 1
3+5 = 8 figura 8

in gioco: 18 - 81 esito al 4° colpo 81 5° colpo 81 su Bari

ESTRAZIONE - martedì 21 febbraio 2012

[TABLE="class: tblsUltimeEstrazioni tb100"]
[TR]
[TH]RUOTA[/TH]
[TH]1° estr.[/TH]
[TH]2° estr.[/TH]
[TH]3° estr.[/TH]
[TH]4° estr.[/TH]
[TH]5° estr.[/TH]
[/TR]
[TR="class: grey"]
[TD]Bari[/TD]
[TD="class: center"] 60[/TD]
[TD="class: center"] 7[/TD]
[TD="class: center"] 41[/TD]
[TD="class: center"] 75[/TD]
[TD="class: center"] 55[/TD]
[/TR]
[/TABLE]


6+0 = 6 figura 6
0+7 = 7 figura 7
in gioco : 67 - 76 esito al 2° colpo 76 su Bari

x Desi : Auguri anche a te ! :)
 
Ultima modifica:
Blackmore ha scritto:
Quindi giocando su Bari prendi solo i primi 2° estratti di Bari, e metti in gioco le loro figure?
Clicca per espandere...

No Black, le figure dobbiamo unirle e giocare il risultato e vertibile.
Caruccio, anche perchè vedo che non si fanno neanche attendere molto.
Cmq ho scovato un'altra cosetta esaminando questi "trucchetti", la posto in seguito....
 
Coco, controlla perchè non sono sicuro di aver capito bene ;)


Codice: 
Sub main()
Scrivi : ColoreTesto 1: Scrivi " ************************* METODO BY COCONUT *************************",1
Scrivi : ColoreTesto 1: Scrivi " ************************ LISTATO - BLACKMORE ************************",1
Scrivi : ColoreTesto 0
Dim aruo(1)
Dim ambata(2)
Dim aposta(10)
aposta(1) = 1
aruo(1) = 1
k = 8
ini=EstrazioneFin - 50
fin=EstrazioneFin
co=0
rs=InputBox("Quante estrazioni vuoi controllare?",,100)
fin=EstrazioneFin 
ini=fin-rs
For es=ini To fin
AvanzamentoElab ini,fin,es

Messaggio (es)
casi=casi+1

Scrivi String (80,"=")&" Caso n° "&casi,1
co=co+1

Scrivi String (80,"=")

ambata(1)= Fuori90(Figura (Estratto(es,1,1))& Figura (Estratto(es,1,2)))
ambata(2)= Vert(ambata(1))

ImpostaGiocata 1,ambata,aruo,aposta,k

Gioca es
 
Next

Scrivi : Scrivi "Casi Rilevati "& CInt (co)
ScriviResoconto

End Sub
 
E' perfetto, Blackissimo!

Ovvio ha qualche difettuccio, ogni tanto fa cilecca, ma sfido chi abbia un metodo con esiti positivi al 100% di facile utilizzo e gratis a lungo andare....
 
Ah!...dimenticavo!!! Il previsionista vincente dal forum "metodi" sarai tu.....col 31 e 64 su Bari!
 
CocoNut ha scritto:
E' perfetto, Blackissimo!

Ovvio ha qualche difettuccio, ogni tanto fa cilecca, ma sfido chi abbia un metodo con esiti positivi al 100% di facile utilizzo e gratis a lungo andare....
Clicca per espandere...
Io, il metodo infallibile nella storia....ce l'ho!!!!!!
eripgi.gif
 
Ultima modifica:
Se non vi offendete, gli ho dato
un "ottimizzata".
:)




Codice: 
Sub Main()
    Scrivi
    ColoreTesto 1
    Scrivi " ************************* METODO BY COCONUT *************************",1
    Scrivi
    ColoreTesto 1
    Scrivi " ************************ LISTATO - BLACKMORE ************************",1
    Scrivi
    ColoreTesto 0
    Dim aruo(1)
    Dim ambata(2)
    Dim aposta(10)
    aposta(1) = 1
    aruo(1) = r
    k = 12
    ini = EstrazioneFin - 50
    fin = EstrazioneFin
    co = 0
    r = InputBox(" Su quale ruota ?",,1)
    rs = InputBox("Quante estrazioni vuoi controllare?",,100)
    fin = EstrazioneFin
    ini = fin - rs
    For es = ini To fin
        AvanzamentoElab ini,fin,es
        Messaggio(es)
        a = Figura(Estratto(es,1,1))
        b = Figura(Estratto(es,1,2))
        c = Fuori90(a * 10)
        d = Fuori90(c + b)
        ambata(1) = d
        ambata(2) = Vert(ambata(1))
        aruo(1) = r
        co = co + 1
        Scrivi String(80,"=") & " Caso n° " & co,1
        Scrivi DataEstrazione(es) & " -- " & SiglaRuota(r) & " - " & StringaEstratti(es,r) & " * Ambate :   " & ambata(1) & " - " & ambata(2),1
        Scrivi String(80,"=")
        ImpostaGiocata 1,ambata,aruo,aposta,k
        Gioca es,1
    Next
    Scrivi
    Scrivi "Casi Rilevati " & CInt(co)
    ScriviResoconto
End Sub



X CocoNut

mmmmmm....

conosco questa faccia.......

:):)
 
Ultima modifica di un moderatore:
Baffoblu ha scritto:
Se non vi offendete, gli ho dato
un "ottimizzata".
:)



Codice: 
Sub Main()
    Scrivi
    ColoreTesto 1
    Scrivi " ************************* METODO BY COCONUT *************************",1
    Scrivi
    ColoreTesto 1
    Scrivi " ************************ LISTATO - BLACKMORE ************************",1
    Scrivi
    ColoreTesto 0
    Dim aruo(1)
    Dim ambata(2)
    Dim aposta(10)
    aposta(1) = 1
    aruo(1) = r
    k = 12
    ini = EstrazioneFin - 50
    fin = EstrazioneFin
    co = 0
    r = InputBox(" Su quale ruota ?",,1)
    rs = InputBox("Quante estrazioni vuoi controllare?",,100)
    fin = EstrazioneFin
    ini = fin - rs
    For es = ini To fin
        AvanzamentoElab ini,fin,es
        Messaggio(es)
        a = Figura(Estratto(es,1,1))
        b = Figura(Estratto(es,1,2))
        c = Fuori90(a * 10)
        d = Fuori90(c + b)
        ambata(1) = d
        ambata(2) = Vert(ambata(1))
        aruo(1) = r
        co = co + 1
        Scrivi String(80,"=") & " Caso n° " & co,1
        Scrivi DataEstrazione(es) & " -- " & SiglaRuota(r) & " - " & StringaEstratti(es,r) & " * Ambate :   " & ambata(1) & " - " & ambata(2),1
        Scrivi String(80,"=")
        ImpostaGiocata 1,ambata,aruo,aposta,k
        Gioca es,1
    Next
    Scrivi
    Scrivi "Casi Rilevati " & CInt(co)
    ScriviResoconto
End Sub



X CocoNut

mmmmmm....

conosco questa faccia.......

:):)
Clicca per espandere...



Offendersi????? stai scherzando Baffo? :D
In effetti il mio script era abbastanza spartano
Ciao e grazie :)
 
Baffoblu ha scritto:
Se non vi offendete, gli ho dato
un "ottimizzata".
:)




Codice: 
Sub Main()
    Scrivi
    ColoreTesto 1
    Scrivi " ************************* METODO BY COCONUT *************************",1
    Scrivi
    ColoreTesto 1
    Scrivi " ************************ LISTATO - BLACKMORE ************************",1
    Scrivi
    ColoreTesto 0
    Dim aruo(1)
    Dim ambata(2)
    Dim aposta(10)
    aposta(1) = 1
    aruo(1) = r
    k = 12
    ini = EstrazioneFin - 50
    fin = EstrazioneFin
    co = 0
    r = InputBox(" Su quale ruota ?",,1)
    rs = InputBox("Quante estrazioni vuoi controllare?",,100)
    fin = EstrazioneFin
    ini = fin - rs
    For es = ini To fin
        AvanzamentoElab ini,fin,es
        Messaggio(es)
        a = Figura(Estratto(es,1,1))
        b = Figura(Estratto(es,1,2))
        c = Fuori90(a * 10)
        d = Fuori90(c + b)
        ambata(1) = d
        ambata(2) = Vert(ambata(1))
        aruo(1) = r
        co = co + 1
        Scrivi String(80,"=") & " Caso n° " & co,1
        Scrivi DataEstrazione(es) & " -- " & SiglaRuota(r) & " - " & StringaEstratti(es,r) & " * Ambate :   " & ambata(1) & " - " & ambata(2),1
        Scrivi String(80,"=")
        ImpostaGiocata 1,ambata,aruo,aposta,k
        Gioca es,1
    Next
    Scrivi
    Scrivi "Casi Rilevati " & CInt(co)
    ScriviResoconto
End Sub



X CocoNut

mmmmmm....

conosco questa faccia.......

:):)
Clicca per espandere...

Grazie mille Baffo, per l'ottimizzazione dello script, nulla togliendo al mitico Blackissimo !
Però...lasciami un po' di curiosità, lo sai che questa è donna, ed oggi è la festa delle " curiose " :cool:
....a cosa ti riferivi con " conosco questa faccia" ?
Era riferito al metodino ?
Se sì, chiedo scusa all'autore originale del metodo,
ma giuro l'ho catturato, come sempre del resto, perchè è il mio modo di " vedere i numeri ",
guardando il quadro estrazionale. Spero di non aver interpretato male....

 
Ultima modifica:
Black, mi sono giocata l'ambo 31 64 della quartina "Spia 59" nella sezione "metodi" poichè convergente...
e se dovessi vincere tra pochi minuti, ti garantisco il merito sarà tutto tuo,
e non come qualcun'altro possa pensare !
Un abbraccio !
 
......Sempre lei:rolleyes:
Codice: 
Sub Main
    Dim ruote(2)
    Dim posta(10)
    Dim n(4)
    Dim Importi(1,15)
    posta(1) = 1
    ruote(1) = 1
    Ini = 8350
    fin = EstrazioneFin
    co = 0
    For es = Ini To fin
        AvanzamentoElab Ini,fin,es
        a1 = ControFigura(Estratto(es,10,1))
        a2 = ControFigura(Estratto(es,10,3))
        a3 = ControFigura(Estratto(es,10,5))
        a = Fuori90(a1 & a2 & a3)
        b = ComplAdX(a)
        co = co + 1
        n(1) = a
        n(2) =(b)
        ImpostaGiocata 1,n,ruote,posta,20,1
        Gioca es
    Next
    Scrivi
    Scrivi String(65,"*")
    ColoreTesto 2
    Scrivi" casi trovati : " & co,1
    ColoreTesto 0
    Scrivi String(65," * ")
    TestoInBandaPassante "*°*°* SEMPRE LEI  *°*°* ",1,3,0
    ScriviResoconto
End Sub
 
Ottimo lavoro, Cicci!

Ora ti chiedo questo script :

Sommare i primi 2 estratti ad ogni estrazione sulla ruota di Bari, risultato e vertibile in gioco su ruota.
 
Ciao Pat,
BARI si presta molto bene a ogni sorte di giochini,
infatti anche questo non è male:rolleyes:
Il problema è coniugare le ambate di ogni giochino
Se si riuscisse in ciò,
sarebbe na strage a ogni estrazione
Codice: 
Sub Main
    Dim ruote(2)
    Dim posta(10)
    Dim n(4)
    Dim Importi(1,15)
    posta(1) = 1
    ruote(1) = 1
    Ini = 8350
    fin = EstrazioneFin
    co = 0
    For es = Ini To fin
        AvanzamentoElab Ini,fin,es
        a1 = Estratto(es,1,1)
        a2 = Estratto(es,1,2)
        a = Fuori90(a1 + a2)
        b = Vert(a)
        co = co + 1
        n(1) = a
        n(2) =(b)
        ImpostaGiocata 1,n,ruote,posta,20,1
        Gioca es
    Next
    Scrivi
    Scrivi String(65,"*")
    ColoreTesto 2
    Scrivi" casi trovati : " & co,1
    ColoreTesto 0
    Scrivi String(65," * ")
    TestoInBandaPassante "*°*°* Convergenze del Pantero *°*°* ",1,3,0
    ScriviResoconto
End Sub
 
Cmq noto che,anche qui molto forte il 36/63
tra l'altro appartenenti alla tua amata figura 9
Studia qualcosa di buono che un paio di euro ce li butto
Io vedo molto bene sti numeri:
8-10-36-63-80
 
Ultima modifica:
Visto che risultati?
Pensa che questo giochino mi è saltato all'occhio qualche estrazione fa' e vedo che da' ottime soddisfazioni !
Volevo fare la richiesta di questo script oggi pomeriggio a Black, ma non ho fatto in tempo a postarla.
Cmq sì, convergente....il 18 - 81 si sposeranno col 63 ed io questo ambo lo porto avanti !
Ah, e spiegami il panterino...chi sarebbe?
 
Ultima modifica:
Se noti,le cinquine estrapolate,molto spesso hanno ambi in figura e in tripla di figura.
Magari se hai tempo,prova a fare delle verifiche con carta e penna formando delle quartine
con le ambate degli script in tuo possesso.Forse potrebbe essere una strada buona:)
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 19 luglio 2025
    Bari
    70
    37
    36
    68
    01
    Cagliari
    57
    02
    64
    33
    41
    Firenze
    18
    62
    09
    05
    06
    Genova
    36
    10
    74
    37
    42
    Milano
    39
    07
    58
    23
    22
    Napoli
    18
    69
    28
    36
    40
    Palermo
    71
    66
    72
    64
    23
    Roma
    19
    64
    39
    77
    10
    Torino
    83
    63
    71
    08
    72
    Venezia
    51
    83
    26
    50
    74
    Nazionale
    89
    81
    63
    32
    03
    Estrazione Simbolotto
    Nazionale
    16
    32
    21
    19
    03
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto