挺美畫線主圖通達信指標公式源碼

天數(shù):=IF(PERIOD=5,年,DRAWNULL);

高1:=HHV(H,天數(shù));

低1:=LLV(L,天數(shù));

高低:(C-低1)/(高1-低1)*100,,NODRAW,COLORFFFF00;

振幅:(高1-低1)/低1*100,NODRAW,COLORWHITE;

天:CONST(高1),NODRAW,COLORYELLOW;

地:CONST(低1),NODRAW,COLOR00FF00;

強:CONST(高1-(高1-低1)*1/3),NODRAW,COLORFFFF00;

中:CONST(高1-(高1-低1)*1/2),NODRAW,COLORWHITE;

弱:CONST(高1-(高1-低1)*2/3),NODRAW,COLOR0099FF;

STICKLINE(C>0,CONST(高1-(高1-低1)*1/4),CONST(高1-(高1-低1)*1/4),2,0),COLORFF00FF;

STICKLINE(C>0,CONST(高1-(高1-低1)*3/4),CONST(高1-(高1-低1)*3/4),2,0),COLORFF00FF;

STICKLINE(C>0,天,天,10,0),COLORYELLOW;

STICKLINE(C>0,地,地,10,0),COLOR00FF00;

STICKLINE(C>0,強,強,10,0),COLORFFFF00;

STICKLINE(C>0,中,中,10,0),COLORWHITE;

STICKLINE(C>0,弱,弱,10,0),COLOR0099FF;

N:=12; 

DP:=(H+L+2*C)/4;

DN:=ABS(CLOSE-REF(CLOSE,N));

VY:=SUM(ABS(CLOSE-REF(CLOSE,1)),N);

ER:=DN/VY;

FSC:=2/(2+1);

SSC:=2/(N+1);

SC:=ER*(FSC-SSC)+SSC;

SCSQ:=SC*SC;

KMA:DMA(DP,SCSQ),COLOR00FF00,LINETHICK2;

多空:EMA(DP,50),COLORFFFF00,LINETHICK2;

RC:=地;

DK:=(EMA(DP,12)-多空);

STICKLINE(DK>0 AND DK>REF(DK,1),RC,RC+DK,1,0),COLOR006699;

STICKLINE(DK>0 AND DK<=REF(DK,1),RC,RC+DK,1,1),COLORFF00AA;

STICKLINE(DK<0 AND DK>REF(DK,1),RC,RC+DK,1,0),COLOR998800;

STICKLINE(DK<0 AND DK<=REF(DK,1),RC,RC+DK,1,1),COLOR009900;

BUY:=KMA>EMA(KMA,3);

DRAWKLINE(H,O,L,C);

【量H】:=IF((AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);

STICKLINE(【量H】=100,L,H,0.4,0),COLORYELLOW;

STICKLINE(【量H】=100 AND C>=O,C,O,4,1),COLORYELLOW;

STICKLINE(【量H】=100 AND C<O,C,O,4,0),COLORYELLOW;

ZDF:=(C-REF(C,1))/REF(C,1)*100;

STICKLINE(ZDF>9.8,O,C,2,0),COLORRED;

STICKLINE(ZDF<-9.8,O,C,2,0),COLORBLUE;

Q43:CONST(高1-(高1-低1)*1/4),NODRAW;

Q41:CONST(高1-(高1-低1)*3/4),NODRAW;

DK1:=DK+RC;

M20:=MA(DK1,20);

S:=STD(DK1,20);

高:=M20+2*S;

低:=M20-2*S;

【上】: 高,COLORFFFF00;

【下】: 低,COLORFFFF00;

DRAWTEXT(CROSS(高,DK1),高,'★'),COLOR00FF00;

DRAWTEXT(CROSS(DK1,高),高,'▲'),COLORYELLOW;

DRAWTEXT(CROSS(DK1,低),低,'▲'),COLOR00FF00;

DRAWTEXT(CROSS(低,DK1),低,'★'),COLORYELLOW;

IF(多空>MA(DP,50),多空,DRAWNULL),COLOR00FF00,LINETHICK2;

IF(BUY=1,KMA,DRAWNULL),COLORRED,LINETHICK2;

 

http://www.gushow.com/plus/view.php?aid=3724