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
    martedì 15 luglio 2025
    Bari
    60
    18
    12
    57
    28
    Cagliari
    20
    26
    81
    55
    18
    Firenze
    28
    59
    46
    83
    81
    Genova
    32
    57
    09
    41
    17
    Milano
    58
    31
    49
    38
    63
    Napoli
    36
    58
    57
    45
    59
    Palermo
    03
    05
    48
    86
    62
    Roma
    47
    18
    01
    23
    79
    Torino
    56
    34
    49
    89
    90
    Venezia
    46
    44
    52
    82
    78
    Nazionale
    16
    36
    15
    13
    60
    Estrazione Simbolotto
    Nazionale
    27
    09
    44
    18
    11
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto