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

金字塔自動向QQ發送消息實例源碼 [金字塔]

  • 咨詢內容: 工作原理:此功能充分展示了金字塔強大的擴展能力,金字塔的確是一個無比強大的好工具。先說功能調用的邏輯。
    金字塔公式系統可以調用VB,VB可以調用DLL,DLL可以擴展實現捕捉QQ窗口發送消息的功能。再說數據傳遞。金字塔公式系統可以直接向VB傳遞參數,也可以用全局數據向VB傳遞數據,全局數據支持字符串,比較靈活。
    下面開始講如何配置:1、下載dll,http://www.weistock.com/download/WWSCommon.dll2、注冊dll,打開win的運行,regsvr32 C:\WWSCommon.dll以上兩步可能2.8以上版本自動做了,但我是手工注冊了一下dll。
    代碼的編寫1、先寫VB代碼,打開金字塔的管理面板-高級,模塊,function;先讓VB停止運行,菜單,運行,重新設置;2、菜單,插入,過程,輸入函數名和參數名:QQMSGX,(QQNum,QQMSG),系統會生成一段代碼,手工改一下如下:

    Function QQMSGX(Formula,QQNum,QQMSG)   QQMSG=document.GetExtString("QQSTR")      Set obj = CreateObject("WWSCommon.TCGroup")   bq = " 交易系統信號發布 "   mxmsg = bq &"  " & Date &" " & Time & vbCrLf & " 信號" & " " & QQMSG   call obj.TransMessage("你自己的群顯示名字", mxmsg)   Set obj = Nothing        Set obj = CreateObject("WWSCommon.TCGroup")      call obj.TransMessage("某個人的qq顯示名字", mxmsg)   Set obj = Nothing     End Function
    改完以后讓VB開始跑,菜單有運行,或者管理面板上有個黑三角,總之要跑起來!
    3、下面搞公式代碼代碼是個測試的東東,一個在每根K線走完發消息,兩個在出現買賣信號發消息,大家可以自己改。
     GLOBALVARIABLE: bb=0;

    VBuy:l<=o;VSell:h>=o;    if islastbar and bb<>barpos and not(VBuy) and not(VSell) then  begin     bb:= barpos;     extgbstringSet('QQSTR','PR '+numtostr(close,5) + ' OB '+numtostr(h,5)+' OS '+numtostr(l,5) );     VQQM:=QQMSGX(1,close);   end       if VBuy thenbegin  //buy(1,1,limitr,c);       {開多}  if islastbar and bb<>barpos then   begin      bb:= barpos;      extgbstringSet('QQSTR','1分鐘超賣,嘗試開多:'+numtostr(close,5));      VQQM:=QQMSGX(1,close);   endend;       if VSell thenbegin  //sell(1,1,limitr,c);       {開多}  if islastbar and bb<>barpos then   begin      bb:= barpos;      extgbstringSet('QQSTR','1分鐘超買,嘗試開空:'+numtostr(close,5));      VQQM:=QQMSGX(1,close);   endend; 
    上面代碼有兩個地方比較關鍵:1、extgbstringSet,這個是搞全局數據,為VB提供的,string是字符串,也可以搞其他的,參考一下開發手冊;2、QQMSGX,這個是調用VB函數,就是前面在VB里面寫的那個同名函數,本身可以傳遞數值參數,但有時候不夠用啊;
    這樣就搞完了。在圖表上加載一下公式,打開你要發送消息的窗口,可以是群或者個人qq都可以。
    可能遇到的問題:1、VB函數沒寫就寫公式,會報錯,先寫VB;2、公式加載之后沒有發消息,看一下qq窗口名字對不對,最好從qq群的設置里面直接拷貝出來,好像帶特殊字符和空格群不行。
    以上內容有部分來自論壇其他帖子,感謝。
    我在群里面的名字是太極寬客,有問題可以群里面找我。
    目前我的系統正在不停騷擾別人,哈哈。

    [此貼子已經被作者于2012-4-26 22:12:43編輯過]

     

  • 金字塔客服:

    不錯,你把他跟策略信號結合起來,就可以向群里朋友喊單了,如果信號很好,就可以向群的同志收費了。

     

     

  • 用戶回復: 金字塔擴展能力通過VB和dll充分體現出來了,這才是牛逼的地方。

     

  • 網友回復: 確實不等不說的是 , 金字塔的擴展功能做的很強大

     

  • 網友回復: 這么牛啊,那樓主能不能提供個“每半小時向QQ發送當前公網IP地址的”

 

有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友

可聯系技術人員 QQ: 262069696  點擊在線交流進行 有償 編寫!不貴!點擊查看價格!


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 天天综合网天天综合色| 韩国v欧美v亚洲v日本v| 日韩精品中文字幕无码专区| 啊灬啊灬啊灬快灬深用口述| 99久久精品美女高潮喷水| 日韩免费观看视频| 免费特级黄毛片在线成人观看| caoporn地址| 亚洲中文字幕无码日韩| a级毛片100部免费观看| 权明星商标查询| 免费高清日本1在线观看| 被滋润的艳妇疯狂呻吟白洁老七| 在线成年人视频| 一级毛片在线免费播放| 欧美XXXX黑人又粗又长精品| 亚洲视频在线免费播放| 精品久久久久久久久中文字幕| 国产日韩一区二区三区在线观看| www.综合色| 日韩一区二区三区无码影院| 亚洲丰满熟女一区二区v| 精品一区二区三区在线观看 | 欧美日韩第一区| 男人插女人免费| 99视频全部免费精品全部四虎| 天天欲色成人综合网站| 一边摸一边揉一边做视频 | 精品少妇一区二区三区视频| 国产精品久久久久久福利| 国产小视频福利| 成年免费A级毛片免费看| 亚洲日本中文字幕天堂网| 91极品反差婊在线观看| 久久精品老司机| 欧美成人精品三级网站| 女性特黄一级毛片| 成年黄网站色大免费全看| 久久亚洲精品无码观看不卡 | a级毛片免费高清视频| 女博士梦莹全篇完整小说|