主图立体日线显示周线
{此公式无需引用其它公式}
周O1:=IF(WEEKDAY<REF(WEEKDAY,1),O,DRAWNULL);
周O:HHV(周O1,WEEKDAY),
LINETHICK0;
周H:HHV(H,WEEKDAY),LINETHICK0;
周L:LLV(L,WEEKDAY),LINETHICK0;
A:=DAY<REF(DAY,1);
B:=BARSLAST(A)+1;
MH:=HHV(H,B),LINETHICK0;
ML:=LLV(L,B),LINETHICK0;
日C:C#WEEK,COLORFFFF38,NODRAW;
{以下是画周K线}
STICKLINE(日C>=周O,周O,日C,4,0),COLO
R003 388;
STICKLINE(日C<周O,周O,日C,4,0),COLORCC5533;
{以下是画立体日K线}
XG1:=C>O;
STICKLINE(XG1,L,H,0.01,0),COLOR0000FF;
STICKLINE(XG1,CLOSE,
OPEN,3,0),COLOR
000055;
STICKLINE(XG1,CLOSE,OPEN,2.8,0),COLOR
000066;
STICKLINE(XG1,CLOSE,OPEN,2.5,0),COLOR000077;
STICKLINE(XG1,CLOSE,OPEN,2.2,0),COLOR
000088;
STICKLINE(XG1,CLOSE,OPEN,1.7,0),COLOR
000099;
STICKLINE(XG1,CLOSE,OPEN,1.2,0),COLOR0000AA;
STICKLINE(XG1,CLOSE,OPEN,0.7,0),COLOR0000CC;
STICKLINE(XG1,CLOSE,OPEN,0.2,0),COLOR0000FF;
XG2:=C<O;
STICKLINE(XG2,H,L,0.01,0),COLOR00FF00;
STICKLINE(XG2,C,O,3,0),COLOR009900;
STICKLINE(XG2,C,O,2,0),COLOR00BB00;
STICKLINE(XG2,C,O,1,0),COLOR00DD00;
STICKLINE(XG2,C,O,0.3,0),COLOR00FF00;
MA1:MA(C,N1),COLORWHITE;
MA2:MA(C,N2),COLORYELLOW;
DRAWTEXT_FIX(C>0,0,0.03,0,STRCAT(‘行业: ‘,HYBLOCK)),COLORYELLOW;
效果图: