i:=1;
VARIABLE:kfc[]=0;

for i=datacount downto datacount-20 DO
    BEGIN
    if close>open THEN
       BEGIN
       kfc[i]:=close;
       i:=i+1;
       END;
    else
       BEGIN
       kfc[i]:=open;
       i:=i+1;
       END;
    END;

提示kfc數組越界操作

金字塔數組使用的高級編程技巧

http://www.weistock.com/bbs/dispbbs.asp?BoardID=10&ID=30380&replyID=&skin=1

希望您能仔細研究一下這個帖子。

數組在使用之前一定要初始化，對于序列模式，使用之前是需要置數組大小的，如果你不知道數組有多大，可以先初始化一個空數組，但是使用時一定要檢查數組的大小，必要時使用SETUBOUND函數重置數組的大小。

還有，從代碼中看出您的編程邏輯比較紊亂，應該您目前還分不清楚序列模式和逐K線模式的區別。

建議新手金字塔客戶，若之前無分析家，飛狐等編程經驗的用戶，不用去考慮序列模式，直接從逐K線模式來編寫你的策略系統。

如果你希望了解這2種模式的區別，建議你仔細看看

深度理解金字塔公式系統的工作機理

http://www.weistock.com/bbs/dispbbs.asp?boardid=10&Id=29594

你自己連需求都沒有讓我們搞清楚，怎么幫你？

另外，給你的連接上已經說的清楚，你能否花幾天時間來消化一下呢？