N:=5;
M:=10;
LL:=20;
{相对强度指标(RS)}
RS:=CLOSE/INDEXC*100;
MA_RS:=MA(RS,N);
{相对强弱比率}
RATIO:=CLOSE/INDEXC;
MA_RATIO:=MA(RATIO,M);
RATIO_BREAK:=crOSS(RATIO,MA_RATIO);
{相对涨幅比较}
STOCK_RISE:=(CLOSE-REF(CLOSE,N))/REF(CLOSE,N)*100;
INDEX_RISE:=(INDEXC-REF(INDEXC,N))/REF(INDEXC,N)*100;
STOCK_STRONG:=STOCK_RISE>INDEX_RISE;
{相对动能指标}
STOCK_MOM:=CLOSE/REF(CLOSE,M);
INDEX_MOM:=INDEXC/REF(INDEXC,M);
REL_MOM:=STOCK_MOM/INDEX_MOM;
{相对突破指标}
STOCK_BREAK:=HIGH>REF(HHV(HIGH,LL),1);
INDEX_NOBREAK:=HIGH<=REF(HHV(HIGH,LL),1);
STRONG_BREAK:=STOCK_BREAK AND INDEX_NOBREAK;
{相对趋势强度}
STOCK_TREND:=CLOSE>MA(CLOSE,LL);
INDEX_TREND:=INDEXC>MA(INDEXC,LL);
STRONG_TREND:=STOCK_TREND AND NOT(INDEX_TREND);
{相对波动率优势}
STOCK_volAT:=STD(CLOSE,N)/MA(CLOSE,N);
INDEX_VOLAT:=STD(INDEXC,N)/MA(INDEXC,N);
VOLAT_ADV:=STOCK_VOLAT>INDEX_VOLAT;
{相对量价指标}
STOCK_VP:=VOL/MA(VOL,L)*CLOSE/MA(CLOSE,L);
INDEX_VP:=INDEXV/MA(INDEXV,LL)*INDEXC/MA(INDEXC,LL);
VP_ADV:=STOCK_VP>INDEX_VP;
{综合相对强度}
SHORT_RS:=CLOSE/INDEXC;
LONG_RS:=MA(CLOSE,60)/MA(INDEXC,60);
COM_RS:=SHORT_RS>LONG_RS AND SHORT_RS>REF(SHORT_RS,1);
{综合强度评分(0-9分)}
综合强度评分: (RS>MA_RS) + (RATIO_BREAK) + (STOCK_STRONG) + (REL_MOM>1) + (STRONG_BREAK) + (STRONG_TREND) +( VOLAT_ADV) + (VP_ADV) +(COM_RS);
PJMA:MA(综合强度评分,20),COLORYELLOW;
DRAWICON(综合强度评分>=6, LOW, 1);
5,COLORMAGENTA;