Novità

metodo per ambate e ambo

Zetrix ha scritto:
Vedi l'allegato 2305983
A = 85 .........(numero massimo)
B = 30 ........(numero medio) ....32+28=60:2=30
C = 16 ... ......(numero minimo)
equazione: (A + B) - Y = C

soluzione:
Y = ?
...............
risposta:

Y = 99

a BA e uscito il 9 a colpo
e uscito anche il 54
9+45=54 (diam)

wow


x bonalele ,
non ci ai fatto caso di questa equazione su ba,
su queste equazioni dobbiamo concentrarci che sono le migliori..
Clicca per espandere...
Buongiorno Zetrix
Ottimo ci ragioniamo
 
buongiorno buonalele,

ok ti metto lo script,


Option Explicit
Sub Main
Dim A,B,C,D,E,X,S,Y,N
Dim A1,B1,C1
A1 = InputBox("1numero",0)
B1 = InputBox("2numero",0)
C1 = InputBox("3numero",0)
'
For A = A1 To A1
For B = B1 To B1
For C = C1 To C1
'
X =(A + B - C)
Y = Fuori90(A + B - C)
'
Scrivi("" & "A" & " = " & A & ""),1,1,5,1,8
Scrivi("" & "B" & " = " & B & ""),1,1,5,1,8
Scrivi("" & "C" & " = " & C & ""),1,1,5,1,8
Scrivi("equazione:"),1,1,5,3,8
Scrivi("" & "(A + B) - Y = C" & " " & "" & ""),1,1,5,1,8
'
Scrivi
Scrivi("soluzione:"),1,1,5,3,8
Scrivi
Scrivi("(" & A & "+" & B & ") -" & X & " = " & C & ""),1,1,5,1,8
Scrivi("risposta:"),1,1,5,3,8
Scrivi
Scrivi("" & "Y" & " = " &(Y) & ""),1,1,5,1,8
Scrivi
Next
Next
Next
End Sub

ho fatto una modifica allo script, ricopia lo script..
1) il numero massimo ..sui cinque estratti
2) il numero medio
3) il numero minimo
x adesso ho scritto solo questo script
si devono scrivere i numeri in input box
vedi nell'ultima estr se trovi una combinazione buona..
 
Ultima modifica:
Zetrix ha scritto:
buongiorno buonalele,

ok ti metto lo script,


Option Explicit
Sub Main
Dim A,B,C,D,E,X,S,Y,N
Dim A1,B1,C1
A1 = InputBox("1numero",0)
B1 = InputBox("2numero",0)
C1 = InputBox("3numero",0)
'
For A = A1 To A1
For B = B1 To B1
For C = C1 To C1
'
X = (A + B - C)
Y = Fuori90(A + B - C)
'
Scrivi("" & "A" & " = " & A & ""),1,1,5,1,8
Scrivi("" & "B" & " = " & B & ""),1,1,5,1,8
Scrivi("" & "C" & " = " & C & ""),1,1,5,1,8
Scrivi("" & "(A + B) - Y = C" & " " & "" & ""),1,1,5,1,8
'
Scrivi
Scrivi("soluzione:"),1,1,5,3,8
Scrivi
Scrivi("(" & A & "+" & B & ") -" & X & " = " & C & ""),1,1,5,1,8
Scrivi("risposta:"),1,1,5,3,8
Scrivi
Scrivi("" & "Y" & " = " &(Y) & ""),1,1,5,1,8
Scrivi
Next
Next
Next
End Sub
Clicca per espandere...
Per medio intendi il medio dei 5 estratti?
 
no, il numero medio deve essere tra i tre numeri esclusi
togliendo il numero massimo e il numero minimo..

Codice: 
Estrazione del  21.08.2025

Bari        41 55 23 09 54
Cagliari    52 26 51 34 47
Firenze     23 78 17 35 86
Genova      82 15 07 44 70
Milano      19 86 22 77 73
Napoli      39 48 82 70 15
Palermo     05 25 88 54 87
Roma        54 19 24 62 09
Torino      29 83 49 59 74
Venezia     65 01 45 72 55
Nazionale   10 60 88 55 37
es, a ba, abbiamo il 55 (max) e 9 (min)
medio = 23 41 54
quale sarà il medio tra questi tre numeri ..
(23+41)=64 : 2= 32 <---
(41+54)=95 : 2=47.5
(23+54)=77 : 2 =38.5

55+9=64 : 2=32 <----

ci sono due ambi con le somme uguali
si deve fare lo script per velocizzare i calcoli..

Codice: 
A = 55
B = 54
C = 9
equazione:
(A + B) - Y = C

soluzione:

(55+54) -100 = 9
risposta:

Y = 10

proviamo questa equazione a ba 10 ambata
forse ho una condizione a cruciverba con il 10 a ba
 
Ultima modifica:
Zetrix ha scritto:
buongiorno buonalele,

ok ti metto lo script,


Option Explicit
Sub Main
Dim A,B,C,D,E,X,S,Y,N
Dim A1,B1,C1
A1 = InputBox("1numero",0)
B1 = InputBox("2numero",0)
C1 = InputBox("3numero",0)
'
For A = A1 To A1
For B = B1 To B1
For C = C1 To C1
'
X =(A + B - C)
Y = Fuori90(A + B - C)
'
Scrivi("" & "A" & " = " & A & ""),1,1,5,1,8
Scrivi("" & "B" & " = " & B & ""),1,1,5,1,8
Scrivi("" & "C" & " = " & C & ""),1,1,5,1,8
Scrivi("equazione:"),1,1,5,3,8
Scrivi("" & "(A + B) - Y = C" & " " & "" & ""),1,1,5,1,8
'
Scrivi
Scrivi("soluzione:"),1,1,5,3,8
Scrivi
Scrivi("(" & A & "+" & B & ") -" & X & " = " & C & ""),1,1,5,1,8
Scrivi("risposta:"),1,1,5,3,8
Scrivi
Scrivi("" & "Y" & " = " &(Y) & ""),1,1,5,1,8
Scrivi
Next
Next
Next
End Sub

ho fatto una modifica allo script, ricopia lo script..
1) il numero massimo ..sui cinque estratti
2) il numero medio
3) il numero minimo
x adesso ho scritto solo questo script
si devono scrivere i numeri in input box
vedi nell'ultima estr se trovi una combinazione buona..
Clicca per espandere...
Non puoi fare in inputbox tutti e 5 gli estratti e calcolare con lo script il massimo medio minimo e calcolare la Y? Grazie
 
Zetrix ha scritto:
no, il numero medio deve essere tra i tre numeri esclusi
togliendo il numero massimo e il numero minimo..

Codice: 
Estrazione del  21.08.2025

Bari        41 55 23 09 54
Cagliari    52 26 51 34 47
Firenze     23 78 17 35 86
Genova      82 15 07 44 70
Milano      19 86 22 77 73
Napoli      39 48 82 70 15
Palermo     05 25 88 54 87
Roma        54 19 24 62 09
Torino      29 83 49 59 74
Venezia     65 01 45 72 55
Nazionale   10 60 88 55 37
es, a ba, abbiamo il 55 (max) e 9 (min)
medio = 23 41 54
quale sarà il medio tra questi tre numeri ..
(23+41)=64 : 2= 32 <---
(41+54)=95 : 2=47.5
(23+54)=77 : 2 =38.5

55+9=64 : 2=32 <----

ci sono due ambi con le somme uguali
si deve fare lo script per velocizzare i calcoli..

Codice: 
A = 55
B = 54
C = 9
equazione:
(A + B) - Y = C

soluzione:

(55+54) -100 = 9
risposta:

Y = 10

proviamo questa equazione a ba 10 ambata
forse ho una condizione a cruciverba con il 10 a ba
Clicca per espandere...
1755853695910.png

questo intendevi?
 
11728.png

11729.PNG

questa e la condizione a cruciverba con il 10 a ba
di queste condizioni con il 10 lo script ne trova diverse sulle estr..
adesso non so se questo ambo 10 35 farà a ba
il gioco vale su tutte
 
11732.png

11733.PNG

[NZ] [10 .. 88 .. ..] C.7 Ambo 02588 [133 - 21/08/2025] [10.60.88.55.37]

questo ambo e uscito sulla nazionale
certe volte questi ambi finiscono sulla nazionale..boh
 
11734.png
Ba_________35__55_________
Pa_________05__25_________
Ve_________65__85_________

35+55=90
05+85=90
25+65=90

vogliamo provare questa condizione a ba
questa e una mia tecnica..
ce solo questa condizione di gioco..

x ba 10 35 85 21 42

bonalele che ne dici di questa cinquina :)
magari farà questa cinquina a ba
ma spesso i sogni si realizzano al cinema
li paghi il biglietto e ti fanno sognare
qua al lotto giochi i numeri e non ti fanno vincere.. ahahah
comunque la cinquina si puo sempre tentare giocando poco..

x ba 10 35 / 35 85 / 21 42/ ambi /
 
Ultima modifica:
x bonalele se trovi una combinazione buona sulla equazione che ho scritto
scrivela quanto posso dopo vediamo se la condizione e buona..
fare lo script non e semplice
 
Ultima modifica:
sto vedendo che equazione ai scritto, sarebbe meglio che scrivi la formula della equazione con le lettere
negli script le equazioni lo scritte con le relative formule..

A = 15
B = 7
C = 82
A x Y + B = C

ai usato questa equazione
15x5=75+7=82

.............................................
Genova
82
15
07
44
70
.............................................
A = 7 --- min
B = ?
C = 82 ....max
............................................
gli altri numeri danno i risultati errati , non si puo fare questa equazione..
deve dare un numero intero senza i decimali..
..........................................
l'altra equazione che ai fatto va bene ma il 15 non e il numero minimo,
vediamo che succede a genova..
la (b) doveva essere il 44 il medio tra il 15 e 70 = 15+70=85:2=42.5
se fai questa equazione ti da la Y con i decimali

Y = 5.42 ( decimali)

allora fai una prova gioca il 5 estratto e 5-42 a genova,sempre per ambo e ambetto,
se no la lm ti imbroglia e non ti fa vincere niente..
a volte e meglio accontentarsi dell'ambetto se no vincere l'ambo su ruota e difficile..
se poi vuoi tentare solo il 5 come estratto gioca sempre come estratto determinato..
se non ai lo script per l'estratto determinato ti metto lo script..

5 RIT. 36
 
Ultima modifica:
Sub Main
Dim ARRDATA(5,6)
Dim ES,R,X,K,P,N,S
Dim ANUM(1),ANUMERO(1),RPOS,RIGA
X = InputBox("QUALE NUMERO VUOI ?",,0)
For ES = EstrazioneFin To EstrazioneFin
AvanzamentoElab EstrazioneFin,EstrazioneFin,ES
R = ScegliRuota
For P = 1 To 5
ReDim APOS(5)
APOS(P) = True
RPOS = EstrattoRitardo(R,X,,,,,APOS)
ReDim Preserve POS(P)
POS(P) = RPOS
RIGA = RIGA & FormattaStringa(RPOS,"0") & " . "
Next
ARRDATA(1,1) = " POS 1 "
ARRDATA(2,1) = " POS 2 "
ARRDATA(3,1) = " POS 3 "
ARRDATA(4,1) = " POS 4 "
ARRDATA(5,1) = " POS 5 "
ARRDATA(1,2) = POS(1)
ARRDATA(2,3) = POS(2)
ARRDATA(3,4) = POS(3)
ARRDATA(4,5) = POS(4)
ARRDATA(5,6) = POS(5)
'
ANUMERO(1) = EstrattoRitardo(R,X)
For K = 1 To 1
Call Scrivi("Grafico" & K)
Call Grafico(ARRDATA,2,DataEstrazione(ES) & Space(5) & SiglaRuota(R) & Space(5) & "(" &(X) & ")" & Space(5) & "RIT." & Space(5) & RIGA,"titX","titY",True)
Next
RIGA = ""
Next
For N = 1 To 90
S = S + 1
Scrivi " " &(S) & Space(5) & " RIT. " & EstrattoRitardo(R,N) & "",0,1,1,5
Next
End Sub

questo e lo script per l'estratto determinato
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 21 agosto 2025
    Bari
    41
    55
    23
    09
    54
    Cagliari
    52
    26
    51
    34
    47
    Firenze
    23
    78
    17
    35
    86
    Genova
    82
    15
    07
    44
    70
    Milano
    19
    86
    22
    77
    73
    Napoli
    39
    48
    82
    70
    15
    Palermo
    05
    25
    88
    54
    87
    Roma
    54
    19
    24
    62
    09
    Torino
    29
    83
    49
    59
    74
    Venezia
    65
    01
    45
    72
    55
    Nazionale
    10
    60
    88
    55
    37
    Estrazione Simbolotto
    Nazionale
    20
    24
    28
    33
    01
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto