Programmazione Visual Trader trasformare ts metastock x visual trader (1 Viewer)

[tenden]

salve,dovrei adattare questo ts di metastock x visual trader,ki mi aiuta a trasformare la sintassi in modo ke possa leggerlo anke in vt?grazie,ecco la formula:

pds:=Input("EMA periods",1,2520,21)/2;
spread:=Input("Upper/Lower EMA bands shift %",
-900,900,2)/200;
X:=Input("Shift Verticale %",-100,100,0);
pk:=C<Ref(C,-1) AND Ref(C,-1)>Ref(C,-2);
pkVal:=ValueWhen(1,pk,Ref(C,-1));
tr:=C>Ref(C,-1) AND Ref(C,-1)<Ref(C,-2);
trVal:=ValueWhen(1,tr,Ref(C,-1));

pkpds:=If(pds>Cum(pk),Cum(pk),pds);
pkpds:=If(pkpds<1,1,pkpds);
pkEma:=pkVal*2/(pkpds+1)+PREV*(1-2/(pkpds+1));
pkEma:=pkEma*(1+spread);

trpds:=If(pds>Cum(tr),Cum(tr),pds);
trpds:=If(trpds<1,1,trpds);
trEma:=trVal*2/(trpds+1)+PREV*(1-2/(trpds+1));
trEma:=trEma*(1-spread);

Ema:=(pkEma+trEma)/2;
EmaX:= Ema+(X*Ema/100);
EmaX;

 

[Il Piadinaro]

Ciao Tenden non sono in grado di aiutarti ma se mandi una mail a quelli di traderlink ti danno la soluzione in giornata.
Hai un track record di questo ts?
A presto

 

[tenden]

HO provato a mandare una e-mail a traderlink,ma nn ho avuto risposta,magari se la inviasse anke qualcun'altro forse la prenderebbero più in considerazione,riguardo al track record non lo ho,cmq è un ts ke mette una bella media sul grafico ke fà da spartiacque,ci vuole uno ke conosce sia il linguaggio di metastock ke di vt,cosi' da trasformare la sintassi facilmente,magari se uno è pratico potrebbe risolverlo velocemente.

 

[ale73a]

HO provato a mandare una e-mail a traderlink,ma nn ho avuto risposta,magari se la inviasse anke qualcun'altro forse la prenderebbero più in considerazione,riguardo al track record non lo ho,cmq è un ts ke mette una bella media sul grafico ke fà da spartiacque,ci vuole uno ke conosce sia il linguaggio di metastock ke di vt,cosi' da trasformare la sintassi facilmente,magari se uno è pratico potrebbe risolverlo velocemente.

ciao tenden, a me ricorda un ts "picchi e valli" basato su medie mobili adattate ai picchi recenti e viceversa, che avevo riesumato da un vecchio post...aspetta che ci guardo se lo trovo (io ne ero riuscito a tradurre più della metà su vt)
trovato...non è lo stesso cmq...AZZ INVECE Sì!!!
pds:=Input("EMA periods",1,2520,7)/2;
spread:=Input("Up/Low EMA bands shift %",
-900,900,2)/200;

pk:=C<Ref(C,-1) AND Ref(C,-1)>Ref(C,-2);
pkVal:=ValueWhen(1,pk,Ref(C,-1));
tr:=C>Ref(C,-1) AND Ref(C,-1)<Ref(C,-2);
trVal:=ValueWhen(1,tr,Ref(C,-1));

pkpds:=If(pds>Cum(pk),Cum(pk),pds);
pkpds:=If(pkpds<1,1,pkpds);
pkEma:=pkVal*2/(pkpds+1)+PREV*(1-2/(pkpds+1));
pkEma:=pkEma*(1+spread);

trpds:=If(pds>Cum(tr),Cum(tr),pds);
trpds:=If(trpds<1,1,trpds);
trEma:=trVal*2/(trpds+1)+PREV*(1-2/(trpds+1));
trEma:=trEma*(1-spread);

Ema:=(pkEma+trEma)/2;
Ema;

 

[tenden]

ma alla fine lo sei riuscito a tradurre?cosi' vediamo se và anke su vt

 

[tenden]

up

 

[tetsuo]

Ciao tenden
So che sono un po' OT, ma incuriosito dal listato me lo sono tradotto per ProRealTime.

Sono sincero alla curiosità non è seguita l'emozione, magari più in là provo a ragionarci meglio per compredere la logica di questa media.
Per il momento alcuni passaggi del codice non mi sono tanto chiari......

///creare le variabili: varpds(21), varspread(2), X(0)///
////////////////////////////////////////////////////
///////////////// EmaX ///////////////////////////
///////////////////////////////////////////////////


pds=varpds/2
spread=varspread/200

pk=close<close[1] and close[1]>close[2]
if pk then
pkval=close[1]
pksum=pksum+1
endif
tri=close>close[1] and close[1]<close[2]
if tri then
trval=close[1]
trsum=trsum+1
endif


if pds>pksum then
pkpds=pksum
else
pkpds=pds
endif

if pkpds<1 then
pkpds=1
endif

pkema=pkval*2/(pkpds+1)+pkema*(1-2/(pkpds+1))
pkema=pkema*(1+spread)



if pds>trsum then
trpds=trsum
else
trpds=pds
endif

if trpds<1 then
trpds=1
endif
trema=trval*2/(trpds+1)+trema*(1-2/(trpds+1))
trema=trema*(1-spread)


ema=(pkema+trema)/2
emaX=ema+(x*ema/100)

return emax

////////////////////////FINE////////////////////////////


Siccome per voi che avete VT, se ho ben capito, ogni indicatore è un TS, ho provato a verificare l'efficienza dell'indicatore con un backtest (5 anni daily) molto semplice, senza né filtri né Stoploss, che si basa sul crossover del prezzo sull'EmaX

I risultati su FIAT sono questi:

Ciao