[飞 狐] KJ饱和度竖显 日周月
50,COLORFFBB00;K:"KDJ.K",PRECISION2,COLORWHITE,LINETHICK;D:="KDJ.D";
J:"KDJ.J",PRECISION2,COLORMAGENTA,LINEDOT;
PARTLINE(K D,K,D),COLOR0066FF;
{}
Bb:=CROSS(K,D);Ss:=CROSS(D,K);
drawtext(Bb,2,' ↑'),colorred;
drawtext(Bb,2,'B'),colorred;
drawtext(Ss,100,' ↓'),colorwhite;
drawtext(Ss,100,'S'),colorwhite;
{}
RK:=MA("KDJ.K#DAY",1);
ZJ:=MA("KDJ.J#WEEK",5);
YJ:=MA("KDJ.J#MONTH",21);
SAT:IF((AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100),PRECISION2,COLORCCFFCC,LINETHICK;
{}P:=SYSPARAM(1);BD:=BARPOS;ww:=SYSPARAM(2)+4;
STICKLINE(BD=WW,-22,122,84,1),COLORFFFFFF;
STICKLINE(BD=WW-3,1,YJ ,14,0),COLORFFAAAA;
STICKLINE(BD=WW-1,1,ZJ ,14,0),COLORFF6600;
STICKLINE(BD=WW+1,1,RK ,14,0),COLOR0000BB;
STICKLINE(BD=WW+3,1,SAT,14,0),COLOR66AA66;
DRAWTEXT(BD=WW-3,YJ,' 月J:\n'+NUMTOSTR(YJ,2)),COLORWHITE,align0,PXUP30;
DRAWTEXT(BD=WW-1,ZJ,' 周J:\n'+NUMTOSTR(ZJ,2)),COLORFFEE00,align0,PXUP30;
DRAWTEXT(BD=WW+1,RK,' 日K:\n'+NUMTOSTR(RK,2)),COLORCCFFCC,align0,PXUP30;
DRAWTEXT(BD=WW+3,SAT,'饱和度:\n'+NUMTOSTR(SAT,1)),COLORCCFFCC,al
页:
[1]