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,' 黄色:带量\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)))),'100%↑'),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,x,z,6.6,0),COLOR0000bb;
STICKLINE(var4 and var5,x,z,4.4,0),COLOR0000cc;
STICKLINE(var4 and var5,x,z,3.3,0),COLOR0000dd;
STICKLINE(var4 and var5,x,z,2.2,0),COLOR0000ee;
STICKLINE(var4 and var5,x,z,1.1,0),COLOR0000ff;
活跃:STICKLINE(var6 and var7,x,z,8,0),COLORFFaa00;
STICKLINE(var6 and var7,x,z,6.6,0),COLORFFbb00;
STICKLINE(var6 and var7,x,z,4.4,0),COLORFFcc00;
STICKLINE(var6 and var7,x,z,3.3,0),COLORFFdd00;
STICKLINE(var6 and var7,x,z,2.2,0),COLORFFee00;
STICKLINE(var6 and var7,x,z,1.1,0),COLORFFff00;
带量:STICKLINE(var8 and var9,x,z,8 ,0 ),COLOR00aaff;
STICKLINE(var8 and var9,x,z,6.6 ,0 ),COLOR00bbff;
STICKLINE(var8 and var9,x,z,4.4,0 ),COLOR00ccff;
STICKLINE(var8 and var9,x,z,3.3 ,0 ),COLOR00ddff;
STICKLINE(var8 and var9,x,z,2.2 ,0 ),COLOR00eeff;
STICKLINE(var8 and var9,x,z,1.1 ,0 ),COLOR00ffff;
放量:STICKLINE(var10 and var11,x,z, 8,0 ),coloraaaaCC;
STICKLINE(var10 and var11,x,z, 6.6,0 ),colorbbbbCC;
STICKLINE(var10 and var11,x,z, 4.4,0 ),colorccccCC;
STICKLINE(var10 and var11,x,z, 3.3,0 ),colorddddCC;
STICKLINE(var10 and var11,x,z, 2.2,0 ),coloreeeeCC;
STICKLINE(var10 and var11,x,z, 1.1,0 ),colorFFffCC;
巨量:STICKLINE(var12 and var13,x,z, 8,0 ),color66aa33;
STICKLINE(var12 and var13,x,z,6.6,0 ),color66bb33;
STICKLINE(var12 and var13,x,z, 4.4,0 ),color66cc33;
STICKLINE(var12 and var13,x,z, 3.3,0 ),color66dd33;
STICKLINE(var12 and var13,x,z, 2.2,0 ),color66ee33;
STICKLINE(var12 and var13,x,z, 1.1,0 ),color66ff33;
怪异:STICKLINE(var14,x,z, 8,0 ),coloraa66FF;
STICKLINE(var14,x,z, 6.6,0 ),colorbb66FF;
STICKLINE(var14,x,z, 4.4,0 ),colorcc66FF;
STICKLINE(var14,x,z, 3.3,0 ),colordd66FF;
STICKLINE(var14,x,z, 2.2,0 ),coloree66FF;
STICKLINE(var14,x,z, 1.1,0 ),colorff66FF;
五日:MA(z,5),COLORWHITE;
十日:MA(z,10),COLORMAGENTA;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
