大智慧东海指标副图指标

源码

{3、东海指标}
input:n(13,1,150), n1(75,1,250), m(14,1,150),m1(15,1,160);
Var1:=3*SMA((CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100,20,1),15,1);
Var2:=3*SMA((OPEN-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100,20,1)-2*SMA(SMA((OPEN-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100,20,1),15,1);
Var3:=0-Var2;
Var4:=0-Var1;
Var5:=MA(Var3,3);
STICKLINE((-1)*Var4>Var5,(-1)*Var4,(-1)*Var3,6,1), COLORRED;
STICKLINE(Var4>=REF(Var3,1),(-1)*Var4,(-1)*Var3,6,1), COLORGREEN;
Var6:=REF(LOW,1)*0.9;
Var7:=LOW*0.9;
Var8:=(Var7*VOL+Var6*(CAPITAL-VOL))/CAPITAL;
Var9:=EMA(Var8,30);
VarA:=CLOSE-REF(CLOSE,1);
VarB:=MAX(VarA,0);
VarC:=ABS(VarA);
VarD:=SMA(VarB,7,1)/SMA(VarC,7,1)*100;
VarE:=SMA(VarB,13,1)/SMA(VarC,13,1)*100;
VarF:=BARSCOUNT(CLOSE);
Var10:=SMA(MAX(VarA,0),6,1)/SMA(ABS(VarA),6,1)*100;
Var11:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
Var12:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
Var13:=SMA((SMA(Var12,4,1)-50)*2,3,1);
Var14:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
Var15:=SMA(Var14,4,1);
Var16:=SMA(Var15,3,1);
Var17:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
Var18:=Var10<=25 AND Var11<-95 AND Var17>20 AND Var13<-30 AND Var16<30 AND Var9-CLOSE>=-0.25 AND VarD<22 AND VarE<28 AND VarF>50;
Var19:=(HIGH+LOW+CLOSE)/3;
Var1A:=(Var19-MA(Var19,14))/(0.015*AVEDEV(Var19,14));
Var1B:=(Var19-MA(Var19,70))/(0.015*AVEDEV(Var19,70));
Var1C:=IF(Var1A>=150 AND Var1A<200 AND Var1B>=150 AND Var1B<200,10,0);
Var1D:=IF(Var1A<=-150 AND Var1A>-200 AND Var1B<=-150 AND Var1B>-200,-10,Var1C);
Var1E:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
Var1F:=REVERSE(Var1E);
Var20:=SMA(Var1E,3,1);
Var21:=SMA(Var20,3,1);
Var22:=SMA(Var21,3,1);
Var23:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
Var24:=SMA(Var23,M1,1);
牛朗: SMA(Var24,M1,1), COLORMAGENTA;
Var25:=(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M))*100;
Var26:=SMA(Var25,M1,1);
Var27:=SMA(Var26,M1,1);
织女: SMA(牛朗,M1,1), COLORYELLOW;
Var28:=COST(10);
Var29:=(CLOSE-Var28)/Var28*100;
Var2A:=COUNT(Var29<-2.05,3);
买: IF(Var2A>=3,10,0), COLORCYAN;
相遇: STICKLINE(CROSS(5,买),0,20,6,0), COLORRED;
Var2B:=IF(CROSS(Var18,0.5),60,0);

相爱: STICKLINE(CROSS(SMA(Var27,M1,1),85),0,75,6,0),  COLORWHITE;
Var2C:=CROSS(SMA(MAX(CLOSE-(CLOSE+REF(CLOSE,1))/2,0),5,1)/SMA(ABS(CLOSE-(CLOSE+REF(CLOSE,1))/2),5,1)*100,(CLOSE+REF(CLOSE,1))/2) AND (CLOSE-REF(CLOSE,36))/REF(CLOSE,36)*100<-10 AND HHV(HIGH,40)*0.8>LLV(LOW,5) AND SMA((HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1)>80;
Var2D:=(CLOSE-OPEN)/OPEN*100;
Var2E:=REF(CLOSE,1);
Var2F:=SMA(MAX(CLOSE-Var2E,0),6,1)/SMA(ABS(CLOSE-Var2E),6,1)*100;
Var30:=COUNT(Var2F<20,20)>=1;
Var31:=IF(Var2D>9 AND Var30,60,0);
相识: STICKLINE(Var2B OR Var31 OR Var2C*60,0,60,6,0), COLORGREEN;

Var32:=IF("RSI.RSI1">78 AND "ROC.ROC">20,80,100); {"ROC.ROC">20大于号我加的}

Var33:=IF(CROSS(Var22,Var21) AND Var22>75,80,100);

STICKLINE(CROSS(Var18,0.5) AND COUNT(Var18=1,10)=1,0,60,6,0), COLORGREEN;
DRAWTEXT(CROSS(Var18,0.5) AND COUNT(Var18=1,10)=1,35,'$'),  COLORRED;
卖: IF(Var32<100 OR Var33<100,80,100), COLORRED;