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;
gspt1:=EMA(CLOSE,3);
gspt2:=EMA(CLOSE,26);
gspt3:=gspt1-gspt2;
牵牛线:EMA(EMA(EMA(CLOSE,3),3),3)+gspt3,COLORWHITE;
寻牛线:MA(MA(LOW,3),3),COLORMAGENTA;
gspt4:=HHV(寻牛线,60);
gspt5:=BARSCOUNT(C)>5;
gspt6:=REF(C,1);
gspt7:=(H-gspt6+0.01)/gspt6*100;
gspt8:=(gspt6-L+0.01)/gspt6*100;
gspt9:=gspt7>=5 AND gspt5 AND C=H;
gspt10:=gspt8>=5 AND gspt5 AND C=L;
gspt11:=gspt7>=10 AND gspt5 AND C=H;
gspt12:=gspt8>=10 AND gspt5 AND C=L;
gspt13:=gspt7>=20 AND gspt5 AND C=H;
gspt14:=gspt8>=20 AND gspt5 AND C=L;
gspt15:=IF(INBLOCK('科创板'),gspt13,IF(INBLOCK('创业板') AND DATE>1200823,gspt13,IF(INBLOCK('ST板块'),gspt9,gspt11)));
gspt16:=IF(INBLOCK('科创板'),gspt14,IF(INBLOCK('创业板') AND DATE>1200823,gspt14,IF(INBLOCK('ST板块'),gspt10,gspt12)));
gspt17:=MA(CLOSE,1);
gspt18:=SMA(SMA(SMA(gspt17,2,1),2,1),2,1),NODRAW;
gspt19:=MA(gspt18,3),NODRAW;
gspt20:=MA((L+H+C)/3,5);
gspt21:=REF(CLOSE,1);
gspt22:=SMA(MAX(CLOSE-gspt21,0),6,1)/SMA(ABS(CLOSE-gspt21),6,1)*100;
DRAWBAND(牵牛线,RGB(85,0,0),gspt4,RGB(45,0,140));
DRAWBAND(寻牛线,RGB(0,65,45),gspt4,RGB(0,65,0));
上箱顶:HHV(MA(MA(LOW,3),3),60)LINETHICK3,COLORYELLOW;
下箱底:LLV(寻牛线,20)LINETHICK3,COLORFFBB00;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(gspt15,OPEN,CLOSE,2.6,0),COLOR0000E5;
STICKLINE(gspt15,OPEN,CLOSE,2.4,0),COLOR335555;
STICKLINE(gspt15,OPEN,CLOSE,1.8,0),COLOR338888;
STICKLINE(gspt15,OPEN,CLOSE,1.2,0),COLOR33AAAA;
STICKLINE(gspt15,OPEN,CLOSE,0.6,0),COLOR33CCCC;
STICKLINE(gspt15,OPEN,CLOSE,0.1,0),COLOR33EEEE;
STICKLINE(gspt16,C,O,2.5,0),COLOR009900;
STICKLINE(gspt16,C,O,1.5,0),COLOR00BB00;
STICKLINE(gspt16,C,O,0.8,0),COLOR00DD00;
STICKLINE(gspt16,C,O,0.1,0),COLOR00FF00;
起飞加速线:HHV(gspt20,60)DOTLINE,COLORLIRED;
gspt23:=CROSS(84,gspt22) AND 起飞加速线=REF(起飞加速线,1) AND C<REF(L,1);
gspt24:=CROSS(gspt19,gspt18) AND C<起飞加速线 AND C<REF(L,1);
gspt25:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1) -SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1) ,3,1),2,1);
gspt26:=78.89;
gspt27:=gspt18<REF(gspt18,1) AND gspt19>REF(gspt19,1);
gspt28:=1230923;
gspt29:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
gspt30:=FILTER(gspt29,10);
gspt31:=BARSLAST(gspt30);
gspt32:=REF(HIGH,gspt31+2);
gspt33:=REF(HIGH,gspt31+1);
gspt34:=REF(HIGH,gspt31);
gspt35:=MAX(gspt32,gspt33);
gspt36:=MAX(gspt35,gspt34);
gspt37:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
gspt38:=gspt31<150;
gspt39:=(OPEN-gspt36)/gspt36*100<30;
gspt40:=(CLOSE-LLV(LOW,gspt31))/LLV(LOW,gspt31)*100<50;
gspt41:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100<30;
gspt42:=VOL/MA(VOL,5)<3.5;
gspt43:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100<80;
gspt44:=gspt37 AND gspt38 AND gspt39 AND gspt40 AND gspt41 AND gspt42 AND gspt43;
gspt45:=FILTER(gspt44,15);
gspt46:=MA(CLOSE,10);
gspt47:=MA(CLOSE,54);
gspt48:=(((CLOSE-gspt47)/gspt47)<0.1);
gspt49:=(((CLOSE-gspt46)/gspt46)<0.3);
gspt50:=(((gspt48=1) AND (gspt49=1))*0.2);
gspt51:=((((gspt50=0) AND (REF(gspt50,1)=0.2)) AND (REF((COUNT((gspt50=0.2),10)=10),1)=1))*-0.1);
DRAWTEXT_FIX(1,0.980,20,1,'分析家公式网http://www.70822.com'),COLOR333333;
gspt52:=gspt51=-0.1;
gspt53:=gspt45 OR gspt52;
gspt54:=DYNAINFO(7)/(REF(CLOSE,1))>1.05 AND (DYNAINFO(7)/O>1.05);
gspt55:=(VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
gspt56 :=gspt53 AND gspt15 AND gspt55 AND gspt54,NODRAW;
DRAWTEXT(CROSS(gspt26,gspt25) AND C<起飞加速线 AND CROSS(gspt19,gspt18),H*1.06,'↙⊙逃顶'),COLORLIBLUE;
STICKLINE(gspt27 AND (gspt23 OR gspt24),C,O,2.5,0),COLORFF2200;
STICKLINE(gspt27 AND (gspt23 OR gspt24),C,O,1.5,0),COLORFF4400;
STICKLINE(gspt27 AND (gspt23 OR gspt24),C,O,0.8,0),COLORFF6600;
STICKLINE(gspt27 AND (gspt23 OR gspt24),C,O,0.1,0),COLORFF8800;
STICKLINE(gspt27 AND (gspt23 OR gspt24),C,O,0.5,0),COLORFFAA00;
IF(寻牛线>=REF(上箱顶,1),寻牛线,DRAWNULL),COLORRED,LINETHICK3;
IF(寻牛线<=REF(上箱顶,1),寻牛线,DRAWNULL),COLORGREEN,LINETHICK3;
IF(牵牛线>=REF(下箱底,1),牵牛线,DRAWNULL),COLORWHITE;
IF(牵牛线>=REF(上箱顶,1),牵牛线,DRAWNULL),COLORWHITE,LINETHICK2;
IF(牵牛线<=REF(下箱底,1),牵牛线,DRAWNULL)DOTLINE,COLORWHITE;
STICKLINE(CROSS(牵牛线,上箱顶) AND CROSS(C,上箱顶),OPEN,CLOSE,2,0),COLOR66EEEE;
STICKLINE(CROSS(牵牛线,上箱顶) AND CROSS(C,上箱顶),OPEN,CLOSE,1,0),COLORMAGENTA;
STICKLINE(CROSS(牵牛线,上箱顶) AND CROSS(C,上箱顶),OPEN,CLOSE,0,1),COLOR8B8BFF;
DRAWTEXT(CROSS(牵牛线,下箱底),下箱底,'↖抄底反弹'),COLORRED;
今涨停:IF(DATE<gspt28,ZTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;
今跌停:IF(DATE<gspt28,DTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORGREEN;
明涨停:IF(DATE<gspt28,C*IF(CODELIKE('688'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(IF(CODELIKE('688') OR CODELIKE('300'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)))),NODRAW,COLORMAGENTA;
明跌停:IF(DATE<gspt28,C*IF(CODELIKE('688'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(IF(CODELIKE('688') OR CODELIKE('300'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)))),NODRAW,COLORFFFF00;
DRAWICON(gspt56,LOW*0.99,7);
DRAWICON(CROSS(C,上箱顶) AND CROSS(C,起飞加速线)AND C>REF(C,1)*1.05,LOW*0.99,25);
