Novità

COME DA PROMESSA " IL METODO "

C

Cinzia27

Premium Member
Ciao, Mastrogino.
Dovrebbero essere rimasti solo 2 casi.
Confermi?

sab 20.01.2024 [10374]
G 1: M 88.89 Fi Ge 7/18
in corso (7° su 18)

mar 23.01.2024 [10375]
G 1: M 80.08 Mi Na 6/18
in corso (6° su 18)
 
lotto_tom75

lotto_tom75

Advanced Premium Member
lotto_tom75 ha scritto:
ciao mastro complimenti e grazie per la condivisione
mi dici se ho capito bene? ROVE 56-65 in corso?

Vedi l'allegato 2277237

Ad ogni modo se è così , salvo errori, questo scriptino, che mi sono divertito a fare relativamente al tuo metodo l'ho cercato di ottimizzare per ottenere almeno per le ultime 90 es una % altina di esiti + rispetto ai colpi rimanenti minimi teorici da 1 a 13. I colpi di ricerca configurati sono 22 ma quelli possibili in output sono solo max 13. Nonostante la relativa ipotetica lunga attesa potrebbe tornare utile per eventuali abbinamenti... Ad es. adesso la coppia di ruote con colpi rimanenti minimi teorici e pari a 10, conservando una percentuale di output per il 95%+, sarebbe CAFI 6-60.

Codice: 
Sub Main
   Dim Nu(2),Ru(2),aNum(2),posta(1),colpi,es
   colpi = 22
   posta(1) = 1
   Ini = EstrazioneFin - 90
   fin = EstrazioneFin
 
   For es = Ini To fin
      For r1 = 1 To 9
         For r2 = r1 + 1 To 10
            For p1 = 1 To 5
               a = Estratto(es,r1,p1)
               b = Estratto(es,r2,p1)
               If a = b Then ' numeri uguali
                  k = k + 1
                  Nu(1) = a : Nu(2) = b
                  Ru(1) = r1 : Ru(2) = r2
                  aNum(1) = Fuori90(Nu(1) + Nu(2) + 4)
                  aNum(2) = Vert(aNum(1))
                  ImpostaGiocata 1,aNum,Ru,posta,colpi,1
                  Gioca es
               End If
            Next
         Next
      Next
      Call AvanzamentoElab(1,EstrazioneFin,es)
   Next
   ScriviResoconto
   Scrivi
   Call ScriviDistribuzioneCasiInCorso(True,"1,2,3,4,5,6,7,8,9,10,11,12,13")
End Sub
Clicca per espandere...

Hanno fatto molto prima del previsto :) (peccato non averla giocata) Complimenti mastro (y)(y) :)
 
C

ciccioriccio

Advanced Member >PLATINUM PLUS<
Firenze e Venezia 9,90
Palermo e Venezia 14,41
Capiamoci bene andy io non sono un previsionista e i numeri che ho scritto sono quelli del metodo che ci è stato suggerito. Cmq non è difficile calcolare le ambate. Anche una cosa così dovrebbe essere fatta.
 
C

Cinzia27

Premium Member
Cinzia27 ha scritto:
Ciao, Mastrogino.
Dovrebbero essere rimasti solo 2 casi.
Confermi?

sab 20.01.2024 [10374]
G 1: M 88.89 Fi Ge 7/18
in corso (7° su 18)

mar 23.01.2024 [10375]
G 1: M 80.08 Mi Na 6/18
in corso (6° su 18)
Clicca per espandere...
Ciao, Mastrogino.
Da stasera c'è anche questa. Giusto?
mar 06.02.2024 [10383]
G 1: M 80.08 Pa Ro 0/18
i.c. (18 colpi)
 
mastrogino

mastrogino

Advanced Premium Member
andy881 ha scritto:
@mastrogino
Riesci a mettere tutte le previsioni in corso ?
Clicca per espandere...

Estrazione generatrice del pronostico 10378 [ 17 - 30/01/2024]
G 0001 Numeri in gioco : 56.65 su RO VE per Estratto
In corso X AMBO 26.62.
Estrazione generatrice del pronostico 10379 [ 18 - 01/02/2024]
G 0001 Numeri in gioco : 70.07 su PA TO per Estratto
In corso X AMBO 78.87.
Estrazione generatrice del pronostico 10380 [ 19 - 02/02/2024]
G 0001 Numeri in gioco : 34.43 su BA GE per Estratto
In corso X AMBO 15.51.
Estrazione generatrice del pronostico 10380 [ 19 - 02/02/2024]
G 0001 Numeri in gioco : 22.29 su RO VE per Estratto
In corso X AMBO 54.45.
Estrazione generatrice del pronostico 10381 [ 20 - 03/02/2024]
G 0001 Numeri in gioco : 14.41 su PA VE per Estratto
In corso X AMBO 15.51.
Estrazione generatrice del pronostico 10382 [ 21 - 06/02/2024]
G 0001 Numeri in gioco : 30.03 su FI RO per Estratto
In corso X AMBO 58.85.
Estrazione generatrice del pronostico 10382 [ 21 - 06/02/2024]
G 0001 Numeri in gioco : 86.68 su NA TO per Estratto
In corso X AMBO 86.68.
Estrazione generatrice del pronostico 10382 [ 21 - 06/02/2024]
G 0001 Numeri in gioco : 80.08 su PA RO per Estratto
In corso X AMBO 38.86.

NB. STASERA VI HO CONSEGNATO L'INERO METODO CON L'AGGIUNTA X IL GIOCO DELL'AMBO
FATENE TESORO.
" PER CINZIA CI RIESCI A FARE LO SCRIPT??""
 
Ultima modifica:
C

Cinzia27

Premium Member
Ciao, Mastrogino.
Io lo script l'avevo già fatto.
Basta che mi dici i parametri che a te sembrano migliori.
Se qualsiasi coppia di ruote o solo consecutive
quanti colpi
sorte interruzione
se devo mettere anche l'ambo
ecc.
 
mastrogino

mastrogino

Advanced Premium Member
Buongiorno si ed è ben fatto, l'aggiunta del numero x ambo e semplice, basta inserire il numero isotopo senza il più 4 esempio reale
Pa' Ro 38+38=76+4=80 .08
E qui sono le ambate principali adesso l'abbinamento x ambo e terno
80.38.....qui e il numero isotopo che si rimette in gioco
08.38. l'altro ambo
80.38.08.ls terzina
Ovviamente sulle stesse ruote dellisotopo e a scelta tte NZ.
Io preferisco le ruote consecutive o diametrali o gemelle,ma essendo un caos ordinato li considero tutte.
 
C

Cinzia27

Premium Member
Ciao, Mastrogino.
Spero che vada bene. Per il terno manteniamo lo stesso numero di colpi (8) dell'ambo ?

Altra domanda: ho messo 1 euro alla posta del terno al posto di 0.50.
La terzina va giocata solo per terno?
Codice: 
'Metodo Mastrogino
'Script Cinzia

Sub main()
Dim n1(2),n2(2),nn2(2),n3(3),ps1(1),ps2(2),ps3(3),ru(2)
ps1(1)=1
ps2(2)=1
ps3(3)=1
For es=1 To EstrazioneFin
For r=1 To 11
For r1=r+1 To 12
If r1=11 Then r1=12
If Estratto(es,r,1)>0 Then
If Estratto(es,r1,1)>0 Then
'----------------------------------------------------------------
'CONDIZIONI
'Condizione ruote consecutive - togliere apici per applicarla e mettere
'apice alle altre due
'If Abs(r1-r)=1 Or Abs(r1-r)=11  Then

'Condizione ruote diametrali - togliere apici per applicarla e mettere
'apice alle altre due
'If Abs(r1-r)=5   Then

'Condizione ruote gemelle - togliere apici per applicarla e mettere
'apice alle altre due
'If (r=1 And r1=10) Or (r=2 And r1=9) Or (r=3 And r1=8) Or (r=4 And r1=7) Or (r=5 And r1=6)  Then



'----------------------------------------------------------------

ru(1)=r
ru(2)=r1
For p=1 To 5
a=Estratto(es,r,p)
b=Estratto(es,r1,p)
If a=b Then
c=Fuori90(a+a)
n1(1)=Fuori90(c+4)
n1(2)=Vert(n1(1))
n2(1)=a
n2(2)=n1(1)
nn2(1)=a
nn2(2)=n1(2)
n3(1)=a
n3(2)=n1(1)
n3(3)=n1(2)
Scrivi
Scrivi
Scrivi StringaEstratti(es,r)
Scrivi StringaEstratti(es,r1)
Scrivi "numero uguale isotopo = ",0,0
Scrivi  Format2(a),1
Scrivi  Format2(a)&" + "&Format2(a)&" = "&Format2(c)
Scrivi  Format2(c)&" + 4 = ",0,0
Scrivi  Format2(n1(1)),1
Scrivi  "vertibile ",0,0
Scrivi Format2(n1(2)),1,0
Scrivi


ImpostaGiocata 1,n1,ru,ps1,5,1
ImpostaGiocata 2,n2,ru,ps2,8,2
ImpostaGiocata 3,nn2,ru,ps2,8,2
ImpostaGiocata 4,n3,ru,ps3,8,3
Scrivi
Gioca es
End If
Next
'End If
End If
End If
Next
Next
Next
ScriviResoconto
End Sub
 
Ultima modifica:
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 31 maggio 2024
    Bari
    04
    55
    90
    19
    54
    Cagliari
    32
    54
    68
    64
    86
    Firenze
    01
    24
    19
    14
    63
    Genova
    64
    15
    37
    02
    44
    Milano
    80
    85
    72
    36
    89
    Napoli
    13
    24
    12
    53
    10
    Palermo
    49
    75
    60
    78
    72
    Roma
    18
    06
    43
    81
    26
    Torino
    28
    02
    27
    90
    75
    Venezia
    39
    11
    89
    14
    26
    Nazionale
    07
    24
    25
    72
    19
    Estrazione Simbolotto
    Milano
    16
    02
    14
    07
    33
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Alto