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ì 16 settembre 2025
    Bari
    26
    29
    18
    10
    69
    Cagliari
    28
    35
    57
    44
    17
    Firenze
    19
    29
    49
    15
    17
    Genova
    23
    37
    13
    90
    58
    Milano
    33
    84
    76
    24
    79
    Napoli
    78
    15
    03
    24
    56
    Palermo
    80
    24
    41
    08
    75
    Roma
    55
    62
    83
    34
    69
    Torino
    27
    80
    69
    51
    84
    Venezia
    89
    74
    72
    82
    21
    Nazionale
    45
    20
    85
    33
    67
    Estrazione Simbolotto
    Palermo
    21
    19
    27
    36
    18
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto