Novità

Ambo e Terno in 4 colpi a Napoli dalla 10a del mese

zagort;n2025491 ha scritto:
ciao manuel grazie per averlo postato,ma il pc non lo fa scaricare malware.......pericoloso

N
Il mio non mi ha dato alcun avviso, tutto tranquillo. Escludi momentaneamente l'antivirus.
 
Buna domenica a tutti,Manuel o altri amici del forum mi potete scrivere gli ambi o quartina da giocare su napoli e poi il calcolo e' confermato alla decima mese?Ed inultimo se potete dirmi o scrivere cortesemente il metodo sulla Nazionale che tanti giocano qui,vi ringrazio di cuore ogni bene Felice.
 
ciao a tutti. grazie a manuel per il programma. chi mi sa dire come si fa ad aggiornare le estrazioni ?
buona domenica
 
ANCORA 4 COLPI......"credo" (sono quelli del metodo esposto in primo post di manuel)

ambata 63



per ambo e terno se esce(come capogioco l'ambata) l'ambo si fanno 2 ambi


[TABLE="border: 0, cellpadding: 0, cellspacing: 0"]
[TR]
[TD="width: 64"]63[/TD]
[TD="width: 64"]46[/TD]
[TD="width: 64"]7[/TD]
[/TR]
[TR]
[TD]63[/TD]
[TD]59[/TD]
[TD]7[/TD]
[/TR]
[TR]
[TD]63[/TD]
[TD]59[/TD]
[TD]46[/TD]
[/TR]
[/TABLE]

bon gioco e grazie ad Manuel
 
Buonanotte,
Salutando gli intervenuti e sperando di fare cosa gradita ,
Postiamo il listato del metodo , adattato per Spaziometria.

Codice:
Option Explicit
'Ambo e Terno in 4 colpi a Napoli dalla 10a del mese di Manuel67
'http://forum.lottoced.com/forum/lottoced/metodi/2024276-ambo-e-terno-in-4-colpi-a-napoli-dalla-10a-del-mese#post2024278
Sub Main()
    '
    'Dim a As Integer
    Dim a
    '
    'Dim Numeri(2) As Integer
    Dim Numeri(2)
    '
    'Dim Giocate(1) As Integer
    'Giocate(1) = _Ambo
    Dim Giocate(2)
    Giocate(2) = 1
    '
    'Dim Ruote(1) As Integer
    'Ruote(1)=_NA
    Dim Ruote(1)
    Ruote(1) = NA_
    '
    Dim num(1)
    Dim posta(1)
    posta(1) = 1
    '
    'Metodo.Init("Ambo e Terno in 4 colpi a Napoli dalla 11a del mese","Autore: [Paolo Campana]"
    Call Scrivi("Ambo e Terno in 4 colpi a Napoli dalla 11a del mese , Autore: [Paolo Campana]")
    '
    ',_CasisticaON,7)
    Dim casi
    casi = 00
    '
    'Metodo.Progressione(_Ambo,1,100)
    '
    'For a = Estrazione.Ultima To _DataAuto Step - 1
    For a = EstrazioneFin To EstrazioneIni Step - 1
        '
        'If Estrazione.Mensile(a) = 10 Then
        If IndiceMensile(a) = 10 Then
            '
            casi = casi + 01
            '
            ' Dim n1 As Integer =(Estratti.Numero(a,_FI,5) + 47)
            Dim n1
            n1 = Fuori90(Estratto(a,FI_,5) + 47)
            '
            ' Dim n2 As Integer =(Estratti.Numero(a,_BA,2) + 40)
            Dim n2
            n2 = Fuori90(Estratto(a,BA_,2) + 40)
            '
            ' Dim n3 As Integer =(Estratti.Numero(a,_RM,3) + 64)
            Dim n3
            n3 = Fuori90(Estratto(a,RO_,3) + 64)
            '
            ' Dim n4 As Integer =(Estratti.Numero(a,_PA,1) + 09)
            Dim n4
            n4 = Fuori90(Estratto(a,PA_,1) + 09)
            '
            'Numeri(1) = F90(n1)
            'Numeri(2) = F90(n2)
            Numeri(1) = n1
            Numeri(2) = n2
            'Metodo.GiocaPronostico(1,a + 1,4,Numeri,Ruote,Giocate,0)
            ImpostaGiocata 1,Numeri,Ruote,Giocate,4,2
            '
            'Numeri(1) = F90(n1)
            'Numeri(2) = F90(n3)
            Numeri(1) = n1
            Numeri(2) = n3
            'Metodo.GiocaPronostico(2,a + 1,4,Numeri,Ruote,Giocate,0)
            ImpostaGiocata 2,Numeri,Ruote,Giocate,4,2
            '
            'Numeri(1) = F90(n1)
            'Numeri(2) = F90(n4)
            Numeri(1) = n1
            Numeri(2) = n4
            'Metodo.GiocaPronostico(3,a + 1,4,Numeri,Ruote,Giocate,0)
            ImpostaGiocata 3,Numeri,Ruote,Giocate,4,2
            Gioca a
        End If
        If casi >= 7 Then Exit For
    Next
    '
    'Metodo.Report()
    Call ScriviResoconto()
    '
End Sub

Controllare Sempre .
Salvo Errori ed Omissis .
 
Ultima modifica di un moderatore:
Ciao Skygirl, non ho compreso se ti piacerebbe avere le tecniche dei metodi o i listati dei miei metodi...ma per entrambi quando pubblico qualcosa, inserisco sia i calcoli da fare su carta e penna ed il relativo listato in Visual Lotto 7. Ho visto e ringrazio di cuore che magia ha adattato i miei listati da Visual Lotto 7 a Spaziometria. Così altri utenti che non hanno preso il programma Visual al link da me segnalato possono utilizzare Spaziometria per elaborare col pc i metodi postati.

Un salutone a tutti e sempre a vostra disposizione per aiuti e consigli.

Bye Manuel67
 
Manuel67 ciao mi piacerebbe conoscere sia le tecniche che i listati dei tuoi metodi che trovo veramente interessanti, seguo infatti sia il metodo su Napoli che quello sulla Nazionale, e mi piacerebbe conoscere tutti quelli che tu riterrai opportuno inserire nel forum infatti adesso corro a leggere il nuovo metodo da te postato Ambo e Terno in 3 colpi a Torino dalla 12a del mese.
Grazie
Un saluto
 
CIAO MAGIE E EMANUEL67, LO SCRIPT NON SI AGGIORNA E' FERMO ALLA FINE DI GIUGNO. PERCHE'?:confused:

VI FACCIO I MIGLIORI AUGURI DI UN SANTO NATALE.:D

ROSCE14
 
[IMG2=JSON]{"data-align":"center","data-size":"full","src":"http:\/\/augurinataleauguri.com\/immagini-di-natale\/buon-natale1.jpg"}[/IMG2]
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 16 dicembre 2025
    Bari
    78
    53
    62
    77
    16
    Cagliari
    15
    58
    32
    39
    24
    Firenze
    85
    20
    39
    32
    29
    Genova
    17
    60
    15
    33
    43
    Milano
    13
    39
    14
    15
    34
    Napoli
    82
    76
    15
    24
    73
    Palermo
    40
    55
    78
    26
    08
    Roma
    23
    41
    17
    53
    76
    Torino
    52
    20
    70
    59
    65
    Venezia
    43
    58
    19
    08
    09
    Nazionale
    71
    55
    60
    04
    35
    Estrazione Simbolotto
    Venezia
    28
    37
    27
    40
    10
Indietro
Alto