实用才是硬道理 太郎动力源码

首先声明：本指标非本人原创，来源于理想，是哪位老师的作品，我也记不清了，如原作者看到本帖，请跟帖说明一下，本人先在此感谢您的杰作了！
请看下图，绿色区域即使出现买入信号，也不必进场，因为那里的肉太少！稍不留神就得被套！红色区域出现买入信号，才可大胆跟进！因为肉多了！本人据此操作，自编太郎股票池，将此指标作为极其重要的筛选条件之一！见画面右下角，收益还是不错的。本人感觉该指标最大的特点就是实用准确！且无需L2数据支持！无未来函数！本人不敢独享，特与大家共享之！

{动力线}
JE:=VOL;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
WP:=(QJ0*(JJ-MIN(CLOSE,OPEN)));
NP:=(QJ0*(MIN(OPEN,CLOSE)-LOW));
HS:=VOL/CAPITAL*100;
DLX:(WP-NP)/V*HS,COLOR3D,HIDEVAL,precis2;
DLX1:EMA(DLX,60)*60,precis2 ;
DLX2:MA(DLX1,5),precis2;
DLX3:MA(DLX1,10),precis2;
连红:LAST(DLX>0),PRECIS0,COLOR0000FF,linethick0;
拾红:COUNT(DLX>0,10),PRECIS0,Color3300CC,linethick0;
连增:last(DLX>REF(DLX,1)),PRECIS0,colorfaabec,linethick0;
连减:last(DLX<REF(DLX,1)),PRECIS0,ColorABFF46,linethick0;
FILLRGN(DLX2,DLX1,DLX2<DLX1,rgb(180,50,0),DLX2>DLX1,rgb(0,50,180)),layer5;
FILLRGN(DLX3,DLX2,DLX3<DLX2,rgb(200,0,100),DLX3>DLX2,rgb(0,100,100)),layer5;
partline(DLX1,DLX1>=ref(DLX1,1),rgb(255,0,0),DLX1<ref(DLX1,1),rgb(0,255,255)),linethick1;