通达信主力散户跟风统计副图源码 贴图

[复制链接]
查看17 | 回复0 | 2022-7-11 11:06:00 | 显示全部楼层 |阅读模式
指标好坏不做评论,千人千面,一把刀,每个人的用法不尽相同!

{主力统计}
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);
买1:=QJ0*(MIN(OPEN,CLOSE)-LOW);
买2:=QJ0*(JJ-MIN(CLOSE,OPEN));
卖1:=QJ0*(MAX(CLOSE,OPEN)-JJ);
卖2:=QJ0*(HIGH-MAX(OPEN,CLOSE));
DT:=((买1+买2)-(卖1+卖2))/100000;
主力统计:IF(BARSCOUNT(CLOSE)<135,SUM(DT,0),SUM(DT,135)),COLORWHITE,LINETHICK1;
STICKLINE(DT>0,主力统计,主力统计+DT,1,0),COLORRED;
STICKLINE(DT<0,主力统计+DT,主力统计,1,0),COLOR00FF00;
  {散户统计}
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);
TD1:=QJ0*(MIN(OPEN,CLOSE)-LOW);
DD1:=QJ0*(JJ-MIN(CLOSE,OPEN));
DD2:=QJ0*(HIGH-MAX(OPEN,CLOSE));
TD2:=QJ0*(MAX(CLOSE,OPEN)-JJ);
TD:=TD1-TD2;DA:=DD1-DD2;
XD1:=1-(TD1+DD1);XD2:=1-(TD2+DD2);
TZ:=V/IF(BARSCOUNT(CLOSE)<60,SUM(V,0),SUM(V,60))*100;
DT:=((XD1-XD2)/10000)/TZ;
散户统计:IF(BARSCOUNT(CLOSE)<22,SUM(DT,0),SUM(DT,22)),COLORWHITE,LINETHICK1;
STICKLINE(DT>0,散户统计,散户统计+DT,1,0),COLOR0000FF;
STICKLINE(DT<0,散户统计+DT,散户统计,1,0),COLOR00FF00; {跟风统计}
N:=3;
M:=6;
VARS:=100;
VARZQ:=30;

RSV:=(CLOSE-LLV(LOW,VARZQ))/(HHV(HIGH,VARZQ)-LLV(LOW,VARZQ))*VARS;
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
HS:=VOL/CAPITAL;
SH:=(HHV(HIGH,VARZQ)-CLOSE)/(HHV(HIGH,VARZQ)-LLV(LOW,VARZQ))*VARS-10;
JG:=(CLOSE-LLV(LOW,VARZQ))/(HHV(HIGH,VARZQ)-LLV(LOW,VARZQ))*VARS;
GF:=SMA(JG,13,8);
  DDGF:=GF-REF(GF,1);
DTGF:=HS*DDGF*100/4;
VARZLSCGF:=(30+SUM(DTGF,0));
跟风统计:SUM(DTGF,0)+30,LINETHICK1,COLORCYAN;
STICKLINE(DTGF>0,VARZLSCGF,VARZLSCGF+DTGF,1,0),COLORRED;
STICKLINE(DTGF<0,VARZLSCGF+DTGF,VARZLSCGF,1,0),COLORGREEN;



201791811133035106.jpg

201791811133035106.jpg

201791811141482865.rar

1.62 KB, 下载次数: 0

售价: 1 金钱  [记录]  [购买]

201791811141482865.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则