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 gennaio 2025
    Bari
    09
    62
    01
    28
    73
    Cagliari
    50
    33
    43
    10
    29
    Firenze
    04
    63
    56
    34
    90
    Genova
    51
    20
    26
    46
    59
    Milano
    37
    78
    76
    20
    86
    Napoli
    43
    04
    45
    84
    53
    Palermo
    13
    43
    50
    67
    40
    Roma
    29
    12
    84
    71
    79
    Torino
    90
    16
    25
    76
    24
    Venezia
    26
    58
    23
    20
    40
    Nazionale
    74
    07
    54
    15
    36
    Estrazione Simbolotto
    Bari
    38
    22
    35
    26
    14
Indietro
Alto