新亮剑 通达信（源码 ）

这东东是大智慧收费股池指标，由于有商业收费问题，俺按大意改编通达信版。
好啦；大音希声、大象无形……你自己去理解。或复原到你自已的大智慧股池去试试吧！
如对你无用就绕道。
新亮剑 (改编通达信版)无级变速选股源码：

V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);
V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);
V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);
V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);
V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);
V1:= COUNT(V00,3)>=1 AND LLVBARS(LOW,3) = 1 AND V03;
V2:= COUNT(V00,4)>=1 AND LLVBARS(LOW,4) = 2 AND V04;
V3:= COUNT(V00,4)>=1 AND COUNT(V01 OR V02,4)=1 AND LLVBARS(LOW,4) = 1 AND V03;
V4:= COUNT(V00,5)>=1 AND COUNT(V01 OR V02,5)=2 AND LLVBARS(LOW,5) = 2 AND V04;
笔底分型:= V1 OR V2 OR V3 OR V4;
{MACD面积}
A面积:=SUM(MACD,B1*2/5);
B面积:=REF(SUM(MACD,B1*2/5),B1*3/5);
{KDJ指标}
AKDJ:="KDJ.J"(9,3,3);
BKDJ:=REF("KDJ.J"(9,3,3),1);
{成交量}
A成交量:=SUM(VOL,B1*2/5);
B成交量:=REF(SUM(VOL,B1*2/5),B1*3/5);
{形态}
AMIN:=LLV(L,A1);
BMIN:=REF(LLV(L,B1/2),B1/2);
BBMAX:=REF(HHV(H,B1/2),A1);
BMAX:=REF(HHV(H,B1),A1);
CMAX:=REF(HHV(H,C1),(B1*2)+A1);
三买精选:=LOW=LLV(LOW,B1+A1)AND AKDJ>BKDJ AND A成交量<B成交量 AND A面积<B面积 AND BBMAX >= BMIN AND BBMAX <= BMAX AND AMIN <= BMIN AND AMIN>=CMAX*(1-DIEPO/100) AND AMIN/BMAX<=(1-DIEFU/100);
{无级变速}
活跃度:=LARGEINTRDVOL-LARGEOUTTRDVOL;
主动率%:=(ACTINVOL-ACTOUTVOL)/(VOL/100);
大单率%:=(LARGEINTRDVOL-LARGEOUTTRDVOL)/(VOL/100);
涨跌动因%:=(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM;
买卖力度%:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*100/VOL;
短线资金:=(活跃度>0 OR 主动率%>0 OR 大单率%>0 OR 涨跌动因%>0 OR 买卖力度%>0);
资金流向:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*AMO/V/10000;
主力资金线:=SUM((LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7),0);
五日资金线:=MA(主力资金线,5);
十日资金线:=MA(主力资金线,10);
动力度选股:=(活跃度>0 OR 主动率%>0 OR 大单率%>0 OR 涨跌动因%>0 OR 买卖力度%>0 OR 资金流向>0 OR 资金流向>REF(资金流向,1)) AND (主力资金线>五日资金线 OR 主力资金线>十日资金线);
无级变速:笔底分型 AND 三买精选 AND 动力度选股;