gilato
Forumer attivo
il trys presentato è solo una prova.........è inutile dire.....
manca questo ....manca quello..........
ciò che volevo testare è la validità del motore del sistema........
provando qualcosa di nuovo ...ma anche di molto semplice ...
poi n'altra cosa.......ho sbagliato a menzionare la vola storica nel post iniziale.........non c'entra niente........infatti lo correggo...
adesso cerco di spiegare il sys .....con dei commenti tra le righe
se proprio dovete fare delle critiche........almeno fatelo nel merito....per l'algoritmo........e magari .....con suggerimenti costruttivi.....

manca questo ....manca quello..........
ciò che volevo testare è la validità del motore del sistema........
provando qualcosa di nuovo ...ma anche di molto semplice ...
poi n'altra cosa.......ho sbagliato a menzionare la vola storica nel post iniziale.........non c'entra niente........infatti lo correggo...
adesso cerco di spiegare il sys .....con dei commenti tra le righe
Codice:
Var:prevH,prevL ,prevC,prevR,zona;
var:pp,ap,vola,dir,forzavol,fattore,EL,ES;
[COLOR=Red][I]//calcolo i valori precedenti delle barre DAY del Max, Min, Close[/I][/COLOR]
prevH=ref(EOD.H,1);
prevL=ref(EOD.L,1);
prevC=ref(EOD.C,1);
[COLOR=Red]// calcolo del rapporto tra l'ampiezza delle oscillazioni (max e min) a 3 mesi (64) e l'ampiezza settimanale (5) sempre dei valori DAY sopracitati....il tutto moltiplicato x 3.......cioè una costante che può cambiare ovviamente....
[/COLOR]
fattore=op( op(op(HHV(prevH,64),LLV(prevL,64),divis),op(HHV(prevH,5),LLV(prevL,5),divis),divis),constval(3),mul);
[COLOR=Red]//valore odierno dell'open[/COLOR]
ap=EOD.O;
PP=prevC;
[COLOR=Red]//calcolo della volatilità con l'atr del close precedente[/COLOR]
vola=atr(prevC,5);
[COLOR=Red]// il supertrend viene usato come trailing stop[/COLOR]
dir=supertrend(c,10,4);
[COLOR=Red]//forzavol= rapporto tra la "vola" sopra calcolata e la sua media a 20 gg[/COLOR]
forzavol=op(vola,mov(vola,20,s),divis);
RoundTickMin(true);
[COLOR=Red]//EL ed ES rappresentano i valori soglia di ingresso long/short determinati sommando all'open della giornata il "fattore" moltiplicato per la "vola" sopra calcolata[/COLOR]
EL=ap+(fattore*vola);
ES=ap-(fattore*vola);
installtakeprofit(inperc,9);
installstoploss(inperc,1.5,"loss");
[COLOR=Red]//regole di ingresso long / short[/COLOR]
if positiondir <>1 and crossover(c,EL) and forzavol>0.9
then enterlong(bar,atclose);endif;
if positiondir=1 and c<dir then modifystoploss(inperc,1.5);endif;
if positiondir <>-1 and crossunder(c,ES) and forzavol>0.9
then entershort(bar,atclose); endif;
if positiondir=-1 and c>dir then modifystoploss(inperc,1.5);endif;
//zona=createviewport(200, true,true);
PlotChart( dir,0,gray,solid,2 );
PlotChart( EL,0,black,solid,1 );
PlotChart( ES,0,black,solid,1 );


Ultima modifica: