双龙改良源代码如下: {过去10天中存在涨停的,找到它的量能,并找到距离现在的天数N,N必须大于3} N := BARSLAST((C=H) AND (C/REF(C,1))>1.098); HEXIST := N<=10 AND N>=5; HVOL:= REF(V,N); {涨停后2天放量} A := REF(V,N-1)>HVOL AND REF(V,N-2)>HVOL; {昨天的收盘价必须在正负10%内} B := ABS((C-REF(C,N))/REF(C,N)) <0.1; {中间不能跌停} CC := NOT(EXIST(C=H AND (C/REF(C,1))<0.909,N)); {近期最低价格不能低于涨停当天的开盘价} DD := NOT(EXIST(L<=REF(O,N),N)); HEXIST AND A AND B AND CC AND DD; {最高量前4天为多头排列} E := COUNT((MA(REF(CLOSE,N 4),5)>MA(REF(CLOSE,N 4),10) AND MA(REF(CLOSE,N 4),10)>MA(REF(CLOSE,N 4),30)),4)=4; {今天虚拟的成交量VVOL大于5日平均成交量,价格也超过5日价格} TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1))))); MTIME:=MOD(FROMOPEN,TOTAL); CTIME:=IF(MTIME<0.5,TOTAL,MTIME); VVOL:=IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*TOTAL/CTIME,DRAWNULL); 温馨提示: 直接复制即可,不要打乱其排序。 备注: 此次的代码改良主要体现在两个地方: A、盘整的天数比之前的原代码要提前一点,也就是说,缩量涨停之后,能够立马捕捉到第二天的优良盘整双龙。 B、量能更加严格,必须大于量均5日线以上,可以剔除掉很多无量的个 ......... 安装的方法和之前是一样的! 安装教程: |
|