鳄鱼分形 指标源码

鳄鱼线
用SMA编的

Y:=(H+L)/2;
AA:=REF((SMA(Y,5,1)),3);
BB:=REF((SMA(Y,8,1)),5);
CC:=REF((SMA(Y,13,1)),8);

鳄:CC,COLORFF6600;
齿:BB,COLORRED;
唇:AA,COLORGREEN;

 

用EMA编的

var1:=(H+L)/2;
下颚:SMA(var1,13,1),SHIFT8,COLORBLUE;
牙齿:SMA(var1,8,1),SHIFT5,COLORRED;
上唇:SMA(var1,5,1),SHIFT3,COLORGREEN;

源码指标(鳄鱼分形)

 

 

Var1:=(H+L)/2;   
上唇:REF(SMA(Var1,5,1),3),COLORGREEN;   
牙齿:REF(SMA(Var1,8,1),5),COLORRED;   
下颚:REF(SMA(Var1,13,1),8),COLORBLUE;   
Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);   
Var2:=CROSS(Var1,0.9);   
Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);   
Var4:=CROSS(Var3,0.9);   
drawicon(Var2,HIGH*1.01,4),Color00E40E;   
drawicon(Var4,LOW*0.99,5),Color00E40E;   
Var5:=IF(Var2,HIGH,IF(Var4,LOW,0));   
{POLYLINE(Var5,Var5),Colorff00ff;}   
Var6:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);   
Var7:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);   
Var8:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)   
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);   
Var9:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);   
VarA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);   
VarB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)   
AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);   
上向分形: REF(HIGH,BARSLAST(Var2)), POINTDOT,ColorEA91B5;   
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2)),REF(HIGH,BARSLAST(Var2)),5,0),COLORMAGENTA;   
向下分形: REF(LOW,BARSLAST(Var4)), POINTDOT,Color3791B5;   
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4)),REF(LOW,BARSLAST(Var4)),5,0),COLORYELLOW;  

AO

Var1:=(H+L)/2;   
AO:SMA(Var1,5,1)-SMA(Var1,34,1),COLOR6699CC;   
STICKLINE(AO>=REF(AO,1),0,AO,6,1),COLORRED;   
STICKLINE(AO<=REF(AO,1),0,AO,6,1),COLORGREEN;   
AO,COLOR000000;  

AC
Var1:=(H+L)/2;   
AO:=SMA(Var1,5,1)-SMA(Var1,34,1);   
AC:SMA((AO-SMA(AO,5,1)),5,1),COLOR6699CC;   
STICKLINE(AC>=REF(AC,1),0,AC,6,1),COLORRED;   
STICKLINE(AC<=REF(AC,1),0,AC,6,1),COLORGREEN;   
AC,COLOR000000;  

区域

Var1:=(H+L)/2;   
AO:=SMA(Var1,5,1)-SMA(Var1,34,1);   
AC:=SMA((AO-SMA(AO,5,1)),5,1);   
AO>REF(AO,1) AND AC>REF(AC,1),COLORRED;   
AO<REF(AO,1) AND AC<REF(AC,1),COLORGREEN;   
AO>REF(AO,1) AND AC<REF(AC,1),COLORGRAY;   
AO<REF(AO,1) AND AC>REF(AC,1),COLORGRAY;  

OSC

参数名：SHORT         5    1    999   
            LONG         35    1    999   
MA1:=MA((HIGH+LOW)/2,SHORT);   
MA2:=MA((HIGH+LOW)/2,LONG);   
MA1-MA2,STICK,COLORgreen;  

OSCMACD
参数名：LONG         35    1    999   
            SHORT         5    1    999   
OSC: (MA(CLOSE,SHORT)-MA(CLOSE,LONG))/MA(CLOSE,SHORT)*100, COLORSTICK;   
OSCMACD: MA(OSC,5);