通达信免费版能用的主力统计和散户统计未加密选股指标公式源码

通达信免费版能用的主力统计和散户统计未加密选股指标公式源码

源码正文：

使用说明:股票离不开追踪主力的资金动向，“主力统计”指标对股票的资金流入和流出量进行剖析，能够一目了然地看到行情的走向。主线在高位走平并且资金流出，就是减仓卖出的时候，主力线在低位并且资金流入就是买入的时机。【流动资金：绿色代表资金流出，红色代表资金流入。】配合观察 “散户统计”指标，对个股分析就能更加清晰了。

主力统计:
JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW){XG51};
买1:=QJ0*(MIN(OPEN,CLOSE)-LOW){XG51};
买2:=QJ0*(JJ-MIN(CLOSE,OPEN)){XG51};
卖1:=QJ0*(maX(CLOSE,OPEN)-JJ){XG51};
卖2:=QJ0*(HIGH-MAX(OPEN,CLOSE)){XG51};
DT:=((买1+买2)-(卖1+卖2))/10000{XG51};
主力持仓:SUM(DT,66),COLORRED,LINETHICK1{XG51};
stICKLINE(DT>0,主力持仓,主力持仓+DT,1,0),COLOR0000FF{XG51};
STICKLINE(DT<0,主力持仓+DT,主力持仓,1,0),COLOR00FF00;

散户统计:
JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW){XG51};
TD1:=QJ0*(MIN(OPEN,CLOSE)-LOW);DD1:=QJ0*(JJ-MIN(CLOSE,OPEN)){XG51};
DD2:=QJ0*(HIGH-MAX(OPEN,CLOSE));TD2:=QJ0*(MAX(CLOSE,OPEN)-JJ){XG51};
TD:=TD1-TD2;DA:=DD1-DD2;XD1:=1-(TD1+DD1);XD2:=1-(TD2+DD2){XG51};
TZ:=V/SUM(V,60)*100;DT:=((XD1-XD2)/10000)/TZ{XG51};
散户持仓:SUM(DT,22),COLOR888888,LINETHICK1{XG51};
STICKLINE(DT>0,散户持仓,散户持仓+DT,1,0),COLORFF00FF{XG51};
STICKLINE(DT<0,散户持仓+DT,散户持仓,1,0),COLORFF8800{X+G*5.1+C+N+{};

通达信RSI战神未加密选股指标公式源码

源码正文：

使用说明:
1.rsi>80 为超买，RSI<20 为超卖；
2.RSI 以50为中界线，大于50视为多头行情，小于50视为空头行情；
3.RSI 在80以上形成Ｍ头或头肩顶形态时，视为向下反转信号；
4.RSI 在20以下形成Ｗ底或头肩底形态时，视为向上反转信号；
AS买入；
红色向上箭头为RSI买入；
绿色向下箭头为RSI卖出；
黄色向上三角▲为突破上轨；
黄色向下三角▼为跌破下轨；
抄为抄底，逃为逃顶；
白色向上三角 ▲为>昨日RSI1时的指示，表示趋势向上；
白色向下三角▼为<昨日RSI1时的指示，表示趋势向下；

｛参数：P  2 100 5  N1 2 100 6  HIGHN 2 100 20｝
LC:=REF(CLOSE,1){XG51};
RSI1:SMA(maX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100,COLORRED{XG51};
AA:=REF(RSI1,HIGHN)=HHV(RSI1,2*HIGHN+1){XG51};
QY:=BacKSET(AA,HIGHN+1){XG51};
CC:=FILTER(QY,HIGHN) AND RSI1=HHV(RSI1,HIGHN+1){XG51};
DDD:=BArslAst(CC){XG51};
GDTS:=IF(CC,CURRBARSCOUNT,0){XG51};
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS){XG51};
GDCS1:=CONST(DINGBUTS){XG51};
DINGBUTS1:=REF(DINGBUTS,DDD+1){XG51};
GDCS2:=CONST(DINGBUTS1){XG51};
AA1:=REF(RSI1,HIGHN)=LLV(RSI1,2*HIGHN+1){XG51};
QY1:=BACKSET(AA1,HIGHN+1){XG51};
CC1:=FILTER(QY1,HIGHN) AND RSI1=LLV(RSI1,HIGHN+1){XG51};
DD1:=BARSLAST(CC1){XG51};
DDTS:=IF(CC1,CURRBARSCOUNT,0){XG51};
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS){XG51};
DDCS1:=CONST(DDTS1){XG51};
DDTS2:=REF(DDTS1,DD1+1){XG51};
DDCS2:=CONST(DDTS2){XG51};
A1:=REF(RSI1,P)=HHV(RSI1,2*P+1){XG51};
B1:=FILTER(A1,P){XG51};
C1:=BACKSET(B1,P+1){XG51};
D1:=FILTER(C1,P){XG51};
A2:=REF(RSI1,P)=LLV(RSI1,2*P+1){XG51};
B2:=FILTER(A2,P){XG51};
C2:=BACKSET(B2,P+1){XG51};
D2:=FILTER(C2,P){XG51};
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1){XG51};
S11:=R11>REF(R11,1){XG51};
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1){XG51};
U11:=T11>REF(T11,1){XG51};
MID:=MA(RSI1,20){XG51};
UPPER:=MID + 2*STD(RSI1,20){XG51};
LOWER:=MID - 2*STD(RSI1,20){XG51};
高:=REF(HHV(RSI1,360),1){XG51};
低:=REF(LLV(RSI1,240),1){XG51};
bias1:=(C-MA(C,6))/MA(C,6)*100{XG51};
BIAS2:=(C-MA(C,12))/MA(C,12)*100{XG51};
BIAS3:=(C-MA(C,24))/MA(C,24)*100{XG51};
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6{XG51};
乖离:=MA(BIAS,3){XG51};
前高:REF(RSI1,BARSLAST(D1)),COLORFF00FF,NODRAW{XG51};
前低:REF(RSI1,BARSLAST(D2)),COLOR00FF00,NODRAW{XG51};
相对能量:(RSI1-前低)/(前高-前低)*100,COLORBLUE,NODRAW{XG51};
上轨:UPPER,COLOR993300{XG51};
下轨:LOWER,COLOR993300{XG51};
DRAWICON(CC,RSI1*1.03,2){XG51};
DRAWICON(CC1,RSI1*0.97,1);
高压:DRAWLINE(CURRBARSCOUNT=GDCS2,RSI1,CURRBARSCOUNT=GDCS1,RSI1,1) COLORYELLOW,POINTDOT,LINETHICK4{XG51};
低支:DRAWLINE(CURRBARSCOUNT=DDCS2,RSI1,CURRBARSCOUNT=DDCS1,RSI1,1) COLORWHITE,POINTDOT,LINETHICK4{XG51};
阻力:DRAWLINE(D1,RSI1,S11,RSI1,1),COLORBLUE{XG51};
支撑:DRAWLINE(D2,RSI1,U11,RSI1,1),COLOR00FF00{XG51};
DRAWTEXT(crOSS(RSI1,LOWER),LOWER,'抄'),COLOR00FF00{XG51};
DRAWTEXT(CROSS(LOWER,RSI1),LOWER,'▼'),COLOR00FF00{XG51};
DRAWTEXT(CROSS(RSI1,高),MID,'年高'),COLORBLUE{XG51};
DRAWTEXT(CROSS(低,RSI1),MID,'年低'),COLORBLUE{XG51};
DRAWTEXT(CROSS(UPPER,RSI1),UPPER,'逃'),COLORBLUE{XG51};
DRAWTEXT(CROSS(RSI1,UPPER),UPPER,'▲'),COLORBLUE{XG51};
VM:MA(RSI1,N1),COLORFF00FF,NODRAW{XG51};
DRAWTEXT(ISLASTBAR AND RSI1>REF(RSI1,1),VM,' ▲'),COLORDD00FF{XG51};
DRAWTEXT(ISLASTBAR AND RSI1<REF(RSI1,1),VM,' ▼'),COLORCCEE00{X_G~5-1_C_N_{};