
S1:=IF(CODELIKE('688'),0,1) OR IF(CODELIKE('82'),0,1)OR IF(CODELIKE('830'),0,1) OR IF(CODELIKE('831'),0,1)
OR IF(CODELIKE('832'),0,1) OR IF(CODELIKE('833'),0,1)
OR IF(CODELIKE('834'),0,1) OR IF(CODELIKE('835'),0,1)
OR IF(CODELIKE('836'),0,1) OR IF(CODELIKE('837'),0,1)
OR IF(CODELIKE('838'),0,1) OR IF(CODELIKE('839'),0,1)
OR IF(CODELIKE('870'),0,1) OR IF(CODELIKE('871'),0,1)
OR IF(CODELIKE('872'),0,1) OR IF(CODELIKE('873'),0,1);
S2:=IF(NAMELIKE('S'),0,1);
S3:=IF(NAMELIKE('*'),0,1);
S4:=DYNAINFO(17)
去掉:=S1 AND (S2 AND S3 AND S4 AND CAPITAL/1000000 30 AND INBLOCK('融资融券')=0);
TYP:=(HIGH+LOW+CLOSE)/3; {最高价、最低价、收盘价之平均数}
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),COLORRED,LINETHICK3;
{(TYP-TYP的14日移动平均)/0.015* TYP的14日平均绝对误差}
ZCCI:=(TYP-MA(TYP,70))/(0.015*AVEDEV(TYP,70)),COLORYELLOW,LINETHICK3;
{DRAWBAND(CCI,RGB(155,0,0),ZCCI,RGB(0,0,155));}
{(TYP-TYP的70日移动平均)/0.015* TYP的70日平均绝对误差}
YCCI:=(TYP-MA(TYP,308))/(0.015*AVEDEV(TYP,308)),COLOR004000,LINETHICK3;
{DRAWBAND(ZCCI,RGB(155,55,0),YCCI,RGB(0,55,155));}
{(TYP-TYP的308日移动平均)/0.015* TYP的308日平均绝对误差}
CCI底线:=IF(YCCI IF(CCI ZCCI,ZCCI,CCI),YCCI,IF(CCI ZCCI,ZCCI,CCI)),COLORMAGENTA;
{DRAWBAND(ZCCI,RGB(150,0,0),200,RGB(0,0,150));
DRAWBAND(YCCI,RGB(200,0,0),200,RGB(0,0,200));
DRAWBAND(CCI,RGB(50,0,0),100,RGB(0,0,50));
STICKLINE(CCI底线 100,60,100,3,0),COLOR000099;
STICKLINE(CCI底线 100,60,100,2.2,0),COLOR0000CC;
STICKLINE(CCI底线 100,60,100,1.5,0),COLORRED;
STICKLINE(CCI底线 100,60,100,0.5,0),COLORCC66FF;
STICKLINE(CCI底线 100,60,100,0.5,0),COLORYELLOW;}
N0:=5;N1:=13;N2:=34;N3:=89;{爱股网 WWW.72GU.COM}
WR250:=100*(HHV(HIGH,250)-CLOSE)/(HHV(HIGH,250)-LLV(LOW,250)),COLORFFFF00,LINETHICK3;
WR60:=100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),COLORGREEN;
WR89:=100*(HHV(HIGH,89)-CLOSE)/(HHV(HIGH,89)-LLV(LOW,89)),COLORGREEN;
WR10:=100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10)),COLORRED;
WR20:=100*(HHV(HIGH,20)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,20)),COLORYELLOW;
WR5:=100*(HHV(HIGH,N0)-CLOSE)/(HHV(HIGH,N0)-LLV(LOW,N0)),COLORWHITE;
{DRAWBAND(WR10,RGB(0,22,222),WR89,RGB(222,22,2));
DRAWBAND(WR5,RGB(0,11,111),60,RGB(111,11,1));
DRAWBAND(20,RGB(255,155,0),WR5,RGB(0,155,255));
DRAWBAND(20,RGB(255,255,0),WR60,RGB(0,255,255));
DRAWBAND(WR60,RGB(0,60,120),WR250,RGB(120,60,0));
DRAWBAND(WR5,RGB(0,100,100),WR20,RGB(150,150,0));}
V1:=IF(C/REF(C,1) 1.094 AND C=H AND C=O,HHV(V,20),V);
LWR4:=-100*(HHV(V1,250)-V1)/(HHV(V1,250)-LLV(V1,250)),COLORFFFF00;
LWR3:=-100*(HHV(V1,60)-V1)/(HHV(V1,60)-LLV(V1,60)),COLORGREEN;
LWR1:=-100*(HHV(V1,10)-V1)/(HHV(V1,10)-LLV(V1,10)),COLORYELLOW;
LWR2:=-100*(HHV(V1,20)-V1)/(HHV(V1,20)-LLV(V1,20)),COLORMAGENTA;
LWR0:=-100*(HHV(V1,5)-V1)/(HHV(V1,5)-LLV(V1,5)),COLORRED;
{DRAWBAND(LWR1,RGB(222,22,2),LWR3,RGB(2,22,222));
DRAWBAND(LWR3,RGB(222,222,1),-20,RGB(1,222,222));
DRAWBAND(LWR0,RGB(155,55,5),LWR2,RGB(5,55,155));}
启动:=LWR0 -20 AND WR5 20 AND CCI
除此:=((WR60 =REF(WR60,1) OR WR250 =REF(WR250,1)) AND WR5
进:=WR60 80 AND WR5 WR60 AND LWR0 =REF(LWR0,1) AND ((CROSS(WR20,WR5) AND WR20 REF(WR20,1)) OR (CROSS(WR60,WR5) AND WR60 REF(WR60,1))
OR CROSS(WR250,WR5) AND WR250 REF(WR250,1)) OR (CROSS(20,WR20) AND WR20 REF(WR20,1));
{STICKLINE(进,240,220,0,0),COLOR0022FF;
STICKLINE(进,240,220,3.2,0),COLOR002288;
STICKLINE(进,240,220,2.6,0),COLOR0033AA;
STICKLINE(进,240,220,1.9,0),COLOR0044CC;
STICKLINE(进,240,220,1.2,0),COLOR0055EE;
STICKLINE(进,240,220,0.6,0),COLOR0077FF;
STICKLINE(进,240,220,0.3,0),COLOR0088FF;}
预备跑:=WR60 20 AND (WR60 REF(WR60,1) OR WR250 REF(WR250,1)) AND ((CROSS(WR5,20) AND LWR0 =REF(LWR0,1)) OR CROSS(WR5,WR20) OR CROSS(WR20,20)
OR CROSS(WR5,WR60) OR CROSS(WR5,WR250)) ;
{STICKLINE(预备跑,240,220,0,0),COLOR00FF00;
STICKLINE(预备跑,240,220,3,0),COLOR009900;
STICKLINE(预备跑,240,220,2,0),COLOR00BB00;
STICKLINE(预备跑,240,220,1,0),COLOR00DD00;
STICKLINE(预备跑,240,220,0.3,0),COLOR00FF00;}
出逃:=( WR5 REF(WR5,1) AND WR60 REF(WR60,1) AND WR250 REF(WR250,1) AND WR5 WR60 AND WR60 WR250 AND REF(WR5,1) 20) OR (WR60 20 AND (WR60 REF(WR60,1) OR WR250 REF(WR250,1)) AND ((LWR0 REF(LWR0,1) AND REF(LWR0,1) REF(LWR0,2) AND CROSS(WR5,20)) OR (LWR0 =REF(LWR0,1) AND (WR5 20 AND WR5 REF(WR5,1) OR CROSS(WR5,WR20) OR CROSS(WR5,WR60)
OR CROSS(WR5,WR250)))));
{STICKLINE(出逃,240,220,0,1),COLORFF8800;
STICKLINE(出逃,240,220,3.2,0),COLORFF2200;
STICKLINE(出逃,240,220,2.6,0),COLORFF4400;
STICKLINE(出逃,240,220,1.9,0),COLORFF6600;
STICKLINE(出逃,240,220,1.1,0),COLORFF8800;
STICKLINE(出逃,240,220,0.3,0),COLORFFAA00;}
{DRAWTEXT(启动 AND COUNT(启动,10)=1,200,'★'),COLORYELLOW;
DRAWTEXT(启动 AND COUNT(启动,10)=1,210,'★'),COLORRED;
DRAWTEXT(启动 AND COUNT(启动,10)=1,220,'★'),COLORMAGENTA;
DRAWICON(启动 AND COUNT(启动,10)=1,230,25);}
(CROSS(ZCCI,200) OR CROSS(YCCI,200) OR 启动) AND 去掉;