源码
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:=eMA(CLOSE,3);XA1:=ma1;
MA2:=EMA(CLOSE,10);
MA4:=EMA(CLOSE,20);
MA3:=EMA(CLOSE,30);
ba:=3*ma4-2*ma3;
a:=(3*c+l+o+h)/6;
b:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+14*ref(a,6)
+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)
+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+
ref(a,20))/210;
cia:=(b+ba)/2;XA2:=cia;
cma:=ema(cia,13);XA3:=cma;
xdfg:=ma(cia,26);
cfds:=ema(winner(c)*100,14);
cghz:=(hhv(cfds,50)+cfds*2)/3;
买1:if(z<50 and cross(y,z) and xa1>xdfg,30,0),stick,COLORGREEN;
DRAWICON(买1>0,30,1 );
DRAWTEXT(买1>0,20, '★买1') ,,COLORGREEN;
xzsa:=(hhv(x,100)+x*2)/3;
close1:="1a0001$close";
MA1d:=EMA(CLOSE1,5);
MA3d:=EMA(CLOSE1,20);
买2:if(ma1d>ma3d and 买1>0,20,0),STICK,COLORMAGENTA;
DRAWICON(买2>0,20,1 );
DRAWTEXT(买2>0,10, '★买2')COLORMAGENTA;
阴跌区:ema((100-(winner(ma(c,1))*100))/(vol/CAPITAL*1000),12),colorblue;
卖:STICKLINE(abs(ref(cfds,1)-ref(cghz,1))<0.01 and abs(cfds-cghz)>0.01 and cfds>30
and x>61,x,100,1,0),colorred;
排序A:if(介入>0 or 增仓>0 or 买1>0 or 买2>0,1,0),STICK,COLORCYAN;
