ATR棘輪法 [文華財(cái)經(jīng)]
作者：文華財(cái)經(jīng) 來(lái)源：cxh99.com 發(fā)布時(shí)間：2015年09月17日 點(diǎn)擊數(shù)：
【收藏到本網(wǎng)的會(huì)員中心】
- 咨詢內(nèi)容：
下面是TB的 ATR棘輪法，改成文化應(yīng)如何寫(xiě)？謝謝，
Params
Numeric Lots(1); Numeric nOffset(3); Numeric HLength(5); Numeric LLength(5); Numeric AtrLength(0.05); Numeric myBarsSinceEntry(9);
Vars
NumericSeries HHH; NumericSeries LLL; NumericSeries HHH1; NumericSeries LLL1; NumericSeries Atr; Numeric myPrice; NumericSeries StopLine; NumericSeries LastPrice; Numeric MinPoint;
Begin
MinPoint = MinMove*PriceScale; HHH = Highest(High,HLength); LLL = Lowest(Low,LLength); HHH1 = Highest(High,10); LLL1 = Lowest(Low,10);
Atr = AvgTrueRange(20);
If(MarketPosition==1) { //LLL1 = Max(LLL1,LastPrice); LLL1 = Max(LLL1,LLL1[1]); //PlotNumeric("LLL1",LLL1);
If(BarsSinceEntry>myBarsSinceEntry || High>LastPrice+Atr[1]) { StopLine =Max(StopLine,LLL1[1] + (BarsSinceEntry)*Atr[1]*AtrLength); }
PlotNumeric("多頭止損:",StopLine);
If(Low<StopLine) { myPrice =Min(Open,StopLine) - MinPoint*nOffset; Sell(Lots,myPrice);
} } If(MarketPosition==-1) { //HHH1 = Min(HHH1,LastPrice); HHH1 = Min(HHH1,HHH1[1]); //PlotNumeric("HHH1",HHH1);
If(BarsSinceEntry>myBarsSinceEntry || Low<LastPrice-Atr[1]) { StopLine =Min(StopLine,HHH1[1] - (BarsSinceEntry)*Atr[1]*AtrLength); } PlotNumeric("空頭止損:",StopLine);
If(High>StopLine) { myPrice =Max(Open,StopLine) + MinPoint*nOffset; BuyToCover(Lots,myPrice);
} }
If(MarketPosition<>1) { If(High>HHH[1]) { myPrice =Max(Open,HHH[1]); Buy(Lots,myPrice +MinPoint*nOffset); LastPrice = myPrice; StopLine = myPrice -Atr[1]*1.5; Return; } } If(MarketPosition<>-1) { If(Low<LLL[1]) { myPrice = Min(Open,LLL[1]); SellShort(Lots,myPrice- MinPoint*nOffset); LastPrice = myPrice; StopLine = myPrice +Atr[1]*1.5; Return; } }
If(time == 0.1510) { Sell(Lots,Open -MinPoint*nOffset); BuyToCover(Lots,Open +MinPoint*nOffset); }
End
- 文華技術(shù)人員：
這樣編寫(xiě)。
NOFFSET:=3;
HLENGTH:=5;
LLENGTH:=5;
ATRLENGTH:=0.05;
MYBARSSINCEENTRY:=9;
HHH:=HHV(HIGH,HLENGTH);
LLL:=LLV(LOW,LLENGTH);
HHH1:=HHV(HIGH,10);
LLL1:=LLV(LOW,10);
TR : MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR : MA(TR,20),COLORYELLOW;
BKVOL>0&&(BARSBK>MYBARSSINCEENTRY||HIGH>BKPRICE+REF(ATR,1)),SP;
SKVOL>0&&(BARSSK>MYBARSSINCEENTRY||LOW<SKPRICE-REF(ATR,1)),BP;
TIME>=1510,CLOSEOUT;
AUTOFILTER;
注：您的源碼中沒(méi)有開(kāi)倉(cāng)條件，需要您自行定義下。
有思路，想編寫(xiě)各種指標(biāo)公式，程序化交易模型，選股公式，預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 511411198 進(jìn)行 有償 編寫(xiě)！（不貴！點(diǎn)擊查看價(jià)格！）
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)