- 精华
- 3
- 在线时间
- 84 小时
- UID
- 10
- 积分
- 701
- 帖子
- 137
- 阅读权限
- 60
- 注册时间
- 2007-7-21
- 最后登录
- 2009-3-26
- 精华
- 3
- UID
- 10
- 积分
- 701
- 帖子
- 137
- 主题
- 13
- 阅读权限
- 60
- 注册时间
- 2007-7-21
- 最后登录
- 2009-3-26
|
版主好!
我一直使用的是文华,文华现在不具备很多功能.所以想用这个软件试试.我是个E文盲,打开软件摸索了一下,现在基本可以看行情了.现在最想用的下一个功能就是交易系统了.目前的问题是:
一,怎么创建一个交易系统?这里有新建用户字段,新建用户函数.比如果版主写的这个交易系统如何做成个可以应用的系统?
Params
Numeric TrailingSet(0.382); // 回撤开仓比例设置,从最高点下跌的比例
Numeric StopLossSet(0.5); // 止损比例设置
Vars
Bool startCondition(False); // 启动条件
Bool EntryCondition(False); // 开仓条件
Bool ExitCondition(False); // 平仓条件
NumericSeries highestValue(0); // 前2个周期的最高价
NumericSeries lowestValue(0); // 前2个周期的最低价
Numeric myEntryPrice(0); // 开仓价格
Numeric myExitPrice(0); // 平仓价格
Begin
highestValue = highestValue[1];
lowestValue = lowestValue[1];
If(MarketPosition ==0 ) // 当前空仓
{
If(Close[2]>Open[2] && Close[1] > Open[1] && Close[1] > Close[2])
{
startCondition = True;
highestValue = max(high[2],high[1]);
lowestValue = min(low[2],low[1]);
}
If(startCondition)
{
EntryCondition = ((highestValue - Open) / (highestValue - lowestValue) > TrailingSet )&& // 开盘价即满足回撤条件,用开盘价进行交易
(Open > highestValue -((highestValue - lowestValue)*StopLossSet)) ; // 开盘价不能低于预设的止损价
If( EntryCondition)
{
Buy(1,Open);
}Else // 再看其它价格是否满足
{
EntryCondition = (highestValue - Low) / (highestValue - lowestValue) > TrailingSet ; // 最低价满足回撤条件,用低于TrailingSet设置的最近价位建仓
If(EntryCondition)
{
myEntryPrice = highestValue - (HighestValue - LowestValue ) * TrailingSet;
myEntryPrice = IntPart(myEntryPrice / (PriceScale()*MinMove)) *(PriceScale()*MinMove); // 对价格进行处理
If(myEntryPrice >= low && myEntryPrice <= High)
{
Buy(1,MyEntryPrice);
}
}
}
}
}else If(MarketPosition == 1) // 当前多仓
{
ExitCondition = ( HighestValue - Low )/(highestValue - lowestValue) > StopLossSet; // 止损条件满足
If(ExitCondition)
{
myExitPrice = highestValue - (HighestValue - LowestValue ) * StopLossSet;
myExitPrice = IntPart(myExitPrice / (PriceScale()*MinMove)) *(PriceScale()*MinMove); // 对价格进行处理
Sell(CurrentContracts(),myExitPrice);
}Else // 获利平仓
{
ExitCondition = (high - AvgEntryPrice()) > (highestValue - lowestValue); // 获利平仓条件满足
If(ExitCondition)
{
myExitPrice = AvgEntryPrice() + (HighestValue - LowestValue );
myExitPrice = IntPart(myExitPrice / (PriceScale()*MinMove)) *(PriceScale()*MinMove); // 对价格进行处理
If (myExitPrice >= low && myEntryPrice <= high)
{
Sell(CurrentContracts(),myExitPrice);
}Else
{
Sell(CurrentContracts(),Close);
}
}
}
}
End
请说详细一点.我用了版主所说的办法,保存成TXT文件,然后试着导入,但是和导入要求格式不对.没有导入成功.还有,导入之后如何测试,如何让交易信号在图表上显示出来?谢谢!!!
二,相信有很多和我一样,学不会公式语言的使用者.可不可以把自己的一些交易规则编成交易系统?
原来在文华就有一个专门的程序化交易专区,专门来解决这种问题! |
|