源码
N:=10;N2:=30;N3:=50;
Var1:=MA(VOL,5)/MA(VOL,60);
Var2:=MA(Var1,5);
Var3:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
Var4:=MA(Var1,121);
Var5:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100;
Var6:=SMA(Var5,15,1);
Var7:=SMA(Var6,15,1);
Var8:=3*Var6-2*Var7;
Var9:=REF(CLOSE,1);
VarA:=SMA(MAX(CLOSE-Var9,0),6,1)/SMA(ABS(CLOSE-Var9),6,1)*100;
DRAWTEXT(CROSS(84,VarA),HIGH,'顶 ');
DRAWTEXT(CROSS(VarA,11),LOW,'低');
DRAWICON(FILTER(CROSS(Var1,Var2) AND Var2<0.5 AND Var8<20,13),LOW,1);
VarB:=IF(HIGH=CLOSE,1.07*CLOSE,HIGH);
VarC:=IF(HIGH=CLOSE,0.93*CLOSE,LOW);
VarD:=(REF(CLOSE,1)+REF(LOW,1)+REF(HIGH,1)+REF(OPEN,1))/4;
VarE:=IF(REF(LOW,1)=REF(HIGH,1),1.1*REF(CLOSE,1),VarD)-REF(LOW,1);
天堂: EMA(EMA(VarB,6)*1.14,8);
地狱: EMA(EMA(VarC,6)*0.96,8);
人间: MA(CLOSE,10);
VarF:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;
Var10:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
Var11:=SMA(Var10,3,1);
Var12:=SMA(Var11,3,1);
Var13:=Var12-REF(Var12,1);
DRAWICON(CROSS(0,Var13) AND Var12>100-N3 AND VarF>N,HIGH*1.05,2);
DRAWICON(CROSS(Var13,0) AND Var12<(-1)*N,LOW*0.95,1);
DRAWICON((CLOSE-MA(CLOSE,60))/MA(CLOSE,60)<(-0.01)*N2,CLOSE,1);
Var14:=MA(CLOSE,5);
Var15:=MA(CLOSE,10);
Var16:=MA(CLOSE,60);
Var17:=SMA(100*(Var14-Var16)/Var16,5,1);
Var18:=CROSS(REF(Var17,1),Var17) AND Var17>10;
Var19:=COUNT(Var18,3) AND Var15
Var1A:=Var17<-18 AND CROSS(Var17,REF(Var17,1));
Var1B:=COUNT(Var1A,3) AND Var15>REF(Var15,1);
Var1C:=IF(Var19,-6,IF(Var1B,6,0));
DRAWTEXT(FILTER(Var1C,3)>0,LOW,'买');
DRAWTEXT(FILTER(Var1C,3)<0,HIGH,'卖');
谋事: MA(CLOSE,5);
成事: MA(CLOSE,20);
DRAWTEXT(CROSS(成事,谋事),HIGH*1.05,'风险');
Var1D:=EMA(CLOSE,3)-EMA(CLOSE,6)-(EMA(CLOSE,6)-EMA(CLOSE,12))*(-100);
Var1E:=EMA(Var1D,3);
Var1F:=EMA(CLOSE,3)-EMA(CLOSE,6)-(EMA(CLOSE,24)-EMA(CLOSE,36))*(-100);
Var20:=EMA(Var1F,9);
Var21:=CROSS(Var1D,Var1E);
Var22:=CROSS(Var1E,Var1D);
空: STICKLINE(Var22,OPEN,CLOSE,10,0);
多: STICKLINE(Var21,OPEN,CLOSE,10,0);
