上山寻宝主图 上山寻宝副图配合使用。
{上山寻宝主图}
高1:=REF(HHV(H,120),3);
低1:=REF(LLV(L,120),3);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;
基准:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1));
STICKLINE(A1X>=0,基准,突破,5,0),COLOR000099;
STICKLINE(A1X<0,基准,突破,5,0),COLOR00CC66;
AA:=CROSS(A1X,0),LINETHICK0;
STICKLINE(A1X>=0,C,O,2.7,0),COLOR0011FF;
STICKLINE(A1X>=0,C,O,1.8,0),COLOR0044FF;
STICKLINE(A1X>=0,C,O,0.9,0),COLOR0077FF;
STICKLINE(A1X>=0,C,O,0.1,0),COLOR0099FF;
STICKLINE(A1X>=0,H,L,0,0),COLOR0099FF;
STICKLINE(AA,C,O,2.7,0),COLOR330033;
STICKLINE(AA,C,O,1.8,0),COLOR770077;
STICKLINE(AA,C,O,0.9,0),COLORBB00BB;
STICKLINE(AA,C,O,0.1,0),COLORFF00FF;
STICKLINE(AA,H,L,0,0),COLORFF00FF;
DRAWICON(AA,C*0.92,9);
DRAWTEXT(AA,C*0.98,'上山'),COLORRED;
BB:=CROSS(0,A1X),LINETHICK0;
STICKLINE(A1X<0,C,O,2.7,0),COLORAAAAAA;
STICKLINE(A1X<0,C,O,1.8,0),COLORCCCCCC;
STICKLINE(A1X<0,C,O,0.9,0),COLORDDDDDD;
STICKLINE(A1X<0,C,O,0.1,0),COLORFFFFFF;
STICKLINE(A1X<0,H,L,0,0),COLORFFFFFF;
STICKLINE(BB,C,O,2.7,0),COLOR333300;
STICKLINE(BB,C,O,1.8,0),COLOR555500;
STICKLINE(BB,C,O,0.9,0),COLOR777700;
STICKLINE(BB,C,O,0.1,0),COLOR999900;
STICKLINE(BB,H,L,0,0),COLOR999900;
DRAWICON(BB,C*1.05,15);
DRAWTEXT(BB,C*1.01,'下山'),COLOR00FF00;
{上山寻宝副图}
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK2,COLOR456456;
谷底:CCI<-150 ,LINETHICK0;
STICKLINE(谷底,CCI,-10,2.7,0),COLOR0011FF;
STICKLINE(谷底,CCI,-10,1.8,0),COLOR0044FF;
STICKLINE(谷底,CCI,-10,0.9,0),COLOR0077FF;
STICKLINE(谷底,CCI,-10,0.1,0),COLOR0099FF;
DRAWTEXT(谷底,CCI,'谷底'),COLOR0000FF;
山腰:CROSS(MA(V,5),MA(V,20))*5,LINETHICK0,COLORFF00FF;
STICKLINE(山腰,0,60,2.7,0),COLOR330033;
STICKLINE(山腰,0,60,1.8,0),COLOR770077;
STICKLINE(山腰,0,60,0.9,0),COLORBB00BB;
STICKLINE(山腰,0,60,0.1,0),COLORFF00FF;
山峰:CROSS(200,CCI) AND REF(CCI,2)<REF(CCI,1) AND CCI<REF(CCI,1) ;
STICKLINE(山峰,0,120,2.7,0),COLOR003300;
STICKLINE(山峰,0,120,1.8,0),COLOR007700;
STICKLINE(山峰,0,120,0.9,0),COLOR00BB00;
STICKLINE(山峰,0,120,0.1,0),COLOR00FF00;
DRAWTEXT(山峰,CCI,'山峰'),COLORFFFFFF;
