Spaziometria Empirica
- Creatore Discussione BaffoBlù
- Data di inizio
lotto_tom75
Advanced Premium Member
ciao, non dipende dal fatto che lo script di Cinzia non mostra i casi in gioco, ma dal fatto che la ruota che hai analizzato non li ha in corso... Prova genova per verificare quanto ho detto.
x gli altri: sto provando ad implementare la verifica del relativo gu(11) che per sua dimensione di classe non è gestibile con impostagiocata che supporta solo fino a 10 elementi per array ma con verificaesito e verificaesitoturbo si. Coming soon
. Per adesso, grazie al super script di Cinzia, sembrerebbe che il relativo gu11 derivante dalla fenomenale tecnica spaziometrica del grandissimo Baffo sia micidiale per ambo in relativamente pochi colpi da tempo immemore... 😮 (anche si trattasse di aumentare la % + per A su + colpi rispetto i 18 attualmente impostati questo potrebbe non essere un problema in quanto potrebbe bastare implementare la giusta funzione per colpi rimanenti in modo da poterli gestire qualunque sia la loro effettiva ampiezza di teorica caduta). Inoltre va da sè che un gu di classe 11 sarebbe il top di riduzione per ipotetico A costante su unica ruota in pochi colpi per quanto riguarda il gruppo base di partenza per qualunque altro tipo di sviluppo vi si possa voler applicare... 👋
Ultima modifica:
toon
Advanced Member
A me risulta la 3664..🤔
in fondo allo script io ho in "Gioca es" --> Gioca es ,1
Ultima modifica:
Grazie, già fatto, ed inevitabilmente il sistema è in forte perdita.
Si dovrebbe calcolare il ritardo di sortita e se si può recuperare l'esposto con una progressione
Ultima modifica:
Facciamo un po di chiarezza e correzioni ( suggerito da DjNomade e da Mira ) sullo script.
PS: Non capisco perchè non vengano usati tutti i parametri che Luigi ha inserito nelle varie funzioni
Controllare se ci sono altre correzioni da fare
PS: Non capisco perchè non vengano usati tutti i parametri che Luigi ha inserito nelle varie funzioni
Codice:
'BaffoBlù - Spaziometria empirica - analisi statistica
'Script Cinzia
Sub Main()
Dim Ini
Dim n1(2),n2(2),n3(2),n4(2),n5(2),n6(2),n7(2),n8(2),n9(2),n10(2)
Dim n11(2),n12(2),n13(2),n14(2),n15(2),n16(2),n17(2),n18(2),n19(2),n20(2)
Dim n21(2),n22(2),n23(2),n24(2),n25(2),ru(1),ps(2)
ps(2) = 1
r = 10 ' cambiare valore x ruota Ba=1 ecc.
Ini = 1
If r = 12 Then Ini = 7440
ru(1) = r
co = 0
For es = Ini To EstrazioneFin - 8
If Estratto(es,r,1) > 0 Then
aa = Estratto(es,r,3)
aa1 = Estratto(es + 4,r,3)
a = Estratto(es + 8,r,1)
b = Estratto(es + 8,r,5)
If b = aa1 Then
co = co + 1
Scrivi String(60,"=") & " caso " & co
Scrivi FormatSpace(es,5,1) & " " & SiglaRuota(r) & " ",0,0
For p = 1 To 5
x = Estratto(es,r,p)
If p = 3 Then
Scrivi Format2(x) & " ",1,0,,2
Else
Scrivi Format2(x) & " ",0,0
End If
Next
Scrivi
For ex = es + 1 To es + 3
Scrivi FormatSpace(ex,5,1) & " " & SiglaRuota(r) & " ",0,0
For pp = 1 To 5
'xa = Estratto(ex,r,pp)
Scrivi Format2(Estratto(ex,r,pp)) & " ",0,0
Next
Scrivi
Next
Scrivi FormatSpace(es + 4,5,1) & " " & SiglaRuota(r) & " ",0,0
For p1 = 1 To 5
x1 = Estratto(es + 4,r,p1)
If p1 = 3 Then ColoreTesto 2:Scrivi Format2(x1) & " ",1,0 Else ColoreTesto 0:Scrivi Format2(x1) & " ",0,0
ColoreTesto 0
Next
Scrivi
For exx = es + 5 To es + 7
Scrivi FormatSpace(exx,5,1) & " " & SiglaRuota(r) & " ",0,0
For pp1 = 1 To 5
xaa = Estratto(exx,r,pp1)
Scrivi Format2(xaa) & " ",0,0
Next
Scrivi
Next
Scrivi FormatSpace(es + 8,5,1) & " " & SiglaRuota(r) & " ",0,0
ColoreTesto 2:Scrivi Format2(Estratto(es + 8,r,1)) & " ",1,0
For p2 = 2 To 4
x2 = Estratto(es + 8,r,p2)
ColoreTesto 0
Scrivi Format2(x2) & " ",0,0
Next
ColoreTesto 2:Scrivi Format2(Estratto(es + 8,r,5))
'******************
bx = b
dbx = Fuori90(bx + 30)
dbx1 = Fuori90(bx + 60)
ax = a
dax = Fuori90(ax + 30)
dax1 = Fuori90(ax + 60)
aax = aa
daax = Fuori90(aax + 30)
daax1 = Fuori90(aax + 60)
vaa = Vert(aa)
vb = Vert(b)
'******************
'=========================================================================================
ColoreTesto 0
Scrivi
Scrivi bx & " " & dbx & " " & dbx1 & " " & ax & " " & dax & " " & dax1 & " " & aax & " " & daax & " " & daax1 & " " & vaa & " " & vb
'Scrivi
Scrivi bx & "." & dax & " " & bx & "." & dax1 & " " & bx & "." & aax & " " & bx & "." & daax & " " & bx & "." & daax1 & " " & bx & "." & vaa & " " & bx & "." & dbx & " " & bx & "." & dbx1
' Scrivi
Scrivi ax & "." & dax & " " & ax & "." & dax1 & " " & ax & "." & aax & " " & ax & "." & daax & " " & ax & "." & daax1 & " " & ax & "." & vaa & " " & ax & "." & dbx & " " & ax & "." & dbx1 & " " & ax & "." & vb & " " & ax & "." & bx
'Scrivi
Scrivi aax & "." & dax & " " & aax & "." & dax1 & " " & aax & "." & daax & " " & aax & "." & daax1 & " " & aax & "." & vaa & " " & aax & "." & dbx & " " & aax & "." & dbx1
'---------
n1(1) = bx : n1(2) = dax
n2(1) = bx : n2(2) = dax1
n3(1) = bx : n3(2) = aax
n4(1) = bx : n4(2) = daax
n5(1) = bx : n5(2) = daax1
n6(1) = bx : n6(2) = vaa
n7(1) = bx : n7(2) = dbx
n8(1) = bx : n8(2) = dbx1
n9(1) = ax : n9(2) = dax
n10(1) = ax : n10(2) = dax1
n11(1) = ax : n11(2) = aax
n12(1) = ax : n12(2) = daax
n13(1) = ax : n13(2) = daax1
n14(1) = ax : n14(2) = vaa
n15(1) = ax : n15(2) = dbx
n16(1) = ax : n16(2) = dbx1
n17(1) = ax : n17(2) = vb
n18(1) = ax : n18(2) = bx
n19(1) = aax : n19(2) = dax
n20(1) = aax : n20(2) = dax1
n21(1) = aax : n21(2) = daax
n22(1) = aax : n22(2) = daax1
n23(1) = aax : n23(2) = vaa
n24(1) = aax : n24(2) = dbx
n25(1) = aax : n25(2) = dbx1
ImpostaGiocata 1,n1,ru,ps,18,2,,1
ImpostaGiocata 2,n2,ru,ps,18,2,,1
ImpostaGiocata 3,n3,ru,ps,18,2,,1
ImpostaGiocata 4,n4,ru,ps,18,2,,1
ImpostaGiocata 5,n5,ru,ps,18,2,,1
ImpostaGiocata 6,n6,ru,ps,18,2,,1
ImpostaGiocata 7,n7,ru,ps,18,2,,1
ImpostaGiocata 8,n8,ru,ps,18,2,,1
ImpostaGiocata 9,n9,ru,ps,18,2,,1
ImpostaGiocata 10,n10,ru,ps,18,2,,1
ImpostaGiocata 11,n11,ru,ps,18,2,,1
ImpostaGiocata 12,n12,ru,ps,18,2,,1
ImpostaGiocata 13,n13,ru,ps,18,2,,1
ImpostaGiocata 14,n14,ru,ps,18,2,,1
ImpostaGiocata 15,n15,ru,ps,18,2,,1
ImpostaGiocata 16,n16,ru,ps,18,2,,1
ImpostaGiocata 17,n17,ru,ps,18,2,,1
ImpostaGiocata 18,n18,ru,ps,18,2,,1
ImpostaGiocata 19,n19,ru,ps,18,2,,1
ImpostaGiocata 20,n20,ru,ps,18,2,,1
ImpostaGiocata 21,n21,ru,ps,18,2,,1
ImpostaGiocata 22,n22,ru,ps,18,2,,1
ImpostaGiocata 23,n23,ru,ps,18,2,,1
ImpostaGiocata 24,n24,ru,ps,18,2,,1
ImpostaGiocata 25,n25,ru,ps,18,2,,1
Gioca es + 8,False,False,2,,True
End If
End If
Next
ScriviResoconto False,False
End Sublotto_tom75
Advanced Premium Member
non ho parole...
testando il gu11 xA in 18 colpi su GE dall'inizio...
cgu+ xA 78
cgu- xA 0
%+ gu xA 100
colpo massimo raggiunto da gu 8
se non ci sono errori...
testando il gu11 xA in 18 colpi su GE dall'inizio...
cgu+ xA 78
cgu- xA 0
%+ gu xA 100
colpo massimo raggiunto da gu 8
se non ci sono errori...
Ultima modifica:
OSSERVATORE LOTTO 1
Advanced Member >PLATINUM<
Semplice
In definitiva lo script pone in gioco dei numeri già sortiti, dei quali OVVIAMENTE si è a conoscenza, prima della loro uscita.
Da lì gli esiti strabilianti.
È questo che state dicendo?
esatto
giochi ambi che ti sono serviti per validare la previsione, in particolare quelli a base del triangolo.
Infatti, iniziando il gioco, così come deve essere, dall'estrazione successiva a quella della base del triangolo è una caporetto
giochi ambi che ti sono serviti per validare la previsione, in particolare quelli a base del triangolo.
Infatti, iniziando il gioco, così come deve essere, dall'estrazione successiva a quella della base del triangolo è una caporetto
Ultima modifica:
toon
Advanced Member
così si capisce meglio, guardando le date di uscita con quelle di ricerca :
Codice:
'BaffoBlù - Spaziometria empirica - analisi statistica
'Script Cinzia
Sub Main()
Dim n1(2),n2(10)
Dim ru(1),ps(2),pos(5)
ps(1) = 1
pos(2) = 1
pos(3) = 0.5
pos(4) = 0.5
x = CInt(InputBox(" Inserisci il numero ruota",,1))
r = x
ru(1) = r
For es = 6000 To EstrazioneFin - 04
If Estratto(es,r,1) > 0 Then
'---
aa = Estratto(es,r,3)
aa1 = Estratto(es + 4,r,3)
a = Estratto(es + 8,r,1)
b = Estratto(es + 8,r,5)
'---
If b = aa1 Then
ColoreTesto 1
Scrivi String(60,"-")
'---
Scrivi FormatSpace(es,5,1) & " " & SiglaRuota(r) & " ",0,0
For p = 1 To 5
x = Estratto(es,r,p)
If p = 3 Then ColoreTesto 2:Scrivi Format2(x) & " ",1,0 Else ColoreTesto 0:Scrivi Format2(x) & " ",0,0
ColoreTesto 0
Next
Scrivi
'---
For ex = es + 1 To es + 3
Scrivi FormatSpace(ex,5,1) & " " & SiglaRuota(r) & " ",0,0
For pp = 1 To 5
xa = Estratto(ex,r,pp)
Scrivi Format2(xa) & " ",0,0
Next
Scrivi
Next
'---
Scrivi FormatSpace(es + 4,5,1) & " " & SiglaRuota(r) & " ",0,0
For p1 = 1 To 5
x1 = Estratto(es + 4,r,p1)
If p1 = 3 Then ColoreTesto 2:Scrivi Format2(x1) & " ",1,0 Else ColoreTesto 0:Scrivi Format2(x1) & " ",0,0
ColoreTesto 0
Next
Scrivi
'---
For exx = es + 5 To es + 7
Scrivi FormatSpace(exx,5,1) & " " & SiglaRuota(r) & " ",0,0
For pp1 = 1 To 5
xaa = Estratto(exx,r,pp1)
Scrivi Format2(xaa) & " ",0,0
Next
Scrivi
Next
'---
Scrivi FormatSpace(es + 8,5,1) & " " & SiglaRuota(r) & " ",0,0
ColoreTesto 2:Scrivi Format2(Estratto(es + 8,r,1)) & " ",1,0
For p2 = 2 To 4
x2 = Estratto(es + 8,r,p2)
ColoreTesto 0
Scrivi Format2(x2) & " ",0,0
Next
ColoreTesto 2:Scrivi Format2(Estratto(es + 8,r,5))
'---
bx = b
dbx = Fuori90(bx + 30)
'---
ax = a
'---
aax = aa
'---
n2(1) = bx
n2(2) = dbx
n2(3) = ax
n2(4) = aax
EliminaRipetuti n2
ImpostaGiocata 2,n2,ru,pos,10,2
Gioca es,1
End If
End If
Next
ScriviResoconto
End Sublotto_tom75
Advanced Premium Member
non ho parole...
testando il gu11 xA in 18 colpi su GE dall'inizio...
cgu+ xA 78
cgu- xA 0
%+ gu xA 100
colpo massimo raggiunto da gu 8
se non ci sono errori...
Quindi gli errori c'erano...
Poco male... ho ripreso lo script "corretto" da claudio e l'ho implementato per la verifica del gu c11 derivante dal metodo spaziometrico di baffo:
Codice:
'BaffoBlù - Spaziometria empirica - analisi statistica
'Script Cinzia
Sub Main()
Dim Ini
Dim n1(2),n2(2),n3(2),n4(2),n5(2),n6(2),n7(2),n8(2),n9(2),n10(2)
Dim n11(2),n12(2),n13(2),n14(2),n15(2),n16(2),n17(2),n18(2),n19(2),n20(2)
Dim n21(2),n22(2),n23(2),n24(2),n25(2),ru(1),ps(2),n26(11)
Dim casipositivigu,casinegativigu,casiattualigu
casipositivigu = 0
casinegativigu = 0
casiattualigu = 0
Dim colpomassimoraggiuntodalgu
colpomassimoraggiuntodalgu = 0
Dim colpirimamentiminimirispettocolpomassimo
colpirimamentiminimirispettocolpomassimo = EstrazioneFin
ps(2) = 1
Dim colpidigioco
colpidigioco = 45
r = 4 ' cambiare valore x ruota Ba=1 ecc.
Ini = 1
If r = 12 Then Ini = 7440
ru(1) = r
co = 0
For es = Ini To EstrazioneFin - 8
If Estratto(es,r,1) > 0 Then
aa = Estratto(es,r,3)
aa1 = Estratto(es + 4,r,3)
a = Estratto(es + 8,r,1)
b = Estratto(es + 8,r,5)
If b = aa1 Then
co = co + 1
Scrivi String(60,"=") & " caso " & co
Scrivi FormatSpace(es,5,1) & " " & SiglaRuota(r) & " ",0,0
For p = 1 To 5
x = Estratto(es,r,p)
If p = 3 Then
Scrivi Format2(x) & " ",1,0,,2
Else
Scrivi Format2(x) & " ",0,0
End If
Next
Scrivi
For ex = es + 1 To es + 3
Scrivi FormatSpace(ex,5,1) & " " & SiglaRuota(r) & " ",0,0
For pp = 1 To 5
'xa = Estratto(ex,r,pp)
Scrivi Format2(Estratto(ex,r,pp)) & " ",0,0
Next
Scrivi
Next
Scrivi FormatSpace(es + 4,5,1) & " " & SiglaRuota(r) & " ",0,0
For p1 = 1 To 5
x1 = Estratto(es + 4,r,p1)
If p1 = 3 Then ColoreTesto 2:Scrivi Format2(x1) & " ",1,0 Else ColoreTesto 0:Scrivi Format2(x1) & " ",0,0
ColoreTesto 0
Next
Scrivi
For exx = es + 5 To es + 7
Scrivi FormatSpace(exx,5,1) & " " & SiglaRuota(r) & " ",0,0
For pp1 = 1 To 5
xaa = Estratto(exx,r,pp1)
Scrivi Format2(xaa) & " ",0,0
Next
Scrivi
Next
Scrivi FormatSpace(es + 8,5,1) & " " & SiglaRuota(r) & " ",0,0
ColoreTesto 2:Scrivi Format2(Estratto(es + 8,r,1)) & " ",1,0
For p2 = 2 To 4
x2 = Estratto(es + 8,r,p2)
ColoreTesto 0
Scrivi Format2(x2) & " ",0,0
Next
ColoreTesto 2:Scrivi Format2(Estratto(es + 8,r,5))
'******************
bx = b
dbx = Fuori90(bx + 30)
dbx1 = Fuori90(bx + 60)
ax = a
dax = Fuori90(ax + 30)
dax1 = Fuori90(ax + 60)
aax = aa
daax = Fuori90(aax + 30)
daax1 = Fuori90(aax + 60)
vaa = Vert(aa)
vb = Vert(b)
'******************
'=========================================================================================
ColoreTesto 0
Scrivi
Scrivi bx & " " & dbx & " " & dbx1 & " " & ax & " " & dax & " " & dax1 & " " & aax & " " & daax & " " & daax1 & " " & vaa & " " & vb
'Scrivi
Scrivi bx & "." & dax & " " & bx & "." & dax1 & " " & bx & "." & aax & " " & bx & "." & daax & " " & bx & "." & daax1 & " " & bx & "." & vaa & " " & bx & "." & dbx & " " & bx & "." & dbx1
' Scrivi
Scrivi ax & "." & dax & " " & ax & "." & dax1 & " " & ax & "." & aax & " " & ax & "." & daax & " " & ax & "." & daax1 & " " & ax & "." & vaa & " " & ax & "." & dbx & " " & ax & "." & dbx1 & " " & ax & "." & vb & " " & ax & "." & bx
'Scrivi
Scrivi aax & "." & dax & " " & aax & "." & dax1 & " " & aax & "." & daax & " " & aax & "." & daax1 & " " & aax & "." & vaa & " " & aax & "." & dbx & " " & aax & "." & dbx1
'---- gu boom
Scrivi
Scrivi "gu boom " & bx & "." & dbx & "." & dbx1 & "." & ax & "." & dax & "." & dax1 & "." & aax & "." & daax & "." & daax1 & "." & vaa & "." & vb
Scrivi
Dim strguboom
ReDim aguboom(11)
strguboom = bx & "." & dbx & "." & dbx1 & "." & ax & "." & dax & "." & dax1 & "." & aax & "." & daax & "." & daax1 & "." & vaa & "." & vb
Call SplitByChar(strguboom,".",aguboom)
Scrivi "verifica aguboom " & "|" & StringaNumeri(aguboom) & "|"
Scrivi
'---------
n1(1) = bx : n1(2) = dax
n2(1) = bx : n2(2) = dax1
n3(1) = bx : n3(2) = aax
n4(1) = bx : n4(2) = daax
n5(1) = bx : n5(2) = daax1
n6(1) = bx : n6(2) = vaa
n7(1) = bx : n7(2) = dbx
n8(1) = bx : n8(2) = dbx1
n9(1) = ax : n9(2) = dax
n10(1) = ax : n10(2) = dax1
n11(1) = ax : n11(2) = aax
n12(1) = ax : n12(2) = daax
n13(1) = ax : n13(2) = daax1
n14(1) = ax : n14(2) = vaa
n15(1) = ax : n15(2) = dbx
n16(1) = ax : n16(2) = dbx1
n17(1) = ax : n17(2) = vb
n18(1) = ax : n18(2) = bx
n19(1) = aax : n19(2) = dax
n20(1) = aax : n20(2) = dax1
n21(1) = aax : n21(2) = daax
n22(1) = aax : n22(2) = daax1
n23(1) = aax : n23(2) = vaa
n24(1) = aax : n24(2) = dbx
n25(1) = aax : n25(2) = dbx1
n26(1) = bx
n26(2) = dbx
n26(3) = dbx1
n26(4) = ax
n26(5) = dax
n26(6) = dax1
n26(7) = aax
n26(8) = daax
n26(9) = daax1
n26(10) = vaa
n26(11) = vb
ImpostaGiocata 1,n1,ru,ps,colpidigioco,2,,1
ImpostaGiocata 2,n2,ru,ps,colpidigioco,2,,1
ImpostaGiocata 3,n3,ru,ps,colpidigioco,2,,1
ImpostaGiocata 4,n4,ru,ps,colpidigioco,2,,1
ImpostaGiocata 5,n5,ru,ps,colpidigioco,2,,1
ImpostaGiocata 6,n6,ru,ps,colpidigioco,2,,1
ImpostaGiocata 7,n7,ru,ps,colpidigioco,2,,1
ImpostaGiocata 8,n8,ru,ps,colpidigioco,2,,1
ImpostaGiocata 9,n9,ru,ps,colpidigioco,2,,1
ImpostaGiocata 10,n10,ru,ps,colpidigioco,2,,1
ImpostaGiocata 11,n11,ru,ps,colpidigioco,2,,1
ImpostaGiocata 12,n12,ru,ps,colpidigioco,2,,1
ImpostaGiocata 13,n13,ru,ps,colpidigioco,2,,1
ImpostaGiocata 14,n14,ru,ps,colpidigioco,2,,1
ImpostaGiocata 15,n15,ru,ps,colpidigioco,2,,1
ImpostaGiocata 16,n16,ru,ps,colpidigioco,2,,1
ImpostaGiocata 17,n17,ru,ps,colpidigioco,2,,1
ImpostaGiocata 18,n18,ru,ps,colpidigioco,2,,1
ImpostaGiocata 19,n19,ru,ps,colpidigioco,2,,1
ImpostaGiocata 20,n20,ru,ps,colpidigioco,2,,1
ImpostaGiocata 21,n21,ru,ps,colpidigioco,2,,1
ImpostaGiocata 22,n22,ru,ps,colpidigioco,2,,1
ImpostaGiocata 23,n23,ru,ps,colpidigioco,2,,1
ImpostaGiocata 24,n24,ru,ps,colpidigioco,2,,1
ImpostaGiocata 25,n25,ru,ps,colpidigioco,2,,1
' Gioca es + 8,False,False,2,,True
Gioca es + 8,False,False,2,,True
' ImpostaGiocata 26,n26,ru,ps,18,2 << QUESTO DA ERRORE OUT OF RANGE PERCHE' IMPOSTA GIOCATA NON SUPPORTA VETTORI MAGGIORI DI 10 elementi!
' bisogna ovviare con la funzione verificaesito
Dim esito,alcolponumero,sonousciti,esdiuscita,colpidiverificagu
colpidiverificagu = 54
Call VerificaEsitoTurbo(n26,ru,es + 9,2,colpidiverificagu,,esito,alcolponumero,sonousciti,esdiuscita)
If esito <> "" Then
Scrivi "ok estratti " & sonousciti & " al colpo numero " & alcolponumero & " nell'estrazione n. " & esdiuscita,,,,vbBlue
casipositivigu = casipositivigu + 1
If alcolponumero > colpomassimoraggiuntodalgu Then
colpomassimoraggiuntodalgu = alcolponumero
End If
Else
Dim colpirimanentiteoricirispettocolpomassimo
colpirimanentiteoricirispettocolpomassimo = colpomassimoraggiuntodalgu -(EstrazioneFin - es)
If colpirimanentiteoricirispettocolpomassimo < 0 Then
Scrivi "no",,,,vbRed
casinegativigu = casinegativigu + 1
Else
If colpirimanentiteoricirispettocolpomassimo < colpirimamentiminimirispettocolpomassimo Then
'
colpirimamentiminimirispettocolpomassimo = colpirimanentiteoricirispettocolpomassimo
'
End If
'End If
casiattualigu = casiattualigu + 1
Scrivi "cagu " & casiattualigu
End If
End If
Messaggio "es " & es & "cgu+" & casipositivigu & " " & "cgu-" & casinegativigu
Call AvanzamentoElab(1,EstrazioneFin - 8,es)
End If
End If
Next
ScriviResoconto False,False
Scrivi
Scrivi "cgu+ xA " & casipositivigu
Scrivi "cgu- xA " & casinegativigu
Scrivi "cgua x A " & casiattualigu
Dim casitotali,percentualepositiva
casitotali = casipositivigu + casinegativigu + casiattualigu
percentualepositiva =(casipositivigu/casitotali)*100
Scrivi "%+ gu xA " & percentualepositiva
Scrivi "colpo massimo raggiunto da gu " & colpomassimoraggiuntodalgu
Scrivi "colpi rimanenti minimi rispetto colpo massimo x A nel gu11 " & colpirimamentiminimirispettocolpomassimo
Scrivi
End SubQuesto evidenzia, salvo errori, che allungando i colpi per lo stesso gu 11 si ottengono % di esiti + abbastanza elevate per A in classe base molto ristretta e pari a 11 con un colpo massimo teorico di 43. Ovviamente non si tratta di giocare una c11 per 43 colpi ma di trovare e o aspettare i colpi rimanenti <= 9 per iniziare ad attaccarla con eventuali nuovi sviluppi riduzionali. Nel complesso mi sembra molto interessante... e ringrazio ancora Baffo e Cinzia per aver condiviso la cosa. Inoltre anche da un punto di vista incmaxp la situazione risulterebbe "compressa" al punto giusto... il che lascerebbe supporre che nonostante magari l'output mostri come colpi teorici rimanenti per il caso studio digenova ben 26 estrazioni restanti queste possano in realtà essere molto meno...
questo l'output di sfaldamento con casi positivi (cgu+) casi negativi (cgu-) e casi attuali (cgua) relativi al gu c11 di studio per la ruota di GE.
Genova
cgu+ xA 76
cgu- xA 1
cgua x A 1
%+ gu xA 97.4358974358974
colpo massimo raggiunto da gu 43
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 26
questo l'output incmaxp relativo al gu c11 di studio per la ruota di GE.
01.31.75 r: GE p: 2.3.4.5 rap=rsp 963 num. inc 5 incmax att=sto 260 fqp 28 s 2.
01.10.45.73.75 r: GE p: 1.2.4 rap=rsp 469 num. inc 4 incmax att=sto 117 fqp 64 s 2.
01.15.31.37.73 r: GE p: 1.4.5 rap=rsp 596 num. inc 5 incmax att=sto 114 fqp 45 s 2.
10.13.37.43.61.73.75 r: GE p: 3.4 rap=rsp 530 num. inc 5 incmax att=sto 48 fqp 46 s 2.
Analizzando le altre ruote senza casi in corso... dal 1871 o da quando esistono...
Bari
cgu+ xA 101
cgu- xA 1
cgua x A 0
%+ gu xA 99.0196078431373
colpo massimo raggiunto da gu 36
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378 << ovviamente quando i cgua sono 0 i colpi rimanenti minimi sono uguali al numero massimo delle estrazioni presenti in archivio...
Cagliari
cgu+ xA 84
cgu- xA 1
cgua x A 0
%+ gu xA 98.8235294117647
colpo massimo raggiunto da gu 38
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Firenze
cgu+ xA 104
cgu- xA 0
cgua x A 0
%+ gu xA 100
colpo massimo raggiunto da gu 53
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Milano
cgu+ xA 112
cgu- xA 1
cgua x A 0
%+ gu xA 99.1150442477876
colpo massimo raggiunto da gu 52
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Napoli
cgu+ xA 112
cgu- xA 0
cgua x A 0
%+ gu xA 100
colpo massimo raggiunto da gu 43
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Palermo
cgu+ xA 115
cgu- xA 1
cgua x A 0
%+ gu xA 99.1379310344828
colpo massimo raggiunto da gu 38
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Roma
cgu+ xA 114
cgu- xA 1
cgua x A 0
%+ gu xA 99.1304347826087
colpo massimo raggiunto da gu 38
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Torino
cgu+ xA 117
cgu- xA 0
cgua x A 0
%+ gu xA 100
colpo massimo raggiunto da gu 43
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Venezia
cgu+ xA 108
cgu- xA 2
cgua x A 0
%+ gu xA 98.1818181818182
colpo massimo raggiunto da gu 52
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Nazionale
cgu+ xA 33
cgu- xA 0
cgua x A 0
%+ gu xA 100
colpo massimo raggiunto da gu 38
colpi rimanenti minimi rispetto colpo massimo x A nel gu11 10378
Nessuna Certezza Solo Poca Probabilità
👋
Ultima modifica:
BaffoBlù
Advanced Member >GOLD<
ovviamente...
Buonasera, mi domandavo, si riesce ad inserire un box per scegliere la ruota da verificare?
r = InputBox("Ruota",,5)
oppure
ScegliRuote(ruota)
Sto imparando ad usare gli script e penso che uno dei due si possa inserire, ma scelta la ruota poi nella ricerca non la cambia sicuramente mi sfugge qualcosa...
r = InputBox("Ruota",,5)
oppure
ScegliRuote(ruota)
Sto imparando ad usare gli script e penso che uno dei due si possa inserire, ma scelta la ruota poi nella ricerca non la cambia sicuramente mi sfugge qualcosa...
BaffoBlù
Advanced Member >GOLD<
01.75
01.15
01.73
01.13
01.43
01.37
01.31
01.61
(01.54)
45.75
45.15
45.73
45.13
45.43
45.37
45.31
45.61
45.10
45.01
(45.54)
73.75
73.15
73.13
73.43
73.37
73.31
73.61
(73.54)
(10.37)
(10.54)
(37.54)
la platea si allarga a 31 ambi se includiamo l'unico vertibile non preso in considerazione.
ma questo era solo l'input iniziale (cavolo, l'ho fatto mentre il barbiere mi tagliava i capelli...)
questi ambi non significano poi tanto per me. (è solo un abbozzo di metodo empirico)
(sono tanti, ma giocare 30 ambi ed avere la quasi certezza è un altra storia però...).
Come vedrete non ho grossi segreti se non lo studio con dedizione e serietà.
potevo fare tutto da me, (con molto più tempo, ma alla fine..), poi presentare una bomba di metodo che funzia dal 1871.
(come già capitato in passato con degli script miei...)
Potremmo costruirlo insieme (perché di questo si tratta, "costruzione", "confezionamento".) di un metodo efficace.
uno di quelli che un qualsiasi lottologo ti farebbe pagare....(mannaggia mo' stanno già a copià...e cercà....)
A me interessa trovare nel quadro estrazionale una condizione particolare, e poterle visionare tutte a piacere dal 1871 PERO' !!!
Poi come si faccia ad estrapolare un previsione efficace ci si può studiare sopra. (fino a trovarne una speciale sul serio!)
Abbiamo bisogno di un ampio spettro
(per esempio le statistiche di un paio d'anni di qualsiasi tipo non è che ti dicano molto in effetti...)
capito dove voglio arrivare?
La cosa se funziona, deve funzionare sempre, non a singhiozzo
(posso ammettere un paio di esiti negativi, ma se cominciano ad essere di più, io scarto e cerco altra via).
ma vi ricordate di quanto inserivo le previsioni ero l'unico che scriveva spavaldo "Si garantisce la vincita!"
..e uscivano...
ma lo facevo perché ero scemo o perché ero sicuro? voi che dite?
Quello che me lo permetteva è lo studio di cui sopra.
Sangue, occhi e lacrime buttati per avere una forte sicurezza di successo.
Guardate che io giocavo fortissimo d'azzardo e non mi potevo permettere cazzate nel modo più assoluto!
vi farò vedere altri modi empirici di trafficare con questa stessa condizione
(i metodi empirici ti permettono di sbizzarrirti con la fantasia, ma calcolata sennò non serve...)
lotto_tom75
Advanced Premium Member
Ciao, a livello di verifica di sfaldamento del vettore non dovrebbe influire...
Se poi il ripetersi degli elementi diminuisca o meno la valenza del metodo quello non saprei...
Ultima estrazione Lotto
-
Estrazione del lotto
giovedì 02 maggio 2024Bari4335837440Cagliari1023480187Firenze7112042701Genova8337427078Milano2872273007Napoli3442136711Palermo3777191712Roma7985905549Torino8356465719Venezia4148571215Nazionale8470106774Estrazione Simbolotto
Milano
2209040111
