通达信上涨力度强弱指标公式源码副图

DRAWGBK(C>0, RGB(310,108,108),RGB(88,30,0),0,'',0);
{NOTEXT顶部标线:120,COLORBROWN;}
{NOTEXT底部标线:-80,COLORBROWN;}
{力度平衡信号}
力度平衡点:40,COLORBROWN,LINETHICK2;
LDA1:=FORCAST(FORCAST(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),9,1)*100,3),18);
LDA2:=LDA1>REF(LDA1,1) AND LDA1>40;
LDA3:=LDA1<=REF(LDA1,1) AND LDA1>40;
LDA4:=LDA1>REF(LDA1,1) AND LDA1<=40;
LDA5:=LDA1<=REF(LDA1,1) AND LDA1<=40;
STICKLINE(LDA2,40,LDA1,3,0),COLORFF00FF;
STICKLINE(LDA3,40,LDA1,3,0),COLORBROWN;
STICKLINE(LDA4,40,LDA1,3,0),COLORRED;
STICKLINE(LDA5,40,LDA1,3,0),COLORWHITE;
趋势平衡线:MA(SMA(MAX(CLOSE-REF(CLOSE,1),0),9,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),9,1)*100,26),COLORYELLOW,LINETHICK2;
{力度强弱信号}
力度强弱:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100);
STICKLINE(力度强弱>=20,8,10,3,0),COLORFF00FF;
STICKLINE(力度强弱>=0 AND 力度强弱<20 AND 力度强弱>6,8,10,3,0),COLORRED;
STICKLINE(力度强弱>=0 AND 力度强弱<20 AND 力度强弱<=6,8,10,3,1),COLORDDDDDD;
STICKLINE(力度强弱<=0 AND 力度强弱>-20,8,10,3,1),COLORDDDDDD;
STICKLINE(力度强弱<=-20,8,10,3,0),COLORDDDDDD;