Novità

L' Ambata Frequente - Su Palermo - Vincente Da 14 Mesi (Ultima Del Mese)

Xeroxs

Advanced Member >PLATINUM<
Buongiorno,

Infine Vi voglio proporre questo sommativo su Palermo, con il dubbio ovvio in quanto questo mese propone il Centenario di Palermo, come calcolo
Ve lo lascio Comunque in quanto gli Esiti sono positivi su Unica Ruota da 14 Mesi consecutivi

Ambata = Fuori90(Estratto(es,NZ_,1) - Estratto(es,BA_,1) + 64) = 55-44+64
1 della Nazionale = 55
1 di Bari = 44
64


Ambata Attuale 75 ( Il Centenario di Palermo)

Non si sa mai.
 
Ciao, scusa ora non ho il PC, ma non è ad ogni estrazione, se mi ricordo bene avevo impostato 12 estrazione o ultima.
 
grazie1ln7.gif
Xeroxs A CP👏👏
 
Buona Sera a Tutti Voi
Per correttezza ho corretto il post
Il Calcolo va eseguito ogni ultima estrazione

Ambata = Fuori90(Estratto(es,NZ_,1) - Estratto(es,BA_,1) + 64) =

1 della Nazionale - 1 di Bari + 64 -------> Applicare il fuori 90 quando necessario
 
Buona Sera a Tutti Voi
Per correttezza ho corretto il post
Il Calcolo va eseguito ogni ultima estrazione

Ambata = Fuori90(Estratto(es,NZ_,1) - Estratto(es,BA_,1) + 64) =

1 della Nazionale - 1 di Bari + 64 -------> Applicare il fuori 90 quando necessario
Grazie per la precisazione. Ho fatto comunque un controllo ad ogni estrazione e il risultato non è male, bisognerebbe avere uno script o qualcosa di simile, comunque complimenti.
 
Eccolo per chi lo volesse usare

Codice:
Option Explicit
Sub Main()
   Dim ruote(10)
   Dim numeri1(10)
   Dim posta(5)
   Dim Clp,Ini,Fin,es,K
   posta(1) = 1
   'posta(2) = 1 ' Attiva se Giochi 2 Ambate
   ruote(1) = PA_
   'ruote(2) = VE_
   Clp = 8 ' Colpi di Gioco
   Ini = 9688
   Fin = EstrazioneFin
   Scrivi String(107,"-") & " By Xeroxs " & "-----"
   Scrivi String(48," ") & "****** Resoconto ****** ",1,,,7
   Scrivi String(48," ") & DataEstrazione(Ini) & " - " & DataEstrazione(Fin),1,,,1
   Scrivi String(20," ") & " L' Ambata Frequente  - Su Palermo - Ultima Del Mese - Vincente Da 14 Mesi ",1,,,1
   Scrivi String(123,"-")
   For es = Ini To EstrazioneFin
      If IsUltimaDelMese(es) Then
         'If IndiceMensile(es) = 9 Then
         Messaggio "Elaborazione estrazioni... [" &(es) & " ]   Script  by Xeroxs"
         AvanzamentoElab Ini,Fin,es
         'numeri1(1) = Fuori90(Estratto(es,NZ_,1) - Estratto(es,BA_,1) + 64)
         numeri1(1) = Fuori90(90 +(Estratto(es,NZ_,1)) - Estratto(es,BA_,1) + 64) ' Applicato Modo di Marco-elle
         EliminaRipetuti numeri1
         ColoreTesto 1 : K = K + 1 : Scrivi "Estraz. " & Format2(es) & " ---> " & IndiceMensile(es) & "° Estrazione Mensile " & "[" & Format2(Mese(es)) & " - " & Anno(es) & "]  " & String(58,"*") & " Caso n° " & Format2(K),1,0
         Scrivi
         ColoreTesto 0
         Scrivi
         ImpostaGiocata 1,numeri1,ruote,posta,Clp
         'Gioca es
         Gioca es,True,,1
      End If
   Next
   Scrivi
   ScriviResoconto '1
End Sub
 
Allora se usi Spaziometria lanci lo script è fa tutto lui.

Mentre a mano
Ogni Ultima Estrazione

Prendi
il 1 Estratto della Nazionale
il Primo di Bari
il 64 (numero Fisso)

Quello ultimo è 1 Nazionale = 55 il 1 di Bari = 44 Fisso 64

Calcolo 55-44 = 11 + il fisso 64 = 75
In questo caso non fai il fuori 90 perchè non va oltre il 90 la somma dei calcoli
 
Allora se usi Spaziometria lanci lo script è fa tutto lui.

Mentre a mano
Ogni Ultima Estrazione

Prendi
il 1 Estratto della Nazionale
il Primo di Bari
il 64 (numero Fisso)

Quello ultimo è 1 Nazionale = 55 il 1 di Bari = 44 Fisso 64

Calcolo 55-44 = 11 + il fisso 64 = 75
In questo caso non fai il fuori 90 perchè non va oltre il 90 la somma dei calcoli
Ok grazie
 
anke stavolta hai fatto 🎯 👏👏👏 al 4°cp 85 pal.......kissà xkè io scelgo sempre quello ke nn esce:cry: pazienza ma tu sei bravissimo
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 07 novembre 2026
    Bari
    64
    09
    01
    08
    12
    Cagliari
    79
    52
    86
    90
    87
    Firenze
    29
    68
    25
    02
    86
    Genova
    25
    26
    48
    77
    09
    Milano
    16
    48
    65
    72
    44
    Napoli
    09
    47
    49
    80
    57
    Palermo
    04
    08
    70
    46
    45
    Roma
    06
    24
    85
    65
    26
    Torino
    02
    85
    26
    10
    20
    Venezia
    07
    69
    28
    37
    82
    Nazionale
    75
    08
    82
    15
    47
    Estrazione Simbolotto
    Torino
    29
    16
    10
    36
    43
Indietro
Alto