信托海龜進行自動化交易，加上自動交易功能？　[金字塔]

我是金字塔軟件用戶，想給海龜加上自動交易功能，個人用戶，幾個朋友加了一下，一直開或平，不好用，請問得怎么加上？

VARIABLE:dayCount=1,PositionCount=1,SellSign=0;
VARIABLE:EntAndExitSign=1,EntPoint=0,ExitPoint=0;
VARIABLE:N=0;

MA1:MA(C,5);
MA3:MA(C,10);

M:=MA(TR,20);
BUYHHV:=HHV(H,20);
SELLLLV:=LLV(L,10);

ss:n,linethick0;

IF BARPOS>=21 THEN BEGIN
IF BARPOS=21 THEN
N:=M;
IF DayCount=6 OR BARPOS=21 THEN BEGIN{5天調整N值}
N:=(19*N+TR)/20;{計算N值}
DayCount:=2;
END
DayCount:=DayCount+1;
EntPoint:=ENTERBARS+1;
IF EntPoint=EntAndExitSign THEN BEGIN{說明STOP指令買進頭寸成功}
PositionCount:=PositionCount+1;{頭寸計數}
SellSign:=True;{開始以STOP賣出，如果達到指定的價格}
END
IF PositionCount=1 THEN BEGIN{第一頭寸}
HOW:=CASH(0)*0.01/N;{波動性百分比決定頭寸規模}
開1:BUY(1,HOW,STOP,BUYHHV);{在20日新高STOP指令買進}
END
IF PositionCount=2 THEN BEGIN{如到第二頭寸}
HOW:=CASH(0)*0.01/N;{波動性百分比決定頭寸規模}
開2:BUY(1,HOW,STOP,ENTERPRICE+0.5*N);{在上頭寸(即第一頭寸)+0.5個N以STOP指令買進}
END
IF PositionCount=3 THEN BEGIN{如到第三頭寸}
HOW:=CASH(0)*0.01/N;
開3:BUY(1,HOW,STOP,ENTERPRICE+0.5*N);{在上頭寸(即第二頭寸)+0.5個N以STOP指令買進}
END
IF PositionCount=4 THEN BEGIN
HOW:=CASH(0)*0.01/N;
開4:BUY(1,HOW,STOP,ENTERPRICE+0.5*N);
END
IF SellSign=True THEN BEGIN
    ExitPoint:=EXITBARS+1;
    IF ExitPoint=EntAndExitSign THEN BEGIN {說明賣出成功}
       PositionCount:=1;{頭寸計算復原}
       SellSign:=False;
    END
    IF ENTERPRICE-2*N then SELL(1,100%,STOP,SELLLLV);{退出離盈利頭寸}
    ELSE
    SELL(1,100%,STOP,ENTERPRICE-2*N);{退出虧損頭寸}
    END
END;

目前金字塔提供海龜交易，是范例，根本就無法保障投資收益，請用戶三思而后行！

老大，我很清楚風險了，就是在這里請老大幫幫忙，由于經常不盯盤，產生的風險相當大，呵呵，老大，幫幫忙吧，請老大閑時喝茶了！！！

朋友修改完這個模型，加上自動化交易化語句后，程序一直在開倉或平倉，沒有完全修改好，水平還是不行呀，懇請老大幫忙了。只要開1、開2出現信號后進行自動交易，固定手數就可以了。平倉全部平掉，呵呵