DRAWTEXT_FIX(1,0.005,0,0,'所属风格:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.06,0,0,FGBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.05,0,'所属概念:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.06,0.05,0,GNBLOCK),COLORYELLOW;
MA10:MA(C,10),COLOR00FFFF,NODRAW;
MA5:MA(C,5),COLOR0000FF,NODRAW;
HH9:=HHV(H,9);
LL9:=LLV(L,9);
RSVZ9:=(C-LL9)/(HH9-LL9);
K:=SMA(RSVZ9*100,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
KZ9:=SMA(RSVZ9,3,1);
DZ9:=SMA(KZ9,3,1);
JZ9:=3*KZ9-2*DZ9;
ZTK9:=KZ9*(HH9-LL9)+LL9;
ZTD9:=DZ9*(HH9-LL9)+LL9;
ZTJ9:JZ9*(HH9-LL9)+LL9,COLORDDDDDD,NODRAW;
ZTJE:=EMA(ZTJ9,3);
Hgspt50:(H/((HH9+LL9)/2)-1)*100,NODRAW;
JCJ:=(ZTJ9/((H+MAX(C,O))/2)-1)*100;
gspt20:=0.20*(HH9-LL9)+LL9;
gspt25:=0.25*(HH9-LL9)+LL9;
gspt50:0.5*(HH9-LL9)+LL9,COLORFF0000,DOTLINE,NODRAW;
gspt45:=0.45*(HH9-LL9)+LL9;
gspt65:=0.65*(HH9-LL9)+LL9;
gspt70:=0.70*(HH9-LL9)+LL9;
gspt78:=0.78*(HH9-LL9)+LL9;
gspt85:=0.85*(HH9-LL9)+LL9;
gspt95:=0.95*(HH9-LL9)+LL9;
LLKB:=LLV(L,BARSLAST(CROSS(50,K))+1);
HHKB:=HHV(H,BARSLAST(CROSS(K,50))+1);
LDKL:=LLV(L,BARSLAST(CROSS(EMA(ZTJ9,3),ZTJ9))+1);
LDKJ:=LLV(ZTJ9,BARSLAST(CROSS(EMA(ZTJ9,3),ZTJ9))+1);
RSVZ34:=(C-LLV(L,34))/(HHV(H,34)-LLV(L,34));
KZ34:=SMA(RSVZ34,3,1);
DZ34:=SMA(KZ34,3,1);
JZ34:=3*KZ34-2*DZ34;
ZTK34:=KZ34*(HHV(H,34)-LLV(L,34))+LLV(L,34);
ZTD34:=DZ34*(HHV(H,34)-LLV(L,34))+LLV(L,34);
ZTJ34:=JZ34*(HHV(H,34)-LLV(L,34))+LLV(L,34);
DRAWBAND(0.5*(HH9-LL9)+LL9,RGB(60,80,84),0.25*(HH9-LL9)+LL9,DRAWNULL);
DRAWBAND(IF(ZTJ34>=(HHV(H,34)+LLV(L,34))/2,(HH9+LL9)/2,DRAWNULL),RGB(80,55,84),IF(ZTJ34>=(HHV(H,34)+LLV(L,34))/2,0.25*(HH9-LL9)+LL9,DRAWNULL),DRAWNULL);
XXX_101:=ZTJ9;
XXX_102:=ZTD9;
gspt50,COLORFF0000,DOTLINE;
ZTJ9,COLOR888888;
MA10,COLOR00FFFF;
MA5,COLOR0000FF;
KD9死叉T:=BARSLAST(CROSS(ZTD9,ZTK9));
KD9死叉T0:=KD9死叉T+1;
KD9死叉1:=REF(KD9死叉T,KD9死叉T+1)+KD9死叉T;
KD9死叉T1:=KD9死叉1+1;
KD9死叉2:=REF(KD9死叉T1,KD9死叉T+1)+KD9死叉T;
KD9死叉T2:=KD9死叉2+1;
KD9死叉3:=REF(KD9死叉T2,KD9死叉T+1)+KD9死叉T;
KD9死叉T3:=KD9死叉3+1;
KD9金叉T:=BARSLAST(CROSS(ZTK9,ZTD9));
KD9金叉T0:=KD9金叉T+1;
KD9金叉1:=REF(KD9金叉T,KD9金叉T+1)+KD9金叉T;
KD9金叉T1:=KD9金叉1+1;
KD9金叉2:=REF(KD9金叉T1,KD9金叉T+1)+KD9金叉T;
KD9金叉T2:=KD9金叉2+1;
KD9金叉3:=REF(KD9金叉T2,KD9金叉T+1)+KD9金叉T;
KD9金叉T3:=KD9金叉3+1;
DBX:=IF(ZTK9>=ZTD9,LLV(L,KD9死叉T0),DRAWNULL),COLORFF0000;
DBX2:=IF(ZTK9>=ZTD9,LLV(L,KD9死叉T1),DRAWNULL),COLOR00FFFF;
KD9底背离:=CROSS(K,D) AND DBX>DBX2;
跟庄介入:=CROSS(ZTJ9,gspt50) AND ZTJ9>MA(C,5) AND (MA(C,5)/REF(MA(C,5),1)-1)*100>0.1 AND ZTJ9>REF(ZTJ9,1) AND (MAX(C,O)+H)/2>gspt50 AND O/LLV(L,5)<1.2 AND COUNT(MIN(C,O)<gspt25,7)>0;
DRAWICON(跟庄介入,gspt20,29);
DRAWICON(跟庄介入 AND ZTJ34>=(HHV(H,34)+LLV(L,34))/2,gspt20,9);
gspt_:=跟庄介入 AND COUNT(J<-10,7)>0;
gspt_TJ2:=CROSS(C,(HHV(H,9)+LLV(L,9))/2) AND C>MA(C,5) AND ZTJ9>MA(C,5);
gspt_TJ1:=CROSS(ZTJ9,ZTJE);
gspt_TJ:=gspt_TJ1 AND LLV(ZTJ9,5)>REF(LLV(ZTJ9,5),BARSLAST(REF(gspt_TJ1,1))) AND LLV(MIN(C,O),5)*1.002>REF(LLV(L,5),BARSLAST(REF(gspt_TJ1,1))) AND
REF(LLV(KDJ.J,6),BARSLAST(REF(gspt_TJ1,1)))<-9.9;
DRAWTEXT(COUNT(gspt_TJ,6)>0 AND gspt_TJ2,0.2*(HH9-LL9)+LL9,'↖买入'),COLOR00FFFF;
DRAWTEXT_FIX(C>O,0,0.9,0,'公式平台 公式源码 http://www.gspt.com'),COLOR333333;
乌云ZT:=(O-REF(H,1))/REF(H,1)*100>0;
乌云实体:=(MAX(C,O)-MIN(C,O))/MIN(C,O)*100>2 AND C<O;
乌云盖顶:=乌云ZT AND 乌云实体;
上十字星:=(H-L)/ABS(C-O)>3 AND H>MAX(C,O) AND H>REF(H,1);
见顶K线:=(上十字星 OR 乌云盖顶) AND HHKB/LLKB>1.49 AND (H=HHV(H,3) OR HHV(MAX(C,O),3)=MAX(C,O));
顶背迹象:=HHV(H,BARSLAST(CROSS(K,50))+1)>K AND HHV(H,BARSLAST(CROSS(K,50))+1)=H AND COUNT(K>78,7)>0;
随时逃:=见顶K线 AND ((COUNT(J>100,5)>0 OR COUNT(K>84,5)>0) OR 顶背迹象);
DRAWTEXT(随时逃,H*1.015,'↙卖出'),COLOR00FF00;
