通达信----主力散户线(副图指标)

沙鱼

N:=34;
M:=3;
大盘生命指数:=EMA(400*(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N)),M)/4;
大盘生命量能:=IF(大盘生命指数>23.16,大盘生命指数,0);
HIGHN:=10;
LOWN:=10;
HIGHDISPLAY:=0;
LOWDISPLAY:=0;
ZGDISPLAY:=0;
MADISPLAY:=0;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
重心:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382,COLORYELLOW,LINETHICK1;
RSI:=SMA(MAX(重心-REF(重心,1),0),5,1)/SMA(ABS(重心-REF(重心,1)),5,1);
GAO:=HHV(C,60)-LLV(C,60);
VAR1:=LLV(LOW,13);
VAR2:=HHV(HIGH,13);
VAR3:=SMA((CLOSE-VAR1)/(VAR2-VAR1)*100,5,1);
VAR4:=SMA((VAR2-CLOSE)/(VAR2-VAR1)*100,5,1);
主力:VAR3,COLORRED;
散户:VAR4,COLORGREEN;
VAR5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;
操盘:=EMA(VAR5,3),COLORMAGENTA;
Y1:大盘生命指数{操盘};
Y2: RAWICON(CC,Y1*1.1,2);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(Y1,DDD),Y1);{顶部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
下穿绿是顶1: RAWLINE(CURRBARSCOUNT=GDCS2,Y1,ISLASTBAR,REF(Y1,GDCS2-1),1),COLORGREEN;
下穿绿是顶2: RAWLINE(CURRBARSCOUNT=GDCS1,Y1,ISLASTBAR,REF(Y1,GDCS1-1),1),COLORGREEN;
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1:=BACKSET(AA1,LOWN+1);
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);
DRAWICON(CC1,Y1*0.9,1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
YDB:=IF(DD1,REF(Y1,DD1),Y1);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
上穿红是底1: RAWLINE(CURRBARSCOUNT=DDCS1,Y1,ISLASTBAR,REF(Y1,DDCS1-1),1),COLORRED;
上穿红是底2: RAWLINE(CURRBARSCOUNT=DDCS2,Y1,ISLASTBAR,REF(Y1,DDCS2-1),1),COLORRED;
庄筹估算1:=EMA(WINNER(C)*70,5);
散筹估算1:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5);
控盘系数:庄筹估算1,COLORFFFFFF, LINETHICK1;
STICKLINE(控盘系数>REF(控盘系数,1),控盘系数-REF(控盘系数,1)+控盘系数,控盘系数,1,0),COLOR0000FF;
STICKLINE(控盘系数<REF(控盘系数,1),控盘系数-REF(控盘系数,1)+控盘系数,控盘系数,1,0),COLORFFFF00;
底线:10;
顶线:89,COLORRED;