請(qǐng)教老師怎么改進(jìn)
作者:文華財(cái)經(jīng) 來(lái)源:cxh99.com 發(fā)布時(shí)間:2019年05月27日
-
咨詢內(nèi)容:
老師你好,這是海龜編寫(xiě)示范復(fù)制過(guò)來(lái)的:我增加了紅色字體,和更改了原命令TRADE_AGAIN(10)變成粉紅字體。目的是想實(shí)現(xiàn)在收盤(pán)前5秒下單,而不用像原程序那樣需要第二天開(kāi)盤(pán)才下單。但是更改之后出現(xiàn)了一個(gè)加倉(cāng)問(wèn)題,兩行綠色字體的命令只會(huì)執(zhí)行一次,我希望可以實(shí)現(xiàn)多次加倉(cāng),請(qǐng)老師幫忙,萬(wàn)分感謝! TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//真實(shí)波幅ATR:=MA(TR,26); //求26個(gè)周期內(nèi)真實(shí)波幅的簡(jiǎn)單移動(dòng)平均TC..INTPART((MONEYTOT*0.01/(UNIT*ATR)));//根據(jù)權(quán)益的1%計(jì)算下單手?jǐn)?shù)MTC..4*TC; //總的持倉(cāng)頭寸HH:=HV(H,20);LL:=LV(L,20);CROSSUP(C,HH)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,BK(TC);//最新價(jià)超過(guò)20周期的最高值,首次買(mǎi)入開(kāi)倉(cāng),手?jǐn)?shù)為T(mén)C手CROSSDOWN(C,LL)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,SK(TC); //最新價(jià)跌破20周期的最低值,首次賣出開(kāi)倉(cāng),手?jǐn)?shù)為T(mén)C手C>=BKPRICE+0.5*ATR&&BKVOL<MTC&&ISLASTBK&&CLOSESEC1<=5,BK(TC);//價(jià)格在上次開(kāi)倉(cāng)的基礎(chǔ)上上漲0.5倍ATR,在手?jǐn)?shù)不超過(guò)4倍TC的時(shí)候,買(mǎi)入加倉(cāng)TC手C<=SKPRICE-0.5*ATR&&SKVOL<MTC&&ISLASTSK&&CLOSESEC1<=5,SK(TC);//價(jià)格在上次開(kāi)倉(cāng)的基礎(chǔ)上下跌0.5倍ATR,在手?jǐn)?shù)不超過(guò)4倍TC的時(shí)候,賣出加倉(cāng)TC手C<=(BKPRICE-2*ATR)&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL);//最新價(jià)小于開(kāi)倉(cāng)價(jià)減去2倍的ATR,止損平倉(cāng)C>=(SKPRICE+2*ATR)&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL); //最新價(jià)大于開(kāi)倉(cāng)價(jià)加上2倍的ATR,止損平倉(cāng)CROSSUP(H,HV(H,10))&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL);//最高價(jià)上穿10周期最高價(jià),平倉(cāng)CROSSDOWN(L,LV(L,10))&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL); //最低價(jià)下穿10周期的最低價(jià),平倉(cāng)MULTSIG(0,0,1,0);
?
?來(lái)源:程序化99
-
文華技術(shù)人員:
這樣改下:
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//真實(shí)波幅
ATR:=MA(TR,26); //求26個(gè)周期內(nèi)真實(shí)波幅的簡(jiǎn)單移動(dòng)平均
TC..INTPART((MONEYTOT*0.01/(UNIT*ATR)));//根據(jù)權(quán)益的1%計(jì)算下單手?jǐn)?shù)
MTC..4*TC; //總的持倉(cāng)頭寸
HH:=HV(H,20);
LL:=LV(L,20);
CROSSUP(C,HH)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,BK(TC);//最新價(jià)超過(guò)20周期的最高值,首次買(mǎi)入開(kāi)倉(cāng),手?jǐn)?shù)為T(mén)C手
CROSSDOWN(C,LL)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,SK(TC); //最新價(jià)跌破20周期的最低值,首次賣出開(kāi)倉(cāng),手?jǐn)?shù)為T(mén)C手
C>=BKPRICE+0.5*ATR&&BKVOL<MTC&&ISLASTBK&&CLOSESEC1<=5,BK(TC);//價(jià)格在上次開(kāi)倉(cāng)的基礎(chǔ)上上漲0.5倍ATR,在手?jǐn)?shù)不超過(guò)4倍TC的時(shí)候,買(mǎi)入加倉(cāng)TC手
C<=SKPRICE-0.5*ATR&&SKVOL<MTC&&ISLASTSK&&CLOSESEC1<=5,SK(TC);//價(jià)格在上次開(kāi)倉(cāng)的基礎(chǔ)上下跌0.5倍ATR,在手?jǐn)?shù)不超過(guò)4倍TC的時(shí)候,賣出加倉(cāng)TC手
C<=(BKPRICE-2*ATR)&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL);//最新價(jià)小于開(kāi)倉(cāng)價(jià)減去2倍的ATR,止損平倉(cāng)
C>=(SKPRICE+2*ATR)&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL); //最新價(jià)大于開(kāi)倉(cāng)價(jià)加上2倍的ATR,止損平倉(cāng)
CROSSUP(H,HV(H,10))&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL);//最高價(jià)上穿10周期最高價(jià),平倉(cāng)
CROSSDOWN(L,LV(L,10))&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL); //最低價(jià)下穿10周期的最低價(jià),平倉(cāng)
TRADE_AGAIN(10);
CHECKSIG(BK,'A',0,'C',0,0);
CHECKSIG(SK,'A',0,'C',0,0);
CHECKSIG(BP,'A',0,'C',0,0);
CHECKSIG(SP,'A',0,'C',0,0);