飛狐顯示股票所屬行業(yè)板塊當(dāng)天漲跌停價(jià)指標(biāo)公式[其他軟件公式]

相關(guān)標(biāo)簽:

?

說明：不是飛狐系統(tǒng)平時(shí)顯示的又長又臭的“所屬板塊”，而是自定義的股票所屬證監(jiān)會行業(yè)板塊！比如：電力、房地產(chǎn)……等。
?

原理解析：

源碼：

?

{漲停價(jià)、跌停價(jià)（支持ST、*ST、S股）}
AA1:=STRFIND(STKNAME,'S',0)=0;
gws:=FRACPART(ref(c,1)*IF(AA1,10,5));
qz:=INTPART(ref(c,1)*IF(AA1,10,5))/100;
漲停價(jià):=ref(c,1)+qz+if(gws>0.4,0.01,0),COLORRED,LINETHICK;
跌停價(jià):=ref(c,1)-qz-if(gws>0.4,0.01,0),COLORGREEN,LINETHICK;
DRAWTEXTEX(C,0,410,0,'▲漲停價(jià):'+數(shù)字轉(zhuǎn)化為字符串(漲停價(jià),2)),COLORRED;
DRAWTEXTEX(C,0,410,10,'▼跌停價(jià):'+數(shù)字轉(zhuǎn)化為字符串(跌停價(jià),2)),COLORGREEN;
DRAWTEXTEX(CLOSE,1,1,0,'上漲:'+NUMTOSTR(INDEXADV,0)+'家'),COLOR0066FF;
DRAWTEXTEX(CLOSE,1,80,0,' 下跌:'+NUMTOSTR(INDEXDEC,0)+'家'),COLOR99FF99;
DRAWTEXTEX(CLOSE,1,160,0,' 平盤:'+NUMTOSTR(PINGPAN,0)+'家'),COLOREEEEEE;
DRAWTEXTEX(c,1,1,60,'所屬板塊:'+STRLEFT(BLKNAME,STRFIND(BLKNAME,',',1)-1)+'\n'+'流通股:'+NUMTOSTR(FINANCE(7)/10000,2)+'億'+'\n'+'流通比:'+NUMTOSTR(FINANCE(7)/FINANCE(1)*100,0)+'%'+'\n'+'股收益:'+NUMTOSTR(FINANCE(33),3)+'元'+'\n'+'市盈率:'+NUMTOSTR(DYNAINFO(39),0)+'\n'+'凈資產(chǎn):'+NUMTOSTR(FINANCE(34),2)+'元'+'\n'+'主營收:'+NUMTOSTR(FINANCE(20)/10000,2)+'億'+'\n'+'上市:'+NUMTOSTR(REF(YEAR,(BARSCOUNT(CLOSE) - 1)),0)+ '(' + NUMTOSTR(BARSCOUNT(C),0 )+')'+'\n'+'更新:'+ NUMTOSTR(FINANCE( 0),0 )+'\n'),ALIGN4,colorCCFFCC;
DRAWTEXTEX(C,1,480,960,'歷史最高價(jià):'+NUMTOSTR(hhv(h,datacount),2)+'('+NUMTOSTR((C-hhv(H,datacount))/hhv(H,datacount)*100,0)+'%)'),COLORFFCC00;
DRAWTEXTEX(C,1,480,1000,'歷史最低價(jià):'+NUMTOSTR(llv(l,datacount),2)+'('+NUMTOSTR((C-llv(L,datacount))/llv(L,datacount)*100,0)+'%)'),COLORFFCC00;
DRAWTEXTEX(C,1,650,960,'年內(nèi)最高價(jià):'+NUMTOSTR(HHV(H,250),2)+'('+NUMTOSTR((C-hhv(H,250))/hhv(H,250)*100,0)+'%)'),COLOR99FF66;
DRAWTEXTEX(C,1,650,1000,'年內(nèi)最低價(jià):'+NUMTOSTR(LLV(L,250),2)+'('+NUMTOSTR((C-llv(L,250))/llv(L,250)*100,0)+'%)'),COLOR99FF66;
DRAWTEXTEX(C,1,820,960,'半年最高價(jià):'+NUMTOSTR(HHV(H,120),2)+'('+NUMTOSTR((C-hhv(H,120))/hhv(H,120)*100,0)+'%)'),COLORFFCC00;
DRAWTEXTEX(C,1,820,1000,'半年最低價(jià):'+NUMTOSTR(LLV(L,120),2)+'('+NUMTOSTR((C-llv(L,120))/llv(L,120)*100,0)+'%)'),COLORFFCC00;
DRAWTEXTEX(C,1,310,960,'所見最高價(jià):'+NUMTOSTR(SYSPARAM(4),2)+'('+NUMTOSTR((C-SYSPARAM(4))/SYSPARAM(4)*100,0)+'%)'),COLOR99FF66;
DRAWTEXTEX(C,1,310,1000,'所見最低價(jià):'+NUMTOSTR(SYSPARAM(5),2)+'('+NUMTOSTR((C-SYSPARAM(5))/SYSPARAM(5)*100,0)+'%)'),COLOR99FF66;




{來源:www.tumamayizhan.com　程序化交易}

?

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?