INPUT:N(9,1,999);
ZSC:=IF(INBLOCK(‘工程建筑’),”991002$CLOSE”,IF(INBLOCK(‘電力’),”991003$CLOSE”,IF(INBLOCK(‘計(jì)算機(jī)’),”991004$CLOSE”,
IF(INBLOCK(‘電子信息’),”991006$CLOSE”,IF(INBLOCK(‘房地產(chǎn)’),”991007$CLOSE”,IF(INBLOCK(‘紡織服裝’),”991008$CLOSE”,
IF(INBLOCK(‘鋼鐵’),”991009$CLOSE”,IF(INBLOCK(‘供水供氣’),”991010$CLOSE”,IF(INBLOCK(‘化工化纖’),”991011$CLOSE”,
IF(INBLOCK(‘電器’),”991014$CLOSE”,IF(INBLOCK(‘交通設(shè)施’),”991016$CLOSE”,IF(INBLOCK(‘銀行類’),”991017$CLOSE”,
IF(INBLOCK(‘旅游酒店’),”991018$CLOSE”,IF(INBLOCK(‘煤炭石油’),”991019$CLOSE”,IF(INBLOCK(‘釀酒食品’),”991020$CLOSE”,
IF(INBLOCK(‘農(nóng)林牧漁’),”991021$CLOSE”,IF(INBLOCK(‘商業(yè)連鎖’),”991023$CLOSE”,IF(INBLOCK(‘建材’),”991024$CLOSE”,
IF(INBLOCK(‘其他行業(yè)’),”991025$CLOSE”,IF(INBLOCK(‘汽車類’),”991026$CLOSE”,IF(INBLOCK(‘機(jī)械’),”991027$CLOSE”,
IF(INBLOCK(‘醫(yī)藥’),”991028$CLOSE”,IF(INBLOCK(‘外貿(mào)’),”991031$CLOSE”,IF(INBLOCK(‘教育傳媒’),”991032$CLOSE”,
IF(INBLOCK(‘儀電儀表’),”991033$CLOSE”,IF(INBLOCK(‘有色金屬’),”991034$CLOSE”,IF(INBLOCK(‘造紙印刷’),”991035$CLOSE”,
IF(INBLOCK(‘券商’),”991036$CLOSE”,IF(INBLOCK(‘電力設(shè)備’),”991037$CLOSE”,IF(INBLOCK(‘通信’),”991135$CLOSE”,
IF(INBLOCK(‘運(yùn)輸物流’),”991136$CLOSE”,IF(INBLOCK(‘保險(xiǎn)’),”991255$CLOSE”,0))))))))))))))))))))))))))))))));
個(gè)股強(qiáng)弱:SLOPE(C,N)/MA(C,N)*100,ColorFFFF00,LINETHICK0;
板塊強(qiáng)弱:SLOPE(ZSC,N)/MA(ZSC,N)*100,COLORYELLOW,LINETHICK0;
大盤強(qiáng)弱:SLOPE(INDEXC,N)/MA(INDEXC,N)*100,colorwhite,LINETHICK0;
DRAWTEXTABS(5,5,’概念股網(wǎng) www.chiang1015.com’),linethick1,COLOR00EEff;
板塊:=STRLEFT(BKNAME,STRFIND(BKNAME,’,’,1)-1);
DRAWTEXTABS(5,5,’板塊強(qiáng)弱 = (‘+’ ‘+板塊+’指數(shù) )’),COLORYELLOW;
個(gè)板差值:=個(gè)股強(qiáng)弱-板塊強(qiáng)弱;
個(gè)股大盤差:(個(gè)股強(qiáng)弱-大盤強(qiáng)弱),COLORYELLOW,LINETHICK0;
aa:=個(gè)板差值>0 and 個(gè)股大盤差>0;
bb:=not(aa) and not(個(gè)股大盤差<0);
cc:=個(gè)股大盤差<0;
STICKLINE(bb,0,個(gè)股大盤差,8.10,0),colorwhite;
STICKLINE(aa>0,0,個(gè)股大盤差,8.10,0),colorff00ff,layer7;
STICKLINE(個(gè)股大盤差<0,0,個(gè)股大盤差,8.10,0),colorgreen;
STICKLINE(個(gè)股大盤差>2,0,個(gè)股大盤差,8.10,0),COLOR0000CC;
連強(qiáng)排序:barslast(not(aa) ),ColorFFFF00,LINETHICK0;
極強(qiáng)排序:count(個(gè)股大盤差>2,20),LINETHICK0;
2,colorwhite;
-2,ColorFFFF00;
DRAWGBKLAST(close>0,STRIP(RGB(0,128,128),RGB(25,25,112),0));