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, |
