封神榜  指標(biāo)源碼

n   1   120    10
m   1    60      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)*100,0);
金融:=SUM((VAR2/REF(VAR2,1)-1)*100,0);
紡織:=SUM((VAR3/REF(VAR3,1)-1)*100,0);
建筑:=SUM((VAR4/REF(VAR4,1)-1)*100,0);
機(jī)械:=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);
運(yùn)輸:=SUM((VAR11/REF(VAR11,1)-1)*100,0);
上證:SUM((VAR12/REF(VAR12,1)-1)*100,0),COLORRED;
金屬:=SUM((VAR13/REF(VAR13,1)-1)*100,0);
VAR17:=CONST(MA(醫(yī)藥,N));
VAR18:=CONST(MA(金融,N));
VAR19:=CONST(MA(紡織,N));
VAR20:=CONST(MA(建筑,N));
VAR21:=CONST(MA(機(jī)械,N));
VAR22:=CONST(MA(地產(chǎn),N));
VAR23:=CONST(MA(農(nóng)林,N));
VAR24:=CONST(MA(電子,N));
VAR25:=CONST(MA(石化,N));
VAR26:=CONST(MA(制造,N));
VAR27:=CONST(MA(運(yùn)輸,N));
VAR28:=CONST(MA(上證,N));
VAR29:=CONST(MA(金屬,N));
PQ:=VAR29;
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ī)藥,VAR17,IF(P2-P1,CONST(醫(yī)藥),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(金融,VAR18,IF(P3-P2,CONST(金融),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(紡織,VAR19,IF(P4-P3,CONST(紡織),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(建筑,VAR20,IF(P5-P4,CONST(建筑),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(機(jī)械,VAR21,IF(P6-P5,CONST(機(jī)械),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(地產(chǎn),VAR22,IF(P7-P6,CONST(地產(chǎn)),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(農(nóng)林,VAR23,IF(P8-P7,CONST(農(nóng)林),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(電子,VAR24,IF(P9-P8,CONST(電子),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(石化,VAR25,IF(P10-P9,CONST(石化),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(制造,VAR26,IF(P11-P10,CONST(制造),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(運(yùn)輸,VAR27,IF(P12-P11,CONST(運(yùn)輸),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(上證,VAR28,IF(P1-P14,CONST(上證),DRAWNULL),5,-1),COLORFF00FF;
STICKLINE(金屬,VAR29,IF(P13-P12,CONST(金屬),DRAWNULL),5,-2),COLORFF00FF;
STICKLINE(醫(yī)藥,PQ,IF(P2-P1,VAR17,DRAWNULL),4,0),COLORRED;
STICKLINE(金融,PQ,IF(P3-P2,VAR18,DRAWNULL),4,0),COLORRED;
STICKLINE(紡織,PQ,IF(P4-P3,VAR19,DRAWNULL),4,0),COLORRED;
STICKLINE(建筑,PQ,IF(P5-P4,VAR20,DRAWNULL),4,0),COLORRED;
STICKLINE(機(jī)械,PQ,IF(P6-P5,VAR21,DRAWNULL),4,0),COLORRED;
STICKLINE(地產(chǎn),PQ,IF(P7-P6,VAR22,DRAWNULL),4,0),COLORRED;
STICKLINE(農(nóng)林,PQ,IF(P8-P7,VAR23,DRAWNULL),4,0),COLORRED;
STICKLINE(電子,PQ,IF(P9-P8,VAR24,DRAWNULL),4,0),COLORRED;
STICKLINE(石化,PQ,IF(P10-P9,VAR25,DRAWNULL),4,0),COLORRED;
STICKLINE(制造,PQ,IF(P11-P10,VAR26,DRAWNULL),4,0),COLORRED;
STICKLINE(運(yùn)輸,PQ,IF(P12-P11,VAR27,DRAWNULL),4,0),COLORRED;
STICKLINE(醫(yī)藥,PQ,IF(P2-P1,CONST(MA(醫(yī)藥,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(金融,PQ,IF(P3-P2,CONST(MA(金融,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(紡織,PQ,IF(P4-P3,CONST(MA(紡織,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(建筑,PQ,IF(P5-P4,CONST(MA(建筑,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(機(jī)械,PQ,IF(P6-P5,CONST(MA(機(jī)械,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(地產(chǎn),PQ,IF(P7-P6,CONST(MA(地產(chǎn),M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(農(nóng)林,PQ,IF(P8-P7,CONST(MA(農(nóng)林,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(電子,PQ,IF(P9-P8,CONST(MA(電子,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(石化,PQ,IF(P10-P9,CONST(MA(石化,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(制造,PQ,IF(P11-P10,CONST(MA(制造,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(運(yùn)輸,PQ,IF(P12-P11,CONST(MA(運(yùn)輸,M)),DRAWNULL),0.8,0),COLORAAAAFF;
STICKLINE(金屬,PQ,IF(P13-P12,CONST(MA(金屬,M)),DRAWNULL),0.8,0),COLORAAAAFF;
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,'機(jī)械'),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,'運(yùn)輸'),COLORYELLOW;
DRAWTEXT(P13-P12,PQ-2,'金屬'),COLORYELLOW;

另一個(gè)老師的指標(biāo),，本人覺得功能相似

{N 1 99 9; M1 1 99 3; M2 1 99 3;}
CURR:=CURRBARSCOUNT;
STICKLINE(1=1,15,-5,18,0),COLOR878787;
DRAWTEXT(CURR=73,13,'理想論壇  壹瓣杺埖 '),COLOR8E0000;
上證量比:=CONST("999999$VOL"/REF(MA("999999$VOL",5),1)*10);
深證量比:=CONST("399001$VOL"/REF(MA("399001$VOL",5),1)*10);
量比:STICKLINE(1=1,IF(CURR=55,上證量比*1.05,IF(CURR=20,深證量比*1.05,DRAWNULL)),0,39,-1),COLOR00FFFF;
STICKLINE(1=1,IF(CURR=55,上證量比,IF(CURR=20,深證量比,DRAWNULL)),0,38,0),COLOR00BBBB;

大盤股量比:=CONST("399372$VOL"/REF(MA("399372$VOL",5),1)*10);
大盤C:=("399372$C"); 大盤H:=("399372$H"); 大盤L:=("399372$L"); 大盤O:=("399372$O");
大盤股漲跌:=CONST(((大盤C-REF(大盤C,1))/REF(大盤C,1))*200);
大盤偏差:=(2*大盤C+大盤H+大盤L+大盤O)/5-(MA(大盤C,3)+MA(大盤C,6)+MA(大盤C,12)+MA(大盤C,24))/4;
大盤R:=(大盤偏差-LLV(大盤偏差,N))/(HHV(大盤偏差,N)-LLV(大盤偏差,N))*10;
大盤K:=SMA(大盤R,M1,1); 大盤D:=SMA(大盤K,M2,1); 大盤股0:=3*大盤K-2*大盤D;
大盤股J:=CONST(大盤股0);
中盤股量比:=CONST("399374$VOL"/REF(MA("399374$VOL",5),1)*10);
中盤C:=("399374$C"); 中盤H:=("399374$H"); 中盤L:=("399374$L"); 中盤O:=("399374$O");
中盤股漲跌:=CONST(((中盤C-REF(中盤C,1))/REF(中盤C,1))*200);
中盤偏差:=(2*中盤C+中盤H+中盤L+中盤O)/5-(MA(中盤C,3)+MA(中盤C,6)+MA(中盤C,12)+MA(中盤C,24))/4;
中盤R:=(中盤偏差-LLV(中盤偏差,N))/(HHV(中盤偏差,N)-LLV(中盤偏差,N))*10;
中盤K:=SMA(中盤R,M1,1); 中盤D:=SMA(中盤K,M2,1); 中盤股0:=3*中盤K-2*中盤D;
中盤股J:=CONST(中盤股0);
小盤股量比:=CONST("399376$VOL"/REF(MA("399376$VOL",5),1)*10);
小盤C:=("399376$C"); 小盤H:=("399376$H"); 小盤L:=("399376$L"); 小盤O:=("399376$O");
小盤股漲跌:=CONST(((小盤C-REF(小盤C,1))/REF(小盤C,1))*200);
小盤偏差:=(2*小盤C+小盤H+小盤L+小盤O)/5-(MA(小盤C,3)+MA(小盤C,6)+MA(小盤C,12)+MA(小盤C,24))/4;
小盤R:=(小盤偏差-LLV(小盤偏差,N))/(HHV(小盤偏差,N)-LLV(小盤偏差,N))*10;
小盤K:=SMA(小盤R,M1,1); 小盤D:=SMA(小盤K,M2,1); 小盤股0:=3*小盤K-2*小盤D;
小盤股J:=CONST(小盤股0);
農(nóng)林量比:=CONST("399110$VOL"/REF(MA("399110$VOL",5),1)*10);
農(nóng)林C:=("399110$C"); 農(nóng)林H:=("399110$H"); 農(nóng)林L:=("399110$L"); 農(nóng)林O:=("399110$O");
農(nóng)林漲跌:=CONST(((農(nóng)林C-REF(農(nóng)林C,1))/REF(農(nóng)林C,1))*200);
農(nóng)林偏差:=(2*農(nóng)林C+農(nóng)林H+農(nóng)林L+農(nóng)林O)/5-(MA(農(nóng)林C,3)+MA(農(nóng)林C,6)+MA(農(nóng)林C,12)+MA(農(nóng)林C,24))/4;
農(nóng)林R:=(農(nóng)林偏差-LLV(農(nóng)林偏差,N))/(HHV(農(nóng)林偏差,N)-LLV(農(nóng)林偏差,N))*10;
農(nóng)林K:=SMA(農(nóng)林R,M1,1); 農(nóng)林D:=SMA(農(nóng)林K,M2,1); 農(nóng)林0:=3*農(nóng)林K-2*農(nóng)林D;
農(nóng)林J:=CONST(農(nóng)林0);
采掘量比:=CONST("399120$VOL"/REF(MA("399120$VOL",5),1)*10);
采掘C:=("399120$C"); 采掘H:=("399120$H"); 采掘L:=("399120$L"); 采掘O:=("399120$O");
采掘漲跌:=CONST(((采掘C-REF(采掘C,1))/REF(采掘C,1))*200);
采掘偏差:=(2*采掘C+采掘H+采掘L+采掘O)/5-(MA(采掘C,3)+MA(采掘C,6)+MA(采掘C,12)+MA(采掘C,24))/4;
采掘R:=(采掘偏差-LLV(采掘偏差,N))/(HHV(采掘偏差,N)-LLV(采掘偏差,N))*10;
采掘K:=SMA(采掘R,M1,1); 采掘D:=SMA(采掘K,M2,1); 采掘0:=3*采掘K-2*采掘D;
采掘J:=CONST(采掘0);
制造量比:=CONST("399130$VOL"/REF(MA("399130$VOL",5),1)*10);
制造C:=("399130$C"); 制造H:=("399130$H"); 制造L:=("399130$L"); 制造O:=("399130$O");
制造漲跌:=CONST(((制造C-REF(制造C,1))/REF(制造C,1))*200);
制造偏差:=(2*制造C+制造H+制造L+制造O)/5-(MA(制造C,3)+MA(制造C,6)+MA(制造C,12)+MA(制造C,24))/4;
制造R:=(制造偏差-LLV(制造偏差,N))/(HHV(制造偏差,N)-LLV(制造偏差,N))*10;
制造K:=SMA(制造R,M1,1); 制造D:=SMA(制造K,M2,1); 制造0:=3*制造K-2*制造D;
制造J:=CONST(制造0);
食品量比:=CONST("399131$VOL"/REF(MA("399131$VOL",5),1)*10);
食品C:=("399131$C"); 食品H:=("399131$H"); 食品L:=("399131$L"); 食品O:=("399131$O");
食品漲跌:=CONST(((食品C-REF(食品C,1))/REF(食品C,1))*200);
食品偏差:=(2*食品C+食品H+食品L+食品O)/5-(MA(食品C,3)+MA(食品C,6)+MA(食品C,12)+MA(食品C,24))/4;
食品R:=(食品偏差-LLV(食品偏差,N))/(HHV(食品偏差,N)-LLV(食品偏差,N))*10;
食品K:=SMA(食品R,M1,1); 食品D:=SMA(食品K,M2,1); 食品0:=3*食品K-2*食品D;
食品J:=CONST(食品0);
紡織量比:=CONST("399132$VOL"/REF(MA("399132$VOL",5),1)*10);
紡織C:=("399132$C"); 紡織H:=("399132$H"); 紡織L:=("399132$L"); 紡織O:=("399132$O");
紡織漲跌:=CONST(((紡織C-REF(紡織C,1))/REF(紡織C,1))*200);
紡織偏差:=(2*紡織C+紡織H+紡織L+紡織O)/5-(MA(紡織C,3)+MA(紡織C,6)+MA(紡織C,12)+MA(紡織C,24))/4;
紡織R:=(紡織偏差-LLV(紡織偏差,N))/(HHV(紡織偏差,N)-LLV(紡織偏差,N))*10;
紡織K:=SMA(紡織R,M1,1); 紡織D:=SMA(紡織K,M2,1); 紡織0:=3*紡織K-2*紡織D;
紡織J:=CONST(紡織0);
創(chuàng)投量比:=CONST("399958$VOL"/REF(MA("399958$VOL",5),1)*10);
創(chuàng)投C:=("399958$C"); 創(chuàng)投H:=("399958$H"); 創(chuàng)投L:=("399958$L"); 創(chuàng)投O:=("399958$O");
創(chuàng)投漲跌:=CONST(((創(chuàng)投C-REF(創(chuàng)投C,1))/REF(創(chuàng)投C,1))*200);
創(chuàng)投偏差:=(2*創(chuàng)投C+創(chuàng)投H+創(chuàng)投L+創(chuàng)投O)/5-(MA(創(chuàng)投C,3)+MA(創(chuàng)投C,6)+MA(創(chuàng)投C,12)+MA(創(chuàng)投C,24))/4;
創(chuàng)投R:=(創(chuàng)投偏差-LLV(創(chuàng)投偏差,N))/(HHV(創(chuàng)投偏差,N)-LLV(創(chuàng)投偏差,N))*10;
創(chuàng)投K:=SMA(創(chuàng)投R,M1,1); 創(chuàng)投D:=SMA(創(chuàng)投K,M2,1); 創(chuàng)投0:=3*創(chuàng)投K-2*創(chuàng)投D;
創(chuàng)投J:=CONST(創(chuàng)投0);
金融量比:=CONST("399190$VOL"/REF(MA("399190$VOL",5),1)*10);
金融C:=("399190$C"); 金融H:=("399190$H"); 金融L:=("399190$L"); 金融O:=("399190$O");
金融漲跌:=CONST(((金融C-REF(金融C,1))/REF(金融C,1))*200);
金融偏差:=(2*金融C+金融H+金融L+金融O)/5-(MA(金融C,3)+MA(金融C,6)+MA(金融C,12)+MA(金融C,24))/4;
金融R:=(金融偏差-LLV(金融偏差,N))/(HHV(金融偏差,N)-LLV(金融偏差,N))*10;
金融K:=SMA(金融R,M1,1); 金融D:=SMA(金融K,M2,1); 金融0:=3*金融K-2*金融D;
金融J:=CONST(金融0);
石化量比:=CONST("399135$VOL"/REF(MA("399135$VOL",5),1)*10);
石化C:=("399135$C"); 石化H:=("399135$H"); 石化L:=("399135$L"); 石化O:=("399135$O");
石化漲跌:=CONST(((石化C-REF(石化C,1))/REF(石化C,1))*200);
石化偏差:=(2*石化C+石化H+石化L+石化O)/5-(MA(石化C,3)+MA(石化C,6)+MA(石化C,12)+MA(石化C,24))/4;
石化R:=(石化偏差-LLV(石化偏差,N))/(HHV(石化偏差,N)-LLV(石化偏差,N))*10;
石化K:=SMA(石化R,M1,1); 石化D:=SMA(石化K,M2,1); 石化0:=3*石化K-2*石化D;
石化J:=CONST(石化0);
電子量比:=CONST("399136$VOL"/REF(MA("399136$VOL",5),1)*10);
電子C:=("399136$C"); 電子H:=("399136$H"); 電子L:=("399136$L"); 電子O:=("399136$O");
電子漲跌:=CONST(((電子C-REF(電子C,1))/REF(電子C,1))*200);
電子偏差:=(2*電子C+電子H+電子L+電子O)/5-(MA(電子C,3)+MA(電子C,6)+MA(電子C,12)+MA(電子C,24))/4;
電子R:=(電子偏差-LLV(電子偏差,N))/(HHV(電子偏差,N)-LLV(電子偏差,N))*10;
電子K:=SMA(電子R,M1,1); 電子D:=SMA(電子K,M2,1);
電子0:=3*電子K-2*電子D;
電子J:=CONST(電子0);
金屬量比:=CONST("399137$VOL"/REF(MA("399137$VOL",5),1)*10);
金屬C:=("399137$C"); 金屬H:=("399137$H"); 金屬L:=("399137$L"); 金屬O:=("399137$O");
金屬漲跌:=CONST(((金屬C-REF(金屬C,1))/REF(金屬C,1))*200);
金屬偏差:=(2*金屬C+金屬H+金屬L+金屬O)/5-(MA(金屬C,3)+MA(金屬C,6)+MA(金屬C,12)+MA(金屬C,24))/4;
金屬R:=(金屬偏差-LLV(金屬偏差,N))/(HHV(金屬偏差,N)-LLV(金屬偏差,N))*10;
金屬K:=SMA(金屬R,M1,1); 金屬D:=SMA(金屬K,M2,1); 金屬0:=3*金屬K-2*金屬D;
金屬J:=CONST(金屬0);
機(jī)械量比:=CONST("399138$VOL"/REF(MA("399138$VOL",5),1)*10);
機(jī)械C:=("399138$C"); 機(jī)械H:=("399138$H"); 機(jī)械L:=("399138$L"); 機(jī)械O:=("399138$O");
機(jī)械漲跌:=CONST(((機(jī)械C-REF(機(jī)械C,1))/REF(機(jī)械C,1))*200);
機(jī)械偏差:=(2*機(jī)械C+機(jī)械H+機(jī)械L+機(jī)械O)/5-(MA(機(jī)械C,3)+MA(機(jī)械C,6)+MA(機(jī)械C,12)+MA(機(jī)械C,24))/4;
機(jī)械R:=(機(jī)械偏差-LLV(機(jī)械偏差,N))/(HHV(機(jī)械偏差,N)-LLV(機(jī)械偏差,N))*10;
機(jī)械K:=SMA(機(jī)械R,M1,1); 機(jī)械D:=SMA(機(jī)械K,M2,1); 機(jī)械0:=3*機(jī)械K-2*機(jī)械D;
機(jī)械J:=CONST(機(jī)械0);
醫(yī)藥量比:=CONST("399139$VOL"/REF(MA("399139$VOL",5),1)*10);
醫(yī)藥C:=("399139$C"); 醫(yī)藥H:=("399139$H"); 醫(yī)藥L:=("399139$L"); 醫(yī)藥O:=("399139$O");
醫(yī)藥漲跌:=CONST(((醫(yī)藥C-REF(醫(yī)藥C,1))/REF(醫(yī)藥C,1))*200);
醫(yī)藥偏差:=(2*醫(yī)藥C+醫(yī)藥H+醫(yī)藥L+醫(yī)藥O)/5-(MA(醫(yī)藥C,3)+MA(醫(yī)藥C,6)+MA(醫(yī)藥C,12)+MA(醫(yī)藥C,24))/4;
醫(yī)藥R:=(醫(yī)藥偏差-LLV(醫(yī)藥偏差,N))/(HHV(醫(yī)藥偏差,N)-LLV(醫(yī)藥偏差,N))*10;
醫(yī)藥K:=SMA(醫(yī)藥R,M1,1); 醫(yī)藥D:=SMA(醫(yī)藥K,M2,1); 醫(yī)藥0:=3*醫(yī)藥K-2*醫(yī)藥D;
醫(yī)藥J:=CONST(醫(yī)藥0);
地產(chǎn)量比:=CONST("399200$VOL"/REF(MA("399200$VOL",5),1)*10);
地產(chǎn)C:=("399200$C"); 地產(chǎn)H:=("399200$H"); 地產(chǎn)L:=("399200$L"); 地產(chǎn)O:=("399200$O");
地產(chǎn)漲跌:=CONST(((地產(chǎn)C-REF(地產(chǎn)C,1))/REF(地產(chǎn)C,1))*200);
地產(chǎn)偏差:=(2*地產(chǎn)C+地產(chǎn)H+地產(chǎn)L+地產(chǎn)O)/5-(MA(地產(chǎn)C,3)+MA(地產(chǎn)C,6)+MA(地產(chǎn)C,12)+MA(地產(chǎn)C,24))/4;
地產(chǎn)R:=(地產(chǎn)偏差-LLV(地產(chǎn)偏差,N))/(HHV(地產(chǎn)偏差,N)-LLV(地產(chǎn)偏差,N))*10;
地產(chǎn)K:=SMA(地產(chǎn)R,M1,1); 地產(chǎn)D:=SMA(地產(chǎn)K,M2,1); 地產(chǎn)0:=3*地產(chǎn)K-2*地產(chǎn)D;
地產(chǎn)J:=CONST(地產(chǎn)0);
服務(wù)量比:=CONST("399210$VOL"/REF(MA("399210$VOL",5),1)*10);
服務(wù)C:=("399210$C"); 服務(wù)H:=("399210$H"); 服務(wù)L:=("399210$L"); 服務(wù)O:=("399210$O");
服務(wù)漲跌:=CONST(((服務(wù)C-REF(服務(wù)C,1))/REF(服務(wù)C,1))*200);
服務(wù)偏差:=(2*服務(wù)C+服務(wù)H+服務(wù)L+服務(wù)O)/5-(MA(服務(wù)C,3)+MA(服務(wù)C,6)+MA(服務(wù)C,12)+MA(服務(wù)C,24))/4;
服務(wù)R:=(服務(wù)偏差-LLV(服務(wù)偏差,N))/(HHV(服務(wù)偏差,N)-LLV(服務(wù)偏差,N))*10;
服務(wù)K:=SMA(服務(wù)R,M1,1); 服務(wù)D:=SMA(服務(wù)K,M2,1); 服務(wù)0:=3*服務(wù)K-2*服務(wù)D;
服務(wù)J:=CONST(服務(wù)0);
電力量比:=CONST("399140$VOL"/REF(MA("399140$VOL",5),1)*10);
電力C:=("399140$C"); 電力H:=("399140$H"); 電力L:=("399140$L"); 電力O:=("399140$O");
電力漲跌:=CONST(((電力C-REF(電力C,1))/REF(電力C,1))*200);
電力偏差:=(2*電力C+電力H+電力L+電力O)/5-(MA(電力C,3)+MA(電力C,6)+MA(電力C,12)+MA(電力C,24))/4;
電力R:=(電力偏差-LLV(電力偏差,N))/(HHV(電力偏差,N)-LLV(電力偏差,N))*10;
電力K:=SMA(電力R,M1,1); 電力D:=SMA(電力K,M2,1); 電力0:=3*電力K-2*電力D;
電力J:=CONST(電力0);
建筑量比:=CONST("399150$VOL"/REF(MA("399150$VOL",5),1)*10);
建筑C:=("399150$C"); 建筑H:=("399150$H"); 建筑L:=("399150$L"); 建筑O:=("399150$O");
建筑漲跌:=CONST(((建筑C-REF(建筑C,1))/REF(建筑C,1))*200);
建筑偏差:=(2*建筑C+建筑H+建筑L+建筑O)/5-(MA(建筑C,3)+MA(建筑C,6)+MA(建筑C,12)+MA(建筑C,24))/4;
建筑R:=(建筑偏差-LLV(建筑偏差,N))/(HHV(建筑偏差,N)-LLV(建筑偏差,N))*10;
建筑K:=SMA(建筑R,M1,1); 建筑D:=SMA(建筑K,M2,1); 建筑0:=3*建筑K-2*建筑D;
建筑J:=CONST(建筑0);
IT業(yè)量比:=CONST("399170$VOL"/REF(MA("399170$VOL",5),1)*10);
IT業(yè)C:=("399170$C"); IT業(yè)H:=("399170$H"); IT業(yè)L:=("399170$L"); IT業(yè)O:=("399170$O");
IT業(yè)漲跌:=CONST(((IT業(yè)C-REF(IT業(yè)C,1))/REF(IT業(yè)C,1))*200);
IT業(yè)偏差:=(2*IT業(yè)C+IT業(yè)H+IT業(yè)L+IT業(yè)O)/5-(MA(IT業(yè)C,3)+MA(IT業(yè)C,6)+MA(IT業(yè)C,12)+MA(IT業(yè)C,24))/4;
IT業(yè)R:=(IT業(yè)偏差-LLV(IT業(yè)偏差,N))/(HHV(IT業(yè)偏差,N)-LLV(IT業(yè)偏差,N))*10;
IT業(yè)K:=SMA(IT業(yè)R,M1,1); IT業(yè)D:=SMA(IT業(yè)K,M2,1); IT業(yè)0:=3*IT業(yè)K-2*IT業(yè)D;
IT業(yè)J:=CONST(IT業(yè)0);
批零量比:=CONST("399180$VOL"/REF(MA("399180$VOL",5),1)*10);
批零C:=("399180$C"); 批零H:=("399180$H"); 批零L:=("399180$L"); 批零O:=("399180$O");
批零漲跌:=CONST(((批零C-REF(批零C,1))/REF(批零C,1))*200);
批零偏差:=(2*批零C+批零H+批零L+批零O)/5-(MA(批零C,3)+MA(批零C,6)+MA(批零C,12)+MA(批零C,24))/4;
批零R:=(批零偏差-LLV(批零偏差,N))/(HHV(批零偏差,N)-LLV(批零偏差,N))*10;
批零K:=SMA(批零R,M1,1); 批零D:=SMA(批零K,M2,1); 批零0:=3*批零K-2*批零D;
批零J:=CONST(批零0);
傳播量比:=CONST("399220$VOL"/REF(MA("399220$VOL",5),1)*10);
傳播C:=("399220$C"); 傳播H:=("399220$H"); 傳播L:=("399220$L"); 傳播O:=("399220$O");
傳播漲跌:=CONST(((傳播C-REF(傳播C,1))/REF(傳播C,1))*200);
傳播偏差:=(2*傳播C+傳播H+傳播L+傳播O)/5-(MA(傳播C,3)+MA(傳播C,6)+MA(傳播C,12)+MA(傳播C,24))/4;
傳播R:=(傳播偏差-LLV(傳播偏差,N))/(HHV(傳播偏差,N)-LLV(傳播偏差,N))*10;
傳播K:=SMA(傳播R,M1,1); 傳播D:=SMA(傳播K,M2,1); 傳播0:=3*傳播K-2*傳播D;
傳播J:=CONST(傳播0);
物流量比:=CONST("399160$VOL"/REF(MA("399160$VOL",5),1)*10);
物流C:=("399160$C"); 物流H:=("399160$H"); 物流L:=("399160$L"); 物流O:=("399160$O");
物流漲跌:=CONST(((物流C-REF(物流C,1))/REF(物流C,1))*200);
物流偏差:=(2*物流C+物流H+物流L+物流O)/5-(MA(物流C,3)+MA(物流C,6)+MA(物流C,12)+MA(物流C,24))/4;
物流R:=(物流偏差-LLV(物流偏差,N))/(HHV(物流偏差,N)-LLV(物流偏差,N))*10;
物流K:=SMA(物流R,M1,1); 物流D:=SMA(物流K,M2,1); 物流0:=3*物流K-2*物流D;
物流J:=CONST(物流0);
軍工量比:=CONST("399368$VOL"/REF(MA("399368$VOL",5),1)*10);
軍工C:=("399368$C"); 軍工H:=("399368$H"); 軍工L:=("399368$L"); 軍工O:=("399368$O");
軍工漲跌:=CONST(((軍工C-REF(軍工C,1))/REF(軍工C,1))*200);
軍工偏差:=(2*軍工C+軍工H+軍工L+軍工O)/5-(MA(軍工C,3)+MA(軍工C,6)+MA(軍工C,12)+MA(軍工C,24))/4;
軍工R:=(軍工偏差-LLV(軍工偏差,N))/(HHV(軍工偏差,N)-LLV(軍工偏差,N))*10;
軍工K:=SMA(軍工R,M1,1); 軍工D:=SMA(軍工K,M2,1); 軍工0:=3*軍工K-2*軍工D;
軍工J:=CONST(軍工0);
新能源量比:=CONST("399941$VOL"/REF(MA("399941$VOL",5),1)*10);
新能C:=("399941$C"); 新能H:=("399941$H"); 新能L:=("399941$L"); 新能O:=("399941$O");
新能源漲跌:=CONST(((新能C-REF(新能C,1))/REF(新能C,1))*200);
新能偏差:=(2*新能C+新能H+新能L+新能O)/5-(MA(新能C,3)+MA(新能C,6)+MA(新能C,12)+MA(新能C,24))/4;
新能R:=(新能偏差-LLV(新能偏差,N))/(HHV(新能偏差,N)-LLV(新能偏差,N))*10;
新能K:=SMA(新能R,M1,1); 新能D:=SMA(新能K,M2,1); 新能源0:=3*新能K-2*新能D;
新能源J:=CONST(新能源0);

STICKLINE(1=1,IF(CURR=2,食品漲跌,IF(CURR=5,建筑漲跌,IF(CURR=8,紡織漲跌,IF(CURR=11,物流漲跌,
IF(CURR=14,農(nóng)林漲跌,IF(CURR=17,制造漲跌,IF(CURR=20,電子漲跌,IF(CURR=23,機(jī)械漲跌,
IF(CURR=26,醫(yī)藥漲跌,IF(CURR=29,金屬漲跌,IF(CURR=32,石化漲跌,IF(CURR=35,地產(chǎn)漲跌,
IF(CURR=38,金融漲跌,IF(CURR=41,服務(wù)漲跌,IF(CURR=44,電力漲跌,IF(CURR=47,采掘漲跌,
IF(CURR=50,傳播漲跌,IF(CURR=53,IT業(yè)漲跌,IF(CURR=56,軍工漲跌,IF(CURR=59,新能源漲跌,
IF(CURR=62,創(chuàng)投漲跌,IF(CURR=65,批零漲跌,IF(CURR=68,大盤股漲跌,IF(CURR=71,中盤股漲跌,
IF(CURR=74,小盤股漲跌,DRAWNULL))))))))))))))))))))))))),0,10,0),COLOR8E2368;

食品:IF(CURR=2,食品J,IF(CURR=37,金融量比,DRAWNULL)),STICK,LINETHICK8,COLOR6666FF;
建筑:IF(CURR=5,建筑J,IF(CURR=52,IT業(yè)量比,DRAWNULL)),STICK,LINETHICK8,COLORAA9966;
紡織:IF(CURR=8,紡織J,IF(CURR=49,傳播量比,DRAWNULL)),STICK,LINETHICK8,COLORCC66FF;
物流:IF(CURR=11,物流J,IF(CURR=64,批零量比,DRAWNULL)),STICK,LINETHICK8,COLORFFFFFF;
農(nóng)林:IF(CURR=14,農(nóng)林J,IF(CURR=43,電力量比,DRAWNULL)),STICK,LINETHICK8,COLOR33FF66;
制造:IF(CURR=17,制造J,IF(CURR=40,服務(wù)量比,DRAWNULL)),STICK,LINETHICK8,COLORCCCCCC;
電子:IF(CURR=20,電子J,IF(CURR=73,小盤股量比,DRAWNULL)),STICK,LINETHICK8,COLOR00BBFF;
機(jī)械:IF(CURR=23,機(jī)械J,IF(CURR=70,中盤股量比,DRAWNULL)),STICK,LINETHICK8,COLORFFCC00;
醫(yī)藥:IF(CURR=26,醫(yī)藥J,IF(CURR=67,大盤股量比,DRAWNULL)),STICK,LINETHICK8,COLOR553388;
金屬:IF(CURR=29,金屬J,IF(CURR=46,采掘量比,DRAWNULL)),STICK,LINETHICK8,COLORFFFF66;
石化:IF(CURR=32,石化J,IF(CURR=61,創(chuàng)投量比,DRAWNULL)),STICK,LINETHICK8,COLORFF9988;
地產(chǎn):IF(CURR=35,地產(chǎn)J,IF(CURR=58,新能源量比,DRAWNULL)),STICK,LINETHICK8,COLORAAAAFF;
金融:IF(CURR=38,金融J,IF(CURR=55,軍工量比,DRAWNULL)),STICK,LINETHICK8,COLOR00FFFF;
服務(wù):IF(CURR=41,服務(wù)J,IF(CURR=34,地產(chǎn)量比,DRAWNULL)),STICK,LINETHICK8,COLORFF66CC;
電力:IF(CURR=44,電力J,IF(CURR=31,石化量比,DRAWNULL)),STICK,LINETHICK8,COLORFF2200;
采掘:IF(CURR=47,采掘J,IF(CURR=28,金屬量比,DRAWNULL)),STICK,LINETHICK8,COLOR6F0000;
傳播:IF(CURR=50,傳播J,IF(CURR=16,制造量比,DRAWNULL)),STICK,LINETHICK8,COLOR6F00F0;
IT業(yè):IF(CURR=53,IT業(yè)J,IF(CURR=22,機(jī)械量比,DRAWNULL)),STICK,LINETHICK8,COLOR000000;
軍工:IF(CURR=56,軍工J,IF(CURR=19,電子量比,DRAWNULL)),STICK,LINETHICK8,COLOR6666FF;
新能源:IF(CURR=59,新能源J,IF(CURR=25,醫(yī)藥量比,DRAWNULL)),STICK,LINETHICK8,COLOR00AA33;
創(chuàng)投:IF(CURR=62,創(chuàng)投J,IF(CURR=13,農(nóng)林量比,DRAWNULL)),STICK,LINETHICK8,COLORFF00FF;
批零:IF(CURR=65,批零J,IF(CURR=10,物流量比,DRAWNULL)),STICK,LINETHICK8,COLOR005500;
大盤:IF(CURR=68,大盤股J,IF(CURR=7,紡織量比,DRAWNULL)),STICK,LINETHICK8,COLORAAAAFF;
中盤:IF(CURR=71,中盤股J,IF(CURR=4,建筑量比,DRAWNULL)),STICK,LINETHICK8,COLOR00FFFF;
小盤:IF(CURR=74,小盤股J,IF(CURR=1,食品量比,DRAWNULL)),STICK,LINETHICK8,COLORFF66CC;

板塊:=IF(食品=食品J,'食品',IF(建筑=建筑J,'建筑',IF(紡織=紡織J,'紡織',IF(物流=物流J,'物流',IF(農(nóng)林=農(nóng)林J,'農(nóng)林',IF(制造=制造J,'制造',
IF(電子=電子J,'電子',IF(機(jī)械=機(jī)械J,'機(jī)械',IF(醫(yī)藥=醫(yī)藥J,'醫(yī)藥',IF(金屬=金屬J,'金屬',IF(石化=石化J,'石化',IF(地產(chǎn)=地產(chǎn)J,'地產(chǎn)',
IF(金融=金融J,'金融',IF(服務(wù)=服務(wù)J,'服務(wù)',IF(電力=電力J,'電力',IF(采掘=采掘J,'采掘',IF(傳播=傳播J,'傳播',IF(IT業(yè)=IT業(yè)J,'IT業(yè)',
IF(軍工=軍工J,'軍工',IF(新能源=新能源J,'新能源',IF(創(chuàng)投=創(chuàng)投J,'創(chuàng)投',IF(大盤=大盤股J,'大盤',IF(中盤=中盤股J,'中盤',IF(小盤=小盤股J,'小盤',
IF(批零=批零J,'批零',DRAWNULL)))))))))))))))))))))))));
DRAWTEXT(食品=食品J OR 建筑=建筑J OR 紡織=紡織J OR 物流=物流J OR 農(nóng)林=農(nóng)林J OR 制造=制造J OR 電子=電子J OR
機(jī)械=機(jī)械J OR 醫(yī)藥=醫(yī)藥J OR 金屬=金屬J OR 石化=石化J OR 地產(chǎn)=地產(chǎn)J OR 金融=金融J OR 服務(wù)=服務(wù)J OR 電力=電力J OR
采掘=采掘J OR 傳播=傳播J OR IT業(yè)=IT業(yè)J OR 軍工=軍工J OR 新能源=新能源J OR 創(chuàng)投=創(chuàng)投J OR 大盤=大盤股J OR 中盤=中盤股J
OR 批零=批零J OR 小盤=小盤股J,0,板塊),COLORFFFFFF;

上證C:=("999999$C"); 上證H:=("999999$H"); 上證L:=("999999$L"); 上證O:=("999999$O");
上證偏差:=(2*上證C+上證H+上證L+上證O)/5-(MA(上證C,3)+MA(上證C,6)+MA(上證C,12)+MA(上證C,24))/4;
上證R:=(上證偏差-LLV(上證偏差,N))/(HHV(上證偏差,N)-LLV(上證偏差,N))*10;
上證K:=SMA(上證R,M1,1); 上證D:=SMA(上證K,M2,1);
上證J:3*上證K-2*上證D,COLORRED;
深證C:=("399001$C"); 深證H:=("399001$H"); 深證L:=("399001$L"); 深證O:=("399001$O");
深證偏差:=(2*深證C+深證H+深證L+深證O)/5-(MA(深證C,3)+MA(深證C,6)+MA(深證C,12)+MA(深證C,24))/4;
深證R:=(深證偏差-LLV(深證偏差,N))/(HHV(深證偏差,N)-LLV(深證偏差,N))*10;
深證K:=SMA(深證R,M1,1); 深證D:=SMA(深證K,M2,1);
深證J:3*深證K-2*深證D,COLORFF0000;
個(gè)股偏差:=(2*C+H+L+O)/5-(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;
個(gè)股R:=(個(gè)股偏差-LLV(個(gè)股偏差,N))/(HHV(個(gè)股偏差,N)-LLV(個(gè)股偏差,N))*10;
個(gè)股K:=SMA(個(gè)股R,M1,1); 個(gè)股D:=SMA(個(gè)股K,M2,1);
個(gè)股J:3*個(gè)股K-2*個(gè)股D,COLOR66CCFF,LINETHICK2;
IF(CURR<=12,CONST(上證J),DRAWNULL),COLORRED;
IF(CURR<=10,CONST(深證J),DRAWNULL),COLORFF0000;
IF(CURR<=8,CONST(個(gè)股J),DRAWNULL),COLOR66CCFF;
DRAWTEXT(CURR=12 OR CURR=10 OR CURR=8,IF(CURR=12,CONST(上證J),IF(CURR=10,CONST(深證J),
IF(CURR=8,CONST(個(gè)股J),DRAWNULL))),IF(CURR=12,'上證J',IF(CURR=10,'深證J',IF(CURR=8,'個(gè)股J',DRAWNULL)))),COLORFFFF00;
DRAWTEXT(CURR=83,8,'紫方柱 板塊漲跌幅');
DRAWTEXT(CURR=83,6,'第1柱 板塊J線');
DRAWTEXT(CURR=83,4,'第2柱 板塊量比');
DRAWTEXT(CURR=55 OR CURR=20,IF(CURR=55,上證量比*IF(上證量比>0,1.3,1),IF(CURR=20,深證量比*IF(深證量比>0,1.3,1),DRAWNULL)),IF(CURR=55,'上證量比',IF(CURR=20,'深證量比',DRAWNULL))),COLORFF00FF;
DRAWTEXT(IF(食品J>CONST(REF(食品0,1)),CURR=2,DRAWNULL) OR IF(建筑J>CONST(REF(建筑0,1)),CURR=5,DRAWNULL) OR
IF(紡織J>CONST(REF(紡織0,1)),CURR=8,DRAWNULL) OR IF(物流J>CONST(REF(物流0,1)),CURR=11,DRAWNULL) OR
IF(農(nóng)林J>CONST(REF(農(nóng)林0,1)),CURR=14,DRAWNULL) OR IF(制造J>CONST(REF(制造0,1)),CURR=17,DRAWNULL) OR
IF(電子J>CONST(REF(電子0,1)),CURR=20,DRAWNULL) OR IF(機(jī)械J>CONST(REF(機(jī)械0,1)),CURR=23,DRAWNULL) OR
IF(醫(yī)藥J>CONST(REF(醫(yī)藥0,1)),CURR=26,DRAWNULL) OR IF(金屬J>CONST(REF(金屬0,1)),CURR=29,DRAWNULL) OR
IF(石化J>CONST(REF(石化0,1)),CURR=32,DRAWNULL) OR IF(地產(chǎn)J>CONST(REF(地產(chǎn)0,1)),CURR=35,DRAWNULL),0,' ↑↑'),COLOR0000FF;
DRAWTEXT(IF(CONST(REF(金融0,1))<=金融J,CURR=38,DRAWNULL) OR IF(CONST(REF(服務(wù)0,1))<=服務(wù)J,CURR=41,DRAWNULL) OR
IF(CONST(REF(電力0,1))<=電力J,CURR=44,DRAWNULL) OR IF(CONST(REF(采掘0,1))<=采掘J,CURR=47,DRAWNULL) OR
IF(CONST(REF(傳播0,1))<=傳播J,CURR=50,DRAWNULL) OR IF(CONST(REF(IT業(yè)0,1))<=IT業(yè)J,CURR=53,DRAWNULL) OR
IF(CONST(REF(軍工0,1))<=軍工J,CURR=56,DRAWNULL) OR IF(CONST(REF(新能源0,1))<=新能源J,CURR=59,DRAWNULL) OR
IF(CONST(REF(創(chuàng)投0,1))<=創(chuàng)投J,CURR=62,DRAWNULL) OR IF(CONST(REF(大盤股0,1))<=大盤股J,CURR=65,DRAWNULL) OR
IF(CONST(REF(中盤股0,1))<=中盤股J,CURR=68,DRAWNULL) OR IF(CONST(REF(批零0,1))<=批零J,CURR=71,DRAWNULL) OR
IF(CONST(REF(小盤股0,1))<=小盤股J,CURR=74,DRAWNULL),0,' ↑↑'),COLOR0000FF;