以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  见鬼了。。。  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=53115)

--  作者:seemsgood
--  发布时间:2013/6/17 22:17:18
--  见鬼了。。。
那个自定义函数的例子  BAOHAN()

双击公式能正确运行 结果也对

BAOHAN()的代码我写在VB里
脚本里调用

一切都正常
此时编辑公式 再确定
提示BAOHAN()未定义
左侧函数列表 自定义函数里没有我的BAOHAN()函数
然后关闭金字塔 再运行金字塔
再运行该公式 还是正常
求解


--  作者:王锋
--  发布时间:2013/6/18 9:01:09
--  
楼主是否有方法让其能够问题重现,这样我们研发人员会针对此情况进行认真的核实并修正
--  作者:seemsgood
--  发布时间:2013/6/18 18:11:01
--  
以下是引用王锋在2013/6/18 9:01:09的发言:
楼主是否有方法让其能够问题重现,这样我们研发人员会针对此情况进行认真的核实并修正

IF NOT(ISLASTBAR) THEN EXIT;
kh:=h;
kl:=l;
for j=2 to (datacount-1) do
BEGIN
if BAOHAN (kh[j-1],kl[j-1],kh[j],kl[j])=0 then 
begin
drawicon(barpos=j,h,5,0);
end;
end;
这是脚本里的代码 本来可以正确执行  然后我把IF条件那里改成=1 点确定 就提示函数未定义  然后我把条件再改为=0 还是提示函数未定义  然后重启金字塔 运行公式 可以运行 


--  作者:王锋
--  发布时间:2013/6/18 21:21:23
--  

你的问题在于这里

 

IF NOT(ISLASTBAR) THEN EXIT;
kh:=h;
kl:=l;

 

在逐K线模式下,kh的数组在还未进行赋值就直接EXIT了,你这样调整就好了

 

kh:=h;
kl:=l;
IF NOT(ISLASTBAR) THEN EXIT;

--  作者:seemsgood
--  发布时间:2013/6/18 23:46:54
--  
以下是引用王锋在2013/6/18 21:21:23的发言:

你的问题在于这里

 

kh:=h;

 

在逐K线模式下,kh的数组在还未进行赋值就直接EXIT了,你这样调整就好了

 

kh:=h;
IF NOT(ISLASTBAR) THEN EXIT;

错误还在啊  仍然提示BAOHAN()未定义


--  作者:王锋
--  发布时间:2013/6/19 15:59:00
--  
由于无法本地复原你描述的情况,是否方便将你的Document目录发给我们,我们这边按照你的描述认真测试你的公式
--  作者:seemsgood
--  发布时间:2013/6/19 16:04:27
--  
以下是引用王锋在2013/6/19 15:59:00的发言:
由于无法本地复原你描述的情况,是否方便将你的Document目录发给我们,我们这边按照你的描述认真测试你的公式

恩 怎么发呀


--  作者:王锋
--  发布时间:2013/6/19 17:52:03
--  

您明日工作时间联系QQ 442902994,我们远程先到你的计算机看看问题现象