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
    giovedì 18 dicembre 2025
    Bari
    72
    48
    90
    14
    52
    Cagliari
    11
    78
    87
    47
    53
    Firenze
    50
    08
    32
    71
    74
    Genova
    20
    18
    09
    76
    07
    Milano
    13
    34
    68
    07
    16
    Napoli
    75
    61
    50
    16
    10
    Palermo
    32
    44
    38
    16
    70
    Roma
    13
    67
    32
    44
    69
    Torino
    45
    64
    49
    37
    63
    Venezia
    81
    19
    30
    79
    36
    Nazionale
    21
    85
    89
    35
    77
    Estrazione Simbolotto
    Venezia
    38
    12
    34
    27
    24
Indietro
Alto