通达信『主力强弱分离系统』锁定独立牛股，解决赚指数不赚钱难题

A:EMA((CLOSE-REF(C,1))/REF(C,1)*10-(INDEXC-REF(INDEXC,1))/REF(INDEXC,1) *10,5),LINETHICK1,COLORLIRED;

STICKLINE(A>0,0,A,1,2),COLORLIRED;

STICKLINE(A< 0,0,A,1,2),COLORGREEN;

gspt1:=CLOSE-REF(CLOSE,1);

gspt2:=IF(CLOSE-REF(CLOSE,1)>=0,gspt1,0);

gspt3:=REF(CLOSE,1)-CLOSE;

gspt4:=IF(CLOSE-REF(CLOSE,1)<=0,gspt3,0);

gspt5:=SUM(gspt2,90)/SUM(gspt4,90);

gspt6:=100-100/(1+gspt5);

gspt7:=EMA(gspt6,21);

gspt8:=EMA(gspt7,5);

gspt:=EMA(gspt7,3);

NP:=(gspt7-gspt);

NL:=(gspt-gspt7);

STICKLINE(NL< 0,0,NL,1,2),COLOR0B0B77;

STICKLINE(NP< 0,0,NP,1,2),COLOR666666;

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

SK:=EMA(JJ,13)-EMA(JJ,21);

SD:=EMA(SK,3);

SP:=EMA(SK,10);

长线1:IF(SD>=SP,SD,SP),LINETHICK1,COLORFFFFAA;

长线2:IF(SP-SD,SP,SD),LINETHICK1,COLORWHITE;

A1:=EMA(CLOSE,7)-EMA(CLOSE,21);

B1:=EMA((0.668*REF(A1,1)+0.333*A1),1);

短多:IF(A1>=B1,A1,B1),LINETHICK2,COLORLIMAGENTA;

短空:IF(B1-A1,B1,A1),LINETHICK1,COLORGREEN;