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ì 22 maggio 2025
    Bari
    08
    07
    31
    78
    34
    Cagliari
    71
    28
    69
    48
    61
    Firenze
    01
    36
    18
    17
    16
    Genova
    07
    66
    39
    27
    01
    Milano
    66
    89
    65
    42
    78
    Napoli
    49
    01
    83
    38
    43
    Palermo
    50
    57
    85
    79
    66
    Roma
    08
    52
    58
    60
    13
    Torino
    37
    07
    27
    32
    24
    Venezia
    21
    19
    09
    33
    11
    Nazionale
    03
    49
    06
    45
    22
    Estrazione Simbolotto
    Milano
    25
    39
    28
    36
    01
Indietro
Alto