{★移动筹码}
DRAWGBK(C,COLORRGB(90,10,10),COLORRGB(90,10,10),0);
nn0:=SYSPARAM(3)-SYSPARAM(2);
nn:=BARSCOUNT(c)-SYSPARAM(2);
hh1:=(SYSPARAM(4)-SYSPARAM(5))/10;
y0:=BARSCOUNT(c)>=SYSPARAM(2);
vv0:=if(y0=1 and SYSPARAM(1)>=BARSCOUNT(c),v,0);
c1:=if(BETWEEN(c,SYSPARAM(4)-0*hh1,SYSPARAM(4)-0.5*hh1),vv0,0);
c2:=if(BETWEEN(c,SYSPARAM(4)-0.5*hh1,SYSPARAM(4)-1*hh1),vv0,0);
c3:=if(BETWEEN(c,SYSPARAM(4)-1*hh1,SYSPARAM(4)-1.5*hh1),vv0,0);
c4:=if(BETWEEN(c,SYSPARAM(4)-1.5*hh1,SYSPARAM(4)-2*hh1),vv0,0);
c5:=if(BETWEEN(c,SYSPARAM(4)-2*hh1,SYSPARAM(4)-2.5*hh1),vv0,0);
c6:=if(BETWEEN(c,SYSPARAM(4)-2.5*hh1,SYSPARAM(4)-3*hh1),vv0,0);
c7:=if(BETWEEN(c,SYSPARAM(4)-3*hh1,SYSPARAM(4)-3.5*hh1),vv0,0);
c8:=if(BETWEEN(c,SYSPARAM(4)-3.5*hh1,SYSPARAM(4)-4*hh1),vv0,0);
c9:=if(BETWEEN(c,SYSPARAM(4)-4*hh1,SYSPARAM(4)-4.5*hh1),vv0,0);
c10:=if(BETWEEN(c,SYSPARAM(4)-4.5*hh1,SYSPARAM(4)-5*hh1),vv0,0);
c11:=if(BETWEEN(c,SYSPARAM(4)-5*hh1,SYSPARAM(4)-5.5*hh1),vv0,0);
c12:=if(BETWEEN(c,SYSPARAM(4)-5.5*hh1,SYSPARAM(4)-6*hh1),vv0,0);
c13:=if(BETWEEN(c,SYSPARAM(4)-6*hh1,SYSPARAM(4)-6.5*hh1),vv0,0);
c14:=if(BETWEEN(c,SYSPARAM(4)-6.5*hh1,SYSPARAM(4)-7*hh1),vv0,0);
c15:=if(BETWEEN(c,SYSPARAM(4)-7*hh1,SYSPARAM(4)-7.5*hh1),vv0,0);
c16:=if(BETWEEN(c,SYSPARAM(4)-7.5*hh1,SYSPARAM(4)-8*hh1),vv0,0);
c17:=if(BETWEEN(c,SYSPARAM(4)-8*hh1,SYSPARAM(4)-8.5*hh1),vv0,0);
c18:=if(BETWEEN(c,SYSPARAM(4)-8.5*hh1,SYSPARAM(4)-9*hh1),vv0,0);
c19:=if(BETWEEN(c,SYSPARAM(4)-9*hh1,SYSPARAM(4)-9.5*hh1),vv0,0);
c20:=if(BETWEEN(c,SYSPARAM(4)-9.5*hh1,SYSPARAM(4)-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
v11:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c11,nn0),0),2));
v12:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c12,nn0),0),2));
v13:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c13,nn0),0),2));
v14:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c14,nn0),0),2));
v15:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c15,nn0),0),2));
v16:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c16,nn0),0),2));
v17:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c17,nn0),0),2));
v18:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c18,nn0),0),2));
v19:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c19,nn0),0),2));
v20:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c20,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,max(v10,max(V11,max(V12,max(V13,max(V14,max(V15,max(V16,max(V17,max(V18,max(V19,V20)))))))))))))))))));
FILLRGN(v1/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-0*hh1,SYSPARAM(4)-0.5*hh1+0.05),ColorF16085;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-0.5*hh1,SYSPARAM(4)-1*hh1+0.05),Color008591;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-1*hh1,SYSPARAM(4)-1.5*hh1+0.05),ColorF16085;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-1.5*hh1,SYSPARAM(4)-2*hh1+0.05),Color008591;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-2*hh1,SYSPARAM(4)-2.5*hh1+0.05),ColorF16085;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-2.5*hh1,SYSPARAM(4)-3*hh1+0.05),Color008591;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-3*hh1,SYSPARAM(4)-3.5*hh1+0.05),ColorF16085;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-3.5*hh1,SYSPARAM(4)-4*hh1+0.05),Color008591;
FILLRGN(v9/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-4*hh1,SYSPARAM(4)-4.5*hh1+0.05),ColorF16085;
FILLRGN(v10/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-4.5*hh1,SYSPARAM(4)-5*hh1+0.05),Color008591;
FILLRGN(v11/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-5*hh1,SYSPARAM(4)-5.5*hh1+0.05),ColorF16085;
FILLRGN(v12/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-5.5*hh1,SYSPARAM(4)-6*hh1+0.05),Color008591;
FILLRGN(v13/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-6*hh1,SYSPARAM(4)-6.5*hh1+0.05),ColorF16085;
FILLRGN(v14/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-6.5*hh1,SYSPARAM(4)-7*hh1+0.05),Color008591;
FILLRGN(v15/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-7*hh1,SYSPARAM(4)-7.5*hh1+0.05),ColorF16085;
FILLRGN(v16/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-7.5*hh1,SYSPARAM(4)-8*hh1+0.05),Color008591;
FILLRGN(v17/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-8*hh1,SYSPARAM(4)-8.5*hh1+0.05),ColorF16085;
FILLRGN(v18/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-8.5*hh1,SYSPARAM(4)-9*hh1+0.05),Color008591;
FILLRGN(v19/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-9*hh1,SYSPARAM(4)-9.5*hh1+0.05),ColorF16085;
FILLRGN(v20/av0>=nn/nn0 and nn>=0,SYSPARAM(4)-9.5*hh1,SYSPARAM(4)-10*hh1+0.05),Color008591;
stickline(c>=o,c,o,6.6,1),colorff;
stickline(c>=o,l,o,0.1,0),colorff;
stickline(c>=o,c,h,0.1,0),colorff;
stickline(c<o,c,o,6.6,0),colorffff00;
stickline(c<o,h,l,0.1,0),colorffff00;
{“三丰诱空”分解}
获利盘:WINNER(C)*100,COLORRED;
二十天获利盘最高:HHV(获利盘,20);
乖离:ema((100+获利盘-二十天获利盘最高),3);
挖坑线:乖离,linethick2;
成本乖离:(c/cost(50)-1)*100,linethick1;
{筹码盈亏}
input:N(13,13,13),M(5,5,5);
Var2:= WINNER(CLOSE*1.1)*100;
Var3:= WINNER(CLOSE*0.9)*100;
获利: MA(Var3,N), colorwhite;
STICKLINE(1, 0, 获利, 1, 0), colorred;
套牢:= 100-MA(Var2,N);
STICKLINE(1, 100, MA(Var2,N), 1, 0), colorgreen;
HH: 100-套牢,colorwhite;
浮动:= MA(Var2,N)-MA(Var3,N);
STICKLINE(1, 获利, MA(Var2,N), 1, 0), coloryellow;
var4:= (HHV(获利,15)-var3)/var3*100>M AND HHV(获利,15)>50;
STICKLINE(var4,-2, 2,10,0),COLORGREEN;
STICKLINE(not(var4),-2, 2,10,0),COLORBLUE;
{筹码统计}
HSL:=EMA(V/CAPITAL,3);
ZDL:=HHV(HSL,240);
ZXL:=LLV(HSL,240);
XS:=MA(C,33);
锁定筹码:EMA((HSL-ZXL)/ZXL*XS,13);
浮动筹码:EMA((ZDL-HSL)/HSL*XS,13);
力量对比:锁定筹码-浮动筹码,COLORSTICK;
{筹码空间}
筹码空间:IF(WINNER(CLOSE),WINNER(CLOSE)*100,20),VOLSTICK;
TX80:80,pointdot coloryellow;
DX20:20,pointdot colorgreen;
Var1:=LLV(LOW,21);
Var2:=HHV(HIGH,21);
K: EMA((CLOSE-Var1)/(Var2-Var1)*100,8),colormagenta ;
D: EMA(0.667*REF(K,1)+0.333*K,2),coloryellow;
Var3:=LLV(LOW,55);
Var4:=HHV(HIGH,34);
Var5:=EMA((CLOSE-Var3)/(Var4-Var3)*100,3);
Var6:=(K+Var5)/2;
Var7:=EMA(0.667*REF(Var5,1)+0.333*K,2);
Var8:=EMA(Var6,5);
Var9:EMA(0.667*REF(Var8,1)+0.333*Var8,2);
{空头筹码多头筹码}
空头筹码:100*(1-WINNER(C)),COLORGREEN,linethick2;
多头筹码:100*WINNER(C),COLORRED,linethick2;
获利平均值:EMA(100*WINNER(C),20),coloryellow,linethick2;
获利99 := ma(COST(99 ),5);
获利80:=ma(cost(80),5);
均线5日:= ma(c,5);
获利20:=ma(cost(20),5);
获利1 :=ma(cost(1),5);
a1:=(获利99-获利80)/获利80*100;
a2:=(获利80-获利20)/获利20*100;
aa3:=(获利20-获利1)/获利1*100;
a4:=IF(a2<10 ,100 ,0 );
a5:=IF(a2<15 ,50 ,0 );
a6:=IF(a2<20 ,25 ,0 );
密集度:a2,colorFF0000,linethick2;
高密集:a4,color0000FF,linethick2;
中密集:a5,colorFF00FF,linethick2;
低密集:a6,color00FF00,linethick2;
{筹码跟踪}
获利筹码:EMA(WINNER(C)*70,5),ColorD98EF1;
亏损筹码:EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5),ColorF3FF00;
stickline(获利筹码<亏损筹码 and 亏损筹码<60,亏损筹码,55,1,0),ColorF3FF00;
stickline(获利筹码>亏损筹码,亏损筹码,50,1,0),colorred;
主力控筹:If(获利筹码>亏损筹码,获利筹码, 0),POINTDOT,colorred;
stickline(获利筹码<亏损筹码,获利筹码,0,0,0),ColorD98EF1;
AI:=AMOUNT/VOL/100;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*vol/CApitAl;
抄底:If((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,10, 0),Color00FF00;
灾区:stickline(获利筹码<10,亏损筹码,亏损筹码+5,2,0),POINTDOT,ColorFF009D;
重灾区:stickline(获利筹码<5,亏损筹码,亏损筹码+8,2,0),POINTDOT,Color970000;
stickline(抄底,0,30,4,0),Color00FF00;
0,ColorFFFFFF;
{筹码转移}
V1:=REF(C,5);
V2:=REF(WINNER(C)*100,5);
V3:=WINNER(V1)*100;
筹转5: V2-V3;
V4:=REF(C,10);
V5:=REF(WINNER(C)*100,10);
V6:=WINNER(V4)*100;
筹转10: V5-V6;
V7:=REF(C,20);
V8:=REF(WINNER(C)*100,20);
V9:=WINNER(V7)*100;
筹转20: V8-V9;
VA:=REF(C,30);
VB:=REF(WINNER(C)*100,30);
VC:=WINNER(VA)*100;
筹转30: VB-VC;//FZ穿越筹码
IF((WINNER(C)-WINNER(O))*100/(V*100/CAPITAL)>0,(WINNER(C)-WINNER(O))*100/(V*100/CAPITAL),0)*100,,COLORCYAN;
IF((WINNER(C)-WINNER(O))*100/(V*100/CAPITAL)<0,(WINNER(C)-WINNER(O))*100*V*100/CAPITAL,0)*100,,COLOR5050FF;
穿越筹码: (WINNER(C)-WINNER(O))*100,POINTDOT;
{个股活筹}
Var1:=SMA(AMOUNT,10,1)/10000000;
Var2:=REF(Var1,1);
AA: STICKLINE(Var1>Var2,Var1,Var2,8,1),COLORRED;
AD: STICKLINE(Var1<Var2,Var1,Var2,8,0),COLORGREEN;
C5: DMA(SMA(Var1,3,1),VOL/0.02/CAPITAL);
C13: DMA(SMA(Var1,5,1),VOL/0.1/CAPITAL);
C34:DMA(SMA(Var1,8,1),VOL/0.18/CAPITAL);
∞: DMA(Var1,VOL/1.1/CAPITAL);
{筹码K线}
STICKLINE(close>=open ,open ,close,8 ,0 ), colormagenta;
STICKLINE(close>=open,close,HIGH,0.5 ,0 ), colormagenta;
STICKLINE(close>=open ,open,low,0.5 ,0 ), colormagenta;
STICKLINE(open>=close,close,open,8,0 ),COLORCYAN;
STICKLINE(open>=close,close,LOW ,0.5 ,0 ),COLORCYAN;
STICKLINE(open>=close ,open,HIGH,0.5 ,0),COLORCYAN;
成本集中度:(COST(95)-COST(5))/(COST(95)+COST(5))*100,LINETHICK0;
生命: MA(C,15),coloryellow;
顶: COST(95);
拉升: COST(75);
控盘: COST(30);
主力: COST(4);
底 : COST(0.05);
V1:=WINNER(C);
V2:=DMA(V1,V/CAPITAL);
V3:=DMA(V,V/CAPITAL)/CAPITAL;
V4:=V1/V3;
V5:=V2/V3;
STICKLINE(V4>V5 AND 100*WINNER(C)>50,C,O,8,1),coloryellow;
V6:=100*WINNER(C*0.95);
STICKLINE(V6>50 AND COST(85)<C,C,O,8,1),colorred;
STICKLINE(V6>50 AND COST(85)<C,C,O,2.5,0),colorred;
套牢盘获利盘筹码比例
input:N(20,1,100);
套牢盘筹码:100*(1-WINNER(C));
获利盘筹码:100*WINNER(C);
获利盘平均值:ema(100*WINNER(C),n)
获利套牢盘
获利盘:100*WINNER(C),COLORYELLOW;
套牢盘:100*(1-WINNER(C)),COLORff8800;
筹码密集度
input:N(13,2,20);
Var1:=COST(89)-COST(11);
Var2:=COST(99.900)-COST(0.100);
单峰密集:(1-Var1/Var2)*100,colormagenta,linethick2;
低位密集:(COST(99)-COST(60))/Var2*100,colorcyan,linethick2;
高位密集:(COST(40)-COST(1))/Var2*100,colorred,linethick2;
获利盘:SMA(WINNER(AMOUNT/VOL/100)*100, N, 1),colorgreen,linethick2;
10,POINTDOT,colorgray;
30,POINTDOT,colorgray;
50,POINTDOT,colorgray;
70,POINTDOT,colorgray;
90,POINTDOT,colorgray;
