DRAWGBK((CLOSE > 0),COLORRGB(0,0,88),COLORRGB(0,0,55),1);
input:M(10,1,100),N(3,0.1,20);
BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:BBI+N*STD(BBI,M),COLORRED;;
DWN:BBI-N*STD(BBI,M),Color6D0076;
DRAWICON(BBI<REF(BBI,1) AND ISLASTBAR,BBI,5),SHIFT1,ALIGN2;
DRAWICON(BBI>REF(BBI,1) AND ISLASTBAR,BBI,4),SHIFT1,,ALIGN1;
DRAWICON(UPR<REF(UPR,1) AND ISLASTBAR,UPR,5),SHIFT1,,ALIGN2;
DRAWICON(UPR>REF(UPR,1) AND ISLASTBAR,UPR,4),SHIFT1,,ALIGN1;
DRAWICON(DWN>REF(DWN,1) AND ISLASTBAR,DWN,4),SHIFT1,,ALIGN1;
DRAWICON(DWN<REF(DWN,1) AND ISLASTBAR,DWN,5),SHIFT1,,ALIGN2;
FILLRGN(UPR,BBI),COLORGRAY;
FILLRGN(BBI,DWN),Color6D0076;

DRAWTEXT(FILTER(refx(ISLASTBAR,20),1000),c,'    黄s:带量\n    灰色:放量\n    蓝色:活跃\n    绿色:地量\n    红色:温和'),align4,COLORYELLOW;

DRAWTEXTEX(1,0,40,3,'《狂野之城系统之主图KDJ终极版》:■量能分析■'),COLORYELLOW;

N1v:=SYSPARAM(3);
Nv:=((N1v - SYSPARAM(2)) + 1);
HH:=HHV(HIGH,Nv);
LL:=LLV(LOW,Nv);
最高:HH[N1v],colorFF;
最低:LL[N1v],colorFF;

var2:=REF(LOW,1);
Var3:=SMA(ABS(LOW-Var2),13,1)/SMA(MAX(LOW-Var2,0),13,1)*100;
Var4:=EMA(IF(CLOSE*1.2,Var3*13,Var3/13),13);
Var5:=LLV(LOW,34);
Var6:=HHV(Var4,34);
Var7:=IF(LLV(LOW,56),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=EMA(CLOSE,5);
Var10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(10);
Var11:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7*(-1);
Var12:=EMA(CLOSE,5)*(-1);
STICKLINE(Var12<REF(Var12,1),最低,最低*0.97,8,0),COLORGREEN;

(最低 + ((最高 - 最低) * 0.191))POINTDOT,;
(最低 + ((最高 - 最低) * 0.382)),POINTDOT,;
(最低 + ((最高 - 最低) * 0.5)),POINTDOT,colorFF00FF;
(最低 + ((最高 - 最低) * 0.618)),POINTDOT,;
(最低 + ((最高 - 最低) * 0.809)),POINTDOT,;
DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF(最低,BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'000%↑'),colorFFFF;
DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.191)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'19.1%↑'),colorFFFF;
DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.382)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'38.2%↑'),colorFFFF;
DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.5)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'50%↑'),colorFFFF;
DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.618)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'61.8%↑'),colorFFFF;
DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 0.809)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'80.9%↑'),colorFFFF;
DRAWTEXT((BARSCOUNT(CLOSE) = SYSPARAM(2)),REF((最低 + ((最高 - 最低) * 1)),BARSLAST((BARSCOUNT(CLOSE) = SYSPARAM(2)))),'99.99%↑'),colorFFFF;

RSV1:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*2;
RSV2:=(RSV1-0.5)/5*EMA(C,20);
RSVK:=SMA(RSV2,5,1);
RSVD:=SMA(RSVK,5,1);
RSVJ:=RSVK*3-RSVD*2;
Kv:RSVK+EMA(C,20),COLORGREEN;
Dv:RSVD+EMA(C,20),COLORWHITE;
Jv:RSVJ+EMA(C,20),COLORRED,LINETHICK1;
PARTLINE(Jv>=REF(Jv,1) AND Kv<REF(Kv,1),Jv),Color00C500,LINETHICK3;
PARTLINE(Jv<REF(Jv,1) AND Kv>REF(Kv,1),Jv),COLORYELLOW,LINETHICK3;
PARTLINE(Jv>=REF(Jv,1) AND Kv>REF(Kv,1),Jv),COLORRED,LINETHICK3;
PARTLINE(Jv<REF(Jv,1) AND Kv<REF(Kv,1),Jv),COLORBLUE,LINETHICK3;

工作线:(EMA(C,15)) ,linethick0,colorYellow;
短线:1.01*FORCAST(C,5),COLORRED,LINETHICK0;

STICKLINE(((C >= 工作线) AND (C >= O)),H,L,0.5,0),COLOR77ffee;
STICKLINE(((C >= 工作线) AND (C <= O)),H,L,0.5,0),COLOR77ffee;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,7,0),COLOR1199aa;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,6,0),COLOR22aabb;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,5,0),COLOR33bbcc;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,4,0),COLOR44ccdd;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,3,0),COLOR55ddee;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,2,0),COLOR66eeee;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,1,0),COLOR77ffee;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,7,0),COLOR1199aa;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,6,0),COLOR22aabb;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,5,0),COLOR33bbcc;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,4,0),COLOR44ccdd;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,3,0),COLOR55ddee;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,2,0),COLOR66eeee;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,1,0),COLOR77ffee;
STICKLINE(((C < 工作线) AND (C >= O)),H,L,0.5,0),COLORffff33;
STICKLINE(((C < 工作线) AND (C <= O)),H,L,0.5,0),COLORffff33;
STICKLINE(((C < 工作线) AND (C >= O)),C,O,7,0),COLORff9900;
STICKLINE(((C < 工作线) AND (C >= O)),C,O,6,0),COLORffaa11;
STICKLINE(((C < 工作线) AND (C >= O)),C,O,5,0),COLORffbb11;
STICKLINE(((C < 工作线) AND (C >= O)),C,O,4,0),COLORffcc22;
STICKLINE(((C < 工作线) AND (C >= O)),C,O,3,0),COLORffdd22;
STICKLINE(((C < 工作线) AND (C >= O)),C,O,2,0),COLORffee33;
STICKLINE(((C < 工作线) AND (C >= O)),C,O,1,0),COLORffff33;
STICKLINE(((C < 工作线) AND (C <= O)),C,O,7,0),COLORff9900;
STICKLINE(((C < 工作线) AND (C <= O)),C,O,6,0),COLORffaa11;
STICKLINE(((C < 工作线) AND (C <= O)),C,O,5,0),COLORffbb11;
STICKLINE(((C < 工作线) AND (C <= O)),C,O,4,0),COLORffcc22;
STICKLINE(((C < 工作线) AND (C <= O)),C,O,3,0),COLORffdd22;
STICKLINE(((C < 工作线) AND (C <= O)),C,O,2,0),COLORffee33;
STICKLINE(((C < 工作线) AND (C <= O)),C,O,1,0),COLORffff33;

{不喜欢主图上加成交量的，可把下面的去掉}
a0:=BARSCOUNT(c);
a3:=SYSPARAM(3);
a2:=SYSPARAM(2);
a4:=SYSPARAM(4);
a5:=SYSPARAM(5);
nn0:=a3-a2;
nn:=a0-a2;
hh1:=(a4-a5)/10;
y0:=a0>=a2;
vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
hhx:=SYSPARAM(4);
llx:=SYSPARAM(5);
x:=llx-(hhx-llx+MINDIFF)/5;
y:=(HHV(VOL,SYSPARAM(3)-SYSPARAM(2)+1))*1;
yvb:=y[SYSPARAM(3)]/(llx-x+MINDIFF);
z:=VOL/yvb+x;
var1:=vol/CAPITAl*100;
换手率:=var1,POINTDOT,Color0000A8;
var2:=var1>1;
var3:=var1<2;
var4:=var1>2;
var5:=var1<3;
var6:=var1>=3;
var7:=var1<5;
var8:=var1>=5;
var9:=var1<8;
var10:=var1>=8;
var11:=var1<15;
var12:=var1>=15;
var13:=var1<25;
var14:=var1>=25;
地量:STICKLINE(vol/CAPITAl*100<1 ,x,z,8,0),Color00aa00;
STICKLINE(vol/CAPITAl*100<1 ,x,z,6.6,0),Color00bb00;
STICKLINE(vol/CAPITAl*100<1 ,x,z,4.4,0),Color00cc00;
STICKLINE(vol/CAPITAl*100<1 ,x,z,3.3,0),Color00dd00;
STICKLINE(vol/CAPITAl*100<1 ,x,z,2.2,0),Color00ee00;
STICKLINE(vol/CAPITAl*100<1 ,x,z,1.1,0),Color00ff00;
低靡:STICKLINE(var2 and var3 ,x,z,8,0 ),COLOraa00bb;
STICKLINE(var2 and var3 ,x,z,6.6 ,0 ),COLORbb11bb;
STICKLINE(var2 and var3 ,x,z,4.4,0 ),COLOrcc22bb;
STICKLINE(var2 and var3 ,x,z,3.3,0 ),COLORdd33bb;
STICKLINE(var2 and var3 ,x,z,2.2 ,0 ),COLORee44bb;
STICKLINE(var2 and var3 ,x,z,1.1 ,0 ),COLORff55bb;
温和:STICKLINE(var4 and var5,x,z,8,0),COLOR0000AA;
STICKLINE(var4 and var5,
[url=http://www.70822.com/soft/sort013/sort02/down-4105.html]《狂野之城系统之主图KDJ终极版》:■量能分析[/url]