開拓者一個簡單順勢交易系統(tǒng)策略源碼
作者:開拓者 TB 來源:cxh99.com 發(fā)布時間:2013年03月21日
- 該交易系統(tǒng)的建倉條件為:
1、前兩個Bar收陽,并呈上漲趨勢;
2、當前價格為最近前2個Bar最高價的回落,而且回落幅度大于0.382。回落幅度是相對于最高價到最低價的范圍。//程序化交易 m.kzuj.com.cn
該交易系統(tǒng)的平倉條件為:
1、當前價格的獲利價格點數(shù)大于建倉時最低價到最低價的范圍。
該交易系統(tǒng)的止損條件為:
1、當前價格從建倉時的最高價格的回落大于最低價到最高價的范圍的0.5。
- 源碼:
-
- 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];//程序化交易 m.kzuj.com.cn
- 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