软件名称：[B]通达信成本均线 复权[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：0 Bytes
官方主页：Home Page
更新时间：2012-03-31 14:48:32
软件简介:

在使用通达信成本均线的时候发现复权后有些线对不上k线图
 

所以自己写了随便玩玩

源码：

PC:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC1:IF(JJJT,0.01*EXPMA(AMOUNT,A)/EXPMA(AMOUNT/(100*PC),A),EMA((HIGH+LOW+CLOSE)/3,A));
CYC2:IF(JJJT,0.01*EXPMA(AMOUNT,B)/EXPMA(AMOUNT/(100*PC),B),EMA((HIGH+LOW+CLOSE)/3,B));
CYC3:IF(JJJT,0.01*EXPMA(AMOUNT,E)/EXPMA(AMOUNT/(100*PC),E),EMA((HIGH+LOW+CLOSE)/3,E));
CYC∞:IF(JJJT,DMA(PC,100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));

参数：{INPUT:A(0,100,5),B(0,100,13),E(0,100,34)}
不好意思,第一次发贴，看着发帖规则，疏忽了参数，现在发个无参数的
PC:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC1:IF(JJJT,0.01*EXPMA(AMOUNT,5)/EXPMA(AMOUNT/(100*PC),5),EMA((HIGH+LOW+CLOSE)/3,5));
CYC2:IF(JJJT,0.01*EXPMA(AMOUNT,13)/EXPMA(AMOUNT/(100*PC),13),EMA((HIGH+LOW+CLOSE)/3,13));
CYC3:IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(AMOUNT/(100*PC),34),EMA((HIGH+LOW+CLOSE)/3,34));
CYC∞:IF(JJJT,DMA(PC,100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));

ABC的值，是不是
A：2  30     5
B：2  60    13
C：2  120  34
或直接加入
A:=5;
B:=13;
C:=34;

[url=http://www.70822.com/soft/sort013/sort05/down-45971.html]通达信成本均线 复权[/url]