更加简单的主图指标"斜趋势线"源码--易得专用

wqm

{主图指标--斜趋势线}
CB:=DYNAINFO(54)/DYNAINFO(3)-1;
MM:=BARSLAST(DISPSTATUS=1);
HBN:=HHVBARS(H,MM);
HCC:=BACKSET(BARSTATUS=2,HBN+1);
HCDN:=BARSLAST(HCC>REF(HCC,1));
HCD:=REF(H,HCDN);
JC:=(H-HCD)/(HCDN-BARSLAST(H<>REF(H,1)));
JD:=IF(JC<0,JC,0);
JN:=HHVBARS(JD,HCDN);
HJC:=MAX(BACKSET(BARSTATUS=2,JN+1),0);
HJDN:=BARSLAST(HJC>REF(HJC,1));
HJD:=REF(H,HJDN);
JH:=HCD-(HCD-HJD)/(HCDN-HJDN)*HCDN;
斜压线:JH,COLORWHITE;
DRAWLINE(HCC>REF(HCC,1),H,HJC>REF(HJC,1),H,0),COLORRED;
LBN:=LLVBARS(L,MM);
LCC:=BACKSET(BARSTATUS=2,LBN+1);
LCDN:=BARSLAST(LCC>REF(LCC,1));
LCD:=REF(L,LCDN);
KC:=(L-LCD)/(LCDN-BARSLAST(L<>REF(L,1)));
KD:=IF(KC>0,KC,0);
KN:=LLVBARS(KD,LCDN);
LJC:=MAX(BACKSET(BARSTATUS=2,KN+1),0);
LJDN:=BARSLAST(LJC>REF(LJC,1));
LJD:=REF(L,LJDN);
KL:=LCD-(LCD-LJD)/(LCDN-LJDN)*LCDN;
斜撑线:KL,COLORWHITE;
DRAWLINE(LCC>REF(LCC,1),L,LJC>REF(LJC,1),L,0),COLORRED;
做多选股:C>=JH,NoDraw;
做空选股:C<=KL,NoDraw;

wqm

日线界面见附图：

wqm

如要选股MM值改位60，或60以上。