將這個大智慧板塊線改為通達信的
2019/12/15 18:27:20
公式編寫說明：
INPUT:N(70,1,999),M(5,1,120);ZSC:=IF(INBLOCK('工程建筑'),"991002$CLOSE",IF(INBLOCK('電力'),"991003$CLOSE",IF(INBLOCK('計算機'),"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('交通設施'),"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('機械'),"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('電力設備'),"991037$CLOSE",IF(INBLOCK('通信'),"991135$CLOSE",IF(INBLOCK('運輸物流'),"991136$CLOSE",IF(INBLOCK('保險'),"991255$CLOSE",0))))))))))))))))))))))))))))))));ZSH:=IF(INBLOCK('工程建筑'),"991002$HIGH",IF(INBLOCK('電力'),"991003$HIGH",IF(INBLOCK('計算機'),"991004$HIGH",IF(INBLOCK('電子信息'),"991006$HIGH",IF(INBLOCK('房地產(chǎn)'),"991007$HIGH",IF(INBLOCK('紡織服裝'),"991008$HIGH",IF(INBLOCK('鋼鐵'),"991009$HIGH",IF(INBLOCK('供水供氣'),"991010$HIGH",IF(INBLOCK('化工化纖'),"991011$HIGH",IF(INBLOCK('電器'),"991014$HIGH",IF(INBLOCK('交通設施'),"991016$HIGH",IF(INBLOCK('銀行類'),"991017$HIGH",IF(INBLOCK('旅游酒店'),"991018$HIGH",IF(INBLOCK('煤炭石油'),"991019$HIGH",IF(INBLOCK('釀酒食品'),"991020$HIGH",IF(INBLOCK('農(nóng)林牧漁'),"991021$HIGH",IF(INBLOCK('商業(yè)連鎖'),"991023$HIGH",IF(INBLOCK('建材'),"991024$HIGH",IF(INBLOCK('其他行業(yè)'),"991025$HIGH",IF(INBLOCK('汽車類'),"991026$HIGH",IF(INBLOCK('機械'),"991027$HIGH",IF(INBLOCK('醫(yī)藥'),"991028$HIGH",IF(INBLOCK('外貿(mào)'),"991031$HIGH",IF(INBLOCK('教育傳媒'),"991032$HIGH",IF(INBLOCK('儀電儀表'),"991033$HIGH",IF(INBLOCK('有色金屬'),"991034$HIGH",IF(INBLOCK('造紙印刷'),"991035$HIGH",IF(INBLOCK('券商'),"991036$HIGH",IF(INBLOCK('電力設備'),"991037$HIGH",IF(INBLOCK('通信'),"991135$HIGH",IF(INBLOCK('運輸物流'),"991136$HIGH",IF(INBLOCK('保險'),"991255$HIGH",0))))))))))))))))))))))))))))))));ZSL:=IF(INBLOCK('工程建筑'),"991002$LOW",IF(INBLOCK('電力'),"991003$LOW",IF(INBLOCK('計算機'),"991004$LOW",IF(INBLOCK('電子信息'),"991006$LOW",IF(INBLOCK('房地產(chǎn)'),"991007$LOW",IF(INBLOCK('紡織服裝'),"991008$LOW",IF(INBLOCK('鋼鐵'),"991009$LOW",IF(INBLOCK('供水供氣'),"991010$LOW",IF(INBLOCK('化工化纖'),"991011$LOW",IF(INBLOCK('電器'),"991014$LOW",IF(INBLOCK('交通設施'),"991016$LOW",IF(INBLOCK('銀行類'),"991017$LOW",IF(INBLOCK('旅游酒店'),"991018$LOW",IF(INBLOCK('煤炭石油'),"991019$LOW",IF(INBLOCK('釀酒食品'),"991020$LOW",IF(INBLOCK('農(nóng)林牧漁'),"991021$LOW",IF(INBLOCK('商業(yè)連鎖'),"991023$LOW",IF(INBLOCK('建材'),"991024$LOW",IF(INBLOCK('其他行業(yè)'),"991025$LOW",IF(INBLOCK('汽車類'),"991026$LOW",IF(INBLOCK('機械'),"991027$LOW",IF(INBLOCK('醫(yī)藥'),"991028$LOW",IF(INBLOCK('外貿(mào)'),"991031$LOW",IF(INBLOCK('教育傳媒'),"991032$LOW",IF(INBLOCK('儀電儀表'),"991033$LOW",IF(INBLOCK('有色金屬'),"991034$LOW",IF(INBLOCK('造紙印刷'),"991035$LOW",IF(INBLOCK('券商'),"991036$LOW",IF(INBLOCK('電力設備'),"991037$LOW",IF(INBLOCK('通信'),"991135$LOW",IF(INBLOCK('運輸物流'),"991136$LOW",IF(INBLOCK('保險'),"991255$LOW",0))))))))))))))))))))))))))))))));Var12:=(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100;能量線:SMA(Var12,3,1)*(-1)+100,colorRED,linethick2;KNX:=SMA(Var12,3,1);MK:=MA(KNX,M);買點:IF(KNX>N AND CROSS(MK , KNX),50,0),COLORWHITE,LINETHICK1;Var13:=(HHV(ZSH,34)-ZSC)/(HHV(ZSH,34)-LLV(ZSL,34))*100;行業(yè)線:SMA(Var13,3,1)*(-1)+100,colorgreen,linethick1;Var11:=(HHV(INDEXH,34)-INDEXC)/(HHV(INDEXH,34)-LLV(INDEXL,34))*100;大盤線:SMA(Var11,3,1)*(-1)+100,colorYELLOW,linethick1;板塊:=IFS(INBLOCK('工程建筑'),'工程建筑',IFS(INBLOCK('電力'),'電力',IFS(INBLOCK('計算機'),'計算機',IFS(INBLOCK('電子信息'),'電子信息',IFS(INBLOCK('房地產(chǎn)'),'房地產(chǎn)',IFS(INBLOCK('紡織服裝'),'紡織服裝',IFS(INBLOCK('鋼鐵'),'鋼鐵',IFS(INBLOCK('供水供氣'),'供水供氣',IFS(INBLOCK('化工化纖'),'化工化纖',IFS(INBLOCK('電器'),'電器',IFS(INBLOCK('交通設施'),'交通設施',IFS(INBLOCK('銀行類'),'銀行類',IFS(INBLOCK('旅游酒店'),'旅游酒店',IFS(INBLOCK('煤炭石油'),'煤炭石油',IFS(INBLOCK('釀酒食品'),'釀酒食品',IFS(INBLOCK('農(nóng)林牧漁'),'農(nóng)林牧漁',IFS(INBLOCK('商業(yè)連鎖'),'商業(yè)連鎖',IFS(INBLOCK('建材'),'建材',IFS(INBLOCK('其他行業(yè)'),'其他行業(yè)',IFS(INBLOCK('汽車類'),'汽車類',IFS(INBLOCK('機械'),'機械',IFS(INBLOCK('醫(yī)藥'),'醫(yī)藥',IFS(INBLOCK('外貿(mào)'),'外貿(mào)',IFS(INBLOCK('教育傳媒'),'教育傳媒',IFS(INBLOCK('儀電儀表'),'儀電儀表',IFS(INBLOCK('有色金屬'),'有色金屬',IFS(INBLOCK('造紙印刷'),'造紙印刷',IFS(INBLOCK('券商'),'券商',IFS(INBLOCK('電力設備'),'電力設備',IFS(INBLOCK('通信'),'通信',IFS(INBLOCK('運輸物流'),'運輸物流',IFS(INBLOCK('保險'),'保險',''))))))))))))))))))))))))))))))));DRAWTEXTABS(10,5,'所屬: '+板塊+'指數(shù)'),COLORYELLOW;
公式源碼示例：
ZSC1:=IF(STRCMP(HYBLOCK,'煤炭'),"880301$C",
IF(STRCMP(HYBLOCK,'電力'),"880305$C",
IF(STRCMP(HYBLOCK,'石油'),"880310$C",
IF(STRCMP(HYBLOCK,'鋼鐵'),"880318$C",
IF(STRCMP(HYBLOCK,'有色'),"880324$C",
IF(STRCMP(HYBLOCK,'化纖'),"880330$C",
IF(STRCMP(HYBLOCK,'化工'),"880335$C",
IF(STRCMP(HYBLOCK,'建材'),"880344$C",
IF(STRCMP(HYBLOCK,'造紙'),"880350$C",
IF(STRCMP(HYBLOCK,'礦物制品'),"880351$C",
IF(STRCMP(HYBLOCK,'日用化工'),"880355$C",
IF(STRCMP(HYBLOCK,'農(nóng)林牧漁'),"880360$C",
IF(STRCMP(HYBLOCK,'紡織'),"880367$C",
IF(STRCMP(HYBLOCK,'服飾'),"880367$C",
IF(STRCMP(HYBLOCK,'食品飲料'),"880372$C",
IF(STRCMP(HYBLOCK,'釀酒'),"880380$C",
IF(STRCMP(HYBLOCK,'家用電器'),"880387$C",
IF(STRCMP(HYBLOCK,'摩托車'),"880390$C",
IF(STRCMP(HYBLOCK,'汽車服務'),"880390$C",
IF(STRCMP(HYBLOCK,'汽車配件'),"880390$C",
IF(STRCMP(HYBLOCK,'汽車整車'),"880390$C",
IF(STRCMP(HYBLOCK,'醫(yī)療保健'),"880398$C",
IF(STRCMP(HYBLOCK,'家居用品'),"880399$C",
IF(STRCMP(HYBLOCK,'醫(yī)藥'),"880400$C",0))))))))))))))))))))))));
ZSC2:=IF(STRCMP(HYBLOCK,'商業(yè)連鎖'),"880406$C",
IF(STRCMP(HYBLOCK,'商貿(mào)代理'),"880414$C",
IF(STRCMP(HYBLOCK,'傳媒娛樂'),"880418$C",
IF(STRCMP(HYBLOCK,'廣告包裝'),"880421$C",
IF(STRCMP(HYBLOCK,'文教休閑'),"880422$C",
IF(STRCMP(HYBLOCK,'酒店餐飲'),"880423$C",
IF(STRCMP(HYBLOCK,'旅游'),"880424$C",
IF(STRCMP(HYBLOCK,'航空航天'),"880430$C",
IF(STRCMP(HYBLOCK,'船舶'),"880431$C",
IF(STRCMP(HYBLOCK,'運輸設備'),"880432$C",
IF(STRCMP(HYBLOCK,'通用機械'),"880437$C",
IF(STRCMP(HYBLOCK,'工業(yè)機械'),"880440$C",
IF(STRCMP(HYBLOCK,'電氣設備'),"880446$C",
IF(STRCMP(HYBLOCK,'工程機械'),"880447$C",
IF(STRCMP(HYBLOCK,'電器儀表'),"880448$C",
IF(STRCMP(HYBLOCK,'電信運營'),"880452$C",
IF(STRCMP(HYBLOCK,'公共交通'),"880453$C",
IF(STRCMP(HYBLOCK,'水務板塊'),"880454$C",
IF(STRCMP(HYBLOCK,'燃氣供熱'),"880455$C",
IF(STRCMP(HYBLOCK,'環(huán)境保護'),"880456$C",0))))))))))))))))))));
ZSC3:=IF(STRCMP(HYBLOCK,'運輸服務'),"880459$C",
IF(STRCMP(HYBLOCK,'倉儲物流'),"880464$C",
IF(STRCMP(HYBLOCK,'交通設施'),"880465$C",
IF(STRCMP(HYBLOCK,'銀行類'),"880471$C",
IF(STRCMP(HYBLOCK,'證券類'),"880472$C",
IF(STRCMP(HYBLOCK,'保險類'),"880473$C",
IF(STRCMP(HYBLOCK,'信托類'),"880474$C",
IF(STRCMP(HYBLOCK,'建筑'),"880476$C",
IF(STRCMP(HYBLOCK,'房地產(chǎn)'),"880482$C",
IF(STRCMP(HYBLOCK,'電腦設備'),"880489$C",
IF(STRCMP(HYBLOCK,'通信設備'),"880490$C",
IF(STRCMP(HYBLOCK,'半導體'),"880491$C",
IF(STRCMP(HYBLOCK,'元器件'),"880492$C",
IF(STRCMP(HYBLOCK,'軟件服務'),"880493$C",
IF(STRCMP(HYBLOCK,'互聯(lián)網(wǎng)'),"880494$C",
IF(STRCMP(HYBLOCK,'綜合類'),"880497$C",0))))))))))))))));
ZSC:=ZSC1+ZSC2+ZSC3;
VAR12:=(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100;
能量線:SMA(VAR12,3,1)*(-1)+100,COLORRED,LINETHICK2;
KNX:=SMA(VAR12,3,1);
MK:=MA(KNX,5);
買點:IF(KNX>70 AND CROSS(MK,KNX),50,0),COLORWHITE,LINETHICK1;
VAR13:=(HHV(ZSC,34)-ZSC)/(HHV(ZSC,34)-LLV(ZSC,34))*100;
行業(yè)線:SMA(VAR13,3,1)*(-1)+100,COLORGREEN,LINETHICK1;
VAR11:=(HHV(INDEXH,34)-INDEXC)/(HHV(INDEXH,34)-LLV(INDEXL,34))*100;
大盤線:SMA(VAR11,3,1)*(-1)+100,COLORYELLOW,LINETHICK1;
DRAWTEXT_FIX(ISLASTBAR,0.005,0,0,STRCAT(STRCAT('所屬: [ ',HYBLOCK),'行業(yè)指數(shù) ]')),COLORGREEN;
看股吧公 式 www .kanguba.com
其它股票公式列表
