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

金字塔自動向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  點擊在線交流進行 有償 編寫!不貴!點擊查看價格!


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 国产成人免费网站在线观看| 妞干网免费视频在线观看| 亚洲国产欧美日韩精品一区二区三区 | 亚洲精品免费在线| 精品国产粉嫩内射白浆内射双马尾 | 国产精品igao视频网| 91最新地址永久入口| 女人毛片a级大学毛片免费| 中文字幕一区二区三区久久网站| 日韩在线观看网址| 亚洲中文无码mv| 欧美怡红院免费全部视频| 亚洲爆乳无码专区www| 男人j桶进女人p无遮挡在线观看| 午夜时刻免费实验区观看| 色一情一乱一伦一区二区三区日本| 国产成人av在线影院| 亚洲jizzjizz在线播放久| 国产精品爽爽ⅴa在线观看| 91精品国产品国语在线不卡| 天堂а√在线最新版在线| а天堂中文最新一区二区三区| 成人3d动漫网址在线观看| 中文字幕人妻高清乱码| 日日夜夜嗷嗷叫| 久久久噜久噜久久gif动图| 日本视频免费高清一本18| 久久精品久久久久观看99水蜜桃 | 老师的胸又大又软真好吃| 国产精品jlzz视频| 色聚网久久综合| 国产精品免费观看| 青青草原国产视频| 国产精品久久久久无码av| 西西人体欧美大胆在线| 国产精品成人无码视频| 84pao国产成视频免费播放| 国语自产精品视频在线看| 97日日碰人人模人人澡| 国内免费高清视频在线观看 | 少妇大胆瓣开下部自慰|