主题：[求助]自定义函数：存在两次执行的问题。

在公示中的代码如下（逐K线模式和日K线模式）：

if ISLASTBAR THEN 
BEGIN
   LZZ:TEST1();
   LWJDK:=1;
END 

在自定义函数中：TEST1的源码如下

Function test1(Formula)
    '系统会在逐周期模式解释公式时的每个周期都会调用此函数一遍，因此设计时应该注重程序的执行效率，不要重复的执行一些没必要的代码
   
    Set wrd = CreateObject( "Word.Application")
    wrd.Visible = True
    wrd.Documents.Open "D:\Weisoft Stock\systemreport\test.txt"
    Set wrd = Nothing
    test1=10

End Function

结果每次执行

首先显示“已被锁定，不可编辑”，打开副本后；

有时会再一次执行打开步骤，又是“已被锁定，不可编辑”，打开副本

实际上自定义函数执行了两次，还是其他原因，比较困惑。

（我怀疑，实际上刚启动，第一次执行自定义函数，交互数据时它已经暗中打开，所以永远是已被锁定，我删除后重新启动也无法）

请求帮助：

1、解决不可编辑

2、有时两次打开的原因

试试用APPLICATION.MSGOUT输出消息看看。

如果仍旧两次调用，那么你要检查你的公式是否被两个地方使用，比如其他图表框架中使用，后台，预警，自定义数据刷新等等其他地方使用

一个问题没有解决，又出现一个问题。

在自定义函数中加了一个参数TEST1(MSNO);(MSNO=401，为数值数据），编译公式无论如何通不过。

试了TEST1(401),不行；TEST1(MSNO),不行；

重新设个值N:=401，TEST1(N) 也不行。提示错误。

只好将原来的自定义函数CU_MA2改成我需要测试的程序，将TEST1(MSNO)改成CU_MA2(MSNO),则通过编译，正常运行。

请斑竹求助！！！！

目前版本号2.703，

下面为自定义函数源码：

Function CU_MA2(Formula,cyc)
    '得到K线数据对象
 'Set History = Formula.ParentGrid.GetHistoryData()
 '若当前周期尚未到计算周期,不参与计算
 'if Formula.IndexData < cyc-1 then
 ' CU_MA2 = 0
 ' exit function
 'end if
 
 'DataCount = 0
    'for i = Formula.IndexData-cyc+1 to Formula.IndexData
     '累加收盘价
    ' DataCount = DataCount + history.close(i)
    'next
 'CU_MA2 = DataCount / cyc
    Set wrd = CreateObject( "Word.Application")
    wrd.Visible = True
             wrd.Documents.Open "D:\Weisoft Stock\systemreport\test.txt"
        Set wrd = Nothing
     CU_MA2 = 10
End Function

Function test1(Formula,cyc)
    '得到K线数据对象
 application.MsgOut("tttt")
    Set wrd = CreateObject( "Word.Application")
    wrd.Visible = True
             wrd.Documents.Open "D:\Weisoft Stock\systemreport\test.txt"
        Set wrd = Nothing
    test1=10

End Function

这个问题 是因为多次执行了 公式指标。

你在公式指标中加入一句

MSGOUT( 1,'rrrrr' );

这样你就会在消息窗口中看到 多次的输出‘rrrrr’（在日线以上的模式里，每个几秒就会输出一次，在日线模式里，一分钟多会出现一次）。每执行一次指标，就会打开一次文本。这就是出现你说的“已被锁定，不可编辑”，因为在此之前已经打开了该文本。又再一次打开该文本，所以出现提示。因为该文本打开后，操作系统就会将该文件设为临界资源，临界资源不允许被多次写入方式打开。

总的来说问题出现就是 公式被多次执行了，导致了多次的打开文本，在没有关闭先前的文本窗口时，而出现了你说的“已被锁定，不可编辑”。

公式指标只在图表上运行时，根据刷新时间，每刷新一次执行一次公式指标。

在 图表程式化交易里 和 后台程式化交易 里运行时，设定好时间间隔，会好一些。