大智慧逃顶指标公式
GLL:=100;
Var1:=(C-MA(C,6))/MA(C,6)*100;
Var2:=(C-MA(C,12))/MA(C,12)*100;
Var3:=(C-MA(C,24))/MA(C,24)*100;
Var4:=(Var1+2*Var2+3*Var3)/6;
Var5:=MA(Var4,3);
Var6:=(C-LLV(L,18))/(HHV(H,18)-LLV(L,18))*100;
Var7:=SMA(SMA(Var6,2,1)+3,2,1);
STICKLINE(Var7<20,-30,-40,10,1),colorffff00;
STICKLINE(Var5<GLL,-40,-30,10,0),colorgreen;
Var9:=(C-LLV(L,80))/(HHV(H,80)-LLV(L,80))*200;
VarA:=SMA(Var9,3,1);
VarB:=SMA(VarA,3,1);
VarC:=3*VarA-2*VarB;
VarD:=LLV(L,5);
VarE:=HHV(H,5);
VarF:=EMA((C-VarD)/(VarE-VarD)*100,4)*2;
Var10:=EMA(0.667*REF(VarF,1)+0.333*VarF,2);
Var11:=3*VarF-2*Var10;
Var12:=POW(MA(C,5),2)+MA(C,5);
Var13:=POW(MA(L,5),2)+MA(L,5);
Var14:=POW(MA(H,5),2)+MA(H,5);
Var15:=(Var12-LLV(Var13,64))/(HHV(Var14,64)-LLV(Var13,64))*150+65-10;
Var16:=SMA(Var15,3,1)*1.5-100;
Var17:=SMA(Var16,3,1);
Var18:=3*Var16-2*Var17;
Var19:=(H+L+C*2)/4;
Var1A:=EMA(Var19,13);
Var1B:=STD(Var19,13);
Var1C:=(Var19-Var1A)*100/Var1B;
Var1D:=EMA(Var1C,5);
Var1E:=EMA(Var1D,13);
Var1F:=EMA(Var1D,13)+200-100;
Var20:=EMA(Var1F,10);
Var21:=3*Var1F-2*Var20;
Var22:=VarA+VarF+Var16+Var1F;
Var23:=VarB+Var10+Var17+Var20;
Var24:=VarC+Var11+Var18+Var21;
Var25:=(H+L+C)/3;
Var26:=AMOUNT/V/100;
Var27:=SUM(AMOUNT,5)/SUM(V,5)/100;
Var28:=(Var25-MA(Var25,34))/(0.015*AVEDEV(Var25,34));
Var29:=DMA(AMOUNT/V/100,V/CAPITAL);
Var2A:=(H+LOW+C+Var25)/4;
Var2B:=EMA(Var2A,24);
Var2C:=STD(Var2A,24);
Var2D:=(Var2A-Var2B)/Var2C*100;
Var2E:=(Var25-MA(Var25,24))/(0.015*AVEDEV(Var25,24));
Var2F:=EMA(Var2D,5);
Var30:=(Var26-MA(Var26,21))/(0.015*AVEDEV(Var26,21));
Var31:=(Var27-MA(Var27,90))/(0.015*AVEDEV(Var27,90));
Var32:=((Var2F+Var2E+Var28)/3+165)/4;
Var33:=(EMA(EMA(EMA(Var32,15),10),5)-25)*2+Var29;
Var34:=(Var22+Var23+Var24*30)/32/5-15;
Var35:=EMA(Var34,13);
Var36:=(Var32+Var34)/2/1.1;
Var38:=EMA((Var33+Var35)/2,2);
Var39:=EMA(Var38,34);
STICKLINE(Var36>Var38,Var36,Var38,6,1),coloryellow;
STICKLINE(Var36>Var39,Var36,Var39,3,0),colorred;
STICKLINE(Var36<Var39,Var36,Var39,6,1),colorff0033;
STICKLINE(Var36>Var38 AND Var5<GLL,Var36,Var38,6,0);
STICKLINE(Var36<Var38 AND Var36>Var39,Var36,Var38,3,1),colorwhite;
STICKLINE(Var36<Var39,120,125,6,1),colorff0033;
STICKLINE(Var36>Var39,120,125,3,0),colorred;
Var3A:=crOSS(Var36,0) AND COUNT(Var5<-12,2)>=1 OR CROSS(Var36,Var38) AND COUNT(Var5<-12,2)>=1;
STICKLINE(Var3A,100,0,3,0),colorff0033;
DRAWICON(Var3A,100,6);
DRAWICON(CROSS(Var36,Var38) AND COUNT(Var5<GLL,2)>=1 OR CROSS(Var36,0) AND COUNT(Var5<GLL,2)>=1,40,4);
Var3C:=(HIGH+LOW+CLOSE*2)/4;
Var3D:=EMA(Var3C,21);
Var3E:=STD(Var3C,21);
Var3F:=((Var3C-Var3D)/Var3E*100+200)/4;
Var40:=(EMA(Var3F,5)-25)*1.56;
Var41:=EMA(Var40,2)*1.22;
AJD: EMA(Var41,2),colorgreen;
AJJ: 3*Var41-2*AJD;
STICKLINE(AJJ>100,120,125,8,0),colorwhite;
100;
大智慧RSI核心指标公式
input:n(10,1,30),p(9,1,21);
0,DOTLINE,colorwhite;
50,DOTLINE,colorwhite;
-20,DOTLINE,color000099;
-50,DOTLINE,colorwhite;
{rsi差比}
gc:=close;
比c:=ema(gc/"SH000001$CLOSE"*1000,3);
比LC:= REF(比c,1);
比RSI1:=SMA(MAX(比c-比LC,0),6,1)/SMA(Abs(比c-比LC),6,1)*100;
比RSI:=eMA(比RSI1,n)-50;
比RSEA:=EMA(比RSI,p);
STICKLINE(比RSI<ref(比RSI,1)and 比RSI>0,0,比RSI,6,0),color777777;
STICKLINE(比RSI<ref(比RSI,1)and 比RSI<0,0,比RSI,6,0),color555555;
STICKLINE(比RSI>ref(比RSI,1)and 比RSI<0,0,比RSI,6,0),COLOR777777;
STICKLINE(比RSI>ref(比RSI,1)and 比RSI>0,0,比RSI,6,0),COLOR999999;
{个股多空}
TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14);
HD := HIGH-REF(HIGH,1);
LD := REF(LOW,1)-LOW;
DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14);
DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14);
多:=DMP*100/TR-50;
空:=DMM*100/TR-50;
差值:多-空,linethick0,color00cc33;
STICKLINE( 差值>=0,-50 ,差值-50,4 ,0 ),COLORCC0099;
STICKLINE( 差值<0,-50 ,差值-50,4 ,0 ),COLOR336666;
{RSI}
LC := REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100-100,LAYER0;
RSI2:SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100-100,LAYER0;
RSI3:SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100-100,LAYER0;
{RSI压力支撑}
TY:=RSI1;
AA:=REF(TY,5)=HHV(TY,2*5+1);
BB:=BACKSET(AA,5+1);
CC:=FILTER(BB,5) AND TY=HHV(TY,5+1);
AA2:=REF(TY,5)=LLV(TY,2*5+1);
BB2:=BACKSET(AA2,5+1);
CC2:=FILTER(BB2,5) AND TY=LLV(TY,5+1);
GG:=BARSTATUS=2 AND REF(CC,BARSLAST(CC));
HH:=BACKSET(GG,BARSLAST(CC)+1);
II:=HH>REF(HH,1);
JJ:=REF(BARSLAST(CC),1);
KK:=BACKSET(II,JJ+2);
LL:=KK>REF(KK,1);
DRAWLINE(LL,TY,II,TY,1),COLORblue,DOTLINE;
CS:=(REF(TY,BARSLAST(II))-REF(TY,BARSLAST(LL)))/(BARSLAST(LL)-BARSLAST(II));
阻力线:=REF(TY,BARSLAST(II))+BARSLAST(II)*CS;
阻力值:阻力线,LINETHICK0;
DRAWICON(crOSS(TY,阻力线),阻力线*0.99,12);
阻力点:阻力线*0.99,linethick0;
GG2:=BARSTATUS=2 AND REF(CC2,BARSLAST(CC2));
HH2:=BACKSET(GG2,BARSLAST(CC2)+1);
II2:=HH2>REF(HH2,1);
JJ2:=REF(BARSLAST(CC2),1);
KK2:=BACKSET(II2,JJ2+2);
LL2:=KK2>REF(KK2,1);
DRAWLINE(LL2,TY,II2,TY,1),COLORblue,DOTLINE;
{RSICD}
RSI: eMA(RSI1,n)+50;
RSEA : EMA(RSI,p);
RSCD:2*(RSI-RSEA),linethick0;
bbRSI:=RSI-ref(RSI,1);
bbRSEA:=RSEA-ref(RSEA,1);
bbRSCD:=RSCD-ref(RSCD,1);
PARTLINE(bbRSI>0,RSI),color0066ff,LINETHICK2;
PARTLINE(bbRSI<0,RSI),colorcyan,LINETHICK2;
PARTLINE(bbRSEA>0,RSEA),colormagenta,LINETHICK2;
PARTLINE(bbRSEA<0,RSEA),color009999,LINETHICK2;
RSI速率:=bbRSI*100;
RSEA速率:=bbRSEA*100;
RSCD速率:=bbRSCD*100;
{kd}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1);
D:SMA(K,3,1);
bbK:=K-ref(K,1);
bbd:=D-ref(D,1);
PARTLINE(bbD>0,D),coloryellow,LINETHICK2;
PARTLINE(bbD<=0,D),color00ff33,LINETHICK2;
PARTLINE(bbK>0,K),colorcc00ff,LINETHICK2;
PARTLINE(bbK<=0,K),colorwhite,LINETHICK2;
K速率:bbK*100,LINETHICK0;
D速率:bbD*100,LINETHICK0;

