1. Params


2.         Numeric FastLength(40);


3.         Numeric SlowLength(60);


4. Vars


5.         NumericSeries AvgValue1;


6.         NumericSeries AvgValue2;


7.         NumericSeries AvgValue3;


8.         NumericSeries AvgValue4;


9.         Numeric AA;


10.         Numeric BB;


11. Begin


12.        


13.         AvgValue1 = AverageFC(Close,FastLength);


14.         AvgValue2 = AverageFC(Close,SlowLength);


15.         AvgValue3 = AverageFC(Close,5);


16.         AvgValue4 = AverageFC(Close,20);


17.                


18.         If(MarketPosition ==0 && AvgValue1[1] > AvgValue2[1])


19.         {


20.                 Buy(1,Open);


21.                  SetGlobalVar (1,1);       


22.         }


23.        


24.         If(MarketPosition ==0 && AvgValue1[1] < AvgValue2[1])


25.         {


26.                 SellShort(1,Open);


27.                  SetGlobalVar (2,2);


28.         }


29.        


30.  


31.         AA=GetGlobalVar(1);


32.         BB=GetGlobalVar(2);


33.        


34.         PlotNumeric("大MA1",AvgValue1,0,red);


35.         PlotNumeric("大MA2",AvgValue2,0,Yellow);       


36.         PlotNumeric("小MA3",AvgValue3,0,Blue);


37.         PlotNumeric("小MA4",AvgValue4,0,Green);       


38.        


39.         //PlotNumeric("PL",Portfolio_TotalProfit);


40.  


41. //==========================================================================================


42. //==========================================小周期同向再進場======================       


43.         If(/*MarketPosition==1 && */AvgValue1[1] > AvgValue2[1] && AvgValue3[1] > AvgValue4[1] && AA==1)


44.         {


45.                 Buy(2,Open);


46.         }


47.        


48.         If(/*MarketPosition ==-1 && */AvgValue1[1] < AvgValue2[1] && AvgValue3[1] < AvgValue4[1] && BB==2)


49.         {


50.                 SellShort(2,Open);


51.         }


52.        


53.        


54. //==============出場


55.         If(MarketPosition ==1 && AvgValue1[1] < AvgValue2[1])


56.         {


57.                 Sell(0,Open);


58.         }


59.        


60.         If(MarketPosition ==-1 && AvgValue1[1] > AvgValue2[1])


61.         {


62.                 BuyToCover(0,Open);


63.         }


64.                


65.        


66. End

rookies 發表于 2012-9-21 00:24
AA  BB如果不用序列變量的話，不會保存值到賦值之后的下一根K線。要睡覺了，先改正這個試試 ...