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數(shù)組越界操作

金字塔數(shù)組使用的高級編程技巧

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

希望您能仔細(xì)研究一下這個(gè)帖子。

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

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

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

如果你希望了解這2種模式的區(qū)別，建議你仔細(xì)看看

深度理解金字塔公式系統(tǒng)的工作機(jī)理

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

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

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