通达信海豚张嘴指标
源码
M12:MA(CLOSE,12),COLORYELLOW,LINETHICK2;
A:MA(C,7),COLORGREEN,LINETHICK2; IF(A REF(A,1),A,DRAWNULL)COLORRED,LINETHICK5;
M26:MA(CLOSE,26),COLORYELLOW,LINETHICK2,COLOR8000FF;
M62:MA(CLOSE,62),COLORYELLOW,LINETHICK2,CIRCLEDOT;
M133:MA(CLOSE,133),COLORYELLOW,LINETHICK2,,COLOR0080FF;
B:=A REF(A,1);
IF(B-1,A,DRAWNULL)COLORRED,LINETHICK2;
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.97,' 进场') ,LINETHICK2,COLOR00FFFF;
DRAWICON((ZIG(3,5) REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) =REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2) =REF(ZIG(3,5),3)),LOW*0.99,1);
DRAWICON((ZIG(3,5) REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) =REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2) =REF(ZIG(3,5),3)),H,2);
AZ6:=(3 * (SMA((((CLOSE - (LLV(LOW,27))) /
((HHV(HIGH,27)) - (LLV(LOW,27)))) * 100),5,1))) - (2 * (SMA((SMA((((CLOSE -
(LLV(LOW,27))) / ((HHV(HIGH,27)) - (LLV(LOW,27)))) * 100),5,1)),3,1)));
B7:=(10);
DRAWTEXT(CROSS(AZ6,B7),L,' 底'),COLOR0000FF;
VARC:=(ZIG(3,5) REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) =REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2) =REF(ZIG(3,5),3));
VARD:=(ZIG(3,5) REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1) =REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2) =REF(ZIG(3,5),3));
DRAWTEXT((VARC=1),L,'满意'),COLOR0000FF;
DRAWTEXT((VARD=1),H,'卖'),COLOR00FF00;
实体中位:IF(CLOSE =OPEN,OPEN+(CLOSE-OPEN)/2,CLOSE+(OPEN-CLOSE)/2);
ZF:=(MAX(O,C)-MIN(O,C))/REF(C,1) =0.04;
STICKLINE(C 0 AND ZF,实体中位,实体中位,4,1),LINETHICK2,COLORYELLOW;
AA:=CLOSE/REF(CLOSE,1) 1.099;
STICKLINE(AA,O,C,3,0),COLORMAGENTA;
DRAWTEXT(FILTER(L REF(L,1) AND C REF(H,1),5),L*1.02,'短高');
STICKLINE(FILTER(L REF(L,1) AND C REF(H,1),5),L,L,15,0),COLORYELLOW;
破底新高:=(CLOSE REF(HIGH,1) AND LOW REF(LOW,1));
STICKLINE(破底新高,OPEN,CLOSE,1,0),COLORYELLOW;
