用AUTOIT和TB打造国内期货无人值守全自动交易系统 [开拓者 TB]
- 咨询内容:
本帖最后由 hyjok 于 2012-6-8 14:56 编辑
20120608
自动登录脚本代码更新,自用代码,已经经过在服务器上实盘使用验证,正常运行中- ;注意,一定要把AutoIt脚本文件放在TB安装目录下,与TB执行程序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("系统消息") Then
- WinActivate("系统消息")
- Sleep(1000)
- WinClose("系统消息")
- 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执行程序TradeBlazer.exe放同一目录
- TB技术人员:
就在这把内容贴出来好了,还要人家跑那么远的路。。。
- TB客服:
原帖由 ccms 于 2009-9-10 15:23 发表
就在这把内容贴出来好了,还要人家跑那么远的路。。。
呵呵!不要急,跟着就贴 - 网友回复:
一、AUTOIT和TB简介
AutoIt 可以做的事:
运行 Windows 及 DOS 下的可执行文件
模拟键击动作(支持大多数的键盘布局)
模拟鼠标移动和点击动作。
对窗口进行移动、调整大小和其它操作。
直接与窗口的“控件“交互(设置/获取
文字、移动、关闭,等等)
配合剪贴板进行剪切/粘贴文本操作
对注册表进行操作
AUTOIT在线中文帮助文档http://www.dreams8.com/autoit/
TB:指交易开拓者超强版,详见TB网站论坛http://www.tradeblazer.net/forum/index.php
二、电脑系统设置
用做自动交易的电脑系统必须设置成自动登录,否则无法实现无人值守自动交易,电脑系统自动登陆方面请自己到网上搜索,不管是WIN XP还WIN2003都可以
(假设系统是设置成Administrator用户自动登录,后面设置自动启动交易时会用到自动登录用户Administrator的文件夹,见五)
三、TB准备工作
1、安装TB ,登陆TB
2、TB系统设置,打开“系统设置”,在“常规”页选中“打开最后保存的工作室(所有工作区)”;
TB系统设置.jpg (43.25 KB, 下载次数: 29) 2009-9-10 16:19:02 上传 下载次数: 29
[ 本帖最后由 hyjok 于 2010-1-15 13:17 编辑 ] - 网友回复:
在“交易”页中将“默认显示交易师普通单确认页面”“默认显示交易师触发单确认页面” “默认显示预埋单之一键下单确认页面”“默认显示成交回报页面”四项前面的勾(√)去掉;然后点击“确定”
TB系统设置2.jpg (41.19 KB, 下载次数: 33) 2009-9-10 16:20:01 上传 下载次数: 33
(以上设置目的是实现下次登录TB时自动打开交易图表)
如果以上指标公式不适用于您常用的行情软件
或者您想改编成选股公式,以便快速选出某种形态个股的话,
相关文章
-
没有相关内容