共5 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：TB代码改写
1楼
独钓_寒江雪 发表于：2016/11/24 13:55:03//------------------------------------------------------------------------
// 简称: RB
// 名称:
// 类别: 用户函数
// 类型: 用户函数
// 输出: 布尔型
//------------------------------------------------------------------------
Params
Numeric PercentOfRange(0.8);//突破参数N
Numeric ExitOnCloseMins(14.55);//平仓时间
Numeric MinRange(0.2);//最小Range
Numeric LastTradeMins(14.00);//最后交易时间
Numeric BeginTradeMins(9.00);
Numeric Lots(1);
Numeric Stoplossset(1);
Vars
NumericSeries DayOpen;
NumericSeries preDayRange;
NumericSeries HigherAfterEntry;
NumericSeries LowerAfterEntry;
Numeric preDayHigh;
Numeric preDayLow;
Numeric UpperBand;
Numeric LowerBand;
Numeric MyPrice;
Numeric StopLine;
Begin
DayOpen=OpenD(0);
preDayHigh=HighD(1);
preDayLow=LowD(1);
preDayRange=HighD(1)-LowD(1);
UpperBand=DayOpen+preDayRange*PercentOfRange;
LowerBand=Dayopen-preDayRange*PercentOfRange;
If(BarsSinceEntry==1)
{
HigherAfterEntry=AvgEntryPrice;
LowerAfterEntry=HigherAfterEntry;
}Else If(BarsSinceEntry>1)
{
HigherAfterEntry=max (HigherAfterEntry[1],High[1]);
LowerAfterEntry=min(LowerAfterEntry[1],Low[1]);
}
If(Date!=Date[1])
{DayOpen=Open;
preDayRange=preDayHigh-preDayLow;
If(preDayRange<Open*MinRange*0.01)
PreDayRange=Open*MinRange*0.01;
}Else
{
DayOpen=DayOpen[1];
preDayRange=preDayRange[1];
}
If(MarketPosition!=1&&High>=UpperBand&&Time<LastTradeMins/100)
{
Myprice=UpperBand;
If(Open>Myprice)Myprice=Open;
Buy(1,Myprice);
Return;
}
If(MarketPosition!=1&&Low<=LowerBand&&Time<LastTradeMins/100)
{
Myprice=LowerBand;
If(Open<Myprice)Myprice=Open;
Sellshort(1,Myprice);
Return;
}
If(MarketPosition==1)
{
StopLine=UpperBand-DayOpen*StopLossSet*0.01;
If(Low<=StopLine)
{
MyPrice=StopLine;
If(Open<MyPrice)MyPrice=Open;
BuyToCover(Lots,MyPrice);
}
}
//收盘平仓
If(Time>=ExitOnCloseMins/100)
{
Sell(1,Open);
BuyToCover(1,Open);
}
If(Date[-1]!=InvalidInteger && Date!=Date[-1])
{
Sell(0,Close);
BuyToCover(0,Close);
}Else If(Date==CurrentDate && Time==0.1455 && CurrentTime>=0.1459)
{
Sell(0,Open);
BuyToCover(0,Open);
}
End
//------------------------------------------------------------------------
// 编译版本
GS2015.12.25
// 用户版本
2016/11/24 13:19:43
// 版权所有
lyllyllyl
// 更改声明
TradeBlazer Software保留对TradeBlazer平台
//
每一版本的TradeBlazer公式修改和重写的权利
//------------------------------------------------------------------------
2楼
独钓_寒江雪 发表于：2016/11/24 13:55:45上面是TB的代码 能不能改写成金字塔的 谢谢
3楼
jinzhe 发表于：2016/11/24 13:56:01R-Break?
系统自带有
此主题相关图片如下：4.png
4楼
独钓_寒江雪 发表于：2016/11/24 14:40:28请问 系统自带的与1楼文华代码描叙的是一样的吗？
5楼
jinzhe 发表于：2016/11/24 15:02:42我看不懂你给的TB代码，我只是给你一个系统自带的r-break代码
[此贴子已经被作者于2016-11-24 15:02:49编辑过]
共5 条记录, 每页显示 10 条, 页签:
[1]