飞狐介入增仓副图指标

源码

N:=3;M:=12;P:=24;

dat1:=1;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
wr1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100;
wr2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
wr3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100;
BIAS1 := ((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
BIAS2 := ((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
BIAS3 := ((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
s1:=(wr1+wr2+wr3+bias1+bias2+bias3)/6*dat1;
s2:=ema(s1,3);
s3:=abs(bias1-bias3);
获利:=(-1)*(ema(100*(1-WINNER(CLOSE)),1)-50)+50;
xc1:=ema(获利,3);
Var1:=1/WINNER(CLOSE);
Var2:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
Var3:=100-ABS(Var2);
Var4:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)
-2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var5:=3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)
-2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var6:=100-Var5;
Var7:=100-Var4;
Var8:=MA(WINNER(CLOSE*0.95)*100,3);
Var9:=IF(Var1>5,IF(Var1<100,Var1,Var3-10),0);
zllz:=((-1*(ema(var7,1)-50))+50)*dat1;
sx:=(s2*2+s3*2+xc1+zllz*3)/8*dat1;
x:=ema(sx,n)*dat1;
sz:=ema(x,m);
y:=sz;
z:=ma(sx,p);
DRAWtext(rsi1>92 and ref(rsi1,1)<92 ,z,'X先生' );
lkj:=ma(ma(zllz,9),70);
rrx:=if(cross(zllz,lkj) and lkj<15,60,0);
介入:if(rrx>0,60,0) STICK,COLORWHITE;
DRAWICON(介入>0,60 ,1 );
DRAWTEXT(介入>0,50, '★介入')COLORWHITE ;
rrrQ:=BARSLAST(rrx>0 )<14 and c=llv(c,9);
增仓:if(rrrQ>0,40,0) STICK,COLORYELLOW ;
DRAWICON(增仓>0,40 ,1 );
DRAWTEXT(增仓>0,30, '★增仓') ,COLORYELLOW ;
MA1: