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

QQ及時信號發(fā)送事例 [金字塔]

  • 咨詢內(nèi)容:

    Sub APPLICATION_VBAStart()
     call Application.SetTimer(0,300) '創(chuàng)建一個0號定時器,間隔時間3秒
    End Sub

    Sub APPLICATION_Timer(ID)
    Set Formula = marketdata.STKINDI("if00","zj","短線1號",0,17)'品種、周期、指標(biāo)修改為自己需要的。
        cc =  Formula.GetBufData("mxcc",Formula.DataSize-1) '顯示最后周期指標(biāo)線數(shù)值
        refcc = Formula.GetBufData("mxcc",Formula.DataSize-2) '顯示倒數(shù)第二周期指標(biāo)線數(shù)值
           
    set Report1 = marketdata.GetReportData("if00","zj")
        ifjg = Report1.NewPrice
       
    Set obj = CreateObject("WWSCommon.TCGroup")
        bq = "明心股指日內(nèi)3分鐘"'這里是信號之前的版權(quán)(廣告)
        IF refcc=0 and cc>0 then
           mxmsg = bq &" " & Date &" " &Time&vbCrLf&"股指期貨"&" " &ifjg&" " &"開多"&cc&"手。"
           'application.MsgOut mxmsg
           call obj.TransMessage("程序化初級群", mxmsg)
           Set obj = Nothing
        elseIF refcc>0 and cc=0 then
           mxmsg = bq &" " &  Date &" " &Time&vbCrLf&"股指期貨"&" " &ifjg&" " &"平多"&refcc&"手。"
           'application.MsgOut mxmsg
           call obj.TransMessage("程序化初級群", mxmsg)
           Set obj = Nothing
        elseIF refcc=0 and cc<0 then
           ss = 0-cc
           mxmsg = bq &" " &  Date &" " &Time&vbCrLf&"股指期貨"&" " &ifjg&" " &"開空"&ss&"手。"
           'application.MsgOut mxmsg
           call obj.TransMessage("程序化初級群", mxmsg)
           Set obj = Nothing
        elseIF refcc<0 and cc=0 then
           ss = 0-refcc
           mxmsg = bq &" " &  Date &" " &Time&vbCrLf&"股指期貨"&" " &ifjg&" " &"平空"&ss&"手。"
           'application.MsgOut mxmsg
           call obj.TransMessage("程序化初級群", mxmsg)
           Set obj = Nothing
        else
         'mxmsg =bq &" " &  Date &" " &Time&vbCrLf&"暫無變化,保持之前狀態(tài)。"
         'application.MsgOut mxmsg
         'call obj.TransMessage("程序化初級群", mxmsg)
         'Set obj = Nothing
        end if
          
    end sub

    Sub qq()
        call APPLICATION_Timer(ID)
    End Sub

     

  • 金字塔客服:

    不錯

     

  • 用戶回復(fù): 能具體介紹下怎么用嗎?沒用過VBA哦。謝謝!

     

  • 網(wǎng)友回復(fù):

    我也想知道啊,我自己試了下,不成功

     

  • 網(wǎng)友回復(fù):

    真是好東西啊。看來閉門造車是不行的,還是要經(jīng)常上來看看,向大家學(xué)習(xí)學(xué)習(xí)!

 

如果以上指標(biāo)公式不適用于您常用的行情軟件

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

可以聯(lián)系我們相關(guān)技術(shù)人員 QQ: 262069696  點擊在線交流進(jìn)行 有償 改編!

 


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

相關(guān)文章

    沒有相關(guān)內(nèi)容
主站蜘蛛池模板: 日本道在线播放| 91网站在线看| 毛片基地免费观看| 四虎在线最新永久免费| 91秦先生在线| 好男人官网资源在线观看| 亚洲人成网站日本片| 狠狠久久永久免费观看| 国产女人好紧好爽| 2018中文字幕第一页| 成年女人色毛片| 亚洲卡一卡2卡三卡4麻豆| 特一级黄色毛片| 免费观看a黄一级视频| 色135综合网| 国产免费久久久久久无码| 97免费人妻在线视频| 好猛好深好爽好硬免费视频| 中文字幕38页| 欧美亚洲另类色国产综合| 全彩acg本子| 羞羞视频免费网站在线看| 国产人妖系列在线精品| 91香蕉视频下载导航| 女同学下面粉粉嫩嫩的p| 久久婷婷五月综合97色一本一本| 欧美亚洲国产一区二区三区| 亚洲欧美日韩国产精品26u| 美女扒开粉嫩尿口漫画| 国产免费直播在线观看视频| 欧美在线色视频| 国产精品美女久久久网av| 97久久婷婷五月综合色d啪蜜芽| 天堂在线最新资源| 久久久久人妻精品一区蜜桃| 日韩欧美国产高清在线观看| 亚洲AV无码无在线观看红杏| 桃子视频在线观看高清免费视频 | 777奇米四色| 成人国产精品视频频| 久久久久久国产精品视频|