per joe91 piccola modifica a uno script

[Zetrix]

ciao joe91 vorrei rintracciare l elemento di chiusura della terzina simmetrica puoi vedere se riesci ad inserire questa opzione allego fig lo script e nel post successivo

 

[Zetrix]

Sub Main()
Dim ruote(10)
Dim ruota(1)
Dim am(3)
Dim poste(2)
'--------------------------------------------------
poste(1) = 1 '<---per estratto
poste(2) = 1 '<---per ambo
t = 0
ini = EstrazioneFin - 2 '<----Imposta estrazione precedenti
fin = EstrazioneFin
For es = Ini To fin
Messaggio "Estrazione: " & es
For r = 1 To 10
For p1 = 1 To 4
For p2 = p1 + 1 To p2 ' <--- ambo unito
'------------------------------------------------------
a1 = Estratto(es,r,p1)
a2 = Estratto(es,r,p2)
d1 = Distanza(a1,a2)
If d1 = 30 Then '<---- distanza ciclometrica


'-----------------------------------------------------------------------------
a = Fuori90(a1 + a2) '<---- imposta gioco
b = Fuori90(a + 30)
c = Fuori90(b + 30)
d = Fuori90(c + 30)
'------------------------------------------------
ruote(1) = r
'------------------------------------------------
am(1) = b
am(2) = c
am(3) = d
'------------------------------------------------
If(p1 = 1 And p2 = 5) Then

Else

End If



If(cont1 = 0 And cont2 <> 9 And cont3 = 0 And r <> 4) Then
t = t + 1
Scrivi
Scrivi"--------------------------------------------------------------------------"
Scrivi DataEstrazione(es) & " [" & Left(NomeRuota(r),2) & "] " & Format2(a1) & "-" & Format2(a2) & _
" [" & Format2(p1) & "-" & Format2(p2) & "] " & " Dist. " & Format2(d1)
Scrivi"--------------------------------------------------------------------------"
ImpostaGiocata 1,am,ruote,poste,5,1 '<----Imposta colpi di gioco


For c = 2 To 6
For d = 2 To 6
ImpostaInterruzioni c,d,2
ImpostaInterruzioni 1,c,2
ImpostaInterruzioni c,1,1
Next
Next
Gioca es
End If
End If
Next
Next
Next
Next


End Sub

 

[Zetrix]

ciao disaronno figurati nn devi scusarti grazie per la tua disponibilita mi occorre rintracciare il suo simmetrico come da allegato nella ruota diam per vedere come si comporta poi una volta ke so dove si trova questo numero diventa piu facile impostare il gioco

 

[Joe91]

Ciao ...

Prova questo:

Sub Main()
 Dim ruote(10)
 Dim ruota(1)
 Dim am(3)
 Dim poste(2)
 '--------------------------------------------------
 poste(1) = 1 '<---per estratto
 poste(2) = 1 '<---per ambo
 t = 0
 ini = EstrazioneFin - 2 '<----Imposta estrazione precedenti
 fin = EstrazioneFin
 For es = Ini To fin
 Messaggio "Estrazione: " & es
 For r = 1 To 10
 For p1 = 1 To 4
 For p2 = p1 + 1 To p2 ' <--- ambo unito
 '------------------------------------------------------
a1 = Estratto(es,r,p1)
 a2 = Estratto(es,r,p2)
 d1 = Distanza(a1,a2)
 If d1 = 30 Then '<---- distanza ciclometrica


 '-----------------------------------------------------------------------------
a = Fuori90(a1 + a2) '<---- imposta gioco
 b = Fuori90(a + 30)
 c = Fuori90(b + 30) 
d = Fuori90(c + 30)
 '------------------------------------------------ 
ruote(1) = r 
'------------------------------------------------ 
am(1) = b 
am(2) = c
am(3) = d
 '------------------------------------------------
If(p1 = 1 And p2 = 5) Then

 Else

 End If 



If(cont1 = 0 And cont2 <> 9 And cont3 = 0 And r <> 4) Then
 t = t + 1
Terzo a1,a2,a3 
 Scrivi
 Scrivi"--------------------------------------------------------------------------"
Scrivi 
Scrivi DataEstrazione(es) & " [" & Left(NomeRuota(r),2) & "] " & Format2(a1) & "-" & Format2(a2) & _
 " [" & Format2(p1) & "-" & Format2(p2) & "] " & " Dist. " & Format2(d1)  &  " Terzo Simmetrico : "& Format2(a3) & " Presente ",0,0 
For rr = 1 To 10 
If Posizione (es,rr,a3) > 0 Then  Scrivi SiglaRuota (rr)  & "  ",0,0
Next 
Scrivi ""
Scrivi"--------------------------------------------------------------------------" 


ImpostaGiocata 1,am,ruote,poste,5,1 '<----Imposta colpi di gioco


 For c = 2 To 6
 For d = 2 To 6
 ImpostaInterruzioni c,d,2
 ImpostaInterruzioni 1,c,2
 ImpostaInterruzioni c,1,1
 Next
 Next
 Gioca es
 End If
 End If
 Next
 Next
 Next
 Next
 

End Sub 

Sub Terzo (x,y,z)  'By Joe
If Fuori90 (x+30) <> y Then
z = Fuori90 ( x + 30 )
Else 
z = Fuori90 ( y + 30 )
End If 
End Sub

 

[Zetrix]

grazie Joe91 va bene ce solo un piccolo problema quanto inserisco a3 nella giocata il simmetrico si vede nella successiva giocata poi se puoi vorrei nella giocata il simmetrico ma nella ruota diam e nn quella di base

 

[Joe91]

Ciao,

Ho aggiunto la ricerca del terzo mancante (a completare la terzina simmetrica) ... in funzione dei due noti,

e ... non ho nè letto lo script, oltre il necessario per fare questo, nè considerato cosa tu ne volessi fare di questo "terzo"

avendo letto altrove, che da un lato sapevi impostare la giocata e dal' altro che, forse,

stavi solo considerando se applicarla sulla ruota diametrale ... non sono intervenuto.

Quindi non avendo le modifiche da te fatte ... certamente mi è impossibile capire perchè non funzionino.

Poi ... lo script "ha parti" ed esiti di interventi precedenti probabilmente di più scripter, che lo rendono un pò strano ...

sia nel suo aspetto che nel probabile comportamento.

Ma questo, se non ne pregiudica il funzionamento, potrebbe anche accettarsi ... ma davvero, non so, se funzioni e faccia quanto vorresti,

non faccia, correttamente, quanto desideri.

Fammi Sapere.

 

[Zetrix]

Sub Main()
Dim ruote(10)
Dim ruota(1)
Dim am(3)
Dim poste(2)
'--------------------------------------------------
poste(1) = 1 '<---per estratto
poste(2) = 1 '<---per ambo
t = 0
ini = EstrazioneFin - 2 '<----Imposta estrazione precedenti
fin = EstrazioneFin
For es = Ini To fin
Messaggio "Estrazione: " & es
For r = 1 To 10
For p1 = 1 To 4
For p2 = p1 + 1 To p2 ' <--- ambo unito
'------------------------------------------------------
a1 = Estratto(es,r,p1)
a2 = Estratto(es,r,p2)
d1 = Distanza(a1,a2)
If d1 = 30 Then '<---- distanza ciclometrica




'-----------------------------------------------------------------------------
a= a3 ' a = Fuori90(a1 + a2) '<---- imposta gioco
' b = Fuori90(a + 30)
' c = Fuori90(b + 30)
' d = Fuori90(c + 30)
'------------------------------------------------
ruote(1) = r
'------------------------------------------------
am (1) = a 'am(1) = b
'am(2) = c
'am(3) = d
'------------------------------------------------
If(p1 = 1 And p2 = 5) Then


Else


End If






If(cont1 = 0 And cont2 <> 9 And cont3 = 0 And r <> 4) Then
t = t + 1
Terzo a1,a2,a3
Scrivi
Scrivi"--------------------------------------------------------------------------"
Scrivi
Scrivi DataEstrazione(es) & " [" & Left(NomeRuota(r),2) & "] " & Format2(a1) & "-" & Format2(a2) & _
" [" & Format2(p1) & "-" & Format2(p2) & "] " & " Dist. " & Format2(d1) & " Terzo Simmetrico : " & Format2(a3) & " Presente ",0,0
For rr = 1 To 10
If Posizione(es,rr,a3) > 0 Then Scrivi SiglaRuota(rr) & " ",0,0
Next
Scrivi ""
Scrivi"--------------------------------------------------------------------------"




ImpostaGiocata 1,am,ruote,poste,5,1 '<----Imposta colpi di gioco




For c = 2 To 6
For d = 2 To 6
ImpostaInterruzioni c,d,2
ImpostaInterruzioni 1,c,2
ImpostaInterruzioni c,1,1
Next
Next
Gioca es
End If
End If
Next
Next
Next
Next




End Sub


Sub Terzo(x,y,z) 'By Joe
If Fuori90(x + 30) <> y Then
z = Fuori90(x + 30)
Else
z = Fuori90(y + 30)
End If
End Sub

 

[Zetrix]

ciao Joe nello script vorrei il simmetrico (di chiusura) nella giocata se possibile su tutte le ruote

 

[Joe91]

Ciao Ragazzi,

Per me va bene. Va tutto bene. Certo che va bene. Se gira senza errori ... Va bene.

Ma una piccola modifica o correzione è una piccola modifica o correzione ...

Il metodo è il metodo.

O lo si descrive, o lo si ricava dallo script ... modificato lo script è modificato il metodo ...

Dopo di che ditemi voi .. di cosa stiamo parlando? di una correzione di un metodo o dell'altro.

Va bene ... ma siamo al gioco delle tre carte.

Meglio descrivere il metodo ... e poi realizzare lo script, meglio ancora,

studiare la statistica e poi redigere il metodo.

Comunque, fate ciò che preferite.

 

[Zetrix]

grazie disaronno lo script va bene e solo quanto inserisco le estraz precedenti nn funziona forse sarebbe meglio fare da zero ma con queste caratterestiche premetto ke lo script e stato in parte modificato da me quindi e meglio farlo uno nuovo grazie anke a Joe per l interessamento dello script

 

[Joe91]

Ciao Zetrix, disaronno ... & C.

Come ho scritto per me va bene ... come va bene per voi.

Disaronno ha riaperto tutte le linee che avevi chiuso ed ha aggiunto il calcolo della ruota diametrale:

R1= R + 5

Se lo estrai dall script e lo fai girare un mini-script-incubatore ... per verificare cosa fa, avresti questo :

Sub Main()
For R = 1 To 10
r1 = r + 5
Scrivi SiglaRuota (R) & "-" &  SiglaRuota (R1)
Next
End Sub

Quindi a parer mio, va bene, come va bene considerare la Nazionale tra le ruote diametrali e perderne 5 per strada!

Se va bene per voi ... personalmente, penso non sia il risultato voluto.

Quindi permettetemi un consiglio, un altro script, per favore ... No!

DEFINIAMO pregi / difetti / funzionamenti e non ... Correggiamo questo.

 

[Joe91]

Come ho scrittto precedentemente descriviamo dapprima

il metodo che è contenuto nello script ... e da quanto si apprende leggendo il post.

Quando nelle ultime 3 estrazioni, in una delle 10 ruote, si rileva un Ambo Unito, di una terzina simmetrica,

ovvero in Distanza30, di esso, calcoli la somma dei lottroni (con l'eventuale Fuori90) ed il Terzo Estratto,

necessario a completare la terzina simmetrica.

I 2 numeri risultanti saranno testati gli esiti per Estratto ed Ambo per 9 Colpi, s

ulla ruota di rilevazione, sulla ruota Diametrale e su Tutte.

In ultimo è richiesto il rendiconto economico, del metodo.

Quindi dello script ... che gira si assumono giusti i dimensionamenti delle variabili

ed i tre For - Next più esterni.

For Es= Ini to Fin
For R1= 1 to 10
For P1 = 1 to 4
P2 = P1 +1
...
Next 'P1
Next 'R1
Next 'Es

Il ciclo For-Next per il calcolo della seconda posizione, seppur funzionante, non va bene.

... Per essere Unito un Ambo deve essere contenuto in due posizioni consecutive: P1+1

Regola: Scrivere meno codice possibile.

 

[Joe91]

Zetrix aveva richiesto correzione sul metodo che ho descritto per sommi capi.

'------------------------------------------------------
a1 = Estratto(es,r,p1)
a2 = Estratto(es,r,p2)
d1 = Distanza(a1,a2)
If d1 = 30 Then '<---- distanza ciclometrica

Mentre disaronno ricerca l'estratto in una seconda ruota (diametrale) ... ed ANCHE IN ALTRA posizione.

'-----------------------------------------------------------------------------
a= a3                         ' a = Fuori90(a1 + a2) '<---- imposta gioco
                                   ' b = Fuori90(a + 30)
                                      ' c = Fuori90(b + 30)
                                          ' d = Fuori90(c + 30)

a1 = Estratto(es,r,p1)
a2 = Estratto(es,r,p2)
d1 = Distanza(a1,a2)
If d1 = 30 Then '<---- distanza ciclometrica
'-----------------------------------------------------------------------------
r1 = r + 5
For p3 = 1 To 5
a3 = Estratto(es,r1,p3)

Ho descritto sbagliato il calcolo della diametrale ... (fornendo lo script che lo dimostra).

Il calcolo in altra posizione, non richiesto, non andrebbe calcolato.

Vi sono tuttavia metodi "molto belli" dal punto di vista spaziometrico/ciclometrico ...

e prevedono una maggiore selettività imposta alla simmetria del triangolo-terzina-simmetrica.

Lo vedrei comunque alternativo all'imposizione della ruota diametrale.

Il doppio-filtro-condizione porterebbe ad un numero veramente esiguo di casi giocabili.

Riassumo: Sarebbero tre numeri in distanza 30 in due ruote diametrali

posizionati sui vertici di un triangolo equilatero, disegnabile nel quadro estrazionale.

Qualcuno ricorderà il metodo che utilizzava Teresa, qui sul Forum, anni fa. Transeat.

Codificato quanto espresso dello script va bene: il prelievo degli estratti di cui calcolare la distanza 30.

... Buona giornata a tutti.

 

[Joe91]

La Ruota Diametrale

La Ruota Diametrale

Per il calcolo di essa si presuppongono le 10 (non11) ruote disposte ciclometricamente.

Giusto aggiungere "+5" alla ruota ma poi raggiunta la coppia "Quinta-Decima" ... MI_VE_

si riparte con Bari Diametrale di Napoli. Una sorta di "Fuori10" applicato alle ruote.

Quando Napoli è la sesta Ruota si ha:

Sesta Ruota "+5" = Undicesima ... che (Fuori10) diventa Prima = Bari

Lo si vede in questo piccolo script, che ho realizzato appositamente con la Funzione RD (RuotaDiametrale).

Sub Main
 For R = 1 To 10 
  
  Scrivi SiglaRuota (R) & "-" & SiglaRuota(RD(R))
  
 Next 

End Sub

Function RD (X)
Y = X + 5
 If Y > 10 Then Y = Y - 10
 RD = Y
End Function

Che produce :

BA-NA
CA-PA
FI-RO
GE-TO
MI-VE
NA-BA
PA-CA
RO-FI
TO-GE
VE-MI

Poi ... considerando che Spaziometria ha l'istruzione RuotaDiametrale ...

utilizziamo questa per comodità.

 

[Joe91]

Lo Script Originale con la sola aggiunta ... di una linea di debug e lacorrezione descritta (for P2... ) sopra è questo:

Sub Main()
 Dim ruote(10)
 Dim ruota(1)
 Dim am(3)
 Dim poste(2)
 '--------------------------------------------------
 poste(1) = 1 '<---per estratto
 poste(2) = 1 '<---per ambo
 t = 0
 ini = EstrazioneFin - 2'<----Imposta estrazione precedenti
 fin = EstrazioneFin
 For es = Ini To fin
  Messaggio "Estrazione: " & es
  For r = 1 To 10
   For p1 = 1 To 4
    'For p2 = p1 + 1 To p2 ' <--- ambo unito
    p2 =  p1+1 ' <--- ambo unito
     '------------------------------------------------------
     a1 = Estratto(es,r,p1)
     a2 = Estratto(es,r,p2)
     d1 = Distanza(a1,a2)
     If d1 = 30 Then '<---- distanza ciclometrica
      '-----------------------------------------------------------------------------
      a = Fuori90(a1 + a2) '<---- imposta gioco
      b = Fuori90(a + 30)
      c = Fuori90(b + 30)
      d = Fuori90(c + 30)
      Scrivi A &  " " & B & " " & C & " " & D
      '------------------------------------------------
      ruote(1) = r
      '------------------------------------------------
      am(1) = b
      am(2) = c
      am(3) = d
      '------------------------------------------------
      If(p1 = 1 And p2 = 5) Then
      Else
      End If
      If(cont1 = 0 And cont2 <> 9 And cont3 = 0 And r <> 4) Then
       t = t + 1
       Scrivi
       Scrivi"--------------------------------------------------------------------------"
       Scrivi DataEstrazione(es) & " [" & Left(NomeRuota(r),2) & "] " & Format2(a1) & "-" & Format2(a2) & _
       " [" & Format2(p1) & "-" & Format2(p2) & "] " & " Dist. " & Format2(d1)
       Scrivi"--------------------------------------------------------------------------"
       ImpostaGiocata 1,am,ruote,poste,5,1 '<----Imposta colpi di gioco
       For c = 2 To 6
        For d = 2 To 6
         ImpostaInterruzioni c,d,2
         ImpostaInterruzioni 1,c,2
         ImpostaInterruzioni c,1,1
        Next
       Next
       Gioca es
      End If
     End If
    'Next
   Next
  Next
 Next
End Sub

Il risultato dell'esecuzione dimosta come "A" sia il numero di uno dei vertici del Triangolo

"b" / "c" / "d" i vertici del triangolo

am(1) am(2) am(3) nuovamente i vertici del triangolo ... da mettere in gioco.

Ci sono evidentemente ripetizioni inutili. Per ora, tralascio queste possibili correzioni.

MA ...

     If(p1 = 1 And p2 = 5) Then
      Else
      End If
      If(cont1 = 0 And cont2 <> 9 And cont3 = 0 And r <> 4) Then

... e poi il conseguente  ...

end if

Sono, per ora, incompatibili con il metodo, quindi vanno tutti chiusi perchè così scritti

non possono far altro che appesantire inutilmente lo script e/o generare errori.

 

[Joe91]

Quale ultima sostanziale modifica per il debug dello script ...

propongo anche di chiudere o Remmare le istruzioni per l'interruzione della giocata

       ImpostaGiocata 1,am,ruote,poste,5,1 '<----Imposta colpi di gioco
       'For c = 2 To 6
        'For d = 2 To 6
         'ImpostaInterruzioni c,d,2
         'ImpostaInterruzioni 1,c,2
         'ImpostaInterruzioni c,1,1
        'Next
       'Next

Giusto rilevare che ricordavo male i colpi di gioco. SONO 5 e l'interruzione della giocata al primo esito di estratto.

Eseguendo così si ha un OTTIMO metodo sia per Estratto che per Ambo.

Ambo, che tuttavia, non paga la vincita, dal 10 Gennaio 2013.

 

[Joe91]

Sub Main()
 Dim ruote(10)
 Dim ruota(1)
 Dim am(3)
 Dim poste(2)
 '--------------------------------------------------
 poste(1) = 1 '<---per estratto
 poste(2) = 1 '<---per ambo
 't = 0
 ini = EstrazioneFin -155'<----Imposta estrazione precedenti
 fin = EstrazioneFin
 For es = Ini To fin
  Messaggio "Estrazione: " & es
  For r = 1 To 10
   For p1 = 1 To 4
    'For p2 = p1 + 1 To p2 ' <--- ambo unito
    p2 =  p1+1 ' <--- ambo unito
     '------------------------------------------------------
     a1 = Estratto(es,r,p1)
     a2 = Estratto(es,r,p2)
     d1 = Distanza(a1,a2)
     If d1 = 30 Then '<---- distanza ciclometrica
      '-----------------------------------------------------------------------------
      a = Fuori90(a1 + a2) '<----Calcola Vertice del Triangolo Simmetrico 
      
      am(1) = Fuori90(a + 30)
      am(2) = Fuori90(a + 60)
      am(3) = Fuori90(a + 90)
      
      'Scrivi A &  " " & B & " " & C & " " & D
      '------------------------------------------------
      ruote(1) = r
      '------------------------------------------------
      'am(1) = b 
      'am(2) = c
      'am(3) = d
      '------------------------------------------------
       'If(p1 = 1 And p2 = 5) Then
       ' Else
       'End If
       'If(cont1 = 0 And cont2 <> 9 And cont3 = 0 And r <> 4) Then
       t = t + 1
       Scrivi
       Scrivi"--------------------------------------------------------------------------"
       Scrivi DataEstrazione(es) & " [" & Left(NomeRuota(r),2) & "] " & Format2(a1) & "-" & Format2(a2) & _
       " [" & Format2(p1) & "-" & Format2(p2) & "] " & " Dist. " & Format2(d1)
       Scrivi"--------------------------------------------------------------------------"
       ImpostaGiocata 1,am,ruote,poste,5,1 '<----Imposta colpi di gioco
       'For c = 2 To 6
       ' For d = 2 To 6
       '  ImpostaInterruzioni c,d,2
       '  ImpostaInterruzioni 1,c,2
       '  ImpostaInterruzioni c,1,1
       ' Next
       'Next
       Gioca es
      'End If
     End If
    'Next
   Next
  Next
 Next
 ScriviResoconto 
End Sub

 

[Joe91]

Buon giorno a tutte/i.

Semplificati gli swap nel nome/contenuto delle variabili ... diventa evidente che si può ancora migliorare lo script.

a = Fuori90(a1 + a2) '<----Calcola Vertice del Triangolo Simmetrico

am(1) = Fuori90(a + 30)
am(2) = Fuori90(a + 60)
am(3) = Fuori90(a + 90)

Si vede che "a" ha già il suo "Fuori90" appositamente dedicato ...

inuitle ripeterlo ed anche aggiungerci 90!

Semplificando diventa:

Am(1) = a
Am(2) = Fuori90 (a+30)
Am(3) = Fuori90 (a+60)

Fatto questo ed eliminato tutto il superfluo (ciò che si era remmato) si ha lo script completo.

 

[Joe91]

Quale Secondo metodo, ho testato il gioco della terzina simmetrica, sulla ruota diametrale.

I risultatia nel confronto con quelli a ruota, già ottimi, nell'anno, salgono dal 70 % al 90% circa.

Questa la parte finale del resoconto che conferma l'ottima osservazione statistica sottesa al metodo.

Bravo Zetrix.

================================================================= 153

26.02.2013 [Na] 22-52 2° Metodo, Triplo Mancante 82 [Ba] 

-----------------------------------------------------------------
Estrazione generatrice del pronostico 08657 [ 25 - 26/02/2013]
G 0001
Numeri in gioco : 22.52.82 su BA per Estratto,Ambo
V N. [22.52.82                      ] [BA]     [.. .. .. 22 ..] C.   1 Estratto   08658 [ 26 - 28/02/2013]
Interrotta per esito verificato


================================================================= 154

28.02.2013 [Mi] 86-26 2° Metodo, Triplo Mancante 56 [Ve] 

-----------------------------------------------------------------
Estrazione generatrice del pronostico 08658 [ 26 - 28/02/2013]
G 0001
Numeri in gioco : 86.26.56 su VE per Estratto,Ambo
In corso per altre 2 estrazioni

================================================================= 155

28.02.2013 [Na] 03-63 2° Metodo, Triplo Mancante 33 [Ba] 

-----------------------------------------------------------------
Estrazione generatrice del pronostico 08658 [ 26 - 28/02/2013]
G 0001
Numeri in gioco : 03.63.33 su BA per Estratto,Ambo
V N. [03.63.33                      ] [BA]     [.. .. .. .. 63] C.   1 Estratto   08659 [ 27 - 02/03/2013]
Interrotta per esito verificato


================================================================= 156

05.03.2013 [Ba] 09-69 2° Metodo, Triplo Mancante 39 [Na] 

-----------------------------------------------------------------
Estrazione generatrice del pronostico 08660 [ 28 - 05/03/2013]
G 0001
Numeri in gioco : 09.69.39 su NA per Estratto,Ambo
In corso per altre 4 estrazioni
+----------------------------------------+
| Prima Giocata      : 8506              |
| Ultima Giocata     : 8660              |
| Range              : 155               |
| Casi giocab perc.  : 70,968%           |
+----------------------------------------+ +----------------------------------+ +----------------------------------+ +----------------------------------+ 
|               RESOCONTO                | |       DISTRIBUZIONE ESITI        | | DISTRIBUZIONE ESITI PERCENTUALI  | |        DISTRIBUZIONE CASI        | 
+----------------------------------------+ +----------------------------------+ +----------------------------------+ +----------------------------------+ 
| Casi esaminati     :              110  | | RT | Est | Amb | Ter | Qua | Cin | | RT | Est | Amb | Ter | Qua | Cin | | RT |  Q  |                       | 
| Casi vincenti      :               74  | +----------------------------------+ +----------------------------------+ +----------------------------------+ 
| Percentuale pos.   :          67,27 %  | | BA |   11|    1|     |     |     | | BA |10,78| 12,5|     |     |     | | BA |   19|                       | 
| Pronostici totali  :              156  | | CA |    8|    1|     |     |     | | CA | 7,84| 12,5|     |     |     | | CA |   13|                       | 
| Pronostici vinc.   :               94  | | FI |    9|    1|     |     |     | | FI | 8,82| 12,5|     |     |     | | FI |   13|                       | 
| Percentuale pos.   :          60,26 %  | | GE |   11|     |     |     |     | | GE |10,78|     |     |     |     | | GE |   14|                       | 
| Giocate in corso   :                2  | | MI |   11|    1|     |     |     | | MI |10,78| 12,5|     |     |     | | MI |   15|                       | 
| Giocate terminate  :              154  | | NA |    9|    2|     |     |     | | NA | 8,82|   25|     |     |     | | NA |   14|                       | 
| Bollette giocate   :              550  | | PA |    9|     |     |     |     | | PA | 8,82|     |     |     |     | | PA |   14|                       | 
| Bollette vincenti  :               94  | | RO |   14|     |     |     |     | | RO |13,73|     |     |     |     | | RO |   19|                       | 
| Attesa media       :                3  | | TO |    9|    1|     |     |     | | TO | 8,82| 12,5|     |     |     | | TO |   10|                       | 
| Spesa              :       1.100,00 €  | | VE |   11|    1|     |     |     | | VE |10,78| 12,5|     |     |     | | VE |   25|                       | 
| Vincita            :         985,01 €  | | NZ |     |     |     |     |     | | NZ |     |     |     |     |     | | NZ |     |                       | 
| Guadagno           :        -114,99 €  | | TT |     |     |     |     |     | | TT |     |     |     |     |     | | TT |     |                       | 
| Perc. Rendimento   :        -10,454 %  | +----------------------------------+ +----------------------------------+ +----------------------------------+ 
| Mass. Esposizione  :          48,00 €  |    
| Estratto su ruota  :              102  |                                                                                                                
| Ambo su ruota      :                8  |                                                                                                                
|                                        |                                                                                                                
+----------------------------------------+

 

[Joe91]

================================================================= 156

05.03.2013 [Ba] 09-69 2° Metodo, Triplo Mancante 39 [Na]


Estrazione generatrice del pronostico 08660 [ 28 - 05/03/2013]
G 0001
Numeri in gioco : 09.69.39 su NA per Estratto,Ambo
In corso per altre 4 estrazioni
-----------------------------------------------------------------

aggiorno con il risultato di un bell'Ambo:

V N. [09.69.39 ] [NA] [39 .. .. .. 69] C. 2 Ambo 08662 [ 30 - 09/03/2013]

Che naturalmente migliora la quantità di risutati utili.