高山流水主图

N:=8;   

高山:HHV(MA(H,N),N),COLORRED,LINETHICK2;   

流水:MA(H,N),COLORFF0000,LINETHICK2;   

LLV(高山,2),COLORFFFFFF;   

LLV(高山,3),COLORFFFFFF;   

LLV(高山,4),COLORFFFFFF;   

LLV(高山,5),COLORFFFFFF;   

LLV(高山,6),COLORFFFFFF;   

LLV(高山,7),COLORFFFFFF;   

低谷:LLV(高山,8),COLOR00FFFF,LINETHICK2;   

HHV(流水,2),COLOR00FF00;   

HHV(流水,3),COLOR00FF00;   

HHV(流水,4),COLOR00FF00;   

HHV(流水,5),COLOR00FF00;   

HHV(流水,6),COLOR00FF00;   

HHV(流水,7),COLOR00FF00;   

HHV(流水,8),COLOR00FF00;   

高山,COLORRED,LINETHICK2;    

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);   

  

出水:=IF(C>HHV(MA(H,N),8) AND HHV(MA(H,N),8)>MA(H,N),1,0),COLORFF00FF,POINTDOT,LINETHICK0;   

回踩:=IF((CROSS(MA(H,N),L) OR CROSS(MA(H,N)*1.01,C))AND BARSLAST(出水)<=5,1,0),COLOR00FFFF,POINTDOT,LINETHICK0;   

STICKLINE(出水,(C+O)/2,(C+O)/2,8,0),COLORFF00FF;   

STICKLINE(出水,H,L,0,0),COLORFF00FF;   

DRAWTEXT(回踩,L*0.95, ‘↑’),COLORFFFFFF;   

XG:=高山=流水 AND 高山=低谷 AND 高山=HHV(流水,2) AND 高山=HHV(流水,3)   

AND 高山=HHV(流水,3) AND C>高山 AND 高山*1.1>(C+O)/2;   

DRAWICON(XG,高山*0.97,3);   

上成立:=IF(REF(L,1)=LLV(L,30) AND REF(L,3)>REF(L,2) AND O<C   

AND ABS(C-MA(C,89))/MA(C,89)<1.2 AND MA(C,89)>REF(MA(C,89),1),85,100);   

DRAWICON(上成立=85,L*0.97,26);