原版和简约版对照简约版
此板块动态监测公式是转帖,壹瓣杺埖老师的作品,个人觉得还不错就拿来与大家分享, 如果对大家有帮助就加分吧!以下是源码:
{简睿板块动态 }
{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),COLOR66CCFF;
STICKLINE(1=1,IF(CURR=55,上证量比,IF(CURR=20,深证量比,DRAWNULL)),0,38,0),COLOR0088FF;
大盘股量比:=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);
农林量比:=CONST("399110$VOL"/REF(MA("399110$VOL",5),1)*10);
农林C:=("399110$C"); 农林H:=("399110$H"); 农林L:=("399110$L"); 农林O:=("399110$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("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);
创投量比:=CONST("399958$VOL"/REF(MA("399958$VOL",5),1)*10);
创投C:=("399958$C"); 创投H:=("399958$H"); 创投L:=("399958$L"); 创投O:=("399958$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("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"); 金属
|