如下代碼請(qǐng)轉(zhuǎn)為金字塔模型　[金字塔]

C1:=VALUEWHEN(DATE<>REF(DATE,1),REF(C,1));
H1:=VALUEWHEN(DATE<>REF(DATE,1),REF(H,1));
L1:=VALUEWHEN(DATE<>REF(DATE,1),REF(L,1));
CF:=MAX((H1-C1),(C1-L1))*4;
 //昨日高點(diǎn)減去收盤(pán)  和  昨日收盤(pán)減去低點(diǎn) 兩者中大的數(shù)值 乘以3
O1:=VALUEWHEN(DATE<>REF(DATE,1),O);
if C>O1+CF then BEGIN
SELLSHORT(holding<0,holding,market);
buy(holding=0,1,market);
end
 //收盤(pán)大于今日開(kāi)盤(pán)+ CF  買(mǎi)入
if C<O1-CF then begin
 sell(holding>0,holding,market);
 buyshort(holding=0,1,market);
 end
//收盤(pán)低于今日開(kāi)盤(pán)- CF  賣(mài)出

HH:=HHV(H,enterbars+1);
//買(mǎi)開(kāi)倉(cāng)位置到現(xiàn)在最高價(jià)
LL:=LLV(L,exitbars+1);
//賣(mài)開(kāi)倉(cāng)位置到現(xiàn)在最低價(jià)
if TIME>=0930 and C>=LL+L*9/1000 then SELLSHORT(holding<0,holding,market);
//最高階回撤1%止損
if TIME>=0930 and C<=HH-HH*9/1000 then sell(holding>0,holding,market);
//最高階回撤1%止損
if TIME>=1500 then sell(holding>0,holding,market);
if TIME>=1500 then SELLSHORT(holding<0,holding,market);