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ì 30 ottobre 2025
    Bari
    53
    07
    12
    77
    21
    Cagliari
    17
    74
    24
    69
    44
    Firenze
    08
    47
    25
    83
    33
    Genova
    02
    68
    29
    43
    67
    Milano
    84
    90
    75
    45
    72
    Napoli
    49
    06
    09
    12
    20
    Palermo
    13
    65
    34
    86
    07
    Roma
    15
    02
    10
    13
    83
    Torino
    59
    67
    80
    35
    26
    Venezia
    73
    04
    06
    74
    27
    Nazionale
    62
    79
    38
    36
    48
    Estrazione Simbolotto
    07
    01
    28
    12
    33
Indietro
Alto