三一:H-(H-L)*0.333,NODRAW; 二一:H-(H-L)*0.5,NODRAW; 三二:H-(H-L)*0.666,NODRAW; 實體三一:O+(C-O)*0.666,NODRAW; 實體腰線:O+(C-O)*0.5,NODRAW; {多彩K線-主圖公式, 顯示大陽\\大陰\\漲停\\跌停\\假陰\\假陽\\跳空\\大K線中點,適用于通達信 } DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);{在屏幕左上角顯示所屬行業(yè)板塊} DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK);{在屏幕左上角顯示所屬地域板塊} DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK);{在屏幕左上角顯示所屬概念板塊} {跳空} STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY; STICKLINE(REF(H,1) C_: CONST(C),COLORLIRED,POINTDOT;{現(xiàn)價線} MA5:=MA(C,5); MA5角度: ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW; DRAWKLINE(H,O,L,C);{重繪K線} RC1:=REF(C,1); CS:=IF(C>=1,10000,100000); C漲停10:=1.10*RC1-49/CS;{考慮到4舍5入} C漲停5 :=1.05*RC1-49/CS; C跌停10:=0.90*RC1+51/CS; C跌停5 :=0.95*RC1+51/CS; ST:=NAMELIKE('S') OR NAMELIKE('*S'); 漲停:= IF(ST, C>=C漲停5, C>=C漲停10); 跌停:= IF(ST, C<=C跌停5, C<=C跌停10); 盤中漲停:=IF(ST, H>=C漲停5, H>=C漲停10); 盤中跌停:=IF(ST, L<=C跌停5, L<=C跌停10); STICKLINE(盤中漲停,H,MAX(C,O),0,0),COLORMAGENTA;{漲停后回落} STICKLINE(盤中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停后回升} 大陽線:=C>O AND (C>=C漲停5 OR C>(1.05*O-51/CS) ) OR (C>1000 AND C>RC1*1.024); STICKLINE(大陽線,O,C,1,0),COLOR0000BB; 大陰線:=C STICKLINE(大陰線,O,C,1,0),COLORLIGREEN; STICKLINE(漲停,O,C,1,0),COLORMAGENTA; STICKLINE(跌停,O,C,1,0),COLORLICYAN; 假陰:=C STICKLINE(假陰,O,C,0,0),COLORRED;{假陰柱}; |
|