通达信鳄鱼分形动量选股指标公式源码

通达信鳄鱼分形动量选股指标公式源码

源码正文：

VAR11:=(H+L)/2{XG51};
上唇:REF(SMA(VAR11,5,1),3),COLORYELLOW{XG51};
牙齿:REF(Sma(VAR11,8,1),5),COLORWHITE{XG51};
下颚:REF(SMA(VAR11,13,1),8),COLORCYAN{XG51};
VAR1:=BacKSET(REF(HIGH,2)=HHV(HIGH,5),3){XG51};
VAR2:=crOSS(VAR1,0.9){XG51};
VAR3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3){XG51};
VAR4:=CROSS(VAR3,0.9){XG51};
压力: REF(HIGH,BArslAst(VAR2)), POINTDOT,COLOREA91B5{XG51};
支撑: REF(LOW,BARSLAST(VAR4)), POINTDOT,COLOR3791B5{XG51};
Y:=(HIGH+LOW+CLOSE+OPEN)/4{XG51};
ao:ema(Y,5)-EMA(Y,34),COLORLIGRAY;
AOR:=REF(AO,1){XG51};
STICKLINE(AO>AOR,0,AO,0.1,0),COLORWHITE;
STICKLINE(AO<AOR,0,AO,0.1,0),COLORCYAN{XG51};
IF(AO>=REF(AO,1),AO,DRAWNULL),COLORWHITE{XG51};
IF(AO<=REF(AO,1),AO,DRAWNULL),COLORCYAN{XG51};
DRAWICON(CROSS(AO,0),LLV(AO,3),1){XG51};
DRAWICON(CROSS(0,AO),HHV(AO,3),2){XG51};
DRAWICON(LONGCROSS(AO,REF(AO,1),1)=1&&AO<0,LLV(AO,3)*1.005,38){XG51};
DRAWICON(LONGCROSS(REF(AO,1),AO,1)=1&&AO>0,HHV(AO,3)*0.995,39){XG51};
0{XG51};
P:=(OPEN+HIGH+LOW+CLOSE)/4{XG51};
A0O:=MA(P,5)-MA(P,34){XG51};
AC:A0O-MA(A0O,5),COLORBLUE{XG51};
AR:=REF(AC,1){XG51};
IF(AC>=AR,AC,DRAWNULL),COLORWHITE{XG51};
IF(AC<=AR,AC,DRAWNULL),COLORCYAN{XG51};
STICKLINE(AC>AR,0,AC,0.1,0),COLORWHITE{XG51};
STICKLINE(AC<AR,0,AC,0.1,0),COLORCYAN{XG51};
DRAWICON(CROSS(AC,AR)&&AC<0,LLV(AC,2),38){XG51};
DRAWICON(CROSS(AR,AC)&&AC>0,HHV(AC,2),39){XG51};
ZERO:0,COLORBLUE{X-G+5?1-C-N-{};