大智慧红入灰出指标公式

N:=21;
Var1:=HHV(HIGH,9)-LLV(LOW,9);
Var2:=HHV(HIGH,9)-CLOSE;
Var3:=CLOSE-LLV(LOW,9);
Var4:=Var2/Var1*100-70;
Var5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
Var6:=(2*CLOSE+HIGH+LOW)/4;
Var7:=SMA(Var3/Var1*100,3,1);
Var8:=LLV(LOW,34);
Var9:=SMA(Var7,3,1)-SMA(Var4,9,1);
VarA:=IF(Var9>100,Var9-100,0);
VarB:=HHV(HIGH,34);
AA:= VarA*2;
BB:= EMA((Var6-Var8)/(VarB-Var8)*100,13);
VarC:=EMA(0.667*REF(BB,1)+0.333*BB,2);
CC:= SMA(Var5,20,1);
VarD:=SMA(AA,2,1)-AA;
VarE:=EMA(0.667*REF(BB,1)+0.333*BB,2)-BB;
VAR1a:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2a:=SMA(VAR1a,9,1)+100;
VAR3a:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4a:=SMA(VAR3a,3,1);
VAR5a:=SMA(VAR4a,3,1)+100;
VAR6a:=VAR5a-VAR2a;
提前抄底: IF(VAR6a>n,VAR6a-n,0),ColorFFFFFF;
LC:=REF(CLOSE,1);
rsi:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100;
e:=crOSS(83,RSI);
STICKLINE( e,e,55,1,0),Color00FFFF;
DRAWTEXT(e,50,' 逃顶'),COLORff9966;
DRAWTEXTABS(5,5,' '),linethick1,COLOR00EEff;
STICKLINE(REF(提前抄底,1)<提前抄底,提前抄底,REF(提前抄底,1),5,0),colorff00ff;
STICKLINE(REF(提前抄底,1)>提前抄底,提前抄底,REF(提前抄底,1),5,0),colorffcc66;