《931伴侣源码》作者扬州陆俊
{可用分时副图或股池初选后面进行赛选，9.31分 周期分时 执行1分钟}之前调用周期有问题的，下载源码试试。
{可用分时副图或9.31分初选池后面赛选，周期分时执行1分钟}
LUJUN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
ZJLR:=SUM(IF(C>REF(C,1),V,0),LUJUN);
ZJLC:=-SUM(IF(C<REF(C,1),V,0),LUJUN);
ZHCR:=ZJLR+ZJLC;
ZHLL:=ZHCR;
ZJB:=ZHCR/SUM(V,LUJUN)*100;
ZJLLB:=IF(ZJB>=0,(ZJB+100)/2,100-ABS((ZJB-100)/2));
TIME=093100 and IF(ZJLLB=100,1,0);
============以下的详解来自网络，并不代表本网的观点：
详解《931伴侣源码》，如果再没有说真话的人，那这里就成了祸害初学者的地方！作者：光明使者58以下是《931伴侣源码》，真是让人大跌眼镜：
==================================================================
{可用分时副图或9.31分初选池后面赛选，周期分时执行1分钟}
LUJUN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);
ZJLR:=SUM(IF(C>REF(C,1),V,0),LUJUN);
ZJLC:=-SUM(IF(C<REF(C,1),V,0),LUJUN);
ZHCR:=ZJLR+ZJLC;
ZHLL:=ZHCR;
ZJB:=ZHCR/SUM(V,LUJUN)*100;
ZJLLB:=IF(ZJB>=0,(ZJB+100)/2,100-ABS((ZJB-100)/2));
TIME=093100 and IF(ZJLLB=100,1,0);
==================================================================先逐条解释一下：
LUJUN:=IF(HOUR<12,60*(HOUR-9)-30+MINUTE,120+60*(HOUR-13)+MINUTE);计算从开盘到现在的周期数，其实一个函数就解决了，不用这么复杂！！
ZJLR:=SUM(IF(C>REF(C,1),V,0),LUJUN);上涨成交量累计
ZJLC:=-SUM(IF(C<REF(C,1),V,0),LUJUN);下跌成交量累计
ZHCR:=ZJLR+ZJLC;上涨成交量减去下跌成交量，且算着净量吧
ZHLL:=ZHCR;废话
ZJB:=ZHCR/SUM(V,LUJUN)*100;净量占总成交量比，计算出的值为（0-100）之间
ZJLLB:=IF(ZJB>=0,(ZJB+100)/2,100-ABS((ZJB-100)/2));这句结合下一句来看也是废话！
TIME=093100 and IF(ZJLLB=100,1,0);if语句多余，原作者的要求就是要9点31分的成交量是支持上涨的！这样这一分钟的成交量除以总成交量才是100回溯到原作者对于成交量的限制，其实就一句话，9点30分开盘到9点31分上涨就符合要求！！整个公式可以简化为一句话：TIME=093100 and C>REF(C,1);不知道是发贴者故意玄虚，还是他本身就看不懂源码！！！只是苦了他的粉丝们！！！总之丢人丢大了！！！ |
