DRAWGBK(CLOSE>1,RGB(0,0,0),RGB(220,20,60),0,0,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(YCCIZCCI,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;
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)),DOTLINE,COLORGREEN;
WR10:=100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10)),DOTLINE,COLORRED;
WR20:=100*(HHV(HIGH,20)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,20)),DOTLINE,COLORYELLOW;
WR5:=100*(HHV(HIGH,N0)-CLOSE)/(HHV(HIGH,N0)-LLV(LOW,N0)),DOTLINE,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)),DOTLINE,COLORFFFF00;
LWR3:-100*(HHV(V1,60)-V1)/(HHV(V1,60)-LLV(V1,60)),DOTLINE,COLORGREEN;
LWR1:-100*(HHV(V1,10)-V1)/(HHV(V1,10)-LLV(V1,10)),DOTLINE,COLORYELLOW;
LWR2:-100*(HHV(V1,20)-V1)/(HHV(V1,20)-LLV(V1,20)),DOTLINE,COLORMAGENTA;
LWR0:-100*(HHV(V1,5)-V1)/(HHV(V1,5)-LLV(V1,5)),DOTLINE,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>100;
除此:=((WR60<=REF(WR60,1) OR WR250<=REF(WR250,1)) AND WR5<20);
进:=WR60<80 AND WR5=REF(LWR0,1) AND ((CROSS(WR20,WR5) AND WR20
OR CROSS(WR250,WR5) AND WR250
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 ((LWR0REF(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;
小浪底:=CROSS(20,WR5) AND CROSS(LWR0,-20);
STICKLINE(小浪底,240,260,3,0),COLOR000099;
STICKLINE(小浪底,240,260,2.2,0),COLOR0000CC;
STICKLINE(小浪底,240,260,1.5,0),COLORRED;
STICKLINE(小浪底,240,260,0.5,0),COLORCC66FF;
STICKLINE(小浪底,240,260,0.5,0),COLORYELLOW;
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);
{CCI,COLORRED,LINETHICK6;
（TYP-TYP的14日移动平均）/0.015* TYP的14日平均绝对误差}
{ZCCI,COLORYELLOW,LINETHICK6;
DRAWBAND(CCI,RGB(155,0,0),ZCCI,RGB(0,0,155));}
{（TYP-TYP的70日移动平均）/0.015* TYP的70日平均绝对误差
YCCI,COLORGREEN,LINETHICK6;}
0,DOTLINE; {画一条0线，虚线}
LWR4,DOTLINE,COLORBLUE;
LWR3,DOTLINE,COLORGREEN;
LWR1,DOTLINE,COLORRED;
LWR2,DOTLINE,COLORYELLOW;
LWR0,DOTLINE,COLORWHITE;
{WR1:(C-LLV(L,N1))/(HHV(H,N1)-LLV(L,N1))*100,DOTLINE,COLORRED;
WR2:(C-LLV(L,N2))/(HHV(H,N2)-LLV(L,N2))*100,
WR3:(C-LLV(L,N3))/(HHV(H,N3)-LLV(L,N3))*100,DOTLINE,COLORGREEN;}
-20,COLORWHITE;
20,COLORWHITE;
0,LINETHICK3,COLORRED;
60,COLORYELLOW;
100,COLORGREEN,LINETHICK3;
-100,COLORWHITE,LINETHICK3;
200,COLORMAGENTA,LINETHICK3;
WR60,COLORFF0080,LINETHICK3;
WR250,COLOR000040,LINETHICK3;
DRAWTEXT(ISLASTBAR,WR60,'★价60'),COLORFF0080;
DRAWTEXT(ISLASTBAR,WR250,'★价250'),COLOR000040;
DRAWTEXT(ISLASTBAR,-20,'★量能区(0-负100'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,20,'★价格区(0-100'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,100,'★走强区(200-100'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,200,'★牛妖区(200以上'),COLORMAGENTA;
STICKLINE(WR60<20 AND LWR3>-20,-100,-120,3.5,0),COLOR008888;
STICKLINE(WR60<20 AND LWR3>-20,-100,-120,1,0),COLORWHITE;
STICKLINE(WR60<20 AND LWR3>-20,-100,-120,3.5,0),COLOR008888;
STICKLINE(WR60<20 AND LWR3>-20,-100,-120,1.6,0),COLOR00AAAA;
STICKLINE(WR60<20 AND LWR3>-20,-100,-120,0.8,0),COLOR00CCCC;
STICKLINE(WR60<20 AND LWR3>-20,-100,-120,0.2,0),COLOR00FFFF;
MA5:=MA(C,5);
MA20:=MA(C,20);
A51:= REF(MA5,1)*0.98;
A52:= REF(MA5,2)*0.98;
B52:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)
B51:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)
DZ:=IF((REF(C,2)>=REF(MA5,2)) AND (REF(C,1)=REF(MA5,2) AND REF(C,1)0,IF(REF(MA5, B52)< REF(MA5, B51),REF(MA5,B51)*0.98, REF(MA5,B52)*0.98), REF(MA5,1)));
A201:= REF(MA20,1)*0.98;
A202:= REF(MA20,2)*0.98;
B202:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)
B201:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)
ZZ:=IF((REF(C,2)>=REF(MA20,2)) AND (REF(C,1)=REF(MA20,2) AND REF(C,1)0,IF(REF(MA20, B202)< REF(MA20, B201),REF(MA20,B201)*0.98, REF(MA20,B202)*0.98), REF(MA20,1)));
短止:=DZ,COLORWHITE,LINETHICK2;
紫线:=ZZ,COLORMAGENTA;
绿线:=LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORGREEN;
黄线:=MA(CLOSE,25)+MA(CLOSE,25)*6/100,COLORYELLOW,LINETHICK2;
白轨:=MA(CLOSE,25)+MA(CLOSE,25)*20/100,COLORWHITE;
影子线:=MA(CLOSE,25)+MA(CLOSE,25)*13/100,COLORGRAY;
AZZ:=LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORGREEN;
DRAWICON(REF(C,1)=DZ AND C>AZZ ,LOW*0.99,1);
DRAWICON(REF(C,1)=AZZ,LOW*0.99,1);
AXX:=((((MA(C,10) > MA(C,25)) && CROSS(C,MA(C,5))) && (V > MA(V,10))) && (MA(C,10) > REF(MA(C,10),1)));
ASS:=C>=黄线 AND AXX ;
角度黄线:=ATAN((黄线/REF(黄线,1)-1)*100)*180/3.1416,NODRAW;
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
NT:=12;
DG:=1.2;
YLX:=0;
ZCX:=0;
A1:=REF(C,NT)=HHV(C,2*NT+1); B1:=FILTER(A1,NT);
A2:=REF(C,NT)=LLV(C,2*NT+1); B2:=FILTER(A2,NT);
{DRAWTEXT_FIX(C>O,0.01,0.41,0,'更多精彩指标公式，请关注微信公众号：短线指标公式'),COLORYELLOW;}
获利比例:=WINNER(C)*100,NODRAW,COLORRED;
DRAWTEXT_FIX(1,0.5,0.12,0,STRCAT(STRCAT('获利比例 ',CON2STR(获利比例,0)),' %')),COLORRED;
板块排序:=HORCALC('板块指数',105,1,0),NODRAW,COLORRED;
DRAWTEXT_FIX(1,0.5,0.16,0,STRCAT(STRCAT('板块排序第 ',CON2STR(板块排序,0)),'名')),COLORRED;
BIAS:=(O-黄线)/黄线*100,NODRAW,COLORRED;
倍量:=(V/REF(V,1)>=1.90 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND V/REF(V,1)>=1.90);
{板块排名}
TAX:=HORCALC(HYBLOCK,105,1,DRAWNULL);
TAA:=STRCAT(HYBLOCK,' 排名 ：');
DRAWTEXT_FIX(ISLASTBAR,0.70,0.005,0,STRCAT(TAA,CON2STR(TAX,0)));
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
{倍量柱}
冠军:=HORCALC(HYBLOCK,105,1,DRAWNULL)=1,NODRAW,COLORRED;
DRAWTEXT_FIX(1,0.2,0.16,0,STRCAT(STRCAT('个股排序第',CON2STR(冠军,0)),' 名')),COLORRED;
亚军:=HORCALC(HYBLOCK,105,1,DRAWNULL)=2,NODRAW,COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.16,0,STRCAT(STRCAT('个股排序第 ',CON2STR(亚军,0)),' 名')),COLORYELLOW;
季军:=HORCALC(HYBLOCK,105,1,DRAWNULL)=3,NODRAW,COLORWHITE;
DRAWTEXT_FIX(1,0.2,0.16,0,STRCAT(STRCAT('个股排序第 ',CON2STR(季军,0)),' 名')),COLORWHITE;
