開拓者止盈代碼

作者：開拓者 TB 來源：cxh99.com 發布時間：2012年10月27日

咨詢內容： 下面代碼的思路就是兩根均線，金叉做多，死叉做空，價格盈利達到400點后，止盈價 = 達到過的最高價 — (達到過的最高價 — 開倉價) * 0.5。
以TA為例，假設金叉開多的價格為7000元，那么價格在達到7400后，比如價格最高到過7500，那么如果價格回落到 7500 - (7500 - 7000) * 0.5 = 7250元時，平多止盈。

Params
      Numeric longpara(30);
      Numeric shortpara(10);
      Numeric StopWin(0.5); //止盈系數，最大盈利回吐該系數作為止盈價
      Numeric WinPoint(400); //止盈起始值(以價格計算)
Vars
      NumericSeries MAlong; //長周期均線
      NumericSeries MAshort; //短周期均線
      Bool buycond;
      Bool sellcond;
      Numeric BuyOpen(100000); //多單開倉價
      Numeric SellOpen(0); //空單開倉價
      Numeric BuyStopWin(0); //多單止盈價
      Numeric SellStopWin(0); //空單止盈價
      Numeric OpenBar; //開倉K線的索引值
      Numeric OpenCount; //當前K線到開倉K線之間的個數
      Numeric MostHigh; //開倉后達到過的最高價
      Numeric MostLow; //開倉后達到過的最低價
Begin
      MAlong = Average(Close, longpara);
      MAshort = Average(Close, shortpara);

      buycond = CrossOver(MAshort, MAlong);
      sellcond = CrossUnder(MAshort, MAlong);

      //止盈代碼
      OpenCount = CurrentBar - GetGlobalVar(1); //計算開倉K線到當前K線的個數
      If(MarketPosition == 1)
      {
            MostHigh = Highest(High, OpenCount); //計算開倉后到當前K線為止的最高價
            If(MostHigh - GetGlobalVar(0) >= WinPoint) //開倉后最大浮盈(以價格計算)超過止盈起始值
            {BuyStopWin = MostHigh - (MostHigh - GetGlobalVar(0)) * StopWin;} //計算止盈價格
            If(Low <= BuyStopWin) //達到止盈條件時止盈
            {Sell(0, Min(Open, BuyStopWin));}
      }
      If(MarketPosition == -1)
      {
            MostLow = Lowest(Low, OpenCount);
            If(GetGlobalVar(0) - MostLow >= WinPoint)
            {SellStopWin = MostLow + (GetGlobalVar(0) - MostLow) * StopWin;}
            If(High >= SellStopWin)
            {BuyToCover(0, Max(Open, SellStopWin));}
      }
      //止盈代碼結束

      If(buycond)
      {
            Buy(0, Close);
            SetGlobalVar(0, Close); //記錄開倉價
            SetGlobalVar(1, CurrentBar); //記錄開倉K線位置
            Return;
      }
      If(sellcond)
      {
            SellShort(0, Close);
            SetGlobalVar(0, Close); //記錄開倉價
            SetGlobalVar(1, CurrentBar); //記錄開倉K線位置
            Return;
      }
End