通達信板塊指數(shù)公式

!通達信板塊指數(shù)公式?豐也I?■雖1U-HH.■?"U“::山士?77 ?豐也I?■雖1U-HH.■?"U“::山士?77 ■書H*1E> ■”蘆nV"2藥JJS?科°3IBu_q._rwsit-i■啊會、■匚匚jr齊Irae^.~amz-?■巾耳出■■咽匚扌.■-軟件介紹Ipvj&n#>軟件介紹Ipvj&n#>：aw:>対網(wǎng)!國￡301拜hmsg"”iri；!.笳卓丨7t)tngr.wejtfiG.wE-o門鬥丄珂.bet陰驚口u朋菱海逋證.慕EDK1T14=81元T-0.<H-O.i血丫?舊【手】imiaaoQlEtc.】di:4于：we丨皿訂曠??：動i円:耳比。陽坯2；卒衣足血丫?舊【手】imiaaoQlEtc.】di:4于：we丨皿訂曠??：動i円:耳比。陽坯2；卒衣足[I押即叩甲忡"亍沖葉叫呻挖竹”即||「1*k企士rfra:*nhu.m仇gwit般0蟻±:H4砂iS~；Tij'yI3li豈?14.B5I扎制I4.B3I4.BS14.81_*1<O打14.79I4.7BI4.TTI4.TE15郵f1**1tttMfill空園K191703411?ni：=前544僚~I-2517EBFGOHF4IH.731.4WCIFJ二T51I扶手0.04%肚本6?鞏二絆民M5冠遅斗”記臨攝㈡*^30PEpt^ll241IDI*f09B44:31M31M：31赫舉?W?W■fc翌14_?T11791i?914701i?91470H60 i￡jio5i：ii：iJ29■23v/w/.sSoakSS-cn,；-■??1 24B股票IIQ提示:請點擊圖片放大查看本公式僅提供源碼，并不提供下載,請股票入門投資者自行在通達信軟件中導入下面黃框內(nèi)的股票公式源碼:參數(shù)：N1,120,10M1,60,3{板塊指數(shù)N1/120/10M1/60/3}n:=10;m:=3;VAR1:=（"399139$C"）;VAR2:=（"399190$C"）;VAR3:=（"399132$C"）;VAR4:=（"399150$C"）;VAR5:=（"399138$C"）;VAR6:=（"399200$C"）;VAR7:=（"399110$C"）;VAR8:=（"399136$C"）;VAR9:=（"399135$C"）;VAR10:=（"399130$C"）;VAR11:=（"399160$C"）;VAR12:=（"999999$C"）;VAR13:=（"399137$C"）;醫(yī)藥：=SUM（（VAR1/REF（VAR1,1）-1）*1OO,O）;金融:=SUM（（VAR2/REF（VAR2,1）-1）*1OO,O）;紡織:=SUM（（VAR3/REF（VAR3,1）-1）*1OO,O）;建筑:=SUM（（VAR4/REF（VAR4,1）-1）*1OO,O）;機械:=SUM（（VAR5/REF（VAR5,1）-1）*100,0）;地產(chǎn)：=SUM（（VAR6/REF（VAR6,1）-1）*100,0）;農(nóng)林:=SUM（（VAR7/REF（VAR7,1）-1）*100,0）;電子：=SUM（（VAR8/REF（VAR8,1）-1）*100,0）;石化:=SUM（（VAR9/REF（VAR9,1）-1）*100,0）;制造:=SUM（（VAR10/REF（VAR10,1）-1）*100,0）;運輸:=SUM（（VAR11/REF（VAR11,1）-1）*100,0）;上證：SUM（（VAR12/REF（VAR12,1）-1）*100,0）,C0L0RWHITE,LINETHICK2;金屬：=SUM（（VAR13/REF（VAR13,1）-1）*100,0）;VAR17:=C0NST（MA（醫(yī)藥,N））;VAR18:=C0NST（MA（金融,N））;VAR19:=CONST（MA（紡織,N））;VAR20:=CONST（MA（建筑,N））;VAR21:=CONST（MA（機械,N））;VAR22:=CONST（MA（地產(chǎn),N））;VAR23:=C0NST(MA(農(nóng)林,N));VAR24:=C0NST(MA(電子,N));VAR25:=CONST(MA(石化,N));VAR26:=CONST(MA(制造,N));VAR27:=CONST(MA(運輸,N));VAR28:=CONST(MA(上證，N));VAR29:=CONST(MA(金屬，N));PQ:=VAR29-20;P1:=IF(BARSLAST(CURRBARSCOUNT=4),1,0);P2:=IF(BARSLAST(CURRBARSCOUNT=6),1,0);P3:=IF(BARSLAST(CURRBARSCOUNT=8),1,0);P4:=IF(BARSLAST(CURRBARSCOUNT=10),1,0);P5:=IF(BARSLAST(CURRBARSCOUNT=12),1,0);P6:=IF(BARSLAST(CURRBARSCOUNT=14),1,0);P7:=IF(BARSLAST(CURRBARSCOUNT=16),1,0);P8:=IF(BARSLAST(CURRBARSCOUNT=18),1,0);P9:=IF(BARSLAST(CURRBARSCOUNT=20),1,0);P10:=IF(BARSLAST(CURRBARSCOUNT=22),1,0);P11:=IF(BARSLAST(CURRBARSCOUNT=24),1,0);P12:=IF(BARSLAST(CURRBARSCOUNT=26),1,0);P13:=IF(BARSLAST(CURRBARSCOUNT=28),1,0);P14:=IF(BARSLAST(CURRBARSCOUNT=2),1,0);{}STICKLINE(醫(yī)藥，PQ,IF(P2-P1,CONST(MA(醫(yī)藥,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(金融，PQ,IF(P3-P2,C0NST(MA(金融,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(紡織，PQ,IF(P4-P3,C0NST(MA(紡織,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(建筑,PQ,IF(P5-P4,C0NST(MA(建筑,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(機械，PQ,IF(P6-P5,C0NST(MA(機械,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(地產(chǎn)，PQ,IF(P7-P6,C0NST(MA(地產(chǎn),M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(農(nóng)林，PQ,IF(P8-P7,C0NST(MA(農(nóng)林,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(電子，PQ,IF(P9-P8,C0NST(MA(電子,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(石化，PQ,IF(P10-P9,C0NST(MA(石化,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(制造,PQ,IF(P11-P10,C0NST(MA(制造,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(運輸，PQ,IF(P12-P11,C0NST(MA(運輸,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(金屬，PQ,IF(P13-P12,C0NST(MA(金屬,M)),DRAWNULL),4,0),C0L0RYELL0W;STICKLINE(上證，上證，IF(P1-P14,VAR28,DRAWNULL),5,T),C0L0RYELL0W;STICKLINE(醫(yī)藥，PQ,IF(P2-P1,VAR17,DRAWNULL),4,0),C0L0RRED;STICKLINE(金融，PQ,IF(P3-P2,VAR18,DRAWNULL),4,0),C0L0RRED;STICKLINE(紡織，PQ,IF(P4-P3,VAR19,DRAWNULL),4,0),C0L0RRED;STICKLINE(建筑，PQ,IF(P5-P4,VAR20,DRAWNULL),4,0),C0L0RRED;STICKLINE(機械，PQ,IF(P6-P5,VAR21,DRAWNULL),4,0),C0L0RRED;STICKLINE(地產(chǎn)，PQ,IF(P7-P6,VAR22,DRAWNULL),4,0),C0L0RRED;STICKLINE(農(nóng)林，PQ,IF(P8-P7,VAR23,DRAWNULL),4,0),C0L0RRED;STICKLINE(電子，PQ,IF(P9-P8,VAR24,DRAWNULL),4,0),C0L0RRED;STICKLINE(石化，PQ,IF(P10-P9,VAR25,DRAWNULL),4,0),C0L0RRED;STICKLINE(制造,PQ,IF(P11-P10,VAR26,DRAWNULL),4,0),C0L0RRED;STICKLINE(運輸，PQ,IF(P12-P11,VAR27,DRAWNULL),4,0),C0L0RRED;STICKLINE(金屬，PQ,IF(P13-P12,VAR29,DRAWNULL),4,0),C0L0RRED;STICKLINE(醫(yī)藥，PQ,IF(P2-P1,C0NST(醫(yī)藥)，DRAWNULL),0.8,0),C0L0RDD0555;STICKLINE(金融,PQ,IF(P3-P2,C0NST(金融)，DRAWNULL),0.8,0),C0L0RBLUE;STICKLINE(紡織,PQ,IF(P4-P3,C0NST(紡織)，DRAWNULL),0.8,0),C0L0RBLUE;STICKLINE(建筑,PQ,IF(P5-P4,C0NST(建筑)，DRAWNULL),0.8,0),C0L0RBLUE;STICKLINE(機械,PQ,IF(P6-P5,C0NST(機械)，DRAWNULL),0.8,0),C0L0RBLUE;STICKLINE(地產(chǎn)，PQ,IF(P7-P6,C0NST(地產(chǎn))，DRAWNULL),0.8,0),C0L0RBLUE;STICKLINE(農(nóng)林,PQ,IF(P8-P7,C0NST(農(nóng)林)，DRAWNULL),0.8,0),C0L0RBLUE;STICKLINE（電子,PQ,IF（P9-P8,C0NST（電子）,DRAWNULL）,0.8,0）,C0L0RBLUE;STICKLINE（石化，PQ,IF（P10-P9,C0NST（石化）,DRAWNULL）,O.8,O）,COLORBLUE;STICKLINE（制造,PQ,IF（P11-P10,C0NST（制造）,DRAWNULL）,0.8,0）,C0L0RBLUE;STICKLINE（運輸,PQ,IF（P12-P11,C0NST（運輸）,DRAWNULL）,0.8,0）,C0L0RBLUE;STICKLINE（金屬,PQ,IF（P13-P12,C0NST（金屬）,DRAWNULL）,0.8,0）,C0L0RBLUE;DRAWTEXT（P2-P1,PQ-2,'醫(yī)藥'），COLORYELLOW;DRAWTEXT（P3-P2,PQ-2,'金融'），COLORYELLOW;DRAWTEXT（P4-P3,PQ-2,'紡織'），COLORYELLOW;DRAWTEXT（P5-P4,PQ-2,'建筑'），COLORYELLOW;DRAWTEXT（P6-P5,PQ-2,'機械'）,COLORYELLOW;DRAWTEXT（P7—P6,PQ—2,'地產(chǎn)'）,COLORYELLOW;DRAWTEXT（P8-P7,PQ-2,'農(nóng)林'），COLORYELLOW;DRAWTEXT（P9-P8,PQ-2,'電子'），COLORYELLOW;DRAWTEXT（P10-P9,PQ-2,'石化'），COLORYELLOW;DRAWTEXT（P11-P10,PQ-2,'制造'）,COLORYELLOW;DRAWTEXT（P12-P11,PQ-2,'運輸'），COLORYELLOW;DRAWTEXT（P13-P12,PQ-2,'金屬'），COLORYELLOW;!通達信做出熱門板塊的走勢K線圖幾乎每個股票軟件都會把股票劃分到很多板塊中，“金融板塊”、“地產(chǎn)板塊”等等，每天也會對熱門板塊做個排行。我們面對著幾乎每天都出現(xiàn)的領(lǐng)漲、領(lǐng)跌的板塊，經(jīng)常會去猜測明天是什么板塊領(lǐng)漲（領(lǐng)跌）呢？對于熱點板塊的追逐，往往令我們眼花繚亂、無所適從。如果能把板塊的走勢也做出K線圖來，那么我們在判斷板塊的走向的時候，就會比較清晰明了，就不會被某一板塊一日的漲跌所迷惑，能從趨勢的角度去看待一個板塊的漲跌。按道理說，把一個板塊的所有股票按權(quán)重比例累計到一起，就可以做出一個板塊的走勢來。要求使用的是通達信的看盤軟件，新函數(shù)HORCALC（,,,）在通達信以前的版本中，是沒有的函數(shù)。具體從哪個版本開始增加的這個函數(shù)，具體還不清楚，現(xiàn)在用的是通達信V6.03。這個函數(shù)在通達信中是這樣解釋的：@HORCALC.用法：HORCALC（板塊名稱，數(shù)據(jù)項，計算方式，權(quán)重），數(shù)據(jù)項：100-HIGH,101-OPEN，102-LOW，103-CL0SE,104-V0L,105-漲幅計算方式：0-累加，1-排名次權(quán)重：0-總股本，1-流通股本，2-等同權(quán)重，3-流通市值利用這個函數(shù)，我們就可以把板塊的走勢K線圖做出來了。當然，只能做為一個附圖的指標來顯示板塊的K線圖。附圖為0