垂头长针主图－精品通达信指标公式源码分享

N:=14;   

M:=6;   

HD :=HIGH-REF(HIGH,1);   

LD :=REF(LOW,1)-LOW;   

DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),N);   

DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),N);   

PDI:=DMP*100/TR;   

MDI:=DMM*100/TR;   

ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,M);   

ADXR:=EXPMEMA(ADX,M);   

DMIJX:=CROSS(PDI,MDI) AND C>O ;   

STICKLINE(DMIJX,H,L,0,1),COLORYELLOW;   

STICKLINE(DMIJX,O,C,2.7,0),COLORYELLOW;     

DRAWICON(DMIJX,L,1);    

头上边:MAX(O,C),NODRAW;   

头下边:MIN(O,C),NODRAW;   

垂头:=ABS(O-C),NODRAW;{垂头}   

长针:=(头下边-L),NODRAW;{长针}   

垂:=长针/垂头>2 AND (H-头上边)<=长针 AND L<REF(L,1) AND O<REF(C,1),NODRAW;   

DRAWTEXT(垂 AND L<=LLV(L,3),L/1.01,'针'),COLORGREEN,LINETHICK4;