Trend Ribbons The Sure Shot Profit AFL |
//www.aflcode.com _SECTION_BEGIN(""); buycond= Close > Ref( HHV(H,10) , -1 ) ; sellcond = Close < Ref( LLV(L, 4), -1) ; shortcond= Close < Ref( LLV(L,10) , -1 ) ; covercond = Close >Ref( HHV(H, 4 ), -1) ; Buy=buycond; Sell=sellcond ; Short=shortcond; Cover=covercond ; titolo=Param("Grafico Titolo ?",1,0,1,1); tipografico=Param("Candele 64 o Barre 128 ?",64,64,128,64); Buyc=Flip(Buy,Sell); Sellc=Flip(Sell,Buy); Coverc=Flip(Cover,Short); Shortc=Flip(Short,Cover); color=IIf(Buyc ,colorGreen,IIf(Shortc,colorRed,colorWhite)); Plot( IIf(titolo,C,Null) ,"Doppia equity - C",Color,64); Plot( IIf(titolo AND (Buyc OR Shortc),C,Null) ,"",Color,64); eq=Param("equity",1,0,1,1); equi=IIf(eq==0,Null,Equity( )); Buy1=Flip(Buy,Sell); Sell1=Flip(Sell,Buy); Short1=Flip(Short,Cover); Cover1=Flip(Cover,Short); Plot( Equi,"equity",IIf(Buy1 ,colorSkyblue ,IIf(Short1,colorPink ,Null )), styleArea+styleLeftAxisScale); dr = Equi- Highest(Equi); Plot(dr, "Drawdown", colorDarkRed, styleArea+styleLeftAxisScale ); Maxdr=LLV(dr,500); Plot( Maxdr , "Max Drawdown", colorDarkRed, styleLine+styleLeftAxisScale ); _SECTION_END();
Sign up here with your email
ConversionConversion EmoticonEmoticon