用AUTOIT和TB打造國內期貨無人值守全自動交易系統(tǒng) [開拓者 TB]
- 咨詢內容:
本帖最后由 hyjok 于 2012-6-8 14:56 編輯
20120608
自動登錄腳本代碼更新,自用代碼,已經(jīng)經(jīng)過在服務器上實盤使用驗證,正常運行中- ;注意,一定要把AutoIt腳本文件放在TB安裝目錄下,與TB執(zhí)行程序TradeBlazer.exe放同一目錄
- #Include <date.au3>
- Dim $result,$tmp1,$path,$TBloginname,$TBloginpassword
- $path=@ScriptDir&"\"
- $TBloginname="***" ;用你的TB登陸賬號替換***
- $TBloginpassword="***" ;用你的TB登陸密碼替換***
- While 1
- If (@HOUR=8 And @MIN>=50 Or @HOUR>8) And @HOUR<=15 Then
- Sleep(500)
- If ProcessExists("TradeBlazer.exe") And WinExists("交易開拓者平臺(旗艦版) - ") = 0 Then
- ProcessClose("TradeBlazer.exe")
- ProcessClose("TBDataCenter.exe")
- Sleep(3000)
- EndIf
- If WinExists("交易開拓者平臺(旗艦版) - ") = 0 Then
- $result=0
- FileDelete($path&"data\__db.001")
- FileDelete($path&"data\__db.002")
- FileDelete($path&"data\__db.003")
- Run($path&"TradeBlazer.exe",$path)
- WinWaitActive("歡迎登錄交易開拓者平臺(旗艦版)","",20)
- WinActivate("交易開拓者平臺(旗艦版)")
- MouseClick("left", 500, 500, 2)
- ControlFocus("歡迎登錄交易開拓者平臺(旗艦版)","","Edit1")
- ControlSetText("歡迎登錄交易開拓者平臺(旗艦版)","","Edit1",$TBloginname)
- MouseClick("left", 500, 500, 2)
- ControlFocus("歡迎登錄交易開拓者平臺(旗艦版)","","Edit2")
- ControlSetText("歡迎登錄交易開拓者平臺(旗艦版)","","Edit2",$TBloginpassword)
- MouseClick("left", 500, 500, 2)
- ControlFocus("歡迎登錄交易開拓者平臺(旗艦版)","","Button1")
- Sleep(5)
- ControlClick("歡迎登錄交易開拓者平臺(旗艦版)","","Button1")
- Sleep(1000)
- If WinExists("歡迎登錄交易開拓者平臺(旗艦版)","用戶密碼錯誤") Then
- WinClose("歡迎登錄交易開拓者")
- $result = -1
- EndIf
- If $result = -1 Then
- MsgBox(4096, "登錄錯誤提示", "TB登錄密碼錯誤", 10)
- ContinueLoop
- EndIf
- WinWaitActive("交易開拓者平臺(旗艦版) - ","",30)
- Sleep(5000)
- WinActivate("交易開拓者平臺(旗艦版) - ")
- If WinExists("系統(tǒng)消息") Then
- WinActivate("系統(tǒng)消息")
- Sleep(1000)
- WinClose("系統(tǒng)消息")
- Sleep(1000)
- EndIf
- WinActivate("交易開拓者平臺(旗艦版) - ")
- Sleep(2000)
- $result=WinMenuSelectItem("交易開拓者平臺(旗艦版) - ","","交易(&T)","交易帳戶登錄")
- WinWaitActive("帳戶登錄","",20)
- WinActivate("帳戶登錄")
- ControlFocus("帳戶登錄","","Button1")
- Sleep(3000)
- ControlClick("帳戶登錄","","Button1")
- Sleep(5000)
- WinActivate("交易開拓者平臺(旗艦版) - ")
- $result=WinMenuSelectItem("交易開拓者平臺(旗艦版) - ","","文件(&F)", "啟動所有自動交易")
- Sleep(2000)
- If $result=0 Then
- WinActivate("交易開拓者")
- Sleep(1000)
- WinClose("交易開拓者")
- Sleep(2000)
- EndIf
- EndIf
- ElseIf WinExists("交易開拓者") And @HOUR>=16 Then ;非交易時間關閉TB
- WinActivate("交易開拓者平臺(旗艦版) - ")
- Sleep(500)
- MouseClick("left", 500, 500, 2)
- WinMenuSelectItem("交易開拓者平臺(旗艦版) - ","","文件(&F)", "退出")
- MouseClick("left", 500, 500, 2)
- ControlClick("確認","","Button1")
- Sleep(5000)
- EndIf
- WEnd
- ;注意,一定要把AutoIt腳本文件放在TB安裝目錄下,與TB執(zhí)行程序TradeBlazer.exe放同一目錄
- TB技術人員:
就在這把內容貼出來好了,還要人家跑那么遠的路。。。
- TB客服:
原帖由 ccms 于 2009-9-10 15:23 發(fā)表
就在這把內容貼出來好了,還要人家跑那么遠的路。。。
呵呵!不要急,跟著就貼 - 網(wǎng)友回復:
一、AUTOIT和TB簡介
AutoIt 可以做的事:
運行 Windows 及 DOS 下的可執(zhí)行文件
模擬鍵擊動作(支持大多數(shù)的鍵盤布局)
模擬鼠標移動和點擊動作。
對窗口進行移動、調整大小和其它操作。
直接與窗口的“控件“交互(設置/獲取
文字、移動、關閉,等等)
配合剪貼板進行剪切/粘貼文本操作
對注冊表進行操作
AUTOIT在線中文幫助文檔http://www.dreams8.com/autoit/
TB:指交易開拓者超強版,詳見TB網(wǎng)站論壇http://www.tradeblazer.net/forum/index.php
二、電腦系統(tǒng)設置
用做自動交易的電腦系統(tǒng)必須設置成自動登錄,否則無法實現(xiàn)無人值守自動交易,電腦系統(tǒng)自動登陸方面請自己到網(wǎng)上搜索,不管是WIN XP還WIN2003都可以
(假設系統(tǒng)是設置成Administrator用戶自動登錄,后面設置自動啟動交易時會用到自動登錄用戶Administrator的文件夾,見五)
三、TB準備工作
1、安裝TB ,登陸TB
2、TB系統(tǒng)設置,打開“系統(tǒng)設置”,在“常規(guī)”頁選中“打開最后保存的工作室(所有工作區(qū))”;
TB系統(tǒng)設置.jpg (43.25 KB, 下載次數(shù): 29) 2009-9-10 16:19:02 上傳 下載次數(shù): 29
[ 本帖最后由 hyjok 于 2010-1-15 13:17 編輯 ] - 網(wǎng)友回復:
在“交易”頁中將“默認顯示交易師普通單確認頁面”“默認顯示交易師觸發(fā)單確認頁面” “默認顯示預埋單之一鍵下單確認頁面”“默認顯示成交回報頁面”四項前面的勾(√)去掉;然后點擊“確定”
TB系統(tǒng)設置2.jpg (41.19 KB, 下載次數(shù): 33) 2009-9-10 16:20:01 上傳 下載次數(shù): 33
(以上設置目的是實現(xiàn)下次登錄TB時自動打開交易圖表)
如果以上指標公式不適用于您常用的行情軟件
或者您想改編成選股公式,以便快速選出某種形態(tài)個股的話,
相關文章
-
沒有相關內容