Novità

Ambata Ciclometrica

  • Creatore Discussione Creatore Discussione Roby
  • Data di inizio Data di inizio
Stato
Chiusa ad ulteriori risposte.
Cos'è? nessuno di voi possiede Spaziometria
basta inserire

a=22
b=DiametraleD (a)
scrivi a " Il diametrale in decina è ---> "& b
 
quote:Originally posted by esselotto

Cos'è? nessuno di voi possiede Spaziometria
basta inserire

a=22
b=DiametraleD (a)
scrivi a " Il diametrale in decina è ---> "& b
Clicca per espandere...


mi correggo

a=22
b=DiametraleD (a)
scrivi a &" Il diametrale in decina è ---> "& b


avevo dimenticato la &

esselotto
 
Bravo esselotto, un bel metodo ciclometrico.
Volevo proporti, visto che io non ho dimestichezza ad inserire i listati
in spaziometria perché non ne sono capace
Potresti inserirlo te già completo sul
programma del beneamato Luigi così lo scarico di nuovo per
la ricerca delle future previsioni?
Grazie anticipate
 
quote:Originally posted by miki55

Bravo esselotto, un bel metodo ciclometrico.
Volevo proporti, visto che io non ho dimestichezza ad inserire i listati
in spaziometria perché non ne sono capace
Potresti inserirlo te già completo sul
programma del beneamato Luigi così lo scarico di nuovo per
la ricerca delle future previsioni?
Grazie anticipate
Clicca per espandere...

Ciao miki55 Preleva lo script di questa seleziona da
Sub main()
tutto fino a
End Sub

copia Apri il Spaziometria, vai su gestione script
cancella quello che c'è. E incolla il mio script
dopo salva con nome in una cartella a tua scelta. Questo è tutto

Comunque come hai letto non l'ho potuto testare su Spaziometria
mi dava un errore di Diametrale in decina non corrett.

Dato che ci sei controlla anche la tua copia.
e fammi sapere.
 
dimenticavo prova con questo script sulla tua copia


Sub Main()
a=22
b=DiametraleD (a)
scrivi a " Il diametrale in decina è ---> "& b
End Sub

e dammi il risultato
 
Ciao.
Preciso che non so nulla di script, però ho fatto copia incolla
e non mi ha dato nessun errore.
Ma la ricerca la effettua fino al 6 luglio, quella da te dimostrata
FI/PA...22, non la elabora devo fare qualcosa (sicuramente)
scusa per la mia domanda ma la mia è pura ignoranza in merito.
Grazie per un'eventuale risposta.
Ciao.
 
quote:Originally posted by joi_lotto

Ciao.
Preciso che non so nulla di script, però ho fatto copia incolla
e non mi ha dato nessun errore.
Ma la ricerca la effettua fino al 6 luglio, quella da te dimostrata
FI/PA...22, non la elabora devo fare qualcosa (sicuramente)
scusa per la mia domanda ma la mia è pura ignoranza in merito.
Grazie per un'eventuale risposta.
Ciao.
Clicca per espandere...

Firenze Palermo lo elabora. Ma ti da un'ambata diversa, anche a me la stessa cosa. Io comunque lo testato su l8 e va bene.

Allora anche la tua copia e ko.
Scriverò post a luigiB
mi sa che è da rifare il download di un'altra versione.
 
'Metodo AMBATA CICLOMETRICO DIST.38 di esselotto
' programmato da esselotto
'ricerca due ambi uniti isotopi di stessa
'distanza ciclometrica 38

Sub main()
Dim ruote(1)
Dim rt(3),pt(5),ptt(5),pte(5)
Dim nu(2),na(6),na1(6),na2(6),na3(6),ns1(6),ns2(6),ns3(6),ns4(6),ns5(6)
pt(1)=1 : ptt(2)=1 : pte(3)=1 ' pt e la posta giocata per ambata ptt e quella dell' ambo pte del terno
ruote(1)=11
clp=13
co=0
ini=EstrazioneFin -8000
fin=EstrazioneFin
For es=ini To fin

For r=1 To 9
rt(1)=r
For p=1 To 4
pp =p+1
a=Estratto (es,r,p)
b=Estratto (es,r,pp)
di1=Distanza (a,b)
If di1=38 Then
For rr=r+ 1 To 10
rt(2)=rr
c=Estratto (es,rr,p)
d=Estratto (es,rr,pp)
di2=Distanza (c,d)
If di2=di1 Then ' se sono uguali
' calcolo il pronostico
'
' array per diametrali in decina

DIADEC = Array(0,6,7,8,9,10,1,2,3,4,5,16,17,18,19,20,11,12,13,14,15,26,27,28,29,30,21,22,23,24,25,36,37,38,39,40,
31,32, 33, 34, 35, 46, 47, 48, 49, 50, 41,42,43,44,45,56, 57, 58, 59, 60,51,52,53,54,55, 66, 67, 68,
69, 70, 61, 62, 63, 64, 65, 76, 77, 78, 79, 80, 71, 72, 73, 74, 75, 86, 87, 88, 89, 90, 81, 82, 83, 84, 85)


so1=Fuori90(a+b+c+d):
am=Fuori90(so1+di1)
am=Diametrale (am):
am=DIADEC(am) 'richiamo array

co=co+1
Scrivi "Previsione Nr "& co &"................................................"
Scrivi DataEstrazione (es)&" "& SiglaRuota (r)&" "& StringaEstratti (es,r)&" ["& a &"_"& b &"] "
Scrivi DataEstrazione (es)&" "& SiglaRuota (rr)&" "& StringaEstratti (es,rr)&" ["& c &"_"& d &"] "

nu(1)=am
ImpostaGiocata 1,nu,rt,pt,clp,1 'ambata


'--------------------------------------------------------------------------------
Gioca es
End If
Next
End If
Next
Next
Next

ScriviResoconto
Scrivi "°°°esselotto°°°"
End Sub
 
PIMA CHE QUALCUNO ME LO CHIEDA O PER INESPERTI NEGLI SCRIPT. DATO LA LARGHEZZA DI
QUESTA PAGINA non mi permette di inserire su una riga.
LA STRINGA "DIADEC=array(ec......) E STATA DIVISA. QUANDO INCOLLATE SUL GESTORE DI SCRIPT
DI SPAZIOMETRIA O ALTRO.

TUTTI I NUMERI DI DIADEC=array (0,6,7 ecc .) SI DEVONO TROVARE SU UNA RIGA.

portatevi su 40, dopo la virgola tasto CANC e la riga sottostante si porta su.
uguale per 68,

IMPORTANTE ATTENZIONE A non cancellare le virgole. Ogni numero e compreso tra virgole
la fine della riga deve risultare con ,85) parentesi tonda chiusa.

SPERO DI ESSERE STATO CHIARO NON CI DOVREBBERO ESSERE PROBLEMI. SE SI POTETE SCRIVERMI



°°°esselotto°°°
 
quote:Originally posted by esselotto

PIMA CHE QUALCUNO ME LO CHIEDA O PER INESPERTI NEGLI SCRIPT. DATO LA LARGHEZZA DI
QUESTA PAGINA non mi permette di inserire su una riga.
LA STRINGA "DIADEC=array(ec......) E STATA DIVISA. QUANDO INCOLLATE SUL GESTORE DI SCRIPT
DI SPAZIOMETRIA O ALTRO.

TUTTI I NUMERI DI DIADEC=array (0,6,7 ecc .) SI DEVONO TROVARE SU UNA RIGA.

portatevi su 40, dopo la virgola tasto CANC e la riga sottostante si porta su.
uguale per 68,

IMPORTANTE ATTENZIONE A non cancellare le virgole. Ogni numero e compreso tra virgole
la fine della riga deve risultare con ,85) parentesi tonda chiusa.

SPERO DI ESSERE STATO CHIARO NON CI DOVREBBERO ESSERE PROBLEMI. SE SI POTETE SCRIVERMI



°°°esselotto°°°
Clicca per espandere...

Ciao esselotto.
Per risolvere il problema, puoi inserire trattino basso spazio dopo la virgola:
Codice: 
DIADEC = Array(0,6,7,8,9,10,1,2,3,4,5,16,17,18,19,20,11,12,13,14,15,26,27,28,29,30,21,22,23,24,25,36,37,38,39,40,_ 
31,32, 33, 34, 35, 46, 47, 48, 49, 50, 41,42,43,44,45,56, 57, 58, 59, 60,51,52,53,54,55, 66, 67, 68,_ 
69, 70, 61, 62, 63, 64, 65, 76, 77, 78, 79, 80, 71, 72, 73, 74, 75, 86, 87, 88, 89, 90, 81, 82, 83, 84, 85)
Confermo l'errore nel calcolo del diametrale in decina.
ciauz
:)

Fortuna non omnibus aeque.
 
quote:Originally posted by Thauk

quote:Originally posted by esselotto

PIMA CHE QUALCUNO ME LO CHIEDA O PER INESPERTI NEGLI SCRIPT. DATO LA LARGHEZZA DI
QUESTA PAGINA non mi permette di inserire su una riga.
LA STRINGA "DIADEC=array(ec......) E STATA DIVISA. QUANDO INCOLLATE SUL GESTORE DI SCRIPT
DI SPAZIOMETRIA O ALTRO.

TUTTI I NUMERI DI DIADEC=array (0,6,7 ecc .) SI DEVONO TROVARE SU UNA RIGA.

portatevi su 40, dopo la virgola tasto CANC e la riga sottostante si porta su.
uguale per 68,

IMPORTANTE ATTENZIONE A non cancellare le virgole. Ogni numero e compreso tra virgole
la fine della riga deve risultare con ,85) parentesi tonda chiusa.

SPERO DI ESSERE STATO CHIARO NON CI DOVREBBERO ESSERE PROBLEMI. SE SI POTETE SCRIVERMI



°°°esselotto°°°
Clicca per espandere...

Ciao esselotto.
Per risolvere il problema, puoi inserire trattino basso spazio dopo la virgola:
Codice: 
DIADEC = Array(0,6,7,8,9,10,1,2,3,4,5,16,17,18,19,20,11,12,13,14,15,26,27,28,29,30,21,22,23,24,25,36,37,38,39,40,_ 
31,32, 33, 34, 35, 46, 47, 48, 49, 50, 41,42,43,44,45,56, 57, 58, 59, 60,51,52,53,54,55, 66, 67, 68,_ 
69, 70, 61, 62, 63, 64, 65, 76, 77, 78, 79, 80, 71, 72, 73, 74, 75, 86, 87, 88, 89, 90, 81, 82, 83, 84, 85)
Confermo l'errore nel calcolo del diametrale in decina.
ciauz
:)

Fortuna non omnibus aeque.
Clicca per espandere...

TI RINGRAZIO Thauk non ci avevo pensato. Vedo con piacere, che c'è chi capisce di programmazione.
 
Riposto Script cosi nessuno può sbagliare.
e riduco ricerca fatta dal 1800
ini=EstrazioneFin -8000
cambio a
ini=EstrazioneFin -1000

'SCrIPT FINALE.
'Metodo AMBATA CICLOMETRICO DIST.38 di esselotto
' programmato da esselotto
'ricerca due ambi uniti isotopi di stessa
'distanza ciclometrica 38

Sub main()
Dim ruote(1)
Dim rt(3),pt(5),ptt(5),pte(5)
Dim nu(2),na(6),na1(6),na2(6),na3(6),ns1(6),ns2(6),ns3(6),ns4(6),ns5(6)
pt(1)=1 : ptt(2)=1 : pte(3)=1 ' pt e la posta giocata per ambata ptt e quella dell' ambo pte del terno
ruote(1)=11
clp=13
co=0
ini=EstrazioneFin -1000
fin=EstrazioneFin
For es=ini To fin

For r=1 To 9
rt(1)=r
For p=1 To 4
pp =p+1
a=Estratto (es,r,p)
b=Estratto (es,r,pp)
di1=Distanza (a,b)
If di1=38 Then
For rr=r+ 1 To 10
rt(2)=rr
c=Estratto (es,rr,p)
d=Estratto (es,rr,pp)
di2=Distanza (c,d)
If di2=di1 Then ' se sono uguali
' calcolo il pronostico
'
' array per diametrali in decina

DIADEC = Array(0,6,7,8,9,10,1,2,3,4,5,16,17,18,19,20,11,12,13,14,15,26,27,28,29,30,21,22,23,24,25,36,37,38,39,40, _
31,32, 33, 34, 35, 46, 47, 48, 49, 50, 41,42,43,44,45,56, 57, 58, 59, 60,51,52,53,54,55, 66, 67, 68, _
69, 70, 61, 62, 63, 64, 65, 76, 77, 78, 79, 80, 71, 72, 73, 74, 75, 86, 87, 88, 89, 90, 81, 82, 83, 84, 85)


so1=Fuori90(a+b+c+d):
am=Fuori90(so1+di1)
am=Diametrale (am):
am=DIADEC(am) 'richiamo array

co=co+1
Scrivi "Previsione Nr "& co &"................................................"
Scrivi DataEstrazione (es)&" "& SiglaRuota (r)&" "& StringaEstratti (es,r)&" ["& a &"_"& b &"] "
Scrivi DataEstrazione (es)&" "& SiglaRuota (rr)&" "& StringaEstratti (es,rr)&" ["& c &"_"& d &"] "

nu(1)=am
ImpostaGiocata 1,nu,rt,pt,clp,1 'ambata


'--------------------------------------------------------------------------------
Gioca es
End If
Next
End If
Next
Next
Next

ScriviResoconto
Scrivi "°°°esselotto°°°"
End Sub
 
visto joi_lotto

se non sbaglio 7° colpo




Le grandezze fisiche che caratterizzano un moto oscillatorio
sono l'ampiezza e la frequenza.

°°°esselotto°°°
 
Amici ottimo metodo cerco di mantenerlo in 1° pagina fino al prossimo
caso giocabile.
Statisticamente 1 caso al mese + o -

NUOVA previsione anche per ambo, posto su questa TOPIC NON NE AGGIUNGO DI NUOVE


La forza F è inversamente proporzionale al quadrato della distanza R
Legge di Coulomb
distanza doppia forza=1/4 distanza tripla forza 1/9
°°°esselotto°°°
 
Nuova Previsione per Ambata ciclometrica

26.08.2010 Ge 20.89.35.43.81 [43_81]
26.08.2010 Mi 62.29.01.76.24 [76_24]

GENOVA MILANO
AMBATA 32
per Ambo 32.19.38.24.03

il tutto per 9 concorsi.


Giocare con moderazione. Al lotto la certezza matematica non esiste.
 
migliori ABBINAMENTI per ambo CON IL 32 38 e 3 ma non ne do certezza.

Attenuazione. Un'impulso in un mezzo elastico non si propaga all'infinito ma soltanto fino a
che l'energia iniziale non si sia completamente trasformata in energia termica.
°°°esselotto°°°
 
OCCHIO ALLA PREVISIONE NEI PRIMI CINQUE CONCORSI
VOLEVO SOLO RICORDARVELO.

GIOCARE CON MODERAZIONE per chi gioca ovviamente

Le grandezze fisiche che caratterizzano un moto oscillatorio
sono l'ampiezza e la frequenza.
°°°esselotto°°°
 
Stato
Chiusa ad ulteriori risposte.

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 04 marzo 2025
    Bari
    30
    81
    09
    31
    72
    Cagliari
    62
    03
    14
    90
    09
    Firenze
    36
    08
    74
    16
    78
    Genova
    79
    28
    75
    36
    46
    Milano
    13
    11
    27
    88
    80
    Napoli
    09
    23
    57
    31
    30
    Palermo
    79
    07
    20
    09
    52
    Roma
    67
    62
    37
    71
    34
    Torino
    10
    54
    07
    50
    05
    Venezia
    06
    87
    53
    89
    32
    Nazionale
    57
    54
    79
    44
    40
    Estrazione Simbolotto
    Firenze
    38
    26
    20
    45
    10
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto