MT4指标ATRStops 移植到金字塔交易系统
By
tim2025
at 2020-09-12 • 0人收藏 • 1321人看过
MT4指标ATRStops 移植到金字塔交易系统
VARIABLE: CHANNELPERIOD=9,RISK=0.30,SIGNAL=1,LINE=1,NBARS=1000; VARIABLE:UPTRENDBUFFER=-2,DOWNTRENDBUFFER=-2; IF BARPOS<CHANNELPERIOD THEN EXIT; SMAX:=HHV(H,CHANNELPERIOD); SMIN:=LLV(L,CHANNELPERIOD); BSMAX:=SMAX-(SMAX-SMIN)*RISK; BSMIN:=SMIN+(SMAX-SMIN)*RISK; CSMAX:=REF(BSMAX,1); CSMIN:=REF(BSMIN,1); IF (C>CSMAX) THEN TREND0:=1; IF (C<CSMIN) THEN TREND0:=-1; IF (TREND0>0 && BSMIN<CSMIN)THEN BSMIN:=CSMIN; IF (TREND0<0 && BSMAX>CSMAX)THEN BSMAX:=CSMAX; LUTB:=REF(UPTRENDBUFFER,1); LDTB:=REF(DOWNTRENDBUFFER,1); IF (TREND0>0) THEN BEGIN IF (SIGNAL>0 && LUTB=-1.0) THEN BEGIN UPTRENDSIGNAL:=BSMIN; IF (LINE>0) THEN BEGIN UPTRENDLINE:=BSMIN; UPTRENDLINE,COLORRED; END END ELSE BEGIN UPTRENDBUFFER:=BSMIN; IF (LINE>0) THEN BEGIN UPTRENDLINE:=BSMIN; UPTRENDLINE,COLORRED; END UPTRENDSIGNAL:=-1; END IF (SIGNAL=2) THEN UPTRENDBUFFER:=0; DOWNTRENDBUFFER:=-1.0; DOWNTRENDLINE:=9999; END IF (TREND0<0) THEN BEGIN IF (SIGNAL>0 && LDTB=-1.0) THEN BEGIN DOWNTRENDSIGNAL:=BSMAX; IF (LINE>0) THEN BEGIN DOWNTRENDLINE:=BSMAX; DOWNTRENDLINE,COLORCYAN; END END ELSE BEGIN DOWNTRENDBUFFER:=BSMAX; IF (LINE>0)THEN DOWNTRENDLINE:=BSMAX; DOWNTRENDSIGNAL:=-1; END IF (SIGNAL=2)THEN DOWNTRENDBUFFER:=0; UPTRENDBUFFER:=-1.0; UPTRENDLINE:=999; END
登录后方可回帖