通達信闆塊強者恒強指标公式

顯強勢1:=1;
X_1:=30;
強弱:(CLOSE-MA(CLOSE,X_1))/MA(CLOSE,X_1)*100,COLORWHITE;
行業強弱:(HY_INDEXC-MA(HY_INDEXC,X_1))/MA(HY_INDEXC,X_1)*100,COLORYELLOW,LINETHICK2;
強弱:(INDEXC-MA(INDEXC,X_1))/MA(INDEXC,X_1)*100,COLORRED,LINETHICK4;
DRAWTEXT(CURRBARSCOUNT=6,行業強弱,HYBLOCK),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=3,大盤強弱,ZSBLOCK),COLORRED;
{======顯示位置的數據自己根據需要進行上下左右調整======}
四排位置:=0.028;
橫向左右位置:=0.005;
{============}
煤炭A:=("880301$C"-REF("880301$C",1))/REF("880301$C",1)*100;
電力A:=("880305$C"-REF("880305$C",1))/REF("880305$C",1)*100;
石油A:=("880310$C"-REF("880310$C",1))/REF("880310$C",1)*100;
鋼鐵A:=("880318$C"-REF("880318$C",1))/REF("880318$C",1)*100;
有色A:=("880324$C"-REF("880324$C",1))/REF("880324$C",1)*100;
化纖A:=("880330$C"-REF("880330$C",1))/REF("880330$C",1)*100;
化工A:=("880335$C"-REF("880335$C",1))/REF("880335$C",1)*100;
建材A:=("880344$C"-REF("880344$C",1))/REF("880344$C",1)*100;
造紙A:=("880350$C"-REF("880350$C",1))/REF("880350$C",1)*100;
礦物制品A:=("880351$C"-REF("880351$C",1))/REF("880351$C",1)*100;
日用化工A:=("880355$C"-REF("880355$C",1))/REF("880355$C",1)*100;
農林牧漁A:=("880360$C"-REF("880360$C",1))/REF("880360$C",1)*100;
紡織服飾A:=("880367$C"-REF("880367$C",1))/REF("880367$C",1)*100;
食品飲料A:=("880372$C"-REF("880372$C",1))/REF("880372$C",1)*100;
釀酒A:=("880380$C"-REF("880380$C",1))/REF("880380$C",1)*100;
家用電器A:=("880387$C"-REF("880387$C",1))/REF("880387$C",1)*100;
汽車類A:=("880390$C"-REF("880390$C",1))/REF("880390$C",1)*100;
醫療保健A:=("880398$C"-REF("880398$C",1))/REF("880398$C",1)*100;
家居用品A:=("880399$C"-REF("880399$C",1))/REF("880399$C",1)*100;
醫藥A:=("880400$C"-REF("880400$C",1))/REF("880400$C",1)*100;
商業連鎖A:=("880406$C"-REF("880406$C",1))/REF("880406$C",1)*100;
商貿代理A:=("880414$C"-REF("880414$C",1))/REF("880414$C",1)*100;
傳媒娛樂A:=("880418$C"-REF("880418$C",1))/REF("880418$C",1)*100;
廣告包裝A:=("880421$C"-REF("880421$C",1))/REF("880421$C",1)*100;
文教休閑A:=("880422$C"-REF("880422$C",1))/REF("880422$C",1)*100;
酒店餐飲A:=("880423$C"-REF("880423$C",1))/REF("880423$C",1)*100;
旅遊A:=("880424$C"-REF("880424$C",1))/REF("880424$C",1)*100;
航空航天A:=("880430$C"-REF("880430$C",1))/REF("880430$C",1)*100;
船舶A:=("880431$C"-REF("880431$C",1))/REF("880431$C",1)*100;
運輸設備A:=("880432$C"-REF("880432$C",1))/REF("880432$C",1)*100;
通用機械A:=("880437$C"-REF("880437$C",1))/REF("880437$C",1)*100;
工業機械A:=("880440$C"-REF("880440$C",1))/REF("880440$C",1)*100;
電氣設備A:=("880446$C"-REF("880446$C",1))/REF("880446$C",1)*100;
工程機械A:=("880447$C"-REF("880447$C",1))/REF("880447$C",1)*100;
電器儀表A:=("880448$C"-REF("880448$C",1))/REF("880448$C",1)*100;
電信運營A:=("880452$C"-REF("880452$C",1))/REF("880452$C",1)*100;
公共交通A:=("880453$C"-REF("880453$C",1))/REF("880453$C",1)*100;
水務A:=("880454$C"-REF("880454$C",1))/REF("880454$C",1)*100;
供氣供熱A:=("880455$C"-REF("880455$C",1))/REF("880455$C",1)*100;
環境保護A:=("880456$C"-REF("880456$C",1))/REF("880456$C",1)*100;
運輸服務A:=("880459$C"-REF("880459$C",1))/REF("880459$C",1)*100;
倉儲物流A:=("880464$C"-REF("880464$C",1))/REF("880464$C",1)*100;
交通設施A:=("880465$C"-REF("880465$C",1))/REF("880465$C",1)*100;
銀行類A:=("880471$C"-REF("880471$C",1))/REF("880471$C",1)*100;
證券類A:=("880472$C"-REF("880472$C",1))/REF("880472$C",1)*100;
保險類A:=("880473$C"-REF("880473$C",1))/REF("880473$C",1)*100;
多元金融A:=("880474$C"-REF("880474$C",1))/REF("880474$C",1)*100;
建築A:=("880476$C"-REF("880476$C",1))/REF("880476$C",1)*100;
房地産A:=("880482$C"-REF("880482$C",1))/REF("880482$C",1)*100;
電腦設備A:=("880489$C"-REF("880489$C",1))/REF("880489$C",1)*100;
通信設備A:=("880490$C"-REF("880490$C",1))/REF("880490$C",1)*100;
半導體A:=("880491$C"-REF("880491$C",1))/REF("880491$C",1)*100;
元器件A:=("880492$C"-REF("880492$C",1))/REF("880492$C",1)*100;
軟件服務A:=("880493$C"-REF("880493$C",1))/REF("880493$C",1)*100;
互聯網A:=("880494$C"-REF("880494$C",1))/REF("880494$C",1)*100;
綜合類A:=("880497$C"-REF("880497$C",1))/REF("880497$C",1)*100;
最大值1A:=MAX(煤炭A,MAX(電力A,MAX(石油A,MAX(鋼鐵A,MAX(有色A,MAX(化纖A,MAX(化工A,MAX(建材A,MAX(造紙A,MAX(礦物制品A,日用化工A))))))))));
最大值2A:=MAX(農林牧漁A,MAX(紡織服飾A,MAX(食品飲料A,MAX(釀酒A,MAX(家用電器A,MAX(汽車類A,MAX(醫療保健A,MAX(家居用品A,MAX(醫藥A,MAX(商業連鎖A,商貿代理A))))))))));
最大值3A:=MAX(傳媒娛樂A,MAX(廣告包裝A,MAX(文教休閑A,MAX(酒店餐飲A,MAX(旅遊A,MAX(航空航天A,MAX(船舶A,MAX(運輸設備A,MAX(通用機械A,MAX(工業機械A,電氣設備A))))))))));
最大值4A:=MAX(工程機械A,MAX(電器儀表A,MAX(電信運營A,MAX(公共交通A,MAX(水務A,MAX(供氣供熱A,MAX(環境保護A,MAX(運輸服務A,MAX(倉儲物流A,MAX(交通設施A,銀行類A))))))))));
最大值5A:=MAX(證券類A,MAX(保險類A,MAX(多元金融A,MAX(建築A,MAX(房地産A,MAX(電腦設備A,MAX(通信設備A,MAX(半導體A,MAX(元器件A,MAX(軟件服務A,MAX(互聯網A,綜合類A)))))))))));
ZZDZ:=CONST(MAX(最大值1A,MAX(最大值2A,MAX(最大值3A,MAX(最大值4A,最大值5A)))));
DRAWTEXT_FIX(顯強勢闆塊1=1,橫向左右位置,四排位置,0,' ████████████████'),COLORRED;
XSWZ1:=CONST(IF(ZZDZ-煤炭A=0 OR ZZDZ-電力A=0 OR ZZDZ-石油A=0 OR ZZDZ-鋼鐵A=0 OR ZZDZ-有色A=0 OR ZZDZ-化纖A=0 OR ZZDZ-化工A=0 OR ZZDZ-建材A=0 OR ZZDZ-造紙A=0 OR ZZDZ-旅遊A=0 OR ZZDZ-船舶A=0 OR ZZDZ-水務A=0 OR ZZDZ-建築A=0 OR ZZDZ-醫藥A=0,614,IF(ZZDZ-汽車類A=0 OR ZZDZ-銀行類A=0 OR ZZDZ-證券類A=0 OR ZZDZ-保險類A=0 OR ZZDZ-房地産A=0 OR ZZDZ-半導體A=0 OR ZZDZ-元器件A=0 OR ZZDZ-互聯網A=0 OR ZZDZ-綜合類A=0,627,643)));
DRAWTEXT_FIX(ISLASTBAR AND 顯強勢闆塊1=1,橫向左右位置,四排位置,0,IF(ZZDZ-煤炭A=0,'【今強勢闆塊】：煤炭行業',IF(ZZDZ-電力A=0,'【今強勢闆塊】：電力行業',IF(ZZDZ-石油A=0,'【今強勢闆塊】：石油行業',IF(ZZDZ-鋼鐵A=0,'【今強勢闆塊】：鋼鐵行業',IF(ZZDZ-有色A=0,'【今強勢闆塊】：有色行業',IF(ZZDZ-化纖A=0,'【今強勢闆塊】：化纖行業',IF(ZZDZ-化工A=0,'【今強勢闆塊】：化工行業',IF(ZZDZ-建材A=0,'【今強勢闆塊】：建材行業',IF(ZZDZ-造紙A=0,'【今強勢闆塊】：造紙行業',IF(ZZDZ-礦物制品A=0,'【今強勢闆塊】：礦物制品',IF(ZZDZ-日用化工A=0,'【今強勢闆塊】：日用化工',
IF(ZZDZ-農林牧漁A=0,'【今強勢闆塊】：農林牧漁',IF(ZZDZ-紡織服飾A=0,'【今強勢闆塊】：紡織服飾',IF(ZZDZ-食品飲料A=0,'【今強勢闆塊】：食品飲料',IF(ZZDZ-釀酒A=0,'【今強勢闆塊】：釀酒行業',IF(ZZDZ-家用電器A=0,'【今強勢闆塊】：家用電器',IF(ZZDZ-汽車類A=0,'【今強勢闆塊】：汽車行業',IF(ZZDZ-醫療保健A=0,'【今強勢闆塊】：醫療保健',IF(ZZDZ-家居用品A=0,'【今強勢闆塊】：家居用品',IF(ZZDZ-醫藥A=0,'【今強勢闆塊】：醫藥行業',IF(ZZDZ-商業連鎖A=0,'【今強勢闆塊】：商業連鎖',IF(ZZDZ-商貿代理A=0,'【今強勢闆塊】：商貿代理',DRAWNULL))))))))))))))))))))))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND 顯強勢闆塊1=1,橫向左右位置,四排位置,0,IF(ZZDZ-傳媒娛樂A=0,'【今強勢闆塊】：傳媒娛樂',IF(ZZDZ-廣告包裝A=0,'【今強勢闆塊】：廣告包裝',IF(ZZDZ-文教休閑A=0,'【今強勢闆塊】：文教休閑',IF(ZZDZ-酒店餐飲A=0,'【今強勢闆塊】：酒店餐飲',IF(ZZDZ-旅遊A=0,'【今強勢闆塊】：旅遊行業',IF(ZZDZ-航空航天A=0,'【今強勢闆塊】：航空航天',IF(ZZDZ-船舶A=0,'【今強勢闆塊】：船舶行業',IF(ZZDZ-運輸設備A=0,'【今強勢闆塊】：運輸設備',IF(ZZDZ-通用機械A=0,'【今強勢闆塊】：通用機械',IF(ZZDZ-工業機械A=0,'【今強勢闆塊】：工業機械',IF(ZZDZ-電氣設備A=0,'【今強勢闆塊】：電氣設備',
IF(ZZDZ-工程機械A=0,'【今強勢闆塊】：工程機械',IF(ZZDZ-電器儀表A=0,'【今強勢闆塊】：電器儀表',IF(ZZDZ-電信運營A=0,'【今強勢闆塊】：電信運營',IF(ZZDZ-公共交通A=0,'【今強勢闆塊】：公共交通',IF(ZZDZ-水務A=0,'【今強勢闆塊】：水務行業',IF(ZZDZ-供氣供熱A=0,'【今強勢闆塊】：供氣供熱',IF(ZZDZ-環境保護A=0,'【今強勢闆塊】：環境保護',IF(ZZDZ-運輸服務A=0,'【今強勢闆塊】：運輸服務',IF(ZZDZ-倉儲物流A=0,'【今強勢闆塊】：倉儲物流',IF(ZZDZ-交通設施A=0,'【今強勢闆塊】：交通設施',
IF(ZZDZ-銀行類A=0,'【今強勢闆塊】：銀行闆塊',IF(ZZDZ-證券類A=0,'【今強勢闆塊】：證券闆塊',IF(ZZDZ-保險類A=0,'【今強勢闆塊】：保險闆塊',IF(ZZDZ-多元金融A=0,'【今強勢闆塊】：多元金融',IF(ZZDZ-建築A=0,'【今強勢闆塊】：建築行業',IF(ZZDZ-房地産A=0,'【今強勢闆塊】：房産闆塊',IF(ZZDZ-電腦設備A=0,'【今強勢闆塊】：電腦設備',IF(ZZDZ-通信設備A=0,'【今強勢闆塊】：通信設備',IF(ZZDZ-半導體A=0,'【今強勢闆塊】：半導體類',IF(ZZDZ-元器件A=0,'【今強勢闆塊】：元器件類',IF(ZZDZ-軟件服務A=0,'【今強勢闆塊】：軟件服務',IF(ZZDZ-互聯網A=0,'【今強勢闆塊】：互聯網類',IF(ZZDZ-綜合類A=0,'【今強勢闆塊】：綜合闆塊',DRAWNULL))))))))))))))))))))))))))))))))))),COLORWHITE;
個股排名:=CONST(INSORT(HYBLOCK,'',1,0));
HYPM1:=STRCAT('【該股在 (',HYBLOCK);
HYPM2:=STRCAT(HYPM1,') 行業漲幅排名：第');
HYPM3:=STRCAT(HYPM2,VAR2STR(個股排名,0));
HYPM4:=STRCAT(HYPM3,'名】 (闆塊');
漲停數1:=CONST(INSUM(HYBLOCK,'漲幅',2,0));
漲停數2:=CONST(INSUM(HYBLOCK,'漲幅',3,0));
漲停數:=漲停數1+漲停數2;
HYPM5:=STRCAT(HYPM4,VAR2STR(漲停數,0));
HYPM6:=STRCAT(HYPM5,'支)');
HYPM4A:=STRCAT(HYPM3,'名】 (闆塊内無個股漲停)');
HYPM4B:=IF(漲停數<10,STRCAT(HYPM3,'名】 █████████'),STRCAT(HYPM3,'名】 ██████████'));
DRAWTEXT_FIX(ISLASTBAR,IF(顯強勢闆塊1=0,0.25,橫向左右位置+0.32),四排位置,0,IF(漲停數<1,DRAWNULL,HYPM4B)),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,IF(顯強勢闆塊1=0,0.25,橫向左右位置+0.32),四排位置,0,IF(漲停數>=1,HYPM6,HYPM4A)),COLORWHITE;