通达信多彩Ｋ线源码主图
<div class="stock-fc-code-box"><div><p>以下是通达信多彩K线-主图公式, 显示大阳\大阴\涨停\跌停\假阴\假阳\跳空\大K线中点,适用于通达信</p><p><br>DRAWKLINE(H,O,L,C);{重绘K线}<br><br>RC1:=REF(C,1);<br><br>CS:=5/IF(C>=1,1000,10000);<br><br>C涨停10:=1.10*RC1-CS;{考虑到4舍5入}<br><br>C涨停5 :=1.05*RC1-CS;<br><br>C跌停10:=0.90*RC1+CS;<br><br>C跌停5 :=0.95*RC1+CS;<br><br>ST:=NAMELIKE('S') OR NAMELIKE('*S');<br><br>涨停:= IF(ST, C>=C涨停5, C>=C涨停10);<br><br>跌停:= IF(ST, C<=C跌停5, C<=C跌停10);<br><br>盘中涨停:=IF(ST, H>=C涨停5, H>=C涨停10);<br><br>盘中跌停:=IF(ST, L<=C跌停5, L<=C跌停10);<br><br>STICKLINE(盘中涨停,H,MAX(C,O),0,0),COLORMAGENTA;{涨停后回落}<br><br>STICKLINE(盘中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停后回升}<br><br>大阳线:=C>O AND (C>=C涨停5 OR O<(0.95*C+CS) ) OR (C>1000 AND C>=RC1*1.025);<br><br>STICKLINE(大阳线,O,C,1,0),COLOR0000BB;<br><br>大阴线:=C<O AND (C<=C跌停5 OR C<(0.95*O+CS) ) OR (C>1000 AND C<RC1*0.976);<br><br>STICKLINE(大阴线,O,C,1,0),COLORLIGREEN;<br><br>STICKLINE(涨停,O,C,1,0),COLORMAGENTA;<br><br>STICKLINE(跌停,O,C,1,0),COLORLICYAN;<br><br>{均价:=IF(C>1000,C,AMOUNT/VOL/100);}<br><br>假阴1:= C<O AND C>REF(C,1);{显式-假阴真阳};<br><br>STICKLINE(假阴1,O,C,0,0),COLORRED;{假阴柱};<br><br>均价:=AMOUNT/VOL/100;<br><br>假阴2:= C<O AND 均价>RC1 AND C<=RC1 AND 均价<=H;{隐式-假阴真阳};<br><br>STICKLINE(假阴2,均价,均价,1,0),COLORRED;{假阴柱};<br><br>假阳:=C>O AND C<RC1;{假阳真阴};<br><br>STICKLINE(假阳,O,C,0,0),COLORGREEN;{假阳柱};<br><br>{跳空}<br><br>STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;<br><br>STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;</p><br><p>C_: CONST(C),COLORLIRED,POINTDOT;{现价线}<br><br>K中: (H+L)/2,COLORYELLOW,NODRAW;<br><br>MA5:=MA(C,5);<br><br>MA5角度: ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW;<br><br>AA:=C/REF(C,1)>1.05;<br><br>STICKLINE(AA,H,L,0,1),COLORYELLOW;<br><br>STICKLINE(AA,C,O,3.2,0),COLOR117777;<br><br>STICKLINE(AA,C,O,2.6,0),COLOR119999;<br><br>STICKLINE(AA,C,O,1.9,0),COLOR11BBBB;<br><br>STICKLINE(AA,C,O,1.1,0),COLOR11DDDD;<br><br>STICKLINE(AA,C,O,0.3,0),COLOR44FFFF;</p><br></div><br></div>
页:
[1]