通达信〖ATR动态风控〗基于ATR真实波幅主图指标公式源码

N:=14;
M:=2;
K:=2;
{计算ATR真实波动幅度}
TR1:=MAX(MAX((HIGH-LOW),Abs(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR_VAL:=MA(TR1,N);
{计算买入价、止盈价、止损价}
BUY_PRICE:=REF(CLOSE,1); {以昨日收盘价作为基准参考}
STOP_LOSS:=BUY_PRICE - ATR_VAL * K;
TAKE_PROFIT:=BUY_PRICE + ATR_VAL * K * M;
{绘制动态风控线}
止损线:STOP_LOSS,COLORGREEN,LINETHICK2;
止盈线:TAKE_PROFIT,COLORRED,LINETHICK2;
基准价:BUY_PRICE,COLORWHITE,DOTLINE;
{k线变色提示，直观显示当前所处位置}
STICKLINE(CLOSE>TAKE_PROFIT,HIGH,LOW,0,1),COLORRED;
STICKLINE(CLOSE>TAKE_PROFIT,OPEN,CLOSE,3,1),COLORRED;
STICKLINE(CLOSE<STOP_LOSS,HIGH,LOW,0,1),COLORGREEN;
STICKLINE(CLOSE<STOP_LOSS,OPEN,CLOSE,3,0),COLORGREEN;
{信号文字提示}
DRAWTEXT(crOSS(CLOSE,TAKE_PROFIT),HIGH*1.02,'止盈'),COLORRED;
DRAWTEXT(CROSS(STOP_LOSS,CLOSE),LOW*0.98,'止损'),COLORGREEN;