M1:=5;
M2:=10;
M3:=20;
M4:=60;
MA1:MA(CLOSE,M1);MA2:MA(CLOSE,M2);MA3:MA(CLOSE,M3);MA4:MA(CLOSE,M4);DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);{在屏幕左上角顯示所屬行業板塊}DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,FGBLOCK);{在屏幕左上角顯示所屬風格板塊}{跳空}{MA120: MA(C,120),COLORGRAY;MA60: MA(C,60),COLORBLUE;MA30: MA(C,30),COLORLICYAN;MA30_: IF(MA30>=REF(MA30,1),MA30,DRAWNULL),COLORLIRED;MA10: MA(C,10),COLORYELLOW;MA5: MA(C,5),COLORGREEN;MA5_: IF(MA5>=REF(MA5,1),MA5,DRAWNULL),COLORMAGENTA;}{如果只要裸K線,則上面均線部分可以去掉;如果要顯示均線,可去掉上段大括號}{========================================================}{跳空}STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;{重繪K線 顯示大陽\大陰\漲停\跌停\假陰,適用於通達信}DRAWKLINE(H,O,L,C);{重繪K線}{重繪K線 顯示大陽\大陰\漲停\跌停\假陰,適用於通達信}RC1:=REF(C,1);漲停率10:=10-1/RC1;{178448-WEN98編寫}漲停率5:=5-1/RC1;比前漲率:=(C-RC1+0.004)*100/RC1;比前跌率:=(RC1-C-0.004)*100/RC1;ST:=NAMELIKE('ST') OR NAMELIKE('*ST');漲停:= IF(ST, (比前漲率>=漲停率5), (比前漲率>=漲停率10));跌停:= IF(ST, (比前跌率>=漲停率5), (比前跌率>=漲停率10));盤中漲停:=(H-RC1+0.004)*100/RC1>=IF(ST, 漲停率5,漲停率10);盤中跌停:=(RC1-L-0.004)*100/RC1>=IF(ST, 漲停率5,漲停率10);STICKLINE(盤中漲停,H,MAX(C,O),0,0),COLORMAGENTA;{漲停後回落}STICKLINE(盤中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停後回升}STICKLINE(漲停,O,C,1,0),COLORMAGENTA;STICKLINE(跌停,O,C,1,0),COLORLICYAN;本日漲率:=(C-O+0.004)*100/O;本日跌率:=(O-C-0.004)*100/O;大陽線:=C>O AND (比前漲率>=漲停率5 OR 本日漲率>=漲停率5) AND 比前漲率<漲停率10 AND 漲停=0;STICKLINE(大陽線,O,C,1,0),COLOR0000BB;大陰線:=C<O AND (比前跌率>=漲停率5 OR 本日跌率>=漲停率5) AND 比前跌率<漲停率10 AND 跌停=0;STICKLINE(大陰線,O,C,1,0),COLORLIGREEN;假陰:=C<O AND C>REF(C,1);STICKLINE(假陰,O,C,0,0),COLORRED;{假陰柱};
X1:=SUM(AMO,BARSLAST(DAY<>REF(DAY,1))+1)/SUM(VOL,BARSLAST(DAY<>REF(DAY,1))+1)/100;
DRAWTEXT(C=X1,H*1.005,'*')COLORCYAN;