Novità

2 AMBATE E 1 AMBO SECCO CON L'USCITA DI DUE NUMERI GEMELLI

donatella

Advanced Member >PLATINUM PLUS<
Con la sortita di una coppia di numeri gemelli su qualsiasi ruota ( meglio se consecutivi) andremo a calcolare due ambate e 1 ambo secco da giocare a ruota e tutte
Ambata principale a : fare la differenza matematica tra i due numeri gemelli
Ambata secondaria b : il complemento a 90 dell'ambata a
Giocare per estratto sulla ruota di calcolo
Giocare per ambo secco a Tutte
Giocare per 06 - 07 estrazioni
nota :

non giocare se nel quadro estrazionale sono presenti due o più condizioni
non giocare se i numeri gemelli sulla stessa ruota son più di due
Esempio ( reale ) del 03.01.25
Bari : ambo non unito > 44.33
Ambata a : 11 ( 44 - 33 )
Ambata b : 79 ( 90 - 11 )
04° colpo ambata 11 a Bari
----------------------------------------------------------
2024
13.12 > Bari : 33.66
03° colpo ambata 33
-------------------------------------------------------------------------------------
17.12 > Milano : 11.79
02° colpo ambata 79
---------------------------------------------------------------------------------------
24.12 > Napoli : 66.24
-------------------------------------------------------------------------------------
30.12 > Torino : 66.24 ( ambo non unito ) : si ripropone ancora il pronostico di Napoli
03° colpo doppia ambata e ambo secco 66.24 a Torino
----------------------------------------------------------------------------------------
31.12 > Venezia : non giocabile > terno gemelli
----------------------------------------------------------------------------------
2025
10.01 > Firenze : 22.68*
04° colpo ambata 68 e ambetto 23.68
------------------------------------------------------------------
11.01 > Palermo : 33.57
01° colpo ambata 33
-----------------------------------------------------------
14.01 > Palermo : 22.68 ( ambo non unito )
02° colpo ambata 68 ( e 33 : vedi estrazione precedente)
---------------------------------------------------------------------------------
28.01 >
Milano -Roma e Napoli > tripla condizione : non giocabile ( a Napoli presente pure un terno di gemelli)
-----------------------------------------------------------------------------------------------------------------------------------------
31.01 > Torino : 33.57 ( ambo non unito )
06° colpo ambo secco 33.57 a Roma
----------------------------------------------------------------------------
01.02 > Napoli : 33.57 ( ambo non unito )
05° colpo ambo secco 33.57 a Roma
-----------------------------------------------------------------------------
07.02 > Nazion : 44.56 ( ambo non unito )
01° colpo ambata 44 alla Nz
--------------------------------------------------------------------------
14.02 > Bari : 11.79
IN CORSO DAL 15.02 .................................
 
Ultima modifica:
Scusate : confermo 44.46
Ciao Donatella, @antonioquagliozzi
ecco lo script.. attenzione però che non sono capace ad automatizzare il controllo dei casi NON giocabili, vedi terno gemelli o doppio ambo gemelli nella stessa estrazione..

vedete se può esservi utile.
Saluti, Gio.


Codice:
Sub Main()
   ' https://forum.lottoced.com/threads/2-ambate-e-1-ambo-secco-con-luscita-di-due-numeri-gemelli.2221763/
   Scrivi " DAI GEMELLI, 2 AMBATE ED UN AMBO SECCO A TUTTE di DONATELLA" ,1,,2,6,5,,1
   Dim rt(1),Nn(2),E1,E2,P5,RuoteAmbata(2)
   Dim Ambata1(2),PostaABT(1),PostaA(2),Ambo1(2)
   Dim Ambata,AmbataSecondaria
   ex = CInt(InputBox("Quante estrazioni controllo?","Estrazioni",25))
   ini = EstrazioneFin - ex
   fin = EstrazioneFin
   For es = ini To fin
      Messaggio es
      For R1 = 1 To 12
         If R1 = 11 Then R1 = 12
         For P1 = 1 To 4
            For p2 = p1 + 1 To 5
               Nn(1) = Estratto(es,R1,P1) : Nn(2) = Estratto(es,R1,P2)
               If(Nn(1) = 11 Or Nn(1) = 22 Or Nn(1) = 33 Or Nn(1) = 44 Or Nn(1) = 55 Or Nn(1) = 66 Or Nn(1) = 77 Or Nn(1) = 88)_
                  And(Nn(2) = 11 Or Nn(2) = 22 Or Nn(2) = 33 Or Nn(2) = 44 Or Nn(2) = 55 Or Nn(2) = 66 Or Nn(2) = 77 Or Nn(2) = 88) Then
                  Ambata = Differenza(Nn(1),Nn(2))
                  AmbataSecondaria = ComplAdX(Ambata)
                  RuoteAmbata(1) = r1
                  rt(1) = TT_
                  PostaABT(1) = 2
                  PostaA(2) = 1
                  k = 8
                  ng = 0
                  Ambata1(1) = Ambata
                  Ambata1(2) = AmbataSecondaria
                  ImpostaGiocata 1,Ambata1,RuoteAmbata,PostaABT,k,1
                  Ambo1(1) = Ambata
                  Ambo1(2) = AmbataSecondaria
                  ImpostaGiocata 2,Ambo1,rt,PostaA,k,2
                  casi = casi + 1
                  Scrivi String(89,"*") & " Casi Totali " & FormattaStringa(Casi,"0000"),1,,,2
                  Scrivi String(80,"*") & " Estrazione " &(Es) & " caso " & FormattaStringa(Caso,"0000"),1,,,1
                  ColoreTesto 0
                  Scrivi("Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
                  Scrivi "  " & SiglaRuota(R1) & " ",1,0
                  For P5 = 1 To 5
                     E1 = Estratto(Es,R1,P5)
                     If E1 = Nn(1) Or E1 = Nn(2) Then
                        ColoreTesto 2
                     Else
                        ColoreTesto 0
                     End If
                     Scrivi Format2(E1) & " ",1,0
                     ColoreTesto 0
                  Next
                  Scrivi
                  Scrivi
                  Gioca es,True,,1
                  If ScriptInterrotto Then Exit For
               End If
            Next
            'End If
         Next
      Next
   Next
   ' Next
   'Next
   'Next
   'Next
   Scrivi
   Scrivi "Casi totali (" & casi & ")",1
   ScriviDistribuzioneEsiti(True)
   ScriviDistribuzioneCasiInCorso(True)
   ScriviResoconto
End Sub
 
Ciao Donatella, @antonioquagliozzi
ecco lo script.. attenzione però che non sono capace ad automatizzare il controllo dei casi NON giocabili, vedi terno gemelli o doppio ambo gemelli nella stessa estrazione..

vedete se può esservi utile.
Saluti, Gio.


Codice:
Sub Main()
   ' https://forum.lottoced.com/threads/2-ambate-e-1-ambo-secco-con-luscita-di-due-numeri-gemelli.2221763/
   Scrivi " DAI GEMELLI, 2 AMBATE ED UN AMBO SECCO A TUTTE di DONATELLA" ,1,,2,6,5,,1
   Dim rt(1),Nn(2),E1,E2,P5,RuoteAmbata(2)
   Dim Ambata1(2),PostaABT(1),PostaA(2),Ambo1(2)
   Dim Ambata,AmbataSecondaria
   ex = CInt(InputBox("Quante estrazioni controllo?","Estrazioni",25))
   ini = EstrazioneFin - ex
   fin = EstrazioneFin
   For es = ini To fin
      Messaggio es
      For R1 = 1 To 12
         If R1 = 11 Then R1 = 12
         For P1 = 1 To 4
            For p2 = p1 + 1 To 5
               Nn(1) = Estratto(es,R1,P1) : Nn(2) = Estratto(es,R1,P2)
               If(Nn(1) = 11 Or Nn(1) = 22 Or Nn(1) = 33 Or Nn(1) = 44 Or Nn(1) = 55 Or Nn(1) = 66 Or Nn(1) = 77 Or Nn(1) = 88)_
                  And(Nn(2) = 11 Or Nn(2) = 22 Or Nn(2) = 33 Or Nn(2) = 44 Or Nn(2) = 55 Or Nn(2) = 66 Or Nn(2) = 77 Or Nn(2) = 88) Then
                  Ambata = Differenza(Nn(1),Nn(2))
                  AmbataSecondaria = ComplAdX(Ambata)
                  RuoteAmbata(1) = r1
                  rt(1) = TT_
                  PostaABT(1) = 2
                  PostaA(2) = 1
                  k = 8
                  ng = 0
                  Ambata1(1) = Ambata
                  Ambata1(2) = AmbataSecondaria
                  ImpostaGiocata 1,Ambata1,RuoteAmbata,PostaABT,k,1
                  Ambo1(1) = Ambata
                  Ambo1(2) = AmbataSecondaria
                  ImpostaGiocata 2,Ambo1,rt,PostaA,k,2
                  casi = casi + 1
                  Scrivi String(89,"*") & " Casi Totali " & FormattaStringa(Casi,"0000"),1,,,2
                  Scrivi String(80,"*") & " Estrazione " &(Es) & " caso " & FormattaStringa(Caso,"0000"),1,,,1
                  ColoreTesto 0
                  Scrivi("Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
                  Scrivi "  " & SiglaRuota(R1) & " ",1,0
                  For P5 = 1 To 5
                     E1 = Estratto(Es,R1,P5)
                     If E1 = Nn(1) Or E1 = Nn(2) Then
                        ColoreTesto 2
                     Else
                        ColoreTesto 0
                     End If
                     Scrivi Format2(E1) & " ",1,0
                     ColoreTesto 0
                  Next
                  Scrivi
                  Scrivi
                  Gioca es,True,,1
                  If ScriptInterrotto Then Exit For
               End If
            Next
            'End If
         Next
      Next
   Next
   ' Next
   'Next
   'Next
   'Next
   Scrivi
   Scrivi "Casi totali (" & casi & ")",1
   ScriviDistribuzioneEsiti(True)
   ScriviDistribuzioneCasiInCorso(True)
   ScriviResoconto
End Sub
GRAZIE MILLE DI CUORE DA PARTE MIA E DA COLORO CHE LEGGERANNO -
 
Con la sortita di una coppia di numeri gemelli su qualsiasi ruota ( meglio se consecutivi) andremo a calcolare due ambate e 1 ambo secco da giocare a ruota e tutte
Ambata principale a : fare la differenza matematica tra i due numeri gemelli
Ambata secondaria b : il complemento a 90 dell'ambata a
Giocare per estratto sulla ruota di calcolo
Giocare per ambo secco a Tutte
Giocare per 06 - 07 estrazioni
nota :

non giocare se nel quadro estrazionale sono presenti due o più condizioni
non giocare se i numeri gemelli sulla stessa ruota son più di due
Esempio ( reale ) del 03.01.25
Bari : ambo non unito > 44.33
Ambata a : 11 ( 44 - 33 )
Ambata b : 79 ( 90 - 11 )
04° colpo ambata 11 a Bari
----------------------------------------------------------
2024
13.12 > Bari : 33.66
03° colpo ambata 33
-------------------------------------------------------------------------------------
17.12 > Milano : 11.79
02° colpo ambata 79
---------------------------------------------------------------------------------------
24.12 > Napoli : 66.24
-------------------------------------------------------------------------------------
30.12 > Torino : 66.24 ( ambo non unito ) : si ripropone ancora il pronostico di Napoli
03° colpo doppia ambata e ambo secco 66.24 a Torino
----------------------------------------------------------------------------------------
31.12 > Venezia : non giocabile > terno gemelli
----------------------------------------------------------------------------------
2025
10.01 > Firenze : 22.68*
04° colpo ambata 68 e ambetto 23.68
------------------------------------------------------------------
11.01 > Palermo : 33.57
01° colpo ambata 33
-----------------------------------------------------------
14.01 > Palermo : 22.68 ( ambo non unito )
02° colpo ambata 68 ( e 33 : vedi estrazione precedente)
---------------------------------------------------------------------------------
28.01 >
Milano -Roma e Napoli > tripla condizione : non giocabile ( a Napoli presente pure un terno di gemelli)
-----------------------------------------------------------------------------------------------------------------------------------------
31.01 > Torino : 33.57 ( ambo non unito )
06° colpo ambo secco 33.57 a Roma
----------------------------------------------------------------------------
01.02 > Napoli : 33.57 ( ambo non unito )
05° colpo ambo secco 33.57 a Roma
-----------------------------------------------------------------------------
07.02 > Nazion : 44.56 ( ambo non unito )
01° colpo ambata 44 alla Nz
--------------------------------------------------------------------------
14.02 > Bari : 11.79
IN CORSO DAL 15.02 .................................
Ciao Donatella, ma in caso di sfaldamento su ruota gemella ( vedi ambetto su Venezia 10-79 invece di 11-79 di Bari ) è da abbandonare la previsione? Grazie
 

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 20 febbraio 2025
    Bari
    40
    17
    10
    33
    32
    Cagliari
    07
    10
    01
    52
    17
    Firenze
    60
    80
    86
    48
    19
    Genova
    05
    60
    61
    52
    41
    Milano
    59
    30
    58
    78
    34
    Napoli
    62
    54
    33
    29
    31
    Palermo
    46
    37
    19
    05
    67
    Roma
    59
    51
    05
    47
    74
    Torino
    74
    32
    52
    21
    18
    Venezia
    26
    75
    54
    15
    19
    Nazionale
    51
    43
    48
    40
    59
    Estrazione Simbolotto
    Cagliari
    44
    15
    12
    31
    33

Ultimi Messaggi

Indietro
Alto