ＴＢ实盘开贴

beijib

halfine 发表于 2017-1-3 11:43
论坛挖到了金子，真心有用，感谢版主无私分享

不能开启自动交易，还算不上全自动啊

极速版的菜单不是标准的，shift组合快捷键也不好用，所以调不出来开启自动交易

halfine

beijib 发表于 2017-1-1 14:14
编写了一个极速版autoit3的自动登录脚本。

#Include

论坛挖到了金子，真心有用，感谢版主无私分享

beijib

编写了一个极速版autoit3的自动登录脚本。

#Include <date.au3>
Dim $result,$tmp1,$path
$path="C:\Program Files\TradeBlazer\TBPlus\"      ;TB默认安装路径，如非默认安装，这里需要更改为你TB安装路径
;循环开始
While 1
If ProcessExists("TBPlus.exe") And WinExists("TB旗舰版:极速平台") = 0 Then
        ProcessClose("TBPlus.exe")
    Sleep(3000)
EndIf
If WinExists("TB旗舰版:极速平台") = 0 And ((@HOUR=08 And @MIN>=35 And @MIN<=39) Or (@HOUR=20 And @MIN>=35 And @MIN<=39)) Then
    $result=0
    Run($path&"TBPlus.exe",$path)
    WinWaitActive("TB旗舰版:极速平台8.0---用户登录","",20)
    WinActivate("TB旗舰版:极速平台8.0---用户登录")
    Sleep(2000)
        ;Send("{ENTER}")
        ControlClick("TB旗舰版:极速平台8.0---用户登录", "", "WindowsForms10.BUTTON.app.0.afceb_r11_ad13")
        Sleep(2000)
EndIf
If WinExists("TB旗舰版:极速平台") And ((@HOUR=15 And @MIN>=35 And @MIN<=40) Or (@HOUR=2 And @MIN>=35 And @MIN<=40)) Then ;非交易时间关闭TB
        ProcessClose("TBPlus.exe")
EndIf
Sleep(1000)
WEnd
;循环结束

beijib

搞了一个备份云服务器，如果主云服务器TB出现问题，备份服务器可以继续执行策略，目前主服务器用的是腾讯云服务器极速版TB，备份服务器用旗舰版。代码如下：
                if(barstatus==0)
                {
                        Setglobalvar(0,0);    //备份服务器TB同步头寸计数器
                        Setglobalvar(1,0);    //防止重复发单计数器
                }

                if (A_BuyPosition-A_SellPosition==0 && A_GetOpenOrderCount==0){ //没有仓位的情况，没有未成交单
                        if(con1==True && con3==True && GetGlobalVar(1)==0){                        //判断是否可以发单
                                SetGlobalVar(0,GetGlobalVar(0)+1);  //满足开仓条件先数10个ticks，如果主服务器TB没有发单则备份服务器TB执行发单
                                if (GetGlobalVar(0)>=10){
                                        A_SendOrder(Enum_Buy,Enum_Entry,TurtleUnits,Q_AskPrice); //开多
                                        SetGlobalVar(1,1);                                //发单计数器设置为已发单
                                }
                        }       

......

                if (GetGlobalVar(1)>=1){
                        SetGlobalVar(1,GetGlobalVar(1)+1);   //防止重复发单，发单后数3个ticks后，重置计数器
                        if (GetGlobalVar(1)>=3){
                                SetGlobalVar(0,0);  
                                SetGlobalVar(1,0);  
                        }
                }

beijib

owen1949 发表于 2016-12-16 10:13
楼主，请教个问题，看你的测试报告里回测周期有2497天，这个是怎么设置的？我用一小时周期，报告里只能回测 ...

商品-设置-属性-起始日期从2009年开始，不懂的到qq群问：243836862

owen1949

楼主，请教个问题，看你的测试报告里回测周期有2497天，这个是怎么设置的？我用一小时周期，报告里只能回测60天左右

beijib

mey16601600 发表于 2016-12-15 15:13
用A函数呀，你都15分钟线了，为什么不用buy sell。能赚钱真心没啥差别

buy sell还得弄个头寸监控，A函数不用。

mey16601600

用A函数呀，你都15分钟线了，为什么不用buy sell。能赚钱真心没啥差别

mey16601600

看起来挺靠谱

beijib

tsinglai 发表于 2016-12-11 19:30
我也交流一个平仓的，平仓等待指令完成，等待最长waitime
Begin
//---------------