打印本文
關閉窗口
【升級版】ZLW屠龍刀7分鐘版_滬深300股指_日內震蕩_全自動交易系統
5.1后傾情放送學習性代碼。
重要提示：若要實盤，后果自負！
說明
應用商品：IF888
使用周期：7分鐘K線，
測試區間：2010.4-2014.04.30
手續費：1手手續費100
滑點設置：程序設置為+-1個最小價位
//------------------------------------------------------------------------
// 簡稱: 日內趨勢策略
// 名稱: RN
// 版本: VER.2.1
// 類別: 公式應用
// 類型: 用戶應用
// 修改: 2014xxxx www.tumamayizhan.com
//
//------------------------------------------------------------------------
//------------------------------------------------------------------------
Params
Numeric Nnn1(5);
Numeric Nnn2(20);
Vars
Numeric Lots(1.00);
Numeric offset(1);
Numeric i_offset;
NumericSeries a1;
NumericSeries a2;
NumericSeries a3;
NumericSeries a4;
NumericSeries a13;
NumericSeries a14;
NumericSeries a15;
NumericSeries a17;
NumericSeries a18;
NumericSeries a19;
NumericSeries a20;
NumericSeries a21;
NumericSeries a22;
NumericSeries a23;
NumericSeries a24;
NumericSeries a25;
Numeric xx_1010;
Numeric xx_1030;
//------------------------------------------------------------------------
//------------------------------------------------------------------------
Begin
i_offset=offset*minmove*PriceScale;
a3=AverageFC(Close[1],17);
a4=StandardDev(Close[1],17,2);
a1=(a3 + (a4 * 1.88));
a2=(a3 - (a4 * 1.88));
//------------------------------------------------------------------------
a18=Summation(Max(Max((High - Low),Abs((High - Close[1]))),Abs((Low - Close[1]))),23);
a19=(High - High[1]);
a20=(Low[1] - Low);
a21=Summation(IIF((a19 > 0) and (a19 > a20),a19,0),23);
a22=Summation(IIF((a20 > 0) and (a20 > a19),a20,0),23);
a23=((a21 * 100) / a18);
a24=((a22 * 100) / a18);
a25=Average(((Abs((a24 - a23)) / (a24 + a23)) * 100),12);
//------------------------------------------------------------------------
//------------------------------------------------------------------------
If(Time>0.0920 and Time<0.1515)
{
if (Time>0.0920 AND Time<0.1510)
{
if ((MarketPosition == 0) and (a4 >= 1.9) and (Time <= 0.1456))
{
if ((High[1] > a1) and (Open > (a1 - 3)) and (Open <= High[1]))
{
SellShort(Lots,(Open-i_offset));
}
if ((Low[1] < a2) and (Open < (a2 + 3.8)) and (a25[1] < 42))
{
Buy(Lots,(Open+i_offset));
}
} // www.tumamayizhan.com
if ((MarketPosition == 1) and (BarsSinceEntry == 0))
{
a14=High;a15=Low;
}
if ((MarketPosition == 1) and (BarsSinceEntry >= 1))
{
a14=Max(a14,High);
}
if ((MarketPosition == -1) and (BarsSinceEntry == 0))
{
a15=Low;
}
if ((MarketPosition == -1) and (BarsSinceEntry >= 1))
{
a15=Min(a15,Low);
}
if ((BarsSinceEntry >= 1) and (MarketPosition == 1))
{
a13=(a14[1] - EntryPrice);
if ((BarsSinceEntry >= 5) and ((Close[5] - Open[5]) < 0) and ((Close[4] - Open[4]) < 0) and ((Close[3] - Open[3]) < 0) and (a13 >= 18))
{
Sell(Lots,(Open-i_offset));
}
if ((BarsSinceEntry > 4) and (a13 >= 29) and (Low <= (EntryPrice + 19)))
{
Sell(Lots,((EntryPrice + 19) - i_offset));
}
}// www.tumamayizhan.com
if ((BarsSinceEntry >= 1) and (MarketPosition == -1))
{
a13=(EntryPrice - a15[1] );
if ((BarsSinceEntry >= 4) and ((Close[5] - Open[5]) > 0) and ((Close[4] - Open[4]) > 0) and ((Close[3] - Open[3]) > 0) and (a13 >= 26))
{
BuyToCover(Lots,(Open+i_offset));
}
if ((BarsSinceEntry > 5) and (a13 >= 30) and (High >= (EntryPrice - 16)))
{
BuyToCover(Lots,((EntryPrice - 16)+i_offset));
}
}
}
//------------------------------------------------------------------------
//------------------------------------------------------------------------
xx_1010=AvgEntryPrice;
if ((BarsSinceEntry >= 1) and (MarketPosition > 0) and (Low <= (AvgEntryPrice - 05)) and ((PositionProfit+(Lots * 1500)) < 0))
{
xx_1030=(xx_1010 - 05);
Sell(Lots,(Min(Open,xx_1030) - i_offset));
if (((a2[1] - a2) <= 5.6) and (Time <= 0.1456))
{
SellShort(Lots,(Min(Open,xx_1030) - i_offset));
}
}
//------------------------------------------------------------------------
if ((BarsSinceEntry >= 1) and (MarketPosition < 0) and (High >= (AvgEntryPrice + 05)) and ((PositionProfit+(Lots * 1500)) < 0))
{
xx_1030=(xx_1010 + 05);
BuyToCover(Lots,(Max(Open,xx_1030) + i_offset));
if (((a1 - a1[1] ) <= 5.6) and (Time <= 0.1456))
{
Buy(Lots,(Max(Open,xx_1030) + i_offset));
}
}
//------------------------------------------------------------------------
//------------------------------------------------------------------------
If(Time>=0.1510 and Time<0.1513 and MarketPosition>0)
{
Sell(Lots,(Open-i_offset));
}
If(Time>=0.1510 and Time<0.1513 and MarketPosition<0)
{
BuyToCover(Lots,(Open+i_offset));
}
}
//------------------------------------------------------------------------
End
//------------------------------------------------------------------------
// 編譯版本 GS2010.12.08
// 版權所有 www.tumamayizhan.com QQ 1145508240
// 更改聲明 TradeBlazer Software保留對TradeBlazer平
// 臺每一版本的TradeBlazer公式修改和重寫的權利
//------------------------------------------------------------------------