「翔博精选指标」角度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;