以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  自定义函数CU_MA1的坑 -CLOSE数组数据长度与Formula.DataSize-1不一定相等  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=149505)

--  作者:wenit
--  发布时间:2017/3/22 11:08:53
--  自定义函数CU_MA1的坑 -CLOSE数组数据长度与Formula.DataSize-1不一定相等
系统自带自定义函数
\'计算序列模式下指定周期长度的收盘价均价
Function CU_MA1(Formula,CLOSE,CYC)
   CU_MA1=0

    \'防止公式逐周期模式时调用
    If Formula.WorkMode = 0 Then
        Exit Function 
    End If

    \'CLOSE数组数据长度一定会与Formula.DataSize-1相等
    DataCount = UBound(CLOSE)
    If DataCount <> Formula.DataSize-1 Then
        Exit Function
    End If

    \'定义一个计算返回的数组
    Dim ResultMa
    Redim ResultMa(DataCount)

    For i = Cyc-1 To Formula.DataSize-1
        Count = 0
        For k = i-(Cyc-1) To i
            Count = Count + CLOSE(k)
        Next
        ResultMa(i) = Count / Cyc
    Next

    \'返回一个计算完毕的均线数组
    CU_MA1 = ResultMa
End Function
公式调用
ma1:CU_MA1(c,5);

发现刷新K线过程中,ma1偶然输出为0的横线,理论上CLOSE数组数据长度一定会与Formula.DataSize-1相等,但实际可能不想等,具体原因在哪里偶也不清楚;目前我的解决办法是不使用Formula.DataSize

--  作者:王锋
--  发布时间:2017/3/22 13:02:34
--  

你是通过输出为0就判断是因为CLOSE数组数据长度一定会与Formula.DataSize-1这个问题的吗?

那你的判断有点武断了,建议你采取日志记录等一些方案进一步明确一下问题。


--  作者:wenit
--  发布时间:2017/3/22 16:11:52
--  


我是写其他自定义函数发现这个问题的,通过日志记录排查了,为什么会发生这样的问题,是我个人电脑的环境的问题还是系统的问题就不得而知了。这里举CU_MA1原版函数这个例子只是故障重现而已。


静态的一般没问题,开盘时间刷新几十根K线故障就会偶然性重现


--  作者:王锋
--  发布时间:2017/3/22 16:50:14
--  
 \'CLOSE数组数据长度一定会与Formula.DataSize-1相等
    DataCount = UBound(CLOSE)
    If DataCount <> Formula.DataSize-1 Then
       Application.msgout DataCount &"--++--"&Formula.DataSize-1
        Exit Function
    End If
建议你将上述加了日志的代码放进去,如果出现不一致情况,将打印的日志发给我们这边看一下

--  作者:wenit
--  发布时间:2017/3/23 9:29:24
--  
只加了日志代码,不知道如何上传图片
494--++--506
494--++--506
494--++--506
495--++--507
495--++--507
495--++--507
495--++--507
495--++--507
495--++--507
496--++--508
496--++--508
496--++--508
496--++--508
496--++--508
496--++--508
496--++--508
497--++--509
497--++--509
497--++--509
497--++--509
497--++--509
497--++--509
498--++--510
498--++--510
498--++--510
498--++--510
498--++--510
498--++--510
498--++--510
499--++--511
499--++--511
499--++--511
499--++--511
499--++--511
499--++--511
499--++--511
500--++--512
500--++--512
500--++--512
500--++--512
500--++--512
500--++--512
501--++--513
501--++--513
501--++--513
501--++--513
501--++--513
501--++--513
501--++--513
502--++--514
502--++--514
502--++--514
502--++--514
502--++--514
502--++--514
502--++--514
503--++--515
503--++--515
503--++--515
503--++--515
503--++--515
503--++--515
504--++--516
504--++--516
504--++--516
504--++--516
504--++--516
504--++--516
504--++--516
505--++--517
505--++--517
505--++--517
505--++--517
505--++--517
505--++--517
506--++--518
506--++--518
506--++--518
506--++--518
506--++--518
506--++--518
506--++--518
507--++--519
507--++--519
507--++--519
507--++--519
507--++--519
507--++--519
507--++--519
508--++--520
508--++--520
508--++--520
508--++--520
508--++--520
508--++--520
509--++--521
509--++--521
509--++--521
509--++--521
509--++--521
509--++--521
509--++--521
510--++--522
510--++--522
510--++--522
510--++--522
510--++--522
510--++--522
511--++--523
511--++--523
511--++--523
511--++--523
511--++--523
511--++--523
511--++--523
512--++--524
512--++--524
512--++--524
512--++--524
512--++--524
512--++--524
512--++--524
513--++--525
513--++--525
513--++--525
513--++--525
513--++--525
513--++--525
514--++--526
514--++--526
514--++--526
514--++--526
514--++--526
514--++--526
514--++--526
515--++--527
515--++--527
515--++--527
515--++--527
515--++--527
515--++--527
516--++--528
516--++--528
516--++--528
516--++--528
516--++--528
516--++--528
516--++--528
517--++--529
517--++--529
517--++--529
517--++--529
517--++--529
517--++--529
517--++--529
518--++--530
518--++--530
518--++--530
518--++--530
518--++--530
518--++--530
519--++--531
519--++--531
519--++--531
519--++--531
519--++--531
519--++--531
519--++--531
520--++--532
520--++--532
520--++--532
520--++--532
520--++--532
520--++--532
520--++--532
521--++--533
521--++--533
521--++--533
521--++--533
521--++--533
521--++--533
522--++--534
522--++--534
522--++--534
522--++--534
522--++--534
522--++--534
522--++--534
523--++--535
523--++--535
523--++--535
523--++--535
523--++--535
523--++--535
524--++--536
524--++--536
524--++--536
524--++--536
524--++--536
524--++--536
524--++--536
525--++--537
525--++--537
525--++--537
525--++--537
525--++--537
525--++--537
525--++--537
526--++--538
526--++--538
526--++--538
526--++--538
526--++--538
526--++--538
527--++--539
527--++--539
527--++--539
527--++--539
527--++--539
527--++--539
527--++--539
528--++--540
528--++--540
528--++--540
528--++--540
528--++--540
528--++--540
529--++--541
529--++--541
529--++--541
529--++--541
529--++--541
529--++--541
529--++--541


--  作者:wenit
--  发布时间:2017/3/23 9:36:43
--  
截图
图片点击可在新窗口打开查看此主题相关图片如下:上传.png
图片点击可在新窗口打开查看

--  作者:王锋
--  发布时间:2017/3/23 16:36:22
--  
我们用最新的4.1版本,通过外盘数据测试,没发现你说的问题。
--  作者:NaturalLaw
--  发布时间:2017/3/28 9:35:12
--  
为什么要通过外盘数据测试呢?
--  作者:yukizzc
--  发布时间:2017/3/28 12:59:10
--  

本地内盘测试也正常,你公式属性是否 序列正常选择的?

重新建立一个查看下呢