TB编程从入门到进阶幻灯片.ppt

MinPoint = MinMove * PriceScale; If(MarketPosition==1) { StopLine = HigherAfterEntry * (1 - TrailingStop * 0.01); If(Low = StopLine) { MyExitPrice = StopLine - MinPoint; If(Open MyExitPrice) MyExitPrice = Open; Sell(0,MyExitPrice); bLongStoped = true; } }Else If(MarketPosition==-1) { StopLine = LowerAfterEntry * ( 1 + TrailingStop * 0.01); If(High = StopLine) { MyExitPrice = StopLine + MinPoint; If(Open MyExitPrice) MyExitPrice = Open; BuyToCover(0,MyExitPrice); bShortStoped = true; } } End 实验4：Sample14 实验目标： 通过实验，学习TB中交易策略的编写； 理解交易策略中具体的进场、出场、再进场、再出场规则的设计思路和代码实现； 掌握公式应用的全局设置以及交易品种费率的调整； 掌握历史回测和参数优化工具的使用。 实验步骤： 新建公式应用，输入Sample14的代码，编译通过； 打开超级图表，选好品种和时间周期，插入公式应用； 右键点击图表-》商品设置-》交易-》修改保证金率和佣金比率； 右键点击图表-》公式应用设置-》全局交易设置； 点击“工具”-》投资组合性能测试报告，进行历史测试； 点击“工具”-》交易策略参数优化报告，进行参数优化。 全局变量 序列变量的缺陷 序列变量在每个BAR只能有一个值，这个值在行情更新时，会不断刷新，直到最后一个Tick才能将值保存下来； 因此，序列变量无法记录盘中每个Tick运行公式产生的数据；比如：我们要对每个Tick计数，用序列变量就做不到。 全局变量 全局变量通过SetGlobalVar和GetGlobalVar函数来设置和读取，TB V4中单个 公式应用可以支持500个全局变量； Bool SetGlobalVar(Integer nIndex,Numeric fVal) 参数：nIndex --- 全局变量的索引值 fVal --- 要设置的变量的值 如： SetGlobalVar(0,1) 将0号全局变量设置为1； Numeric GetGlobalVar(Integer nIndex)获取某个索引的全局变量值 全局变量的初始值为无效值，它的值不会因为当前BAR的变化而变化，而只能由SetGlobalVar函数来设置； 全局变量依附在超级图表上，一旦关掉超级图表后，所有与该图表有关的全局变量将不复存在； 全局变量值的变化只跟SetGlobalVar的执行顺序有关，因此在图表上进行刷新时，必须考虑因公式重新运行导致的全局变量值的变化。 例15：记录BAR的tick数 Sample15： Vars NumericSeries SeTickCnt; Numeric TickCnt; Numeric GlobTickCnt; Numeric bartime; Begin bartime = GetGlobalVar(0); if (CurrentBar == 0 || bartime == InvalidNumeric) { bartime = date + time; SetGlobalVar(0,bartime); TickCnt = 1; SeTickCnt = 1; GlobTickCnt = 1; SetGlobalVar(1,GlobTickCnt); FileAppend(c:\\tb\\Sample15.txt,Bartime = +DateTimeToString(date+time) + 计数器初始化, 全局变量时间 = +DateTimeToString(bartime) + TickCnt=+Text(tickcnt)+ SeTickCnt=+Text(SeTickCnt