飞狐“分时副图”加载“macd”指标源码

阅读作者：股海网时间 2013-03-15 飞狐公式

在“飞狐”下看不到类似通达信软件分时附图的macd指标，而今天该问题可以迎刃而解了。以下横线内为公式源码，可有效解决该问题。（已测试通过）
—————————————————————————————————————————————————

条件函数数据周期类型>=0 then exit;
////////****** 计算指标变换所需的公共数据 *******
rc:=动态行情(3);//前收
q:=序列数据量;
hh:=动态行情(5);//最高
LL:=动态行情(6);//最低
f:=最大值(hh-rc,rc-LL);
ff:=f/rc*100;//最大半振幅
/////////////////////////////////////////////////////////////////
////////********　㈡在副图2叠加macd　********
//副图2变换所需数据
q2h:=条件函数(ff<1,0.9797*rc,rc-2*f*1.016);//分时副图2最高位置
q2l:=条件函数(ff<1,0.9697*rc,rc-3*f*1.011);//分时副图2最低位置
//以下清除原始的指标线，并画横坐标线
画区间彩带(1,q2h,q2l),colorblack;
cz:=(q2h-q2l)/4;
q2l,COLORRED;
q2l+cz,点状线,color0000cc;
q2l+2*cz,点状线,color0000cc;
q2l+3*cz,点状线,color0000cc;
a1:="macd.diff";
a2:="macd.dea";
a3:="macd.macd";
mh:=最高值(最大值(a1,a3),0);
mL:=最低值(最小值(a3,a1),0);
mb:=(q2h-q2l)/(mH[q]-mL[q]);//缩放比例,选macd或diff来计算缩放比例
my:=(q2h+q2l-mb*(mH[q]+mL[q]))/2;//平移值
diff:a1*mb+my,COLORWHITE;//副图2显示原来的diff指标线
dea:a2*mb+my,COLORYELLOW;//副图2显示原来的dea指标线
macd:=a3*mb+my;//副图2显示原来的macd指标线
画柱线(macd>my,my,macd,1,1),COLORRED;
画柱线(macd<my,my,macd,1,1),COLORCYAN;

————————————————————————————————————————————————

    步骤：复制以上框内源码—程序化交易—公式管理器—新建（名称命名FHMACD,并勾选主图叠加）—确定，从而完成飞狐缺口（FHMACD）。

     显示方式：在分时界面按*键，之后，输入FHMACD,回撤即可