請教老師怎么改進

作者：文華財經來源：cxh99.com 發布時間：2019年05月27日

咨詢內容： 老師你好，這是海龜編寫示范復制過來的：我增加了紅色字體，和更改了原命令TRADE_AGAIN(10)變成粉紅字體。目的是想實現在收盤前5秒下單，而不用像原程序那樣需要第二天開盤才下單。但是更改之后出現了一個加倉問題，兩行綠色字體的命令只會執行一次，我希望可以實現多次加倉，請老師幫忙，萬分感謝！ TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//真實波幅ATR:=MA(TR,26); //求26個周期內真實波幅的簡單移動平均TC..INTPART((MONEYTOT*0.01/(UNIT*ATR)));//根據權益的1%計算下單手數MTC..4*TC; //總的持倉頭寸HH:=HV(H,20);LL:=LV(L,20);CROSSUP(C,HH)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,BK(TC);//最新價超過20周期的最高值，首次買入開倉，手數為TC手CROSSDOWN(C,LL)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,SK(TC); //最新價跌破20周期的最低值，首次賣出開倉，手數為TC手C>=BKPRICE+0.5*ATR&&BKVOL<MTC&&ISLASTBK&&CLOSESEC1<=5,BK(TC);//價格在上次開倉的基礎上上漲0.5倍ATR，在手數不超過4倍TC的時候，買入加倉TC手C<=SKPRICE-0.5*ATR&&SKVOL<MTC&&ISLASTSK&&CLOSESEC1<=5,SK(TC);//價格在上次開倉的基礎上下跌0.5倍ATR，在手數不超過4倍TC的時候，賣出加倉TC手C<=(BKPRICE-2*ATR)&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL);//最新價小于開倉價減去2倍的ATR，止損平倉C>=(SKPRICE+2*ATR)&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL); //最新價大于開倉價加上2倍的ATR，止損平倉CROSSUP(H,HV(H,10))&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL);//最高價上穿10周期最高價，平倉CROSSDOWN(L,LV(L,10))&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL); //最低價下穿10周期的最低價，平倉MULTSIG(0,0,1,0);
?
?來源:程序化99
文華技術人員： 這樣改下：
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//真實波幅 ATR:=MA(TR,26); //求26個周期內真實波幅的簡單移動平均 TC..INTPART((MONEYTOT*0.01/(UNIT*ATR)));//根據權益的1%計算下單手數 MTC..4*TC; //總的持倉頭寸 HH:=HV(H,20); LL:=LV(L,20); CROSSUP(C,HH)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,BK(TC);//最新價超過20周期的最高值，首次買入開倉，手數為TC手 CROSSDOWN(C,LL)&&ISLASTBK=0&&ISLASTSK=0&&CLOSESEC1<=5,SK(TC); //最新價跌破20周期的最低值，首次賣出開倉，手數為TC手 C>=BKPRICE+0.5*ATR&&BKVOL<MTC&&ISLASTBK&&CLOSESEC1<=5,BK(TC);//價格在上次開倉的基礎上上漲0.5倍ATR，在手數不超過4倍TC的時候，買入加倉TC手 C<=SKPRICE-0.5*ATR&&SKVOL<MTC&&ISLASTSK&&CLOSESEC1<=5,SK(TC);//價格在上次開倉的基礎上下跌0.5倍ATR，在手數不超過4倍TC的時候，賣出加倉TC手 C<=(BKPRICE-2*ATR)&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL);//最新價小于開倉價減去2倍的ATR，止損平倉 C>=(SKPRICE+2*ATR)&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL); //最新價大于開倉價加上2倍的ATR，止損平倉 CROSSUP(H,HV(H,10))&&SKVOL>0&&CLOSESEC1<=5,BP(SKVOL);//最高價上穿10周期最高價，平倉 CROSSDOWN(L,LV(L,10))&&BKVOL>0&&CLOSESEC1<=5,SP(BKVOL); //最低價下穿10周期的最低價，平倉 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);