cxd198355 发表于 2017-11-21 10:50:38

UZ百分比线

M:=(SYSPARAM(4)-SYSPARAM(5))/(SYSPARAM(3)-SYSPARAM(2));QD:=SYSPARAM(2);
CCC:=IF(BARPOS=SYSPARAM(1),CLOSE,0);
KXS:=QD+2=BARSCOUNT(CLOSE);
DDD:=SYSPARAM(5);
HD:=SYSPARAM(4);
VAR1:=HD-DDD;
HH:HD,LINETHICK2,colorFF;
B2:HH-VAR1*0.25,POINTDOT,LINETHICK2,color8000;
B4:HH-VAR1*0.375,POINTDOT,LINETHICK2,color8000;
B5:HH-VAR1*0.5,POINTDOT,LINETHICK2,colorFF;
B6:HH-VAR1*0.625,POINTDOT,LINETHICK2,color8000;
B8:HH-VAR1*0.75,POINTDOT,LINETHICK2,color8000;
LL:DDD,LINETHICK2,colorFF;
DRAWNUMBER(ISLASTBAR,B2,B2,2),SHIFT1,color8000;
DRAWNUMBER(ISLASTBAR,B4,B4,2),SHIFT1,color8000;
DRAWNUMBER(ISLASTBAR,B5,B5,2),SHIFT1,colorFF;
DRAWNUMBER(ISLASTBAR,B6,B6,2),SHIFT1,color8000;
DRAWNUMBER(ISLASTBAR,B8,B8,2),SHIFT1,color8000;
DRAWTEXT(KXS,B2,'+75.0 -25.0'),color8000;
DRAWTEXT(KXS,B4,'+62.5 -37.5'),color8000;
DRAWTEXT(KXS,B5,'+ -50.0   %'),colorFF;
DRAWTEXT(KXS,B6,'+37.5 -62.5'),color8000;
DRAWTEXT(KXS,B8,'+25.0 -75.0'),color8000;
DRAWSL(DD=1 AND BARPOS=SYSPARAM(1),HD,-80*M/50,0,0),LINETHICK1,colorFFFF;
DRAWSL(DD=1 AND BARPOS=SYSPARAM(1),LOW,26*M/50,0,0),POINTDOT,colorFFFFFF;
DRAWSL(DD=1 AND BARPOS=SYSPARAM(1),LOW,47*M/50,0,0),POINTDOT,colorFFFFFF;
DRAWSL(DD=1 AND BARPOS=SYSPARAM(1),LOW,80*M/50,0,0),LINETHICK1,colorFFFF;
DRAWSL(DD=1 AND BARPOS=SYSPARAM(1),LOW,135*M/50,0,0),LINETHICK1,colorFFFF;
DRAWSL(DD=1 AND BARPOS=SYSPARAM(1),LOW,240*M/50,0,0),POINTDOT,colorFFFFFF;
DRAWSL(DD=2 AND BARPOS=SYSPARAM(1),HIGH,-240*M/50,0,0),POINTDOT,colorFFFFFF;
DRAWSL(DD=2 AND BARPOS=SYSPARAM(1),HIGH,-135*M/50,0,0),LINETHICK1,colorFF0000;
DRAWSL(DD=2 AND BARPOS=SYSPARAM(1),HIGH,-80*M/50,0,0),LINETHICK1,colorFF0000;
DRAWSL(DD=2 AND BARPOS=SYSPARAM(1),HIGH,-47*M/50,0,0),POINTDOT,colorFFFFFF;
DRAWSL(DD=2 AND BARPOS=SYSPARAM(1),HIGH,-26*M/50,0,0),POINTDOT,colorFFFFFF;
DRAWSL(DD=2 AND BARPOS=SYSPARAM(1),DDD,80*M/50,0,0),LINETHICK1,colorFF0000;
A:=SYSPARAM(1);
VERTLINE(BARPOS=A),POINTDOT,SHIFT13,color8000;
VERTLINE(BARPOS=A),POINTDOT,SHIFT21,color8000;
VERTLINE(BARPOS=A),POINTDOT,SHIFT34,color8000;
VERTLINE(BARPOS=A),POINTDOT,SHIFT55,color8000;
VERTLINE(BARPOS=A),POINTDOT,SHIFT89,color8000;
VERTLINE(BARPOS=A),POINTDOT,SHIFT144,color8000;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'天数'),ALIGN2,color8000;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'13'),SHIFT13,color8000;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'21'),SHIFT21,color8000;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'34'),SHIFT34,color8000;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'55'),SHIFT55,color8000;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'89'),SHIFT89,color8000;
DRAWTEXT(BARPOS=A,SYSPARAM(5),'144'),SHIFT144,color8000;

页: [1]
查看完整版本: UZ百分比线