Novità

BARI CAGLIARI 1^ Estrazione del mese Script omaggio

  • Creatore Discussione Creatore Discussione bubù
  • Data di inizio Data di inizio

bubù

Advanced Member >PLATINUM PLUS<
'03 MAGGIO 2025
ColoreTesto 1
Scrivi String(37,32) & " 1^ mese BARI-CAGLIARI X BUBU'",1
Scrivi
Scrivi String(48,32) & "Listato Bubù_Lotto",1
ColoreTesto 0

Sub Main()
Dim ruote(10)
Dim numeri1(10),numeri3(10),numeri4(10),numeri5(10)
Dim posta(10)
Dim poste(5),postee(5)
posta(1) = 1
posta(7) = 1
posta(8) = 1
posta(9) = 1
posta(2) = 1
posta(3) = 1

poste(2) = 1
poste(3) = 1

postee(2) = 1.2
postee(3) = 1
postee(4) = .2
postee(5) = .1

es = InputBox("Quante estrazioni vuoi analizzare?",,160)

cp = InputBox("Per quanti colpi vuoi giocare?",,6)


ruote(1) = 1
ruote(2) = 2

ini = EstrazioneFin - eval(es)
fin = EstrazioneFin
For n = ini To fin
If IndiceMensile(n) = 1 Then
Messaggio DataEstrazione(n)
a = Fuori90(Estratto(n,4,1)+42)'1° ambata
a1 = Fuori90(Estratto(n,1,3)+9)'2° ambata
abb1 = Fuori90(Estratto(n,8,1)+67) ' 1° abbinamento
abb2 = Fuori90(Estratto(n,1,2) + Estratto(n,9,2)+19) ' 2° abbinamento
abb3 = Fuori90(Cadenza(Estratto(n,3,5))+24) ' 3° abbinamento
abb4 = Fuori90(90-(Estratto(n,4,3))+ Estratto(n,5,2)+68) '4° abbinamento

ColoreTesto 2 :Scrivi "--1°estrazione del mese---------------------------",1




numeri1(1) = a
numeri1(2) = a1
ImpostaGiocata 1,numeri1,ruote,posta,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb1
ImpostaGiocata 2,numeri3,ruote,poste,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb2
ImpostaGiocata 3,numeri3,ruote,poste,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb3
ImpostaGiocata 4,numeri3,ruote,poste,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb4
ImpostaGiocata 5,numeri3,ruote,poste,eval(cp),3
numeri5(1) = a
numeri5(2) = a1
numeri5(3) = abb1
numeri5(4) = abb2
numeri5(5) = abb3
numeri5(6) = abb4
ImpostaGiocata 6,numeri5,ruote,postee,eval(cp),3


Gioca n
End If
Next
Scrivi

ScriviResoconto
ColoreTesto 2





End Sub
 
Per me è arabo 😀
Se usi il Programma di spaziometria messo a disposizione per tutti dal GRANDE Luigi, basta aprire Gestione script , Elabora script, copia e incolla e poi esegui script , e esce tutto . 🤝

--1°estrazione del mese---------------------------
Estrazione generatrice del pronostico 10640 [ 69 - 02/05/2025]
G 0001 Numeri in gioco : 75.12 su BA CA per Estratto,Ambo

In corso per altre 6 estrazioni
G 0002 Numeri in gioco : 75.12.87 su BA CA per Ambo,Terno
In corso per altre 6 estrazioni
G 0003 Numeri in gioco : 75.12.16 su BA CA per Ambo,Terno
In corso per altre 6 estrazioni
G 0004 Numeri in gioco : 75.12.24 su BA CA per Ambo,Terno
In corso per altre 6 estrazioni
G 0005 Numeri in gioco : 75.12.90 su BA CA per Ambo,Terno
In corso per altre 6 estrazioni
G 0006 Numeri in gioco : 75.12.87.16.24.90 su BA CA per Ambo,Terno,Quaterna,Cinquina
In corso per altre 6 estrazioni

 
'03 MAGGIO 2025
ColoreTesto 1
Scrivi String(37,32) & " 1^ mese BARI-CAGLIARI X BUBU'",1
Scrivi
Scrivi String(48,32) & "Listato Bubù_Lotto",1
ColoreTesto 0

Sub Main()
Dim ruote(10)
Dim numeri1(10),numeri3(10),numeri4(10),numeri5(10)
Dim posta(10)
Dim poste(5),postee(5)
posta(1) = 1
posta(7) = 1
posta(8) = 1
posta(9) = 1
posta(2) = 1
posta(3) = 1

poste(2) = 1
poste(3) = 1

postee(2) = 1.2
postee(3) = 1
postee(4) = .2
postee(5) = .1

es = InputBox("Quante estrazioni vuoi analizzare?",,160)

cp = InputBox("Per quanti colpi vuoi giocare?",,6)


ruote(1) = 1
ruote(2) = 2

ini = EstrazioneFin - eval(es)
fin = EstrazioneFin
For n = ini To fin
If IndiceMensile(n) = 1 Then
Messaggio DataEstrazione(n)
a = Fuori90(Estratto(n,4,1)+42)'1° ambata
a1 = Fuori90(Estratto(n,1,3)+9)'2° ambata
abb1 = Fuori90(Estratto(n,8,1)+67) ' 1° abbinamento
abb2 = Fuori90(Estratto(n,1,2) + Estratto(n,9,2)+19) ' 2° abbinamento
abb3 = Fuori90(Cadenza(Estratto(n,3,5))+24) ' 3° abbinamento
abb4 = Fuori90(90-(Estratto(n,4,3))+ Estratto(n,5,2)+68) '4° abbinamento

ColoreTesto 2 :Scrivi "--1°estrazione del mese---------------------------",1




numeri1(1) = a
numeri1(2) = a1
ImpostaGiocata 1,numeri1,ruote,posta,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb1
ImpostaGiocata 2,numeri3,ruote,poste,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb2
ImpostaGiocata 3,numeri3,ruote,poste,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb3
ImpostaGiocata 4,numeri3,ruote,poste,eval(cp),3
numeri3(1) = a
numeri3(2) = a1
numeri3(3) = abb4
ImpostaGiocata 5,numeri3,ruote,poste,eval(cp),3
numeri5(1) = a
numeri5(2) = a1
numeri5(3) = abb1
numeri5(4) = abb2
numeri5(5) = abb3
numeri5(6) = abb4
ImpostaGiocata 6,numeri5,ruote,postee,eval(cp),3


Gioca n
End If
Next
Scrivi

ScriviResoconto
ColoreTesto 2





End Sub
OTTIMO
 
Buongiorno a Tutti, salva57 e Tizio ,è semplice alla 1^ estrazione del mese fare questi calcoli :
Fuori90(Estratto(n,4,1)+42)'1° ambata (1° di GENOVA +42)

Fuori90(Estratto(n,1,3)+9)'2° ambata (3° di BARI +9)

Fuori90(Estratto(n,8,1)+67) ' 1° abbinamento (1° di ROMA +67)

Fuori90(Estratto(n,1,2) + Estratto(n,9,2)+19) ' 2° abbinamento ( 2° di BARI + 2° di TORINO + 19)

Fuori90(Cadenza(Estratto(n,3,5))+24) ' 3° abbinamento ( cadenza del 5° di FIRENZE +24)

Fuori90(90-(Estratto(n,4,3))+ Estratto(n,5,2)+68) '4° abbinamento ( Complemento90 del 3° di Ge + 2° di Milano + 68 )
alla fine avrete 6 numeri da giocare come vi pare
più di questo non so come dirlo.
Buona giornata e ricordatevi che NON SI GARANTISCE NESSUNA VINCITA !! è un gioco e come tutti i giochi non bisogna mai prenderli sul serio.
👋
 
Buongiorno a Tutti, salva57 e Tizio ,è semplice alla 1^ estrazione del mese fare questi calcoli :
Fuori90(Estratto(n,4,1)+42)'1° ambata (1° di GENOVA +42)

Fuori90(Estratto(n,1,3)+9)'2° ambata (3° di BARI +9)

Fuori90(Estratto(n,8,1)+67) ' 1° abbinamento (1° di ROMA +67)

Fuori90(Estratto(n,1,2) + Estratto(n,9,2)+19) ' 2° abbinamento ( 2° di BARI + 2° di TORINO + 19)

Fuori90(Cadenza(Estratto(n,3,5))+24) ' 3° abbinamento ( cadenza del 5° di FIRENZE +24)

Fuori90(90-(Estratto(n,4,3))+ Estratto(n,5,2)+68) '4° abbinamento ( Complemento90 del 3° di Ge + 2° di Milano + 68 )
alla fine avrete 6 numeri da giocare come vi pare
più di questo non so come dirlo.
Buona giornata e ricordatevi che NON SI GARANTISCE NESSUNA VINCITA !! è un gioco e come tutti i giochi non bisogna mai prenderli sul serio.
👋
Grazie mille
 
Buongiorno a Tutti, salva57 e Tizio ,è semplice alla 1^ estrazione del mese fare questi calcoli :
Fuori90(Estratto(n,4,1)+42)'1° ambata (1° di GENOVA +42)

Fuori90(Estratto(n,1,3)+9)'2° ambata (3° di BARI +9)

Fuori90(Estratto(n,8,1)+67) ' 1° abbinamento (1° di ROMA +67)

Fuori90(Estratto(n,1,2) + Estratto(n,9,2)+19) ' 2° abbinamento ( 2° di BARI + 2° di TORINO + 19)

Fuori90(Cadenza(Estratto(n,3,5))+24) ' 3° abbinamento ( cadenza del 5° di FIRENZE +24)

Fuori90(90-(Estratto(n,4,3))+ Estratto(n,5,2)+68) '4° abbinamento ( Complemento90 del 3° di Ge + 2° di Milano + 68 )
alla fine avrete 6 numeri da giocare come vi pare
più di questo non so come dirlo.
Buona giornata e ricordatevi che NON SI GARANTISCE NESSUNA VINCITA !! è un gioco e come tutti i giochi non bisogna mai prenderli sul serio.
👋
Buongiorno Bubù ieri purtroppo è sortito su napoli 12 75 ..il gioco si chiude ?
 
Mi scuso per l'errore nella comunicazione della terzina fatto venerdì: è stato propiziatorio per la vincita di stasera con l'ambo
in terzina 18-33-57 su Bari. Grazie bubù
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 09 dicembre 2025
    Bari
    42
    21
    01
    52
    49
    Cagliari
    18
    22
    56
    47
    31
    Firenze
    81
    80
    74
    10
    32
    Genova
    35
    38
    74
    43
    20
    Milano
    13
    70
    53
    19
    29
    Napoli
    12
    16
    38
    67
    02
    Palermo
    47
    76
    64
    48
    12
    Roma
    65
    11
    56
    52
    67
    Torino
    63
    22
    13
    60
    44
    Venezia
    29
    76
    80
    55
    32
    Nazionale
    10
    20
    70
    72
    36
    Estrazione Simbolotto
    Venezia
    26
    35
    09
    10
    25
Indietro
Alto