Visto, lungo la strada ho incontrato giovani e ferventi menti che si sono unite al nostro progetto secretissimo di conquista totale dei mercati con il piccolo attrezzo dell'isola di Java.ma siccome è un piano secreto ancora non cielo dico a loro
Ciao Black Swan.
Allora, ho provato a buttar giu' un esempio ma non sono sicuro se e' questo che volevi ...
Prendo un grafico, nell'esempio il dax indice, tf 1-minuto, 15809 barre. Voglio plottare la distribuzione delle frequenze dell'rsi.
Prima limitazione: plottero' la distrubuzione nelle ultime 101 barre del grafico, le frequenze quindi le calcolo "solo" per le prime 15708 barre. Probabilmente si puo' calcolare anche per le ultime usando proprio quel codice di traslazione di cui si parlava stamattina ma adesso non ho voglia di complicare le cose.
Nell'ultima finestra c'e' l'indicatore (chiamiamolo cosi')
return barindex
che mi conta le barre.
Per calcolare le frequenze avevo pensato ad un semplice for ... next e invece mi da errore di ciclo infinito, ormai sta diventando la mia bestia nera sto errore
Prendo allora una strada piu' lunga. Definisco un indicatore di supporto che chiamo rsi freq
Contiene la variabile intera n>=0Codice:if round(RSI[14](close)) = n then ind = ind+1 endif return ind
Fatto questo ecco il codice della distribuzione delle frequenze
Contiene la variabile numbarre, a cui bisogna assegnare il valore 15809, cioe' l'ultimo valore di barindex (per quello ce l'avevo plottato sul grafico).Codice:if barindex < numbarre - 100 then ind = undefined else ind = CALL "rsi freq"[numbarre - barindex] endif return ind
Attenzione che ci mette un po' per fare i calcoli, sembra quasi piantarsi ma poi ce la fa.
Ora cancello il grafico del prezzo e del barindex ed ecco il risultato
Sotto ho anche aggiunto un contatore che mi indica i valori da 0 a 100.
solita variabile numbarre.Codice:if barindex < numbarre - 100 then ind = undefined else ind = -numbarre + barindex +100 endif return ind
Cosi' se voglio sapere qual e' la frequenza di un certo valore, ci vado sopra col mirino ed e' fatta.
Fammi sapere se era questo che volevi, altrimenti ne riparliamo con calma.
Ciao Grandeeee
felice di rileggerti......ti trovo invecchiato a giudacare dal tuo avatare
Sei ripassato a vedere come si sviluppa il "tuo" 3d
Visto, lungo la strada ho incontrato giovani e ferventi menti che si sono unite al nostro progetto secretissimo di conquista totale dei mercati con il piccolo attrezzo dell'isola di Java.
P.S. mentre io perdevo tempo a scrivere stupidate Meurs ha risolto il tuo probl...grande
Consideratemi arruolato
ho un problema curioso, non so se a qualcuno sia capitato qualcosa di simile.
Nel backtest ho un codice che legge una condizione, se vera legge una seconda condizione che se vera scatena una vendita e azzera un flag.
Poi ho una terza condizione, se vera legge la seconda condizione che e vera scatena un acquisto ed azzera il flag di cui prima.
Quindi un qualcosa del genere
cond1 = close > dclose(1)
if Cond1 thenCond2 = funzione( CCI[parametro], MA(CCI) ) (ritorna -1,0,1)endifif Cond2= 1 then
sell eccendif
flag = 0
cond3 = close < dclose(1)
if (Cond3 and flag <> 0) thenCond2 = funzione( CCI[parametro], MA(CCI) ) (ritorna -1,0,1)endif
if Cond2= -1 thenbuy eccendif
flag = 0
e poi tutti il resto
Ora se per farla più pulita sta cosa la scrivo come
Cond2 = funzione( CCI[parametro], MA(CCI) ) (ritorna -1,0,1)
cond1 = close > dclose(1)
if Cond1 thenif Cond2= 1 thenendifsell eccendif
flag = 0
cond3 = close < dclose(1)
if Cond3 and flag <> 0 thenif Cond2 = -1 thenendifbuy eccendif
flag = 0
il risultato del backtest cambia, cosa che non dovrebbe essere.
Adesso mi direte che scrivo codice orripilante: eh si, però il punto non è questo, almeno penso
C
visual basic??
se si, mi sta succedendo la stessa cosa col zigzag (codice originale by tetsuo)
in pratica, VB non' considera chiuso' l'if dove ho messo lo smile
e quindi non procede correttamente
inoltre, se metti la cond2 all'interno di un IF, potrebbe creare definizioni strane
IMHO, la versione corretta è la seconda
cmq, per questi casi, in VB io mi aiuto nel debuggin 'stampando' sul foglio excel il valore delle variabili ad ogni ciclo
ciao
)
): nei 2 codici la differenza che salta agli occhi e' che, se close = dclose(1), nel primo codice la cond2 non viene definita (e PRT gli da quindi un valore di default? 0? 1? Non so), mentre nel secondo codice cond2 risulta sempre essere definita.
