角度K线计算上涨角度通达信公式 副图 源码附图

来函数检测结果如下：
该公式没有未来函数

HJ:=ATAN((HIGH-REF(HIGH,1))/REF(HIGH,1)/0.1)/6.28*360;

LJ:=ATAN((LOW-REF(LOW,1))/REF(LOW,1)/0.1)/6.28*360;

CJ:=ATAN((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)/0.1)/6.28*360;

OJ:=ATAN((OPEN-REF(OPEN,1))/REF(OPEN,1)/0.1)/6.28*360;

HLJ:=ATAN((HIGH-REF(LOW,1))/REF(LOW,1)/0.1)/6.28*360;

HLK:=ATAN((LOW-REF(HIGH,1))/REF(HIGH,1)/0.1)/6.28*360;

A:=MIN(MIN(MIN(CJ,OJ),HJ),LJ);

B:=MAX(MAX(MAX(CJ,OJ),HJ),LJ);

TDXSTEP109:DRAWKLINE(B,OJ,A,CJ);

TDXSTEP110:STICKLINE(CJ>=OJ AND HJ<CJ,CJ,HJ,1,(-1)),COLORGREEN;

TDXSTEP111:STICKLINE(CJ<OJ AND HJ<OJ,OJ,HJ,1,(-1)),COLORGREEN;

TDXSTEP112:STICKLINE(CJ>=OJ AND HJ>CJ,CJ,HJ,0.1,0),COLORRED;

TDXSTEP113:STICKLINE(CJ<OJ AND HJ>OJ,OJ,HJ,0.1,0),COLORRED;

TDXSTEP114:STICKLINE(CJ>=OJ AND LJ<OJ,OJ,LJ,0.1,1),COLORCYAN;

TDXSTEP115:STICKLINE(CJ<OJ AND LJ<CJ,CJ,LJ,0.1,1),COLORCYAN;

TDXSTEP116:STICKLINE(CJ>=OJ AND LJ>OJ,OJ,LJ,0.1,0),COLORYELLOW;

TDXSTEP117:STICKLINE(CJ<OJ AND LJ>CJ,CJ,LJ,0.1,0),COLORYELLOW;

二%:ATAN(0.02/0.1)/6.28*360,POINTDOT,COLORCYAN;

五%:ATAN(0.05/0.1)/6.28*360,POINTDOT,COLORMAGENTA;

八%:ATAN(0.08/0.1)/6.28*360,POINTDOT,COLORRED;

{股票指标网  整理}

十%:=ATAN(0.1/0.1)/6.28*360;

负二%:(-ATAN(0.02/0.1))/6.28*360,POINTDOT,COLORCYAN;

负五%:(-ATAN(0.05/0.1))/6.28*360,POINTDOT,COLORCYAN;

负八%:(-ATAN(0.08/0.1))/6.28*360,POINTDOT,COLORCYAN;

负十%:=(-ATAN(0.1/0.1))/6.28*360;

N:0,COLORMAGENTA;

 

原理解析：
HJ赋值:ATAN((最高价-1日前的最高价)/1日前的最高价/0.1)/6.28*360
LJ赋值:ATAN((最低价-1日前的最低价)/1日前的最低价/0.1)/6.28*360
CJ赋值:ATAN((收盘价-1日前的收盘价)/1日前的收盘价/0.1)/6.28*360
OJ赋值:ATAN((OPEN-1日前的OPEN)/1日前的OPEN/0.1)/6.28*360
HLJ赋值:ATAN((最高价-1日前的最低价)/1日前的最低价/0.1)/6.28*360
HLK赋值:ATAN((最低价-1日前的最高价)/1日前的最高价/0.1)/6.28*360
A赋值:CJ和OJ的较小值,HJ),LJ)
B赋值:CJ和OJ较大值,HJ),LJ)
输出TDXSTEP109:DRAWKLINE(B,OJ,A,CJ)
输出TDXSTEP110:STICKLINE(CJ>=OJ AND HJ 输出TDXSTEP111:STICKLINE(CJ当满足条件CJ>=OJ AND HJ>CJ时,在CJ和HJ之间画柱状线
当满足条件CJOJ时,在OJ和HJ之间画柱状线
当满足条件CJ>=OJ AND LJ当满足条件CJ当满足条件CJ>=OJ AND LJ>OJ时,在OJ和LJ之间画柱状线
当满足条件CJCJ时,在CJ和LJ之间画柱状线
输出二%:ATAN(0.02/0.1)/6.28*360,POINTDOT,COLORCYAN
输出五%:ATAN(0.05/0.1)/6.28*360,POINTDOT,COLORMAGENTA
输出八%:ATAN(0.08/0.1)/6.28*360,POINTDOT,画红色
{股票指标网 整理}
十%赋值:ATAN(0.1/0.1)/6.28*360
负输出二%:(-ATAN(0.02/0.1))/6.28*360,POINTDOT,COLORCYAN
负输出五%:(-ATAN(0.05/0.1))/6.28*360,POINTDOT,COLORCYAN
负输出八%:(-ATAN(0.08/0.1))/6.28*360,POINTDOT,COLORCYAN
负十%赋值:(-ATAN(0.1/0.1))/6.28*360
输出N:0,COLORMAGENTA