止盈7日线:MA(CLOSE,7),COLOR99CC99,LINETHICK0;
A:=(3*C+H+L+O)/6;
XJ:=(A+0.618*REF(A,1)+0.382*REF(A,2)+0.236*REF(A,3)+0.146*REF(A,4))/2.382;
YCZXH:=(EMA(HHV(A,2),5)+EMA(HHV(A,2),13)+EMA(HHV(A,2),21)+EMA(HHV(A,2),32))/4;
YCZXL:=(EMA(LLV(A,2),5)+EMA(LLV(A,2),13)+EMA(LLV(A,2),21)+EMA(LLV(A,2),32))/4;
SMH:EMA(YCZXH,21),COLOR004000,LINETHICK1;
SML:EMA(YCZXL,21),COLOR004000,LINETHICK3;
SMJSML+SMH)/2,COLOR004000,LINETHICK1;
PJ:=(10*A+9*REF(A,1)+8*REF(A,2)+7*REF(A,3)+6*REF(A,4)+5*REF(A,5)+4*REF(A,6)+3*REF(A,7)+2*REF(A,8)+REF(A,9))/55;
A1:=EMA(PJ,3),COLOR004000;A2:=EMA(PJ,5),COLOR004000;
A3:=EMA(PJ,7),COLOR004000;A4:=EMA(PJ,9),COLOR004000;
A5:=EMA(PJ,11),COLOR004000;
LX:=REF(XJ,1);
ZD:=(SMA(MAX(XJ-LX,0),5,1)/SMA(ABS(XJ-LX),5,1))*100;
KX1:=(CLOSE>=OPEN) AND ZD>=50;
KX2:=(CLOSE<OPEN) AND ZD>=50;
KX3:=(CLOSE>=OPEN) AND ZD<50;
KX4:=(CLOSE<OPEN) AND ZD<50;
IF(A5<REF(A5,1),A5,DRAWNULL),COLOR820000,LINETHICK1;
IF(A5>REF(A5,1),A5,DRAWNULL),COLOR9966FF,LINETHICK1;
IF(A4<REF(A4,1),A4,DRAWNULL),COLOR8C0000,LINETHICK1;
IF(A4>REF(A4,1),A4,DRAWNULL),COLORFF00FF,LINETHICK1;
IF(A3<REF(A3,1),A3,DRAWNULL),COLOR9B0000,LINETHICK1;
IF(A3>REF(A3,1),A3,DRAWNULL),COLORFF66FF,LINETHICK1;
IF(A2<REF(A2,1),A2,DRAWNULL),COLORBB0000,LINETHICK1;
IF(A2>REF(A2,1),A2,DRAWNULL),COLORFF99FF,LINETHICK1;
IF(A1<REF(A1,1),A1,DRAWNULL),COLORCC0000,LINETHICK1;
IF(A1>REF(A1,1),A1,DRAWNULL),COLOR66CCFF,LINETHICK2;
{重绘K线 显示大阳\大阴\涨停\跌停\假阴,适用于通达信}
RC1:=REF(C,1);
涨停率10:=10-1/RC1;{178448-WEN98编写}
涨停率5:=5-1/RC1;
比前涨率:=(C-RC1)*100/RC1;
比前跌率:=(RC1-C)*100/RC1;
ST:=NAMELIKE('ST') OR NAMELIKE('*ST');
涨停:= IF(ST, (比前涨率>=涨停率5), (比前涨率>=涨停率10));
本日涨率:=(C-O)*100/O;
本日跌率:=(O-C)*100/O;
STICKLINE((H-RC1)*100/RC1>=涨停率10,H,MAX(C,O),1,0),COLORYELLOW;{涨停后回落}
STICKLINE((RC1-L)*100/RC1>=涨停率10,L,MIN(C,O),1,0),COLORBLUE;{跌停后回升}
跌停:= IF(NAMELIKE('ST'), (比前跌率>=涨停率5), (比前跌率>=涨停率10));
STICKLINE(跌停,O,C,2,0),COLORLIBLUE;
大阳线:=C>O AND (比前涨率>=涨停率5 OR 本日涨率>=涨停率5)
AND 比前涨率<涨停率10 AND 涨停=0;
STICKLINE(大阳线,O,C,1,0),COLORFF99FF;
大阴线:=C<O AND (比前跌率>=涨停率5 OR 本日跌率>=涨停率5)
AND 比前跌率<涨停率10 AND 跌停=0;
STICKLINE(大阴线,O,C,1,0),COLOR006633;
{假阴柱}
假阴:=C<O AND C>REF(C,1);
STICKLINE(假阴,O,C,1,0),COLORRED;
{假阳柱}
假阳:=C>O AND C<REF(C,1);
STICKLINE(假阳,O,C,1,0),COLORGREEN;
{涨停}
AAAA:=CLOSE/REF(C,1)>=1.09;
STICKLINE(AAAA,O,C,1,0),COLORYELLOW;
STICKLINE(AAAA,L,H,1,0),COLORYELLOW;
{跌停}
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,1,0),COLORBLUE;
止盈3日线:EMA(CLOSE,M1),COLOR99CC99,LINETHICK0;
DRAWICON(CROSS(止盈7日线,A1),A1,1);
DRAWICON(CROSS(A1,A2),A2,23);
DRAWICON(CROSS(A1,A2),A2,5);
DRAWTEXT(CROSS(A1,A2),A2,' ◎ 启动点 ◎'),COLORFF00FF;
DRAWICON(CROSS(A1,A5),A5,23);
DRAWTEXT(CROSS(A1,A5),A5,' ⊙ 大胆买 ⊙'),COLOR00FFFF;
DRAWTEXT(ABS(EMA(C,15)-EMA(C,60))/C<0.01 AND EMA(C,15)>EMA(C,30) AND O<EMA(C,3) AND C>EMA(C,3) AND O<EMA(C,15) AND C>EMA(C,15) AND O<EMA(C,30) AND C>EMA(C,30) AND O<EMA(C,60) AND C>EMA(C,60),L,'≮ 粘合 ≯'),COLORLIMAGENTA;
BU:=CROSS(HIGH,SAR(3,1,20));
DRAWTEXT(BU,LOW,'↖-----B'),COLOR00FFFF;
|