筹码流跟庄 通达信副图指标 源码 贴图

股价:VOL,VOLSTICK;
VAR1:=XMA(XMA(股价,3),3);
VAR2:=XMA(XMA(股价,5),5);
VAR3:=XMA(XMA(股价,6),6);
VAR4:=XMA(XMA(股价,8),8);
VAR5:=XMA(XMA(股价,10),10);
VAR6:=XMA(XMA(股价,12),12);
VAR7:=(VAR4+VAR5+VAR6+VAR1+VAR2+VAR3)/6;
VAR8:=VAR7*1.35;
VAR9:=VAR7*0.65;
VAR10:=XMA(XMA(股价,16),16);
VAR11:=XMA(XMA(股价,19),19);
VAR12:=XMA(XMA(股价,22),22);
VAR13:=XMA(XMA(股价,25),25);
VAR14:=XMA(XMA(股价,28),28);
VAR15:=XMA(XMA(股价,31),31);
VAR16:=(VAR10+VAR11+VAR12+VAR13+VAR14+VAR15)/6;
VAR17:=VAR16*1.4;
VAR18:=VAR16*0.6;
VAR19:=XMA(XMA(股价,40),40);
VAR20:=XMA(XMA(股价,50),50);
VAR21:=XMA(XMA(股价,60),60);
VAR22:=(VAR19+VAR20+VAR21)/3;
VAR23:=VAR22*1.5;
VAR24:=VAR22*0.5;
VAR25:=XMA(XMA(股价,90),90);
VAR26:=XMA(XMA(股价,120),120);
VAR27:=XMA(XMA(股价,150),150);
VAR28:=(VAR25+VAR26+VAR27)/3;
VAR29:=VAR28*1.3;
{WWW.GPXIAZAI.COM}
VAR30:=VAR28*1.8;
VAR31:=VAR28*0.5;
VAR32:=EMA(VAR7,10);
VAR33:=EMA(VAR16,10);
V2:IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1),NODRAW,COLORRED;
STICKLINE(V2>=1,0,VOL,2,0),COLORYELLOW;
VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,(-1),(-1)),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
VAR34:=VAR9<VAR18 AND VAR18<VAR24 AND VAR24<VAR31;
VAR35:=VAR9<VAR18 AND VAR18>VAR24 AND VAR18<VAR31;
VAR36:=VAR9<VAR18 AND VAR18<VAR24 AND VAR18>VAR31;
STICKLINE(VAR16>VAR33,0,VOL,2,1),COLORMAGENTA;
STICKLINE(VAR7>VAR32,0,VOL,2,0),COLORRED;
STICKLINE(VAR16>VAR33 AND VOL<VAR31,0,VOL,3,0),COLORWHITE;
STICKLINE(VAR16>VAR33 AND VOL<VAR24 AND VOL<VAR18 AND VOL>VAR31,0,VOL,3,0),COLORBLUE;
STICKLINE(VAR16<VAR33,0,VOL,2,0),COLORGREEN;
STICKLINE(VAR16<VAR33 AND VAR7>VAR32,0,VOL,2,0),COLORYELLOW;
STICKLINE(VAR35=1 OR VAR36=1,0,VOL,2,0),COLORBLUE;
STICKLINE(VAR22>REF(VAR22,1) AND 股价<VAR31,0,VOL,3,0),COLORWHITE;
DRAWRECTREL(0,250,175,999.400024,IF(120,RGB(10,0,0),0));
VAR37:=L2_AMO(0,2)/10000;
VAR38:=L2_AMO(1,2)/10000;
VAR39:=L2_AMO(2,2)/10000;
VAR40:=L2_AMO(3,2)/10000;
VAR41:=L2_AMO(0,3)/10000;
VAR42:=L2_AMO(1,3)/10000;
VAR43:=L2_AMO(2,3)/10000;
VAR44:=L2_AMO(3,3)/10000;
VAR45:=VAR37+VAR38+VAR39+VAR40-(VAR41+VAR42+VAR43+VAR44);
VAR46:=VAR37-VAR41;
VAR47:=VAR38-VAR42;
VAR48:=VAR39-VAR43;
VAR49:=VAR40-VAR44;
VAR50:=CONST(MAX(ABS(VAR45),MAX(ABS(VAR46),MAX(ABS(VAR47),MAX(ABS(VAR48),ABS(VAR49))))));
DRAWRECTREL(0,CONST(830-ABS(VAR46)*500/VAR50),30,935,IF(CONST(VAR46)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(35,CONST(830-ABS(VAR47)*500/VAR50),65,935,IF(CONST(VAR47)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(70,CONST(830-ABS(VAR48)*500/VAR50),100,935,IF(CONST(VAR48)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(105,CONST(830-ABS(VAR49)*500/VAR50),135,935,IF(CONST(VAR49)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(140,CONST(830-ABS(VAR45)*500/VAR50),170,935,IF(CONST(VAR45)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,0.25,0,70),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.002,0.55,0,INTPART(VAR46)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.035,0.555,0,INTPART(VAR47)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.07,0.55,0,INTPART(VAR48)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.106,0.55,0,INTPART(VAR49)),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0.55,0,INTPART(VAR45)),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,1,0,71),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.04,1,0,72),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.075,1,0,73),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.112,1,0,74),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,1,0,75),COLORYELLOW;
VAR51:=55;
VAR52:=34;
VAR53:=REF(CLOSE,1);
VAR54:=SMA(MAX(CLOSE-VAR53,0),3,1)/SMA(ABS(CLOSE-VAR53),3,1)*100;
VAR55:=EMA(CLOSE,3);
VAR56:=EMA(CLOSE,21);
DRAWTEXT(CROSS(85,VAR54),75,69),COLORGREEN;
VAR57:=IF(YEAR>=2038 AND MONTH>=1,0,1);
VAR58:=REF(LOW,1)*VAR57;
VAR59:=SMA(ABS(LOW-VAR58),3,1)/SMA(MAX(LOW-VAR58,0),3,1)*100*VAR57;
VAR60:=EMA(IF(CLOSE*1.3,VAR59*10,VAR59/10),3)*VAR57;
VAR61:=LLV(LOW,30)*VAR57;
VAR62:=HHV(VAR60,30)*VAR57;
VAR63:=IF(MA(CLOSE,58),1,0)*VAR57;
VAR64:=EMA(IF(LOW<=VAR61,(VAR60+VAR62*2)/2,0),3)/618*VAR63*VAR57;
吸筹:IF(VAR64>100,100,VAR64)*VAR57,COLORRED;
庄家吸筹:STICKLINE(吸筹>(-150),0,吸筹,8,0),COLORRED;
散户:100*(HHV(HIGH,VAR51)-CLOSE)/(HHV(HIGH,VAR51)-LLV(LOW,VAR51)),COLORCYAN,LINETHICK2;
VAR65:=(CLOSE-LLV(LOW,VAR52))/(HHV(HIGH,VAR52)-LLV(LOW,VAR52))*100;
VAR66:=SMA(VAR65,3,1);
VAR67:=SMA(VAR66,3,1);
VAR68:=3*VAR66-2*VAR67;
庄家:EMA(VAR68,6),COLORMAGENTA,LINETHICK2;