開拓者股指3分鐘日內，支撐阻力位突破交易策略源碼
作者：開拓者 TB 來源：cxh99.com 發(fā)布時間：2012年12月04日
| |
- 咨詢內容：
//-----------------------------------------------------------------------
// 簡稱: 50050402
// 名稱: 支撐阻力位突破
// 類別: 公式應用
// 類型: 用戶應用{程序化交易}
//------------------------------------------------------------------------
Params
Numeric lostmove(0.20);
Numeric N(0.70);
Vars
Numeric NetChg(0);
Numeric TotChg(0);
NumericSeries EffRatio(0);
NumericSeries AMAValue; //定義效率指數(shù)
NumericSeries HighVanlue(0); //定義高點阻力位；
NumericSeries LowVanlue(0); //定義低點支撐位；
NumericSeries HigherVanlue(0); //較高高點；
NumericSeries LowerVanlue(0); //較低低點；
Numeric ATR;
Begin
//計算ATR
ATR = AvgTrueRange(20);
//定義AMA（自適應曲線）
if(CurrentBar == 0)
{
AMAValue = close;
}Else
{
NetChg = Abs( close - close[10] );
TotChg = Summation( Abs( close - close[1] ), 10);
EffRatio = IIF(TotChg > 0, NetChg / TotChg, 0);
}
//三點清零
If(Time==0.1515)
{
HighVanlue=0;
LowVanlue=0;
}
//定義阻力支撐位
If(Time>0.0930)
{
If(high[3]>high[4]&&High[3]>High[5]&&high[3]>high[2] &&high[3]>high[1])
{
HighVanlue=high[3];
}
If(low[3]<low[4]&&Low[3]<Low[5] &&low[3]<low[2] &&low[3]<low[1])
{
LowVanlue=low[3];
}
}Else
{
HighVanlue=Highest(High,BarsSinceToday);
LowVanlue=Lowest(Low,BarsSinceToday);
}
//比較較高的高點，較低的低點；
HigherVanlue = Max(HighVanlue,HighVanlue[1]);
LowerVanlue = Min(LowVanlue,LowVanlue[1]);
//平倉
//盤中6000止損
If(MarketPosition==1&&close<EntryPrice-20)
{
Sell(1,EntryPrice-20);
PlotString("Vol","金額止損",Low,Red);
}
If(MarketPosition==-1&&Close>EntryPrice+20)
{
BuyToCover(1,EntryPrice+20);
PlotString("Vol","金額止損",Low,Red);
}
//順勢平倉
//平多單
If(MarketPosition==1&&Low<LowVanlue-lostmove)
{
if(Open<LowVanlue-lostmove)
{
Sell(1,Open-lostmove);
PlotString("Vol","破低",Low,Red);
}Else
{
Sell(1,LowVanlue-lostmove);
PlotString("Vol","破低",Low,Red);
}
}
//平空單
If(MarketPosition==-1&&High>HighVanlue+lostmove)
{
If(Open>HighVanlue+lostmove)
{
BuyToCover(1,Open+lostmove);
PlotString("Vol","破高",Low,Red);
}Else
{
BuyToCover(1,HighVanlue+lostmove);
PlotString("Vol","破高",Low,Red);
}
}
//回撤止損
IF(MarketPosition==1&&Close<Highest(High,BarsSinceEntry)-4*ATR)
{
Sell(1,Close);
PlotString("Vol","ATR",Low,Red);
}
If(MarketPosition==-1&&Close>Lowest(Low,BarsSinceEntry)+4*ATR)
{
BuyToCover(1,Close);
PlotString("Vol","ATR",Low,Red);
}
//開倉
//順勢突破開倉
If(0.0930<Time&&Time<0.1430)
{
If(MarketPosition!=1&&Close>HigherVanlue+lostmove&&EffRatio>N)
{
Buy(1,Close);
}
If(MarketPosition!=-1&&Close<LowerVanlue-lostmove&&EffRatio>N)
{
SellShort(1,Close);
}
}
//收盤平倉
If(MarketPosition==1&&Time>=0.1509)
{
Sell(1,Close);
PlotString("Vol","收盤平倉",Low,Red);
}
If(MarketPosition==-1&&Time>=0.1509)
{
BuyToCover(1,Close);
PlotString("Vol","收盤平倉",Low,Red);
}
End
//------------------------------------------------------------------------
// 編譯版本 GS2010.12.08
// 用戶版本 2012/02/08 14:07
// 版權所有 lzy990100887{程序化交易}
// 更改聲明 TradeBlazer Software保留對TradeBlazer平臺
// 每一版本的TrabeBlazer公式修改和重寫的權利
//------------------------------------------------------------------------
- 網友點評： 雖然錯誤很多
但思路還是不錯的
加工了一個絕大部分品種通用的模型
打印本文
關閉窗口