人人爽天天爽夜夜爽qc-人人爽天天爽夜夜爽曰-人人天天爱天天做天天摸-人人天天夜夜-色网站在线-色网站在线看

您現在的位置:程序化交易>> 期貨公式>> 金字塔等>> 其他期貨軟件知識>>正文內容

還是有問題,請幫忙解決一下吧。 [金字塔]

  • 咨詢內容:

    公式:

    runmode:1;
    m:PEAKBARS(4,5,1),linethick0;
    tmp:readtest(m),linethick0;
    if c>O then tmp1:=writetest(m,50);

     

    自定義函數:

     

    Function readtest(Formula,M)
        '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍,因此設計時應該注重程序的執行效率,不要重復的執行一些沒必要的代碼
        DataCount = UBound(M)
        If DataCount <> Formula.DataSize-1 Then
            Exit Function
        End If

    '定義一個計算返回的數組
        Dim ResultMa
        Redim ResultMa(DataCount)
        For i = 0 To Formula.DataSize-1
          ResultMa(i) = document.GetPrivateProfileInt("aa", M(i),0 , "G:\1.ini")
        NEXT
        readtest=ResultMa
    End Function

     

    Function writetest(Formula,m,value)
        '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍,因此設計時應該注重程序的執行效率,不要重復的執行一些沒必要的代碼
        writetest=0
       tag = document.WritePrivateProfileInt("aa",m,value, "G:\1.ini")
    End Function

     

    1.ini 內賓:

    [aa]
    0=3
    1=10
    2=7
    3=6
    4=8
    5=10

     

    ============================================

    能讀出1.ini文件中的數據,可是沒有成功寫入。

    我也知道這樣很煩人,可是自己確實搞不了,需要金字塔幫助。拜托了.

     

  • 金字塔客服:

    樓主試試這樣能寫入嗎

    公式中:

     

    runmode:1;
    M:PEAKBARS(4,5,1),linethick0;
    tmp:readtest(m),linethick0;
    if c>o then
    begin
    tmp1:writetest(m,50);
    end

     

     

     

    自定義函數中: '將盤符替換成ini文件放置的盤符

     

    Function readtest(Formula,M)
        '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍,因此設計時應該注重程序的執行效率,不要重復的執行一些沒必要的代碼
       
        DataCount = UBound(M)
        If DataCount <> Formula.DataSize-1 Then
            Exit Function

        End If

    '定義一個計算返回的數組
        Dim ResultMa
        Redim ResultMa(DataCount)


        For i = 0 To Formula.DataSize-1

          ResultMa(i) =  document.GetPrivateProfileInt("aa", M(i),0 , "F:\1.ini")
        NEXT


       readtest=ResultMa

     

    End Function

     

     

    Function writetest(Formula,m,value)
        '系統會在逐K線模式解釋公式時的每個周期都會調用此函數一遍,因此設計時應該注重程序的執行效率,不要重復的執行一些沒必要的代碼
     tag = document.WritePrivateProfileInt("aa",m,value,"F:\1.ini")

    End Function

     

  • 用戶回復:

    一句話是不用begin end的,應該是writetest函數不對。等待客服的回答

     

  • 網友回復: 試了一下,如果加條件if c>o就會無法寫入,另外如果要寫入必須每次更改一下公式編輯,也就是加個回車再次生成,才會寫入。原因正在查找。 [此貼子已經被作者于2012-7-6 15:25:52編輯過]

     

  • 網友回復: 經過剛才測試,首先c>o必須條件成立,才會觸發,并且修改過公式一定要把公式重啟一次,這樣就能寫入了。

 

如果以上指標公式不適用于您常用的行情軟件

或者您想改編成選股公式,以便快速選出某種形態個股的話,

可以聯系我們相關技術人員 QQ: 262069696  點擊在線交流進行 有償 改編!

 


【字體: 】【打印文章】【查看評論

相關文章

    沒有相關內容
主站蜘蛛池模板: 性色在线观看 | 欧美成人禁片在线www | 免费播放欧美一级特黄 | 一个人看的视频www在线看 | 最近中文字幕2019免费6 | 日韩永久在线观看免费视频 | 99视频全部看免费观 | 黄色录像免费观看 | 国产精品400部自产在线观看 | 一级黄色片免费看 | 亚洲va老文色欧美黄大片人人 | 好男人www社区资源免费观看 | 男女午夜爽爽大片免费 | 日本高清不卡一区 | 最近资源中文字幕4 | 一本大道久东京 | 欧美videos另类精品 | 久久久精品国产免费观看同学 | 性xxxxbbbb免费播放视频 | 日韩在线视频免费 | 日韩国产成人 | 亚洲国产欧美久久香综合 | 一区二区三区中文国产亚洲 | 亚洲国产成人资源在线软件 | 五月婷婷开心综合 | 中文字幕视频一区二区 | 国产成人综合视频 | 秋霞手机入口二日韩区 | 亚洲天堂ww | 免费一级毛片私人影院a行 免费一级毛片视频 | 欧美三级大片在线观看 | 国产欧美精品一区二区三区四区 | 国产成人精品免费视频 | 国产成人ae在线观看网站站 | 亚洲国产女人aaa毛片在线 | 欧美激情_区二区三区 | 激情影院成人区免费观看视频 | 色久在线 | 日韩精品欧美成人 | 韩国日本一区二区 | 国产成人高清视频免费播放 |