|
鳄鱼分形 博易
主图叠加
Y:=(HIGH+LOW)/2;
上唇:SMA(Y,5,1),COLORGREEN;
牙齿:SMA(Y,8,1),COLORRED;
下鄂:SMA(Y,13,1),COLORFF6600;
{分形- 没有未来函数}
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>=MA(CLOSE,3),UL,REF(UL,BARSLAST(HIGH>MA(CLOSE,3)))),LINETHICK0,COLORMAGENTA;{分形数字}
下分形:IF( LOW<=MA(CLOSE,3),DL,REF(DL,BARSLAST(LOW<=MA(CLOSE,3)))),LINETHICK0,COLORYELLOW;
STICKLINE(BARSLAST(ABS(上分形-REF(上分形,1)))<BARSLAST(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1)),上分形,上分形,4,1),COLORMAGENTA;{分形横线}
STICKLINE(BARSLAST(ABS(下分形-REF(下分形,1)))<BARSLAST(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1)),下分形,下分形,4,1),COLORYELLOW;
DRAWTEXT(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1),LOW,'买'),COLORFF00FF;{箭头突破分形}
DRAWTEXT(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1),H,'卖'),COLORFF0000;
{AOAC-K区域}
VAR1:=(HIGH+LOW)/2;
AO:=MA(VAR1,5)-MA(VAR1,34);
AC:=AO-MA(AO,5);
VF:=AO>REF(AO,1) AND AC>REF(AC,1),COLORRED;
VG:=AO<REF(AO,1) AND AC<REF(AC,1),COLORGREEN;
VH:=AO>REF(AO,1) AND AC<REF(AC,1),COLORGRAY;
VI:=AO<REF(AO,1) AND AC>REF(AC,1),COLORGRAY;
VJ:=VH OR VI;
STICKLINE(VF AND CLOSE>OPEN,CLOSE,OPEN,4,1),COLORRED;
STICKLINE(VF AND CLOSE<=OPEN,CLOSE,OPEN,4,0),COLORRED;
STICKLINE(VF,HIGH,LOW,1,0),COLORRED;
STICKLINE(VG AND CLOSE>OPEN,CLOSE,OPEN,4,1),COLORGREEN;
STICKLINE(VG AND CLOSE<=OPEN,CLOSE,OPEN,4,0),COLORGREEN;
STICKLINE(VG,HIGH,LOW,1,0),COLORGREEN;
STICKLINE(VJ AND CLOSE>OPEN,CLOSE,OPEN,4,1),COLORGRAY;
STICKLINE(VJ AND CLOSE<=OPEN,CLOSE,OPEN,4,0),COLORGRAY;
STICKLINE(VJ,HIGH,LOW,1,0),COLORGRAY;
{平衡线}
P1:=REF(HIGH,1)>HIGH AND REF(HIGH,1)>下鄂;
平衡线买:REF(REF(HIGH,1),BARSLAST(P1)),LINETHICK0,COLORWHITE;
STICKLINE(CROSS(HIGH,平衡线买) AND LOW>平衡线买,(HIGH+LOW)/2,(HIGH+LOW)/2,4,0),COLORWHITE;
STICKLINE(CROSS(HIGH,平衡线买) AND LOW<=平衡线买,平衡线买,平衡线买,4,0),COLORWHITE;
P2:=REF(LOW,1)<LOW AND REF(LOW,1)<下鄂;
平衡线卖:REF(REF(LOW,1),BARSLAST(P2)),LINETHICK0,COLORCYAN;
STICKLINE(CROSS(平衡线卖,LOW) AND HIGH<平衡线卖,(HIGH+LOW)/2,(HIGH+LOW)/2,4,0),COLORCYAN;
STICKLINE(CROSS(平衡线卖,LOW) AND HIGH>=平衡线卖,平衡线卖,平衡线卖,4,0),COLORCYAN;
DRAWTEXT(ISLASTBAR AND AO>REF(AO,1) AND AC>REF(AC,1),Y,'↑AO↑AC'),COLORRED;
DRAWTEXT(ISLASTBAR AND AO<REF(AO,1) AND AC<REF(AC,1),Y,'↓AO↓AC'),COLORGREEN;
DRAWTEXT(ISLASTBAR AND AO>REF(AO,1) AND AC<REF(AC,1),Y,'↑AO↓AC'),COLORWHITE;
DRAWTEXT(ISLASTBAR AND AO<REF(AO,1) AND AC>REF(AC,1),Y,'↓AO↑AC'),COLORWHITE;
|
|