【机G筹码增减】副图公式 筹码动向跟踪源码分享

【机G筹码增减】副图公式 筹码动向跟踪源码分享

以下是源码：

幅图：

VAR1:=(3*C+O+H+L)/6;

VAR2:=0.1538*VAR1+(0.8462)*REF(EMA(0.1538*VAR1+(0.8462)*REF(EMA(0.1538*VAR1+(0.8462)*REF(EMA(0.1538*VAR1+(0.8462)*REF(EMA(0.1538*VAR1+(0.8462)*REF(EMA(0.1538*VAR1+(0.8462)*REF(0.1538*VAR1+(0.8462)*REF(EMA(VAR1,12),1),1),12),1),12),1),12),1),12),1),12),1);

VAR3:=0.0541*VAR1+(0.9459)*REF(EMA(0.0541*VAR1+(0.9459)*REF(EMA(0.0541*VAR1+(0.9459)*REF(EMA(0.0541*VAR1+(0.9459)*REF(EMA(0.0541*VAR1+(0.9459)*REF(EMA(0.0541*VAR1+(0.9459)*REF(0.0541*VAR1+(0.9459)*REF(0.0541*VAR1+(0.9459)*REF(0.0541*VAR1+(0.9459)*REF(0.0541*VAR1+(0.9459)*REF(EMA(VAR1,36),1),1),1),1),1),36),1),36),1),36),1),36),1),36),1);

VAR4:=EMA(VAR1,108);

VAR5:=EMA(VAR1,250);

控盘度:(EMA(VAR1,12)-REF(EMA(VAR1,36),1))/REF(EMA(VAR1,36),1)*100+50,NODRAW;

STICKLINE(控盘度>=60,0,控盘度,1,0),COLOR333333;

STICKLINE(控盘度>=60,50,控盘度,1,0),COLORRED;

中控盘:IF(控盘度>=60,控盘度,0),COLORRED,NODRAW;

高控盘:IF(控盘度>=80,控盘度,0),COLORYELLOW,NODRAW;

VAR6:=0.01*EMA(AMOUNT,13)/EMA(VOL,13);

强弱:50,COLOR888888,DOTLINE;

DRAWTEXT(ISLASTBAR,强弱,’疯狂区域’),COLORRED;

高度控盘:(C-VAR6)/VAR6*1000,NODRAW;

VAR7:=EMA(EMA(C,9),9);

VAR8:=(VAR7-REF(VAR7,1))/REF(VAR7,1)*1000;

STICKLINE(IF(CURRBARSCOUNT>1,DRAWNULL,VAR8>0),40,0,0,0),COLOR555555;

DRAWICON(IF(CURRBARSCOUNT>1,DRAWNULL,VAR8>0),50,12);

VAR9:=AMOUNT/VOL/100,NODRAW;

VAR10:=(3*H+L+O+2*C)/7,NODRAW;

VAR11:=SUM(AMOUNT,40)/VAR9/100,NODRAW;

VAR12:=SUM(AMOUNT,80)/VAR9/100,NODRAW;

VAR13:=DMA(VAR10,VOL/VAR11),NODRAW;

VAR14:=DMA(VAR10,VOL/VAR12),NODRAW;

VAR15:=(C-VAR13)/VAR13*100,NODRAW;

VAR16:=(C-VAR14)/VAR14*100,NODRAW;

高点:20,COLOR555555,DOTLINE;

DRAWTEXT(ISLASTBAR,高点,’关注区域’),COLORRED;

STICKLINE(VAR16>20,0,VAR16,1,0),COLORYELLOW;

STICKLINE(VAR15>20,0,VAR15,1,0),COLORFF00FF;

DRAWICON(VAR15>50||VAR16>50,10,3);

VAR17:=WINNER(C*0.900)*100;

VAR18:=VOL/CAPITAL*100;

VAR19:=VAR17-VAR18;

VAR20:=VAR19>=25;

VAR21:=(C/REF(C,5)-1)*100>10;

VAR22:=(C/REF(C,10)-1)*100>15;

VAR23:=EXIST(VAR20 AND (VAR21||VAR22),5);

VAR24:=L<REF(L,1) AND C<REF(O,1) AND C<REF(C,1) AND C<REF(C,2);

VAR25:=NOT(EXIST(REF(VAR24,1),5));

AX:REF(VAR23,1) AND VAR24 AND VAR25,NODRAW;

STICKLINE(AX,-10,0,0,0),COLORYELLOW;

获取：先点文章右下角的

然后再后台公众号留言回复：0101会自动获取下载

注意免费限时下载链接免费7天，7天后链接失效请知晓