metodo per ambate e ambo

[bonalele]

Vedi l'allegato 2305853
a = 24
b = 52
c = 53
y + a - b = c
vediamo un altro esempio su ba

Vedi l'allegato 2305855

perchè hai preso i 3 centrali e non i primi 3?

 

[Zetrix]

perchè hai preso i 3 centrali e non i primi 3?

perche i tre centrali sono migliori in quanto per ambo si genera la differenza tra il primo e il quinto estratto

57-56=1

 

[bonalele]

Vedi l'allegato 2305853
a = 24
b = 52
c = 53
y + a - b = c
vediamo un altro esempio su ba

Vedi l'allegato 2305855

[BA] [.. .. 81 .. ..] C.3 Estratto 02582 [127 - 09/08/2025] [55.17.81.03.01]

x ambo ?

[VE] [.. .. 81 01 ..] C.1 Ambo 02580 [125 - 07/08/2025] [13.07.81.01.53]
[BA] [.. .. 81 .. 01] C.3 Ambo 02582 [127 - 09/08/2025] [55.17.81.03.01]

Come hai calcolato il numero 1 x abbinamento?

 

[Zetrix]

vogliamo fare una prova su ba, nell'ultima estr,

 

[Zetrix]

Come hai calcolato il numero 1 x abbinamento?

57-56=1

 

[Zetrix]

a = 86
b = 27
c = 44



questa condizione potrebbe non essere buona ma vediamo lo stesso che da ba
75+86=161-27=134
l'algebra da il 134 qua si deve fare 134-90=44
se l'algebra dava il numero 44 era meglio ..
in teoria nell'algebra non si deve usare questa regola 134-90
ma ho scritto lo stesso nello script la regola del fuori 90
ma secondo me l'algebra deve dare solo il 44 nei conteggi
x ambo
22-2=20 (differenza 1° e 5°)

Numeri in gioco 75.20 su BA TT per Ambo

 

[Pontina2]

Seguo....

 

[Zetrix]

bonalele ai visto come e affascinante l'algebra ho scritto altri metodi con l'algebra..

 

[Zetrix]

grazie pontina2, se ci sono dei dubbi sui conteggi sulle estr,,scrivete e quanto posso rispondo alle vs richieste..

 

[bonalele]

02/08 BA 65 6 49 14 1
N + 6-49 = 14
N = 57
14 + 49 - 6 = 57
1° Colpo 57 a Ba

 

[Zetrix]

a = 24
b = 68
c = 73

x bonalele
scrivo un altra condizione con l'algebra su ba
se i numeri a,b,c, sono tra i primi tre estratti es, 1°,2°,3°,
x ambo si calcola la differenza tra il 4° e 5°
alcune volte calcola la somma tra loro..



16-76 differenza 60
16+76 somma 2

[BA] [.. .. 27 .. ..] C.1 Estratto 02584 [129 - 14/08/2025] [86.54.27.49.68]
[BA] [.. .. 27 .. ..] C.2 Estratto 02585 [130 - 16/08/2025] [22.86.27.44.02]

[BA] [.. .. 27 .. 02] C.2 Ambo 02585 [130 - 16/08/2025] [22.86.27.44.02]
[CA] [.. .. 60 .. 27] C.2 Ambo 02585 [130 - 16/08/2025] [38.11.60.69.27]

in pratica se si dovesse mettere x ambo sia con la differenza che la somma
si generano due ambi
quindi x ambo si possono usare entrambe le soluzioni sia la differenza che la somma..

 

[Zetrix]

[BA] [57 .. .. .. ..] C.1 Estratto 02579 [124 - 05/08/2025] [57.24.52.53.56]

bonalele questa e la condizione che ai scritto su ba..
questa condizione a dato solo l'ambata
gli ambi non sono usciti a ba e nemmeno a tutte
sto vedendo se riesco a migliorare la tabella dell'algebra..
ho cambiato il tipo di scrittura nella tabella ma non mi piace
la devo modificare con un altro tipo di scrittura..

 

[bonalele]

Se ricaviamo le ambate tra 1-2-3 e 2-3-4 e 3-4-5 più abbinamenti x ambo ?

 

[Zetrix]

Se ricaviamo le ambate tra 1-2-3 e 2-3-4 e 3-4-5 più abbinamenti x ambo ?

si in teoria si generano piu ambi con esattezza 6 ambi ,
se si vuole giocare tre ambi si deve togliere il calcolo della somma
ma certe volte fa l'ambo con la somma
quindi la cosa e oggettiva si devono vedere i numeri se convergono su una determinata ruota
oppure si devono selezionare solo quelle condizione con i numeri centrali 2-3-4
in questo modo si giocano solo due ambi secchi su ruota e volendo a tutte..
però il metodo dell'algebra e sull'ambata su ruota..
sull'ambo si fa un tentativo su ruota ma non sempre da l'ambo su ruota..
nel pomeriggio provo a scrivere nello script solo le condizioni con gli estratti 2-3-4
e vediamo quanti ambi da su ruota..oppure a tutte..

 

[bonalele]

01/07/25
Nz 72 6 3 8 7
72-6-3 N=27 esito 2C
6-3-8 N=5 esito 2C
3-8-7 N=12 esito 4C
Non male!

 

[Zetrix]

ma i conteggi li scrivi con carta e penna,
ti interessa lo script..
ma devo sistemare meglio lo script..

 

[bonalele]

ma i conteggi li scrivi con carta e penna,
ti interessa lo script..
ma devo sistemare meglio lo script..

per ora uso excel

 

[bonalele]

08/07/25
Nz 76 14 90 9 12
76-14-90 N=28 esito 5C
14-90-9 N=85 esito 5C
90-9-12 N=21
abbinamento 12-9= 3 esito 5c
in pratica terno con 4 numeri 28-85-21-3

 

[bonalele]

ma i conteggi li scrivi con carta e penna,
ti interessa lo script..
ma devo sistemare meglio lo script..

si certo se ci fosse lo script sarebbe più veloce trovare le combinazioni

 

[Zetrix]

Anticipazione (Spoiler)

Sub Main
Dim T1,T2,T3,T4,T5,T6,T7
Dim A,B,C,X,Y,E,F,K
Dim N1,N2,N3,N4,N5,N6,N7
Dim ES,TV,R1
Dim larghezze
Dim ambata1(2),ruota(5),ruote(5),posta(1),poste(2)
Dim ambo1(2),ambo2(2),ambo3(2),ambo4(2)
posta(1) = 1
poste(2) = 1
TV = InputBox("Quante estrazioni vuoi controllare?",,0)
K = 0
For ES = EstrazioneFin - TV To EstrazioneFin
AvanzamentoElab EstrazioneFin - ES,EstrazioneFin,ES
For R1 = 1 To 12
If R1 = 11 Then R1 = 12
For p1 = 1 To 3
p2 = p1 + 1
p3 = p2 + 1
'
A = Estratto(ES,R1,p1)
B = Estratto(ES,R1,p2)
C = Estratto(ES,R1,p3)
'
N1 = Estratto(ES,R1,1)
N2 = Estratto(ES,R1,2)
N3 = Estratto(ES,R1,1)
N4 = Estratto(ES,R1,5)
N5 = Estratto(ES,R1,4)
N6 = Estratto(ES,R1,5)
'
ReDim MatriceCaselleDaEvid(5,1)
MatriceCaselleDaEvid(1,0) = R1
MatriceCaselleDaEvid(1,1) = 1
MatriceCaselleDaEvid(2,0) = R1
MatriceCaselleDaEvid(2,1) = 2
MatriceCaselleDaEvid(3,0) = R1
MatriceCaselleDaEvid(3,1) = 3
MatriceCaselleDaEvid(4,0) = R1
MatriceCaselleDaEvid(4,1) = 4
MatriceCaselleDaEvid(5,0) = R1
MatriceCaselleDaEvid(5,1) = 5
Call DisegnaEstrazione(ES,MatriceCaselleDaEvid)
'
'
T1 = Array(T1," "," "," "," "," ")
'-------------------------------
'---------------------------------
'-------------------------------
T1 = Array(T1," y "," + a "," - b "," = ","c")
larghezze = Array(T1,4,4,4,4,4,4)
Call InitTabella(T1,Bianco_,"center",larghezze,Nero_,"raavi")
Call SetColoreCella(1,RGB(83,213,86),RGB(0,0,0))
Call SetColoreCella(2,RGB(234,232,134),RGB(0,0,0))
Call SetColoreCella(3,RGB(234,232,134),RGB(0,0,0))
Call SetColoreCella(4,RGB(83,213,86),RGB(0,0,0))
Call SetColoreCella(5,RGB(249,198,104),RGB(0,0,0))
'-------------------------------
X = Fuori90(C + B - A)
'---------------------------------
T2 = Array(T2," y = " & X," "," "," "," ")
larghezze = Array(T2,4,4,4,4,4,4)
Call AddRigaTabella(T2,Bianco_,"center",larghezze,Nero_,"raavi")
Call SetColoreCella(1,RGB(255,255,255),RGB(0,0,0))
Call SetColoreCella(2,RGB(255,255,255),RGB(0,0,0))
Call SetColoreCella(3,RGB(255,255,255),RGB(0,0,0))
Call SetColoreCella(4,RGB(255,255,255),RGB(0,0,0))
Call SetColoreCella(5,RGB(255,255,255),RGB(0,0,0))
'--------------------------------
'
X = Fuori90(C + B - A)
'
T3 = Array(T3,X & " "," + " & A," - " & B," = ",C)
larghezze = Array(T3,4,4,4,4,4,4)
Call AddRigaTabella(T3,Bianco_,"center",larghezze,Nero_,"raavi")
Call SetColoreCella(1,RGB(83,213,86),RGB(0,0,0))
Call SetColoreCella(2,RGB(234,232,134),RGB(0,0,0))
Call SetColoreCella(3,RGB(234,232,134),RGB(0,0,0))
Call SetColoreCella(4,RGB(83,213,86),RGB(0,0,0))
Call SetColoreCella(5,RGB(249,198,104),RGB(0,0,0))
'--------------------------------
'
Call SetTableWidth("20%")
CreaTabella
'
'------------------------------
ruota(1) = R1
'-----------------------------
ruote(1) = R1
ruote(2) = 11
ruote(3) = 12
'----------------------------
If p1 = 1 And p2 = 2 And p3 = 3 Then
ambata1(1) = X
ambo1(1) = X
ambo1(2) = Fuori90(N5 + N6)
ambo2(1) = X
ambo2(2) = Abs(N5 - N6)
Else
'
If p1 = 2 And p2 = 3 And p3 = 4 Then
ambata1(1) = X
ambo1(1) = X
ambo1(2) = Fuori90(N1 + N6)
ambo2(1) = X
ambo2(2) = Abs(N1 - N6)
Else
'
If p1 = 3 And p2 = 4 And p3 = 5 Then
ambata1(1) = X
ambo1(1) = X
ambo1(2) = Fuori90(N1 + N2)
ambo2(1) = X
ambo2(2) = Abs(N1 - N2)
End If
End If
End If
'
ImpostaGiocata 1,ambata1,ruota,posta,K
Gioca ES,1,,1
Scrivi
Scrivi String(55,".")
Scrivi
ImpostaGiocata 1,ambo1,ruote,poste,K
ImpostaGiocata 2,ambo2,ruote,poste,K
Gioca ES,1,,1
Scrivi
Next
Next
Next
End Sub

ecco lo script