il metodo..ro

[donatella]

Rieccomi con questo ultimo metodo : semplicissimo,nessun calcolo più o meno complicato da fare
Prima estrazione del mese : ruota di Bari
Ambata : rigiocare il 04° estratto a Bari e Milano
Ambo secco : abbinare il fisso 07 all'ambata
Giocare per ambo ( e ambetto ) a : Bari - Milano
Giocare per ambo secco anche a Tutte - Nz
Ambo e terno secco :
Abbinare all'ambo secco il fisso : 87
Abbinare all'ambo secco il fisso : 67
Giocare per ambo e terno a : Milano
Giocare per ambo e terno a : Tutte. Nz
NOTA : se uno dei fissi ( 07.67.87) fosse l'ambata SOSTITUIRE con il fisso 41 *
------------------------------------------------------------------
2024
Maggio > 74 - 74.07 / 74.07.87 - 74.07.67
05°colpo ambata e ambetto 74.08 a Milano
12° colpo ambo ORO in terzina 07.87 a Venezia
----------------------------------------------------------------------------
Giugno > 83
12° colpo ambata a Milano
17° colpo ambata e ambo ORO in terzina 83.67 a Bari
18° colpo ambo n terzina 83.67 a Firenze
------------------------------------------------------------------------------------
Luglio > 89
02° colpo ambo in terzina 89.67 a Napoli
04° colpo ambo n terzina 87.07 a Bari
11° colpo ambata e ambo secco 87.07 a Milano
13° colpo ambata a Bari
-------------------------------------------------------------------------
Agosto > 79
01° colpo ambata e ambo 79.67 a Bari
--------------------------------------------------------------------------
Settembre > 21
02° colpo ambo ORO in terzina 07.87 a Roma
04° colpo ambo secco 21.07 alla Nz
05° - 07°colpo ambata 21 e ambetto 21.06 a Milano
-----------------------------------------------------------------------------
Ottobre > 74
03° colpo ambata 74 a Milano
09° colpo ambata e ambo 74.67 a Bari
12° colpo ambo in terzina ORO 07.87 a Cagliari
12° colpo ambo in terzina 74.87 alla Nz
17° colpo ambo 07.67 a Genova
----------------------------------------------------------------------------------
Novembre > 60
03° colpo ambo secco ORO 07.60 e TERNO SECCO ORO 60.07.87 a Genova
18° colpo ambo 07.67 a Venezia
---------------------------------------------------------------------------------
Dicembre > 36
05° colpo ambata e ambo secco ORO 36.07 a Bari
11° colpo ambata a Bari
----------------------------------------------------------------------------------
2025
Gennaio > 13 ( nota : ambo oro 13.87 in edc a Bari)
03° colpo ambo 13.87 a Roma
10° colpo ambo secco 13,07 a Genova
10° colpo ambo 07.87 e ambo 07.67 a Torino
12° colpo ambata e ambo secco 13.87 a Milano
12° colpo ambo 13.07 a Roma
14° colpo ambata e ambo 13.87 a Bari
16° colpo ambo 13.67 a Palermo
-------------------------------------------------------------------------------
Febbraio > 67 : 07.87.41 *
01° colpo ambata 67 a Bari
08° colpo ambo 07.41 a Torino
15° colpo ambo secco 67.07 a Firenze
--------------------------------------------------------------------
Marzo > 64
03° colpo ambata e ambo 64.67 a Milano
08° colpo ambo secco ORO 64.07 a Firenze
--------------------------------------------------------------------
Aprile > 35
11° colpo ambo ORO in terzina 07.87 a Milano
12° colpo ambata 35 a Milano
15° colpo ambata 35 a Bari
----------------------------------------------------------------
Maggio > 80
05° colpo ambata e ambo secco 07.80 - TERNO SECCO 07.80.87 a Milano ( e..41)
09° colpo ambata 80 a Bari e Milano
13° colpo ambo secco ORO 07.80 a Genova ( e...41)
---------------------------------------------------------------------------
Giugno > 70
01° colpo ambata 70 a Bari
02° colpo ambata 70 a Milano
11° colpo ambata e ambo 70.67 a Milano
12° colpo ambata e ambo ORO 70.67 a Milano
-------------------------------------------------------------------------------
Luglio > 42
16° colpo ambata 42 a Bari
---------------------------------------------------------------------------------------------------------------------
Agosto > 33
02° colpo ambata 33 a Milano
04° colpo ambata 33 a Milano ( e...86)
04° colpo ambo secco 33.07 a Cagliari
---------------------------------------------------------------------------------------------------------------
Settembre > 80
02° colpo ambo in terzina 07.87 a Milano
05° colpo ambo secco 80.07 a Roma
12° colpo ambo secco ORO 07.80 - TERNO SECCO ORO 07.80.87 a Cagliari
17° colpo ambo in terzina 80.67 a Milano
----------------------------------------------------------------------------------------------------------
Ottobre > 66
04° colpo ambo secco 66.07 a Torino
07° colpo ambata e ambo secco 07.66 a Milano e Torino
08° colpo ambata 66 a Bari
09° colpo ambata e ambo 66.87 a Milano
18° colpo ambata 66 a Milano
--------------------------------------------------------------------------------------
Novembre > 67

 

[Milly63]

Grazie a Te che ci regali i tuoi metodi

 

[matt68]

L'ideale sarebbe avere un bel script anche con ambetto

 

[Milly63]

Ho controllato e a maggio precisamente il 9 è uscito ambo e terno su Milano
80.7.87

 

[Croupier]

Mi sono permesso di analizzare "disinteressatamente ", augurandomi di aver interpretato bene quanto esposto dal metodo.
Il codice è impostato per multi usi e puo essere adattato per altri scopi, in maniera elementare per quanto non hanno dimestichezza enon conoscono le basi minime della programmazione.
Adattatelo per ogni vs esigenza..
Mi auguro possa essere di aiuto...e che soprattutto sia gradito.
Cordi@li S@luti

Scrivi"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
ColoreTesto 1
Scrivi" ~~METODO 4° DI BARI E 4° DI MILANO ~~"
SCRIVI"~~~~~~~~ NUMERI FISSI 7 67 87 ~~~"
SCRIVI" 1^ estrazione del mese "
ColoreTesto 0
Scrivi"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
Sub main()
Dim ruote(10),ruota(10)
Dim n1(10), n2(10), n3(10) , n4(10)
Dim poste(5),posta(5)
'----------------------------------------------
POSTa(1)=1
posta(2)=6.5
'------------------
POSTE(2)=3.5
POSTE(3)=3.5
'------------------
x=13
Y=13
'-----------------------------
For es=10451 To EstrazioneFin
If IndiceMensile(es)=1 Then
Messaggio DataEstrazione(ES)
'-----------------------------
For R1=1 To 1
For R2=5 To 5
ruota(1)=11
'ruota(2)=2
'ruota(3)=3
'ruota(4)=4
'ruota(5)=5
'ruota(6)=6
'ruota(7)=7
'ruota(8)=8
'ruota(9)=9
'ruota(10)=10

ruote(1)=11
'ruote(2)=2
'ruote(3)=3
'ruote(4)=4
'ruote(5)=5
'ruote(6)=6
'ruote(7)=7
'ruote(8)=8
'ruote(9)=9
'ruote(10)=10

k=0' per eventuali usi
'-------------------------
A=Estratto(es-K,R1,1)
B=Estratto(es-K,R1,2)
C=Estratto(es-K,R1,3)
D=Estratto(es-K,R1,4)
E=Estratto(es-K,R1,5)
'---------------------
Aa=Estratto(es,R2,1)
Bb=Estratto(es,R2,2)
Cc=Estratto(es,R2,3)
Dd=Estratto(es,R2,4)
Ee=Estratto(es,R2,5)
'----------------------
'----------------------
For k1= 4 To 4
For k2= 4 To 4
a1 = Estratto(es,r1,k1)
a2 = Estratto(es,r2,k2)
If a1>0 And a2>0 then
a3 = 7
a4 = 67
a5 = 87
'-------------------------------------
N1(1)=a1
N1(2)=a2
N1(3)=a3
N1(4)=a4
N1(5)=a5
'-----------
'N2(1)=a1
'N2(2)=a2
'N2(3)=a3
'-----------
'-----------
'N3(1)=a1
'N3(2)=a2
'N3(3)=a4
'----------
'----------
'N4(1)=a1
'N4(2)=a2
'N4(3)=a5
'---------------------------
Scrivi""
co=co+1
ColoreTesto 1
Scrivi String(50,"=")&" Caso n°"& Format2(co)&" Es. "& Format2(Es)&" indice mensile "& Format2(IndiceMensile(es)),1
ColoreTesto 2
Scrivi (es)& " "& DataEstrazione(es,1)& " "& StringaEstratti(es,r1) &" < "&nomeRuota(r1) ,1
Scrivi (es)& " "& DataEstrazione(es,1)& " "& StringaEstratti(es,r2) &" < "&nomeRuota(r2),1
Scrivi String(50,"=")
ColoreTesto 0
Scrivi("Posizione analizzata --> ")&" "& Format2(k1)&"° numero "& Format2(Estratto(es,R1,k1)) & " Fissi "&A3&" "&A4&" "&A5,1
Scrivi("Posizione analizzata --> ")&" "& Format2(K2)&"° numero "& Format2(Estratto(es,R2,K2)),1
Scrivi String(50,"=")
'----------------------------------------------
ImpostaGiocata 1,n1,ruota,posta,x,Y
'ImpostaGiocata 2,n2,ruota,posta,x,Y
'ImpostaGiocata 3,n3,ruota,posta,x,Y
'ImpostaGiocata 4,n4,ruota,posta,x,Y
ImpostaGiocata 5,n1,ruote,poste,x,Y
Gioca es
'----------------------------------------------
End If

Next
Next
Next
Next
End If
Next
ScriviResoconto 1
'ScriviResoconto 2
'ScriviResoconto 3
'ScriviResoconto 4
ScriviResoconto 5
End Sub
'----------------------------------------------

 

[matt68]

Buongiorno c'è anche funzione ambetto grazie

 

[antonioquagliozzi]

lo script da errore es

 

[Croupier]

Controllate.......metodo mio ... L' 8 volante...volerà..non volerààà..???
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Caso n°01 Indice mensile --> 13
ESTRATTO ANALIZZATO ----> 08 in pos. 02°
30.04.2016 Es. 9155 39.08.24.37.17 Bari
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
03.05.2016 Es. 9156 29.56.44.16.77 Bari 01° colpo
05.05.2016 Es. 9157 27.66.87.20.03 Bari 02° colpo
07.05.2016 Es. 9158 49.15.34.11.65 Bari 03° colpo
10.05.2016 Es. 9159 60.27.75.73.83 Bari 04° colpo
12.05.2016 Es. 9160 25.68.62.86.47 Bari 05° colpo
14.05.2016 Es. 9161 57.49.30.74.03 Bari 06° colpo
17.05.2016 Es. 9162 18.45.74.32.03 Bari 07° colpo
19.05.2016 Es. 9163 15.50.06.38.83 Bari 08° colpo
21.05.2016 Es. 9164 42.08.09.05.03 Bari 09° colpo

sab 30.04.2016 [9155]
G 1: MAT 31.47.08.39 Ba 9/9
E: 47 su Ba 5° colpo [9160/12.05.2016]
E: 08 su Ba 9° colpo [9164/21.05.2016]

G 2: AT 31.47.08.39 Tu 9/9
negativo
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Caso n°02 Indice mensile --> 13
ESTRATTO ANALIZZATO ----> 08 in pos. 05°
31.05.2016 Es. 9168 56.13.17.36.08 Bari
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
03.06.2016 Es. 9169 19.74.64.52.65 Bari 01° colpo
04.06.2016 Es. 9170 11.61.48.17.66 Bari 02° colpo
07.06.2016 Es. 9171 01.36.38.54.64 Bari 03° colpo
09.06.2016 Es. 9172 34.53.05.07.62 Bari 04° colpo
11.06.2016 Es. 9173 39.11.06.64.20 Bari 05° colpo
14.06.2016 Es. 9174 06.62.46.80.37 Bari 06° colpo
16.06.2016 Es. 9175 74.22.33.84.07 Bari 07° colpo
18.06.2016 Es. 9176 63.76.74.73.30 Bari 08° colpo
21.06.2016 Es. 9177 20.33.23.62.76 Bari 09° colpo

mar 31.05.2016 [9168]
G 1: MAT 48.64.08.56 Ba 9/9
E: 64 su Ba 1° colpo [9169/03.06.2016]
E: 48 su Ba 2° colpo [9170/04.06.2016]
E: 64 su Ba 3° colpo [9171/07.06.2016]
E: 64 su Ba 5° colpo [9173/11.06.2016]

G 2: AT 48.64.08.56 Tu 9/9
E: 56.08 su Pa 9° colpo [9177/21.06.2016]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Caso n°03 Indice mensile --> 13
ESTRATTO ANALIZZATO ----> 08 in pos. 05°
22.03.2024 Es. 10428 33.86.32.37.08 Bari
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
23.03.2024 Es. 10429 14.86.75.70.73 Bari 01° colpo
26.03.2024 Es. 10430 30.51.17.01.53 Bari 02° colpo
28.03.2024 Es. 10431 49.73.67.86.19 Bari 03° colpo
29.03.2024 Es. 10432 40.02.15.08.67 Bari 04° colpo
30.03.2024 Es. 10433 39.10.12.60.42 Bari 05° colpo
02.04.2024 Es. 10434 74.29.82.36.66 Bari 06° colpo
04.04.2024 Es. 10435 03.36.86.35.53 Bari 07° colpo
05.04.2024 Es. 10436 55.59.31.29.27 Bari 08° colpo
06.04.2024 Es. 10437 03.68.30.72.52 Bari 09° colpo

ven 22.03.2024 [10428]
G 1: MAT 78.04.08.86 Ba 9/9
E: 86 su Ba 1° colpo [10429/23.03.2024]
E: 86 su Ba 3° colpo [10431/28.03.2024]
E: 08 su Ba 4° colpo [10432/29.03.2024]
E: 86 su Ba 7° colpo [10435/04.04.2024]

G 2: AT 78.04.08.86 Tu 9/9
E: 04.08 su Fi 5° colpo [10433/30.03.2024]
E: 04.08 su Ro 5° colpo [10433/30.03.2024]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Caso n°04 Indice mensile --> 13
ESTRATTO ANALIZZATO ----> 08 in pos. 04°
22.10.2024 Es. 10550 36.10.58.08.09 Bari
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
24.10.2024 Es. 10551 07.28.08.01.63 Bari 01° colpo
25.10.2024 Es. 10552 10.03.28.13.66 Bari 02° colpo
26.10.2024 Es. 10553 40.49.13.21.10 Bari 03° colpo
29.10.2024 Es. 10554 67.62.17.81.90 Bari 04° colpo
31.10.2024 Es. 10555 16.03.32.19.10 Bari 05° colpo
02.11.2024 Es. 10556 36.55.35.60.20 Bari 06° colpo
04.11.2024 Es. 10557 16.57.84.32.07 Bari 07° colpo
05.11.2024 Es. 10558 55.75.69.01.79 Bari 08° colpo
07.11.2024 Es. 10559 29.53.40.66.46 Bari 09° colpo

mar 22.10.2024 [10550]
G 1: MAT 50.66.08.58 Ba 9/9
E: 08 su Ba 1° colpo [10551/24.10.2024]
E: 66 su Ba 2° colpo [10552/25.10.2024]
E: 66 su Ba 9° colpo [10559/07.11.2024]

G 2: AT 50.66.08.58 Tu 9/9
E: 58.66 su Mi 5° colpo [10555/31.10.2024]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Caso n°05 Indice mensile --> 13
ESTRATTO ANALIZZATO ----> 08 in pos. 02°
22.11.2025 Es. 10777 82.08.24.45.37 Bari
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Da giocare dalla data ES 10778 alla estr.finale => 10786 per 09 colpi
Da giocare dalla data ES 10778 alla estr.finale => 10786 per 09 colpi

sab 22.11.2025 [10777]
G 1: MAT 74.90.08.82 Ba 0/9
n.i. (9 colpi)
G 2: AT 8.74.82.90 Tutte 0/9
n.i. (9 colpi)
BASI :
8.74.82
8.74.90
90.74.82
************************************************************************
=======================================
Resoconto giocata: 1
=======================================
Casi esaminati: 5
in corso: 1
casi finali: 4
positivi: 4
negativi: 0
Pronostici generati: 5
Totale Vincite: 13
Attesa media: 4,00

Ruota Vincente
-------------------------
Bari 13
Totale 13

Resoconto della giocata 1
----------------------------------------
Ambate 13

=======================================
Resoconto giocata: 2
=======================================
Casi esaminati: 5
in corso: 1
casi finali: 4
positivi: 3
negativi: 1
Pronostici vincenti: 3 (5,5% dei pronostici generati)
Totale Vincite: 4
Attesa media: 6,00

Resoconto della giocata 2
Dettaglio Ruote

Ruota Vincenti Giocati
---------------------------
Bari 0
Cagliari 0
Firenze 1
Genova 0
Milano 1
Napoli 0
Palermo 1
Roma 1
Torino 0
Venezia 0
Totale 4

Resoconto della giocata 2
Ambi 4

============================================================
I risultati ci sono sempre stati e sono reali.... poi, come dico io "sapimu" ( sappiamo )
****************************************************************************************************************
Questi dati sono frutto di analisi mirata. Usateli solo se trovate convergenze con i vostri sistemi.
Nessuna certezza, solo segnali da incrociare. Regolatevi secondo logica e prudenza.
-----------------------------------------------------------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------------------------------------------------------
Il gioco è vietato ai minori di anni 18. Giocare troppo può causare dipendenza patologica.
Sempre la massima cautela....
Grazie per la comprensione e per la fiducia.

 

[donatella]

Grazie da parte mia per il Tuo graditissimo script

 

[matt68]

BUONGIORNO HO FATTO DELLE MODIFICHE A METODO VECCHIO MA NON MI CREA LA GIUSTA GIOCATA SICURAMENTE UN ERRORE DI COMPILAZIONE

GRAZIE CHI PUò DARE UN ACCHIATA



Sub Main
Dim FIn,Es,Es2,LILLO,Ini,N1,N2,N3,N4,Retnum,Retvinc
Dim Caso,Casi,A,B,C,D,Clp,Ind_Me,Ambetto,k
Dim Amba(2),Ambo(4),Posta(1),Poste(2),Ruo(3)
Dim Ru1,Ru2,Ru3,Ru4,Ru5,Ru6,Ru7,Ru8,Ru9,Ru10,Ru11
FIn = EstrazioneFin
Ini = InputBox("Inserisci l'estrazione che vuoi iniziare",,10470)
Clp = InputBox("Per quanti colpi vuoi giocare?",LILLO,12)
Ind_Me = CInt(InputBox("Inserisci il numero dell'indice mensile",LILLO,1))
Posta(1) = 1
Poste(2) = 1
'Scrivi "SORTI DI AMBETTO AMBO TERNO- Con scelta Indice Mensile - ",1,,4,,3,,1
Ruo(1) = BA_ : Ruo(2) = MI_: Ruo(3) = TT_
For Es = Ini To FIn
If IndiceMensile(Es) = Ind_Me Then
Messaggio Es
AvanzamentoElab Ini,FIn,Es
Caso = 0
A = CInt(Estratto(Es,BA_,4))
B = CInt(Estratto(Es,MI_,4))
N1 = CInt(Fuori90(A))
N2 = CInt(Fuori90(87))
N3 = CInt(Fuori90(67))
N4 = CInt(Fuori90(7))
: Ruo(1) = BA_
: Ruo(2) = MI_
: Ruo(3) = TT_

Caso = Caso + 1
Casi = Casi + 1
ColoreTesto 2
Scrivi String(89,"*") & " Casi Totali " & FormattaStringa(Casi,"0000")
ColoreTesto 1
Scrivi String(80,"*") & " Estrazione " &(Es) & " caso " & FormattaStringa(Caso,"0000")
ColoreTesto 0
Scrivi(" Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
Scrivi Space(5) & "INDICE MENSILE INSERITO " & Ind_Me,1,,,1
Scrivi
Amba(2) = N1
ImpostaGiocata 1,Amba,Ruo,Posta,Clp,1
Amba(2) = N1: Ambo(2) = N2 : Ambo(3) = N3: Ambo(4) = N4

ImpostaGiocata 2,Ambo,Ruo,Poste,Clp,2
Gioca Es
Scrivi Space(20) & "AMBETTI",1,,,2
For k = 1 To Clp
Ru1 = BA_
Es2 = Es + k
If Es2 > FIn Then Exit For
Ambetto = VerificaAmbetto(Ambo,Ru1,Es2,Retnum,Retvinc)
If Ambetto > 0 Then
Scrivi " Ambetto su " & Retnum & " Del " & DataEstrazione(Es2),1
Scrivi " Vincita di " & Retvinc & " Volte la posta",1
End If
Ru2 = MI_
Ambetto = VerificaAmbetto(Ambo,Ru2,Es2,Retnum,Retvinc)
If Ambetto > 0 Then
Scrivi " Ambetto su " & Retnum & " Del " & DataEstrazione(Es2),1
Scrivi " Vincita di " & Retvinc & " Volte la posta",1

End If
Ru3 = TT_
Ambetto = VerificaAmbetto(Ambo,Ru3,Es2,Retnum,Retvinc)
If Ambetto > 0 Then
Scrivi " Ambetto su " & Retnum & " Del " & DataEstrazione(Es2),1
Scrivi " Vincita di " & Retvinc & " Volte la posta",1

End If

Next
If ScriptInterrotto Then Exit Sub
End If
Next
ScriviResoconto
End Sub

 

[donatella]

Pronostico di giugno
Ambata : 70 a Bari e Milano
Giocare a Bari - Milano
Ambo secco : 70.07
Giocare per ambo ( e ambetto ) a Bari - Milano
Giocare per ambo a Tutte - Nz
--------------------------------------------------------------------------
Ambo.terno :
70.07.67
70.07.87
Giocare per ambo.terno : Milano . tutte - Nz
Nota _; l'ambata 70 è il numero più frequente sulla ruota di Milano

 

[Pomito]

Sub Main()
Scrivi
Scrivi
ColoreTesto 0
Dim ruote(2): Dim ruota(3): Dim ruotee(2)im Ambetto(2)
Dim t1(5): Dim t2(3) : Dim t3(3) : Dim t4(3) : Dim t5(3): Dim t6(3): Dim t7(3): Dim poste(5)im posta(1): Dim postee(3)
poste(2) = 1
posta(1) = 1
postee(2) = 1
postee(3) = 1
y = 250
klp = 18
ini = EstrazioneFin - y
fin = EstrazioneFin
For es = ini To fin
Messaggio es
Call AvanzamentoElab(ini,fin,es)
'If IsUltimaDelMese(es) Then
If IndiceMensile(es) = 1 Then
ruotee(1) = 12
ruotee(2) = TT_
ruote(1) = 1
ruote(2) = 5
ruota(1) = 5
ruota(2) = 12
ruota(3) = TT_
r1 = BA_
'---
ColoreTesto 0 :Scrivi " ALLA 1^ DEL MESE 4° DI BARI + NUMERI FISSI 7 67 87 ",1,1,1,4,4,"verdana",1
ColoreTesto 7:Scrivi String(100,"°") & " Caso n° " & casi,1
ColoreTesto 1:Scrivi DataEstrazione(es) & "--->" & IndiceMensile(es) & "° Estrazione Mensile" & " " & StringaEstratti(es,r1) & " ",1
ColoreTesto 7:Scrivi String(100,"°")
ColoreTesto 0
t1(1) = Estratto(es,1,4)
ImpostaGiocata 1,t1,ruote,posta,klp
t2(1) = t1(1)
t2(2) = 7
ImpostaGiocata 2,t2,ruote,poste,klp
t3(1) = t1(1)
t3(2) = 7
ImpostaGiocata 3,t3,ruotee,poste,klp
t4(1) = t1(1)
t4(2) = 7
t4(3) = 87
ImpostaGiocata 4,t4,ruota,postee,klp
t5(1) = t1(1)
t5(2) = 7
t5(3) = 67
ImpostaGiocata 5,t5,ruota,postee,klp
Gioca es,1
Scrivi
Scrivi Space(26) & " AMBETTO",1,,,2
Scrivi
Ambetto(1) = t1(1) : Ambetto(2) = 6
ImpostaGiocata 6,Ambetto,ruote,poste,klp
Ambetto(1) = t1(1) : Ambetto(2) = 8
ImpostaGiocata 7,Ambetto,ruote,poste,klp
Ambetto(1) = t1(1) + 1 : Ambetto(2) = 7
ImpostaGiocata 8,Ambetto,ruote,poste,klp
Ambetto(1) = t1(1) - 1 : Ambetto(2) = 7
ImpostaGiocata 9,Ambetto,ruote,poste,klp
Gioca es - 1,1
End If
Next
Scrivi
ScriviResoconto
End Sub

 

[matt68]

Sub Main
Dim FIn,Es,Es2,LILLO,Ini,N1,N2,N3,N4,Retnum,Retvinc
Dim Caso,Casi,A,B,C,D,Clp,Ind_Me,Ambetto,k
Dim Amba(2),Ambo(4),Posta(1),Poste(2),Ruo(3),Ruo1(1)
Dim Ru1,Ru2,Ru3,Ru4,Ru5,Ru6,Ru7,Ru8,Ru9,Ru10,Ru11
FIn = EstrazioneFin
Ini = InputBox("Inserisci l'estrazione che vuoi iniziare",,10470)
Clp = InputBox("Per quanti colpi vuoi giocare?",LILLO,12)
Ind_Me = CInt(InputBox("Inserisci il numero dell'indice mensile",LILLO,1))
Posta(1) = 1
Poste(2) = 1
k = 13
'Scrivi "SORTI DI AMBETTO AMBO TERNO- Con scelta Indice Mensile - ",1,,4,,3,,1
Ruo(1) = BA_ : Ruo(2) = MI_: Ruo(3) = TT_
For Es = Ini To FIn
If IndiceMensile(Es) = Ind_Me Then
Messaggio Es
AvanzamentoElab Ini,FIn,Es
Caso = 0
A = CInt(Estratto(Es,BA_,4))

N1 = CInt(Estratto(Es,BA_,4))
N2 = CInt(Fuori90(87))
N3 = CInt(Fuori90(67))
N4 = CInt(Fuori90(7))
N5 = CInt(Estratto(Es,BA_,4))

: Ruo(1) = BA_
: Ruo(2) = MI_
: Ruo(3) = TT_

Caso = Caso + 1
Casi = Casi + 1
ColoreTesto 2
Scrivi String(89,"*") & " Casi Totali " & FormattaStringa(Casi,"0000")
ColoreTesto 1
Scrivi String(80,"*") & " Estrazione " &(Es) & " caso " & FormattaStringa(Caso,"0000")
ColoreTesto 0
Scrivi(" Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
Scrivi Space(5) & "INDICE MENSILE INSERITO " & Ind_Me,1,,,1
Scrivi
Amba(2) = N1
ImpostaGiocata 1,Amba,Ruo,Posta,Clp,1
Amba(2) = N1: Ambo(3) = N2 : Ambo(2) = N3: Ambo(1) = N4: Ambo(4) = N5

ImpostaGiocata 2,Ambo,Ruo,Poste,Clp,2
Gioca Es
Scrivi Space(20) & "AMBETTI",1,,,2
For k = 1 To Clp
Ru1 = BA_
Es2 = Es + k
If Es2 > FIn Then Exit For
Ambetto = VerificaAmbetto(Ambo,Ru1,Es2,Retnum,Retvinc)
If Ambetto > 0 Then
Scrivi " Ambetto su " & Retnum & " Del " & DataEstrazione(Es2),1
Scrivi " Vincita di " & Retvinc & " Volte la posta",1
End If
Ru2 = MI_
Ambetto = VerificaAmbetto(Ambo,Ru2,Es2,Retnum,Retvinc)
If Ambetto > 0 Then
Scrivi " Ambetto su " & Retnum & " Del " & DataEstrazione(Es2),1
Scrivi " Vincita di " & Retvinc & " Volte la posta",1

End If
Ru3 = TT_
Ambetto = VerificaAmbetto(Ambo,Ru3,Es2,Retnum,Retvinc)
If Ambetto > 0 Then
Scrivi " Ambetto su " & Retnum & " Del " & DataEstrazione(Es2),1
Scrivi " Vincita di " & Retvinc & " Volte la posta",1

End If

Next
If ScriptInterrotto Then Exit Sub
End If
Next
ScriviResoconto
End Sub




Va già meglio ma migliorabile

 

[donatella]

Questa sera al 01° colpo ambata 70 a Bari

 

[Croupier]

Mi auguro possa essere di aiuto...e che soprattutto sia gradito.
Cordi@li S@luti

Posto per una forma di "collaborazione fattiva " da parte mia ... nel rispetto di tutti...
Ambo vertibile a modo mio...24-42
*****************************************************************************************************************
== Caso n°01 mese 10 dell'anno 2009 es 8133 Indice mensile 09
ESTRAZIONE NUMERO ---> 09
ESTRATTO ANALIZZATO ---> numero 24 in 02° pos.
ESTRATTO ANALIZZATO ---> numero 42 in 05° pos.
20.10.2009 Es 8133 09.24.69.30.42 Torino
Da giocare dalla data 22.10.2009 ES 8134 alla estr.finale => 8142 per 09 colpi

mar 20.10.2009 [8133]
G 1: MA 69.62 Ca Mi 9/9
E: 69 su Mi 1° colpo [8134/22.10.2009]
E: 69 su Mi 3° colpo [8136/27.10.2009]
E: 62 su Ca 4° colpo [8137/29.10.2009]
E: 69 su Mi 5° colpo [8138/31.10.2009]
E: 69 su Ca 7° colpo [8140/05.11.2009]
E: 62 su Ca 8° colpo [8141/07.11.2009]

== Caso n°02 mese 10 dell'anno 2009 es 8134 Indice mensile 10
ESTRAZIONE NUMERO ---> 10
ESTRATTO ANALIZZATO ---> numero 24 in 02° pos.
ESTRATTO ANALIZZATO ---> numero 42 in 01° pos.
22.10.2009 Es 8134 42.24.16.34.68 Torino
Da giocare dalla data 24.10.2009 ES 8135 alla estr.finale => 8143 per 09 colpi

gio 22.10.2009 [8134]
G 1: MA 69.62 Ca Mi 9/9
E: 69 su Mi 2° colpo [8136/27.10.2009]
E: 62 su Ca 3° colpo [8137/29.10.2009]
E: 69 su Mi 4° colpo [8138/31.10.2009]
E: 69 su Ca 6° colpo [8140/05.11.2009]
E: 62 su Ca 7° colpo [8141/07.11.2009]

== Caso n°03 mese 02 dell'anno 2019 es 9593 Indice mensile 07
ESTRAZIONE NUMERO ---> 07
ESTRATTO ANALIZZATO ---> numero 24 in 04° pos.
ESTRATTO ANALIZZATO ---> numero 42 in 02° pos.
16.02.2019 Es 9593 82.42.40.24.36 Torino
Da giocare dalla data 19.02.2019 ES 9594 alla estr.finale => 9602 per 09 colpi

sab 16.02.2019 [9593]
G 1: MA 69.62 Ca Mi 9/9
E: 62.69 su Mi 1° colpo [9594/19.02.2019]
E: 69 su Mi 8° colpo [9601/07.03.2019]


== Caso n°04 mese 11 dell'anno 2025 es 10776 Indice mensile 12
ESTRAZIONE NUMERO ---> 12
ESTRATTO ANALIZZATO ---> numero 24 in 01° pos.
ESTRATTO ANALIZZATO ---> numero 42 in 05° pos.
21.11.2025 Es 10776 24.59.27.01.42 Torino
Da giocare dalla data 22.11.2025 ES 10777 alla estr.finale => 10785 per 09 colpi
ven 21.11.2025 [10776]
G 1: MA 69.62 Ca Mi 1/9
in corso (1° su 9)

34.47.62.69.86 Ba Ca Fi Ge Mi Na Pa Ro To Ve
Basi :
34.62.86.47
34.62.86.69
47-69.34
47-69.62
47-69.86
86.34 su Mi 2° colpo [10778/25.11.2025]

Da giocare dalla data 22.11.2025 ES 10777 alla estr.finale => 10790 per 13 colpi
=======================================
Resoconto giocata: 1
=======================================
Casi esaminati: 4
in corso: 1
casi finali: 3
positivi: 3
negativi: 0
Pronostici generati: 8
Pronostici vincenti: 3 (37,5% dei pronostici generati)
Attesa media: 4,54


Resoconto della giocata 1
Ruote
---------------------------
Cagliari 6
Milano 7
Totale 13
-----------------------------------
Ambata 14
Ambo 1

Chiedo il calendario e le sequenze esatte delle estrazioni dalla data del 2-gen 2026 (1 giovedi e 6 martedi.. e succesive )
se qualcuno ha dei dati precisi in anticipo...penso a scalare..grazie

Grazie per la comprensione e per la fiducia.
I risultati ci sono sempre stati e sono reali.... poi, come dico io "sapimu" ( sappiamo )
****************************************************************************************************************
quindi :
Se tra i vostri numeri, calcoli, metodi, analisi o dati ritrovate corrispondenze con questi miei risultati, regolatevi di conseguenza.
Se lo ritenete opportuno, utilizzate queste Combinazioni solo in caso di convergenza con le vostre analisi.
Non sono certezze, ma indicazioni. Sta a Voi valutarle con cautela e responsabilità.
----------------------------------------------------------------------------------------------------------------------------------------------
Indicazioni da usare solo se convergenti con i vostri numeri, calcoli, metodi, analisi o dati.
Non sono previsioni certe. Regolatevi con prudenza.
----------------------------------------------------------------------------------------------------------------------------------------------
Il gioco è vietato ai minori di anni 18. Giocare troppo può causare dipendenza patologica.
***********************************************************************************

 

[donatella]

Questa sera al 02° colpo ambata 70 a Milano

 

[Croupier]

Per la serie : fate bene picciotti ...siculi ....

== Caso n°01 mese 07 dell'anno 2015 es 9035 Indice mensile 11
ESTRAZIONE NUMERO ---> 11
ESTRATTO ANALIZZATO ---> numero 27 in 02° pos.
ESTRATTO ANALIZZATO ---> numero 72 in 03° pos.
25.07.2015 Es 9035 81.27.72.78.71 Venezia
Da giocare dalla data 28.07.2015 ES 9036 alla estr.finale => 9044 per 09 colpi
sab 25.07.2015 [9035]
G 1: MA 62.17 Pa 9/9
E: 17 su Pa 1° colpo [9036/28.07.2015]
E: 62 su Pa 6° colpo [9041/08.08.2015]
E: 62 su Pa 7° colpo [9042/11.08.2015]


== Caso n°02 mese 03 dell'anno 2017 es 9294 Indice mensile 09
ESTRAZIONE NUMERO ---> 09
ESTRATTO ANALIZZATO ---> numero 27 in 05° pos.
ESTRATTO ANALIZZATO ---> numero 72 in 01° pos.
21.03.2017 Es 9294 72.83.68.14.27 Venezia
Da giocare dalla data 23.03.2017 ES 9295 alla estr.finale => 9303 per 09 colpi
mar 21.03.2017 [9294]
G 1: MA 62.17 Pa 9/9
E: 62 su Pa 5° colpo [9299/01.04.2017]


== Caso n°03 mese 01 dell'anno 2019 es 9578 Indice mensile 06
ESTRAZIONE NUMERO ---> 06
ESTRATTO ANALIZZATO ---> numero 27 in 05° pos.
ESTRATTO ANALIZZATO ---> numero 72 in 03° pos.
12.01.2019 Es 9578 73.90.72.64.27 Venezia
Da giocare dalla data 15.01.2019 ES 9579 alla estr.finale => 9587 per 09 colpi
sab 12.01.2019 [9578]
G 1: MA 62.17 Pa 9/9
E: 17 su Pa 6° colpo [9584/26.01.2019]
E: 17 su Pa 7° colpo [9585/29.01.2019]
E: 17 su Pa 9° colpo [9587/02.02.2019]


== Caso n°04 mese 01 dell'anno 2023 es 10207 Indice mensile 08
ESTRAZIONE NUMERO ---> 08
ESTRATTO ANALIZZATO ---> numero 27 in 05° pos.
ESTRATTO ANALIZZATO ---> numero 72 in 03° pos.
19.01.2023 Es 10207 67.39.72.34.27 Venezia
Da giocare dalla data 21.01.2023 ES 10208 alla estr.finale => 10216 per 09 colpi
gio 19.01.2023 [10207]
G 1: MA 62.17 Pa 9/9
E: 62 su Pa 1° colpo [10208/21.01.2023]


== Caso n°05 mese 11 dell'anno 2025 es 10777 Indice mensile 13
ESTRAZIONE NUMERO ---> 13
ESTRATTO ANALIZZATO ---> numero 27 in 01° pos.
ESTRATTO ANALIZZATO ---> numero 72 in 04° pos.
22.11.2025 Es 10777 27.05.17.72.50 Venezia
Da giocare dalla data ES 10778 alla estr.finale => 10786 per 09 colpi
sab 22.11.2025 [10777]
G 1: MA 62.17 Pa 0/9
n.i. (9 colpi)
-------------------------------------------------------------------------------------------
17.45.62.72.90 Ba Ca Fi Ge Mi Na Pa Ro To Ve
Basi :
17.45.62
17.45.72
17.45.90
62.72.90.17
62.72.90.45

Da giocare dalla data ES 10778 alla estr.finale => 10791 per 13 colpi
=======================================
Resoconto giocata: 1
=======================================
Casi esaminati: 5
in corso: 1
casi finali: 4
positivi: 4
negativi: 0
Pronostici generati: 5
Pronostici vincenti: 4 (80,0% dei pronostici generati)
Totale Vincite: 8
Attesa media: 5,25


Resoconto della giocata 1
Ruote
--------------------------
Palermo 8
Totale 8

Resoconto della giocata 1
------------------------------------------------------------
Ambata 8

Grazie per la comprensione e per la fiducia.

============================================================
================================================================================
**************************************************
Per la serie : fate "sempre" bene fratelli....Romani ... per la estr.168 e successive
**************************************************
Non appena mi sarà possibile, riprenderò gli aggiornamenti con maggiore precisione e coerenza.

Grazie per la comprensione e per la fiducia.


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
I risultati ci sono sempre stati e sono reali.... poi, come dico io "sapimu" ( sappiamo )
****************************************************************************************************************
quindi :
se ve li ritrovate, dai Vs metodi....regolatevi...
-----------------------------------------------------------------------------------------------------------------------------------------------------------
Le indicazioni, possono essere utili, ma raccomando, sempre a tutti, ....e dico "sempre" , la massima cautela....
-----------------------------------------------------------------------------------------------------------------------------------------------------------
Il gioco è vietato ai minori di anni 18. Giocare troppo può causare dipendenza patologica.
Sempre la massima cautela....

 

[Milly63]

Ambata 70 a MI

 

[Croupier]

*************************************************************************************************
Per la serie : batto 4..
Alla 7^ del mese di ..
________________________________________________________________________________________________________________________________________

Questi dati sono frutto di analisi mirata.
Usateli solo se trovate convergenze con i vostri sistemi. Nessuna certezza, solo segnali da incrociare.
Regolatevi secondo logica e prudenza.


Non appena mi sarà possibile, riprenderò gli aggiornamenti con maggiore precisione e coerenza.

Grazie per la comprensione e per la fiducia.





***********************************************************************************
----------------------------------------------------------------------------------------------------------------------------------------------
Le mie indicazioni possono offrire spunti interessanti, ma invito tutti — e sottolineo tutti — alla massima prudenza.
----------------------------------------------------------------------------------------------------------------------------------------------
Il gioco è vietato ai minori di anni 18. Giocare troppo può causare dipendenza patologica.
Sempre la massima cautela....
****************************************************************************************************************

 

[Milly63]

Questa sera su Mi 70 67