鳄鱼线主图－精品通达信指标公式源码分享

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;

R2:=REF(齿,5);

KU1:=IF(HIGH=HHV(HIGH,3),1,0);

KD1:=IF(LOW=LLV(LOW,3),1,0);

UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));

DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));

上分形:IF(HIGH>=R2,UL,REF(UL,BARSLAST(HIGH>R2))),POINTDOT,LINETHICK3,,COLORMAGENTA;

下分形:IF(LOW<=R2,DL,REF(DL,BARSLAST(LOW<=R2))),POINTDOT,LINETHICK3,COLORYELLOW;

DRAWICON(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1),HIGH*1.03,1);

DRAWICON(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1),LOW*0.99,2);

AO:=MA(Y,5)-MA(Y,34);

MAO:=MA(AO,5);

AC:=AO-MAO;

AC1:=REF(AC,1);

AO1:=REF(AO,1);

KAC:=IF(AC>AC1 AND AO>AO1,1,0);

KAO:=IF(AC<AC1 AND AO<AO1,-1,0);

STICKLINE(KAC=1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORRED;

STICKLINE(KAO=-1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORGREEN;

STICKLINE(KAO=0 AND KAC=0 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORDDDDDD;

STICKLINE(CLOSE>=OPEN,HIGH,CLOSE,0.0.1,0),COLORRED;

STICKLINE(CLOSE>=OPEN,OPEN,LOW,0.0.1,0),COLORRED;

STICKLINE(KAC=1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORRED;

STICKLINE(KAO=-1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORGREEN;

STICKLINE(KAO=0 AND KAC=0 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORDDDDDD;