- 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp)
-- 高级功能研发区 (http://weistock.com/bbs/list.asp?boardid=5)
---- 自定义函数编写，求助 (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=60483)
-- 发布时间：2013/12/30 21:52:37
-- 自定义函数编写，求助
第一次在vba板块上发帖，问题太菜勿怪。
自己经常要用到一个功能，一直想变成一个简单的自定义函数，自己编不出来，求各路神仙相助。
很简单的均线穿越函数。
参数有2个，一个是输入均线值EX，一个是输入确立k线数N。
输出:1上穿成功，-1下穿成功，0啥也没有。
pel源码见下
//均线
EX:=EMA(C,55);//EX
//穿越条件
DJKT:=BARSLAST(CROSS(C,EX));KJKT:=BARSLAST(CROSS(EX,C));
//均线开仓
DJK:=C>REF(C,DJKT) AND DJKT>=2 AND C>EX;//N=2
KJK:=C<REF(C,KJKT) AND KJKT>=2 AND C<EX;//N=2
DJKC:=DJK AND REF(DJK,1)=0 AND DJKT<KJKT;//若成立输出1
KJKC:=KJK AND REF(KJK,1)=0 AND KJKT<DJKT;//若成立输出-1
[此贴子已经被作者于2013/12/30 21:53:16编辑过]
-- 发布时间：2013/12/31 16:01:30
--
等后面的版本吧,会增加PEL格式的自定义函数,你暂时可以使用 STKINDI函数来实现这种函数模块的调用
-- 发布时间：2014/1/2 10:41:51
--
啥时候哈；
-- 发布时间：2014/1/2 11:05:15
--
可能春节左右
-- 发布时间：2014/1/2 11:06:37
--
可能春节左右
-- 发布时间：2014/1/2 14:23:05
--
建议论坛帖子设置点赞功能，真心给你们点赞啊；