【天机筹码】高度控盘筹码，主图+副图+指标，手机和电脑版通用
{天机筹码主图}
{天机筹码主图源码如下}
均价:=(HIGH+LOW+OPEN+CLOSE)/4;
分水岭:=MA(3*均价-2*SMA(均价,2,1),12),COLORRED,LINETHICK1;
P:=1;
A01:=(C-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3));
A11:=SMA(A01,2,1);
A21:=SMA(A11,2,1);
A31:=3*A11-2*A21 ;
A41:=2*A31-0.5;
乾坤线:=C*(1-(A41-A21)/15),,COLORFF00FF,LINETHICK2;
A:=(L+H)/2;
股价重心:=MA(A,5),COLORFFFFFF,NODRAW;
ZBGS32:=(H+L+O+2*C)/5;
CHH低吸线:=EMA(SLOPE(ZBGS32,21)*20+ZBGS32,55);
BB:=LLV(H,1);
逃顶线:=FORCAST(FORCAST(BB,15),15), ,COLOR00FF00,LINETHICK2;
抄底线:=FORCAST(FORCAST(BB,25),25), COLORRED,LINETHICK2;
CHH低吸线2:=IF(SLOPE(逃顶线,2)>0,CHH低吸线,C),COLORWHITE;
做多趋势:=IF(均价>分水岭,均价,分水岭),COLORYELLOW;
支撑:REVERSE(做多趋势)+2*分水岭,COLORYELLOW,LINETHICK1;
空仓:IF(CLOSE< SAR(4,2,10),SAR(4,2,10),DRAWNULL),CIRCLEDOT,COLOR889999 ;
多仓:IF(CLOSE>SAR(4,2,10),SAR(4,2,10),DRAWNULL),CIRCLEDOT,COLORRED ;
ZBGS3R1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
ZBGS3R2:=REF(ZBGS3R1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS3R3:=REF(ZBGS3R2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS34:=REF(ZBGS3R3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS35:=REF(ZBGS34,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS36:=REF(ZBGS35,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS37:=REF(ZBGS36,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS38:=REF(ZBGS37,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS39:=REF(ZBGS38,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS3A:=REF(ZBGS39,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS3B:=REF(ZBGS3A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS3C:=REF(ZBGS3B,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS3D:=CLOSE< REF(CLOSE,1) AND CLOSE< REF(CLOSE,2);
ZBGS3E:=REF(ZBGS3D,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS3F:=REF(ZBGS3E,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS310:=REF(ZBGS3F,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS311:=REF(ZBGS310,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS312:=REF(ZBGS311,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS313:=REF(ZBGS312,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS314:=REF(ZBGS313,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS315:=REF(ZBGS314,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS316:=REF(ZBGS315,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS317:=REF(ZBGS316,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
ZBGS318:=REF(ZBGS317,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
ZBGS319:=REF(ZBGS3D OR ZBGS3E OR ZBGS3F OR ZBGS310 OR ZBGS311 OR ZBGS312 OR ZBGS313 OR ZBGS314 OR ZBGS315 OR ZBGS316 OR ZBGS317 OR ZBGS318,1) AND ZBGS3R1;
STICKLINE(ZBGS319,L*0.989,L*0.98,2,0),COLORRED;
ZBGS31A:=REF(ZBGS3R1 OR ZBGS3R2 OR ZBGS3R3 OR ZBGS34 OR ZBGS35 OR ZBGS36 OR ZBGS37 OR ZBGS38 OR ZBGS39 OR ZBGS3A OR ZBGS3B OR ZBGS3C,1) AND ZBGS3D;
STICKLINE(ZBGS31A,H*1.01,H,2,0),COLORFFFFFF;
VAQR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAQR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAQR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWKLINE(H,O,L,C);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
STICKLINE(CROSS(FF,MA15) ,O ,C ,2,0 ),COLORMAGENTA;
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'★建仓'),COLORWHITE;
DRAWICON(CROSS(FF,MA15),(LOW * 0.998),9);
IF(分水岭< REF(分水岭,1), 分水岭,DRAWNULL),LINETHICK2,,COLOR00FF00;
{天机筹码副图源码如下}
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZSHTL:=SHCM/(ZLCM+SHCM)*100;
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZCMZL:=MA(ZLCM+SHCM,13);
ZZNTS:=BARSLAST(ZSHTL< 90 AND REF(ZSHTL,1)>90);
ZSHJJ:=EMA(ZSHTL,89);
ZZLJJ:=EMA(ZZLKP,89);
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);
SH8:=EMA(ZSHTL,8);
DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);
STICKLINE(C>0,ZSHTL,ZZLKP,0,0),COLOREEEEEE;
STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),COLORAAAAAA;
STICKLINE(C>0,ZZLKP,0,0,0),COLORBLUE;
STICKLINE(ZZLKP>75,ZZLKP,0,2,0),COLORFFFFFF;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,4,0),COLORRED;
STICKLINE(ZSHTL>=90,ZZLKP,0,5,0),COLOR66FFCC;
IF(ZCMZL,ZCMZL>REF(ZCMZL,1),DRAWNULL),COLOR0066FF,LINETHICK1;
散户套牢系数:INTPART(ZSHTL),COLORYELLOW;
主力控盘系数:INTPART(ZZLKP),COLORCYAN;
资金流入强度:ZJLRQD,LINETHICK2,COLORRED;
市场筹码总量:INTPART(ZCMZL),COLORWHITE,NODRAW;
轴:50,COLORGREEN,DOTLINE,LINETHICK1;
DRAWTEXT(CROSS(主力控盘系数,轴),轴+10,'高度控盘'),COLORYELLOW;
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
STICKLINE(CROSS(FF,MA15) ,0,60.0 ,2,0 ),COLORMAGENTA;
DRAWTEXT(CROSS(FF,MA15),(ZJLRQD * 0.99),'★建仓'),COLORWHITE;
DRAWICON(CROSS(FF,MA15),(ZJLRQD * 0.998),9);
{天机筹码选股源码如下}
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZSHTL:=SHCM/(ZLCM+SHCM)*100;
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZCMZL:=MA(ZLCM+SHCM,13);
ZJLRQD:=INTPART(ZZLKP-EMA(ZZLKP,89));
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
建仓信号:CROSS(FF,MA15);
