lunes, 19 de junio de 2017
martes, 13 de junio de 2017
Rino..ti metto report ts col take profit fisso al 2%...non migliora molto...aumentano le operazioni e la% di entrata ed uscita è più reattiva
normalmente il take profit si adatta meglio ad un titolo più statico tipo eni...fiat quando parte in una delle due direzioni " cavalca " di più e l'opzione di money management del tp gli spezza le gambe
normalmente il take profit si adatta meglio ad un titolo più statico tipo eni...fiat quando parte in una delle due direzioni " cavalca " di più e l'opzione di money management del tp gli spezza le gambe
lunes, 12 de junio de 2017
//__________________________________________Tecnica 50% due uscite________________________// __
Var: newday(false), mioopen(0), miomin(0), miomax(0), mioclose(0),dvsup,dvmed,dvinf;
Var: wmax,wmin,wmed,DMAX,DMIN,rrange,vp1;
Var: Pr_Ingr(0), Max_Gain(0), Max_Gain_perc(0), actual(0),qtaincaricomax;
qtaInCaricoMax=1000;
newday=GetValues(days,1,mioopen,miomin,miomax,mioclose);
dvsup= miomin+(261.8*(miomax-miomin))/100;
dvmed= miomin+(50*(miomax-miomin))/100;
dvinf= miomax-(261.8*(miomax-miomin))/100;
if isfirstbarday then
WMAX=H;
WMIN=L;
else
WMAX=iif(H>=WMAX[1],H,WMAX[1]);
WMIN=iif(L<=WMIN[1],L,WMIN[1]);
WMED=wmax-(wmax-wmin)*0.5;
endif;
rrange=(((highd(1)-lowd(1))/lowd(1))*100);
PlotChart(WMED,0, gray, dot, 1);
DrawText(NEWOGG,0 , D,wmed , "50% intraday",wmed , red, 12, 2+2,Alright);
DrawText(NEWOGG,0 , D,dvmed , "50% ieri",dvmed , white, 14, 3+2,Alleft);
/////////////////////////////////// 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 , red, 25, 1+4,Alright);
///////////////////////////////////////////////////////////////////////////////////////////////////
if positiondir<>1 and c<dvsup and c>highd(1) and GetNumOpEnterLongToday=0 then Buy(this, nextbar, atopen,1000 );endif;
if positiondir=1 and actual>1 and Abs(positionqta) = Abs(qtaInCaricoMax) then sell(this, nextbar, atopen,500);endif;
if positiondir=1 and c<dvmed then sell(this, nextbar, atopen,Allqta);endif;
if positiondir<>-1 and c>dvinf and c<lowd(1) and GetNumOpEntershortToday=0 then Sell(this, nextbar, atopen,1000 ) ;endif;
if positiondir=-1 and actual>1 and Abs(positionqta) = Abs(qtaInCaricoMax) then buy (this, nextbar, atopen,500);endif;
if positiondir=-1 and c>dvmed then buy (this, nextbar, atopen,Allqta);endif;
if positiondir=1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
if positiondir=-1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
plotchart(dvsup,0,green,dot,1);
plotchart(dvmed,0,blue,solid,1);
plotchart(dvinf,0,red,dot,1);
vp1 = Createviewport(150);
Plotchart(rrange,vp1,red,solid,1);
DrawText(NEWOGG,vp1, D,rrange, "range % di ieri",rrange , red, 12, 2+3,Alright);
Var: newday(false), mioopen(0), miomin(0), miomax(0), mioclose(0),dvsup,dvmed,dvinf;
Var: wmax,wmin,wmed,DMAX,DMIN,rrange,vp1;
Var: Pr_Ingr(0), Max_Gain(0), Max_Gain_perc(0), actual(0),qtaincaricomax;
qtaInCaricoMax=1000;
newday=GetValues(days,1,mioopen,miomin,miomax,mioclose);
dvsup= miomin+(261.8*(miomax-miomin))/100;
dvmed= miomin+(50*(miomax-miomin))/100;
dvinf= miomax-(261.8*(miomax-miomin))/100;
if isfirstbarday then
WMAX=H;
WMIN=L;
else
WMAX=iif(H>=WMAX[1],H,WMAX[1]);
WMIN=iif(L<=WMIN[1],L,WMIN[1]);
WMED=wmax-(wmax-wmin)*0.5;
endif;
rrange=(((highd(1)-lowd(1))/lowd(1))*100);
PlotChart(WMED,0, gray, dot, 1);
DrawText(NEWOGG,0 , D,wmed , "50% intraday",wmed , red, 12, 2+2,Alright);
DrawText(NEWOGG,0 , D,dvmed , "50% ieri",dvmed , white, 14, 3+2,Alleft);
/////////////////////////////////// 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 , red, 25, 1+4,Alright);
///////////////////////////////////////////////////////////////////////////////////////////////////
if positiondir<>1 and c<dvsup and c>highd(1) and GetNumOpEnterLongToday=0 then Buy(this, nextbar, atopen,1000 );endif;
if positiondir=1 and actual>1 and Abs(positionqta) = Abs(qtaInCaricoMax) then sell(this, nextbar, atopen,500);endif;
if positiondir=1 and c<dvmed then sell(this, nextbar, atopen,Allqta);endif;
if positiondir<>-1 and c>dvinf and c<lowd(1) and GetNumOpEntershortToday=0 then Sell(this, nextbar, atopen,1000 ) ;endif;
if positiondir=-1 and actual>1 and Abs(positionqta) = Abs(qtaInCaricoMax) then buy (this, nextbar, atopen,500);endif;
if positiondir=-1 and c>dvmed then buy (this, nextbar, atopen,Allqta);endif;
if positiondir=1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
if positiondir=-1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
plotchart(dvsup,0,green,dot,1);
plotchart(dvmed,0,blue,solid,1);
plotchart(dvinf,0,red,dot,1);
vp1 = Createviewport(150);
Plotchart(rrange,vp1,red,solid,1);
DrawText(NEWOGG,vp1, D,rrange, "range % di ieri",rrange , red, 12, 2+3,Alright);
viernes, 9 de junio de 2017
una ulteriore opzione di money management è quella ..al ts 50%...una volta usciti con la metà del capitale adeguare lo stop loss per la rimanente esposizione
if positiondir=1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
if positiondir=-1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
if positiondir=1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
if positiondir=-1 and Abs(positionqta) <> Abs(qtaInCaricoMax) then ModifyStopLoss(INPERC,1.00);endif;
Suscribirse a:
Entradas (Atom)
oggi scadenze tecniche..le ultime di settembre risolte a 13.60€ vediamo alle 1200
-
un caro collega mi fa presente che l'impulsiva down del 17 settembre potrebbe essere differente come valori da quelli postati sulla can...
-
ora è presente sul giornaliero un impulso ribassista...quello del 17 settembre..supportato da un aumento volumetrico di circa 7 volte la me...
-
ho deciso di utilizzare la statistica dello sviluppo giornaliero tarato sul range medio mensile per determinare la tendenza del titolo...so...