?

?來源:程序化99

?

?來源: www.kzuj.com.cn

?

參考：

?

TY:=C;
VAR2:=MA(C,60),COLORGREEN,LINETHICK3;
A1:=REF(TY,10)=HHV(TY,2*10+1);
B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1);
B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
TM:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
TN:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波峰:=IF(TM,A,A),COLORFF00FF,POINTDOT;
//STICKLINE(TM,A,A,9,0),COLORFF00FF;
波谷:=IF(TM,B,B),COLOR80FF00,POINTDOT;
//STICKLINE(TN,B,B,9,0),COLOR80FF00;
AR2:MA(C,21),COLORGREEN,LINETHICK3;
DRAWCOLORLINE(AR2>REF(AR2,1),AR2,COLORRED,COLORGREEN),LINETHICK3;
TB:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(TB>9.9,O,C,2.5,0),COLORMAGENTA;
STICKLINE(TB<-9.9,O,C,2.5,0),COLOR1D7300;
VAR3:MA(C,5),COLORWHITE;
VAR4:MA(C,13),COLORYELLOW;