当前位置：分析家公式网 → 股票公式 → 大智慧L2公式 → 一键转帖：多空能量－－－－－－趋势指标（附图、源码、贴图）
软件名称：[B]多空能量－－－－－－趋势指标（附图、源码、贴图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2010-11-18 14:16:01
软件简介:
个人收集的指标，与大家分享，感谢原作者。
源码如下：
input:N(30,1,100);
DRAWTEXTABS(10,10,'板块名称:'+BKNAME),COLORFFEEBB;
DRAWTEXTABS(10,50,'每股收益:'+FINANCE2(3)),COLORFFEEBB;
DRAWTEXTABS(180,50,'目前流通盘:'+CAPITAL/100),COLORFFEEBB;
DRAWTEXTABS(10,70,'每股净资产:'+FINANCE2(4)),COLORFFEEBB;
DRAWTEXTABS(180,70,'总股本:'+FINANCE2(35)),COLORFFEEBB;
DRAWTEXTABS(10,90,'每股公积金:'+FINANCE2(7)),COLORFFEEBB;
DRAWTEXTABS(180,90,'主营收入同比增长:'+FINANCE2(11)),COLORFFEEBB;
aa:=SUM(IF( CLOSE>REF(CLOSE,1),CLOSE-MIN(REF(CLOSE,1),LOW),IF(CLOSE<REF(CLOSE,1),
CLOSE-MAX(REF(CLOSE,1),HIGH),0)),0);
bb:=MA(aa,N);
gg:aa-bb,color3d;
DRAWGBKLAST(C>0,STRIP(RGB(90,90,90),RGB(0,0,0),0));
量:=V;
换手:V/CAPITAL*100,LINETHICK0;
VAR1:=VOL/((H-L)*2-ABS(C-O));
买盘:=IF(C>O,VAR1*(H-L),IF(C<O,VAR1*((H-O)+(C-L)),VOL/2));
卖盘:=IF(C>O,0-VAR1*((H-C)+(O-L)),IF(C<O,0-VAR1*(H-L),0-VOL/2));
动能:=(买盘-(-卖盘))/量*换手;
DNX1:SUM(动能,6);
DNX2:MA(动能,3),color00ff0f;
源码如下：
input:N(30,1,100);
DRAWTEXTABS(10,10,'板块名称:'+BKNAME),COLORFFEEBB;
DRAWTEXTABS(10,50,'每股收益:'+FINANCE2(3)),COLORFFEEBB;
DRAWTEXTABS(180,50,'目前流通盘:'+CAPITAL/100),COLORFFEEBB;
DRAWTEXTABS(10,70,'每股净资产:'+FINANCE2(4)),COLORFFEEBB;
DRAWTEXTABS(180,70,'总股本:'+FINANCE2(35)),COLORFFEEBB;
DRAWTEXTABS(10,90,'每股公积金:'+FINANCE2(7)),COLORFFEEBB;
DRAWTEXTABS(180,90,'主营收入同比增长:'+FINANCE2(11)),COLORFFEEBB;
aa:=SUM(IF( CLOSE>REF(CLOSE,1),CLOSE-MIN(REF(CLOSE,1),LOW),IF(CLOSE<REF(CLOSE,1),
CLOSE-MAX(REF(CLOSE,1),HIGH),0)),0);
bb:=MA(aa,N);
gg:aa-bb,color3d;
DRAWGBKLAST(C>0,STRIP(RGB(90,90,90),RGB(0,0,0),0));
量:=V;
换手:V/CAPITAL*100,LINETHICK0;
VAR1:=VOL/((H-L)*2-ABS(C-O));
买盘:=IF(C>O,VAR1*(H-L),IF(C<O,VAR1*((H-O)+(C-L)),VOL/2));
卖盘:=IF(C>O,0-VAR1*((H-C)+(O-L)),IF(C<O,0-VAR1*(H-L),0-VOL/2));
动能:=(买盘-(-卖盘))/量*换手;
DNX1:SUM(动能,6);
DNX2:MA(动能,3),color00ff0f;
[url=http://www.70822.com/soft/sort013/sort03/down-27251.html]多空能量－－－－－－趋势指标（附图、源码、贴图）[/url]