x Rino...ts gruppo movimento direzionale...frame 15 minuti


//_________________Gruppo Movimento Direzionale__________________________//


Var: pdx40,ndx40;
Var: prezzoincrocioup,prezzoincrociodown,prox01,prox02;
Var: Pr_Ingr(0), Max_Gain(0), Max_Gain_perc(0), actual(0); ///_____Actual=Gain
Var: indzona1,indzona2,indzona3;

pdx40=DMPDX(C,40);
ndx40=DMNDX(C,40);

if pdx40>ndx40 and pdx40[1]<ndx40[1] then prezzoincrocioup=c;endif;
if ndx40>pdx40 and ndx40[1]<pdx40[1] then prezzoincrociodown=c;endif;

prox01=addperc(prezzoincrocioup,3);
prox02=addperc(prezzoincrociodown,-3);

/////////////////////////////////// ACTUAL /////////////////////////////////////////////////////
if Positionvalue<>0 then Pr_Ingr = positionValue;
   if Positiondir=1 then if (C>Max_Gain) or (Max_Gain=0) then  Max_Gain = C;
Max_Gain_perc = ((Max_Gain-Pr_ingr)*100)/Pr_Ingr;endif;
         Actual = ((C-Pr_ingr)*100)/Pr_Ingr;
   else
     if (C<Max_Gain) or (Max_Gain=0) then Max_Gain = C;
Max_Gain_perc = ((Pr_ingr-Max_Gain)*100)/Pr_Ingr;endif;
         Actual = ((Pr_ingr-C)*100)/Pr_Ingr;endif;
else  Pr_ingr = 0;Max_Gain = 0; Actual = 0;endif;
////////////////////////////////////////////////////////////////////////////////////////////////////
installstoploss(inperc,3.00,"SL", STARTNEXTBAR);
plotchartNoZero(getstoploss, 0, red, solid, 2);
DrawText(NEWOGG,0 , D,getstoploss , "sl",getstoploss , black, 25, 1+4,Alright);
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if c>prox01 and pdx40>ndx40  then enterlong(nextbar,atopen);endif;
if positiondir=1 and ndx40>pdx40 and c<prox01 then exitlong(nextbar,atopen);endif;

if c<prox02 and ndx40>pdx40  then entershort(nextbar,atopen);endif;
if positiondir=-1 and pdx40>ndx40 and c>prox02 then exitshort(nextbar,atopen);endif;

if positiondir=1  and max_gain_perc>3  then ModifyStopLoss(INPERC,-0.5);endif;
if positiondir=-1  and max_gain_perc>3  then ModifyStopLoss(INPERC,-0.5);endif;


Indzona1=CreateViewport(350,0,true);
PlotChart(pdx40,Indzona1,green,solid,2);
PlotChart(ndx40,Indzona1,red,solid,2);

Indzona2=CreateViewport(250,0,true);
PlotChart(prezzoincrocioup,Indzona2,green,solid,2);
PlotChart(prox01,Indzona2,green,solid,1);
PlotChart(c,Indzona2,blue,solid,2);

Indzona3=CreateViewport(250,0,true);
PlotChart(prezzoincrociodown,Indzona3,red,solid,2);
PlotChart(prox02,Indzona3,red,solid,1);
PlotChart(c,Indzona3,blue,solid,2);