以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  求助高手,改写TB交易系统到金字塔  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=8163)

--  作者:CITSCWB
--  发布时间:2011/9/22 16:59:32
--  求助高手,改写TB交易系统到金字塔


Params
      Numeric Length(30);
      Numeric NumATRs(1);
   Numeric Offset(1);
   Numeric ATRLength(40);
  
Vars
      NumericSeries TPrice;
      Numeric AvgValue;
      NumericSeries ShiftValue;
      Numeric UpperBand;
      Numeric LowerBand;
      Numeric MyPrice;
  

Begin
    
  TPrice=(High[1]+Low[1]+Close[1])/3;
     AvgValue=AverageFC(TPrice,Length);
     ShiftValue=NumATRs*AvgTrueRange(ATRLength);
     UpperBand=AvgValue+ShiftValue[1];
     LowerBand=AvgValue-ShiftValue[1];
  
 
If(MarketPosition!=1&&High>=UpperBand)
   {
      MyPrice=UpperBand;
      If(Open>MyPrice)MyPrice=Open;
      Buy(1,MyPrice);
      Return;
   }
If(MarketPosition!=-1&&Low<=LowerBand)
{
     MyPrice=LowerBand;
     If(Open<MyPrice)MyPrice=Open;
     SellShort(1,MyPrice);
     Return;
}


End


 


--  作者:fly
--  发布时间:2011/9/22 17:04:47
--  

对于TB的编程语言,不是很熟悉.

 

请您直接写出该交易系统的思路,这样便于工作人员尽快的帮您改写.