Novità

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

D

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:
donatella ha scritto:
Scusate : confermo 44.46
Clicca per espandere...
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
 
Complimenti a Donatella per la soluzione previsionale
e complimenti a GioRyuKen72 per l'ottimo script...........a colori
Grazie per averlo condiviso...
Saluti
 
GioRyuKen72 ha scritto:
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
Clicca per espandere...
GRAZIE MILLE DI CUORE DA PARTE MIA E DA COLORO CHE LEGGERANNO -
 
donatella ha scritto:
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 .................................
Clicca per espandere...
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
 
Estrazione del 22.02 > condizione su Genova con ambo unito di gemelli 11.55
Oggi al 01° colpo ambo secco 44.46 a Bari ( tutte )
--------------------------------------------------------------------------------------------------------------------
Il pronostico 11.79 giocarlo ancora per un paio di estrazioni
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 25 febbraio 2025
    Bari
    44
    46
    59
    73
    72
    Cagliari
    62
    34
    79
    42
    67
    Firenze
    29
    81
    11
    82
    30
    Genova
    61
    01
    09
    14
    74
    Milano
    90
    04
    47
    24
    26
    Napoli
    64
    11
    49
    54
    66
    Palermo
    24
    54
    57
    90
    15
    Roma
    84
    21
    49
    24
    02
    Torino
    87
    54
    35
    23
    30
    Venezia
    07
    45
    42
    80
    56
    Nazionale
    89
    44
    90
    05
    45
    Estrazione Simbolotto
    Cagliari
    40
    13
    35
    06
    19
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto