通达信黄金箱体主图未加密选股指标公式源码

源码正文：

M1:=10{XG51};
M2:=10{XG51};
M3:=20{XG51};
M4:=20{XG51};
ma1:MA(CLOSE,M1){XG51};
MA2:MA(CLOSE,M2){XG51};
MA3:MA(CLOSE,M3){XG51};
MA4:MA(CLOSE,M4){XG51};
AB:=ema(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8){XG51};
BA:=EMA(AB,5){XG51};
A1:=REFDATE(REF(HHV(H,96),5),DATE){XG51};
B1:=REFDATE(REF(LLV(L,96),5),DATE){XG51};
DY:=((A1)+(B1))/2{XG51};
箱顶:IF(AB>0 AND AB-BA<=0,A1,A1),LINETHICK3,COLOR00FF00{XG51};
箱腰:IF(AB>0 AND AB-BA<=0,DY,DY),LINETHICK3,COLOR00FF00{XG51};
箱低:IF(AB>0 AND AB-BA<=0,B1,B1),LINETHICK3,COLOR00FF00{XG51};
高1:IF(AB>0 AND AB-BA>0,A1,DRAWNULL),LINETHICK3,COLORWHITE{XG51};
中1:IF(AB>0 AND AB-BA>0,DY,DRAWNULL),LINETHICK3,COLORWHITE{XG51};
低1:IF(AB>0 AND AB-BA>0,B1,DRAWNULL),LINETHICK3,COLORWHITE{X^G!5-1^C^N^{};

源码正文：

Jbs:=C/REF(C,1)>1.05 AND C=H AND BETWEEN(FORCAst(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12)){XG51};
介必升:=FILTER(JBS,28)*100{XG51};
VAR1:=IF((C/REF(C,1)>1.05 AND H/C<1.01 AND C>REF(C,1)),91,0){XG51};
VAR2:=FILTER((VAR1>90),45) AND FILTER((VAR1>90),35) AND 介必升>0{XG51};
强势预警:VAR2 AND COUNT(VAR2,60)=1{X=G-5?1=C=N={};