源码
N:=9;M1:=3;M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J:=3*K-2*D;
Var1:=EMA(HHV(HIGH,500),21);
Var2:=EMA(HHV(HIGH,250),21);
Var3:=EMA(HHV(HIGH,90),21);
Var4:=EMA(LLV(LOW,500),21);
Var5:=EMA(LLV(LOW,250),21);
Var6:=EMA(LLV(LOW,90),21);
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);
osc:=c/ma(c,6);
短线:= EMA(SLOPE(osc,8)*11+osc,55)*2,;
散户2:= EMA(osc,8)*2, ;
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);
VarB:=REF(LOW,1);
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);
VarE:=LLV(LOW,30);
VarF:=HHV(VarD,30);
Var10:=IF(MA(CLOSE,58),1,0);
Var11:=EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10;
Var12:=IF(Var11>40,10,Var11);
Var13:=HHV(HIGH,30);
Var14:=LLV(LOW,30);
Var15:=CLOSE/MA(CLOSE,40)*100<78;
Var16:=CLOSE/MA(CLOSE,60)*100<74;
Var17:=HIGH>LOW*1.051 AND J<55
;
Var18:=Var17 AND COUNT(Var17,5)>=3;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
散户操盘: EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3)/4*5,;
强势:105;
生命线: 50;
地平线:0;
散户: EMA((CLOSE-Var14)/(Var13-Var14)*100,5) ;
同盟: EMA((CLOSE-Var14)/(Var13-Var14)*100,20) ;
DRAWTEXT(CROSS(90,散户),散户操盘,'↓'),colorred,linethick4;
DRAWTEXT(CROSS(同盟,散户) and 散户>50 ,散户操盘,'↓'),colorred,linethick4;
DRAWTEXT((CROSS(散户,同盟) and 散户<30 and count(c>ref(c,1),3)>=1 and (hhv(h,8)/ref(c,1)>=1.10 and ref(c,6)/ref(c,1)<=1.45) ) ,散户,'↑'),colorgreen,linethick4;
0, , ;
DRAWTEXT(IF(散户操盘>108 and h/l>1.07 and (h/c>1.03 or c/v>1.05) ,散户操盘,0) ,散户操盘,'↓'),coloryellow,linethick4;
DRAWTEXT(IF(散户操盘>115 and h/l>1.07 and (h/c>1.03 or c/v>1.05),散户操盘,0) ,散户操盘,'↓'),colorred,linethick4;
DRAWTEXT(CROSS(散户操盘,生命线)and 同盟 < 45,散户操盘,'↑'),colorgreen,linethick4;
DRAWTEXT(CROSS(84,RSI),散户操盘,'↓'),coloryellow,linethick4;
DRAWTEXT(散户2<=短线 and Var18 AND (Var15 OR Var16) and hhv(h,8)/ref(c,1)>=1.18 and ref(c,6)/ref(c,1)<=1.45,散户,'↑'),coloryellow,linethick4;