多彩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)<L,L,REF(H,1),5,0),COLORGRAY;
wen98編_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);{178448-WEN98編寫}
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<O AND (C<=C跌停5 OR C<(0.95*O+49/CS) )
OR (C>1000 AND C < RC1*0.976);
STICKLINE(大陰線,O,C,1,0),COLORLIGREEN;
STICKLINE(漲停,O,C,1,0),COLORMAGENTA;
STICKLINE(跌停,O,C,1,0),COLORLICYAN;
假陰:=C<O AND C>REF(C,1);
STICKLINE(假陰,O,C,0,0),COLORRED;{假陰柱};
假陽:=C>O AND C<REF(C,1);
STICKLINE(假陽,O,C,0,0),COLORGREEN;{假陽柱};
大盤TJ:=PERIOD=5 AND NAMELIKE('上證指數(shù)')
AND (ABS((C-REF(C,1)))/REF(C,1)>=0.025 OR ABS(C-O)>=60);
STICKLINE(大盤TJ,(H+L)/2,(H+L)/2,2,0),COLORYELLOW;{顯示大盤日線的60點大K線中值};
STICKLINE((大陽線 OR 大陰線 OR 漲停 OR 跌停)
AND BETWEEN(C,1,500),L+(H-L)/2,L+(H-L)/2,1,0),COLORYELLOW;{大K線畫中點線};
圖例: