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

金字塔自動向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  點擊在線交流進行 有償 改編!

 


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

相關文章

    沒有相關內容
主站蜘蛛池模板: 青青在线国产视频| 久久这里只精品| 黑人巨大videos极度另类| 小向美奈子中出播放| 亚洲免费黄色网| 精品国产自在久久| 国产欧美亚洲精品第一页久久肉| 一本一道dvd在线播放器| 最近最新2019中文字幕全| 午夜影院老司机| 欧美日韩一区二区三区麻豆| 女人被免费网站视频在线| 久热中文字幕在线精品首页| 特黄一级**毛片| 国产乱码一区二区三区爽爽爽 | 男人边吃奶边做视频免费网站| 国产日本韩国不卡在线视频| jazzjazz国产精品一区二区| 日本高清视频免费观看| 亚洲欧洲视频在线观看| 精品国产线拍大陆久久尤物| 国产成人AV无码精品| 97在线观看视频| 性按摩xxxx| 久久精品亚洲欧美va| 欧美极品另类高清videos| 哇嘎在线观看电影| 一级有奶水毛片免费看| 好男人社区www在线官网| 久久久无码一区二区三区| 欧美国产伦久久久久| 人成午夜免费大片在线观看| 色噜噜狠狠狠狠色综合久一| 国产片xxxxa片国语对白| 99精品众筹模特私拍在线| 抽搐一进一出在深一点| 亚洲AV成人片色在线观看高潮| 焰灵姬你下面好紧| 啪啪调教所29下拉式免费阅读 | 亚洲成a人不卡在线观看| 精品久久久久久久中文字幕|