通达信圣灵石之资金活动选股指标公式源码

通达信圣灵石之资金活动选股指标公式源码

源码正文：

VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1){XG51};
VAR2:=SMA(Abs(LOW-VAR1),13,1)/Sma(MAX(LOW-VAR1,0),10,1){XG51};
VAR3:=ema(VAR2,10){XG51};
VAR4:=LLV(LOW,33){XG51};
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3){XG51};
圣灵石:IF(VAR5>REF(VAR5,1),VAR5,0),COLORWHITE,NODRAW{XG51};
stICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,0 ),COLOR000055{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2.6,0 ),COLOR000077{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,2.1,0 ),COLOR000099{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,1.5,0 ),COLOR0000BB{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,0.9,0 ),COLOR0000DD{XG51};
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,0.3,0 ),COLOR0000FF{XG51};
资金活动:IF(VAR5<REF(VAR5,1),VAR5,0),COLORCYAN,NODRAW{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),COLOR005500{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2.6,0),COLOR007700{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2.1,0),COLOR009900{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,1.5,0),COLOR00BB00{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,0.9,0),COLOR00DD00{XG51};
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,0.3,0),COLOR00FF00{XG51};
方向:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100 , COLORAAbbdD{XG51};
位置:=((REF(方向,1)<REF(方向,2) AND 方向<-20 AND 方向>-25) AND 方向>=REF(方向,1)) OR (REF(crOSS(-20,方向),1) AND CROSS(方向,-20)){XG51};
DRAWTEXT(位置,80,'圣灵石'),COLOR41B5FA{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,7))/(0.015*AVEDEV(TYP,7)) COLORBLUE{XG51};
K:=SMA(CCI,3,1){XG51};
D:=SMA(K,3,1){XG51};
DRAWBAND(K,RGB(250,10,10),D,RGB(0,200,0)){XG51};
圣:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10{XG51};
灵:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100{XG51};
石:=SMA(灵,13,8){XG51};
仙:=CEILING(SMA(石,13,8)){XG51};
编著:=SMA(圣,21,8){XG51};
启动:仙-编著>75,COLOR00FFFF,NODRAW{XG51};
STICKLINE(仙-编著>75,0,30,2,0),COLORF0F000{XG51};
STICKLINE(仙-编著>75,0,30,2,0),COLOR008888{XG51};
STICKLINE(仙-编著>75,0,30,1.2,0),COLOR00AAAA{XG51};
STICKLINE(仙-编著>75,0,30,1,0),COLOR00CCCC{XG51};
STICKLINE(仙-编著>75,0,30,0.3,0),COLOR00FFFF{X.G~5_1.C.N.{};