主题：帮我把文华改成金字塔

以下代码供参考：

M:=10;
A:=(3*C+L+O+H)/6;//3倍收盘价与最高价、最低价、开盘价之和的均值。
B:(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
//对A值做加权均值计算。
D:MA(B,M);
N:=1;//首次下单手数
cd1:ref(holding,1)<0 and holding>0;//利用持仓变化判断是否反手了
cd2:ref(holding,1)>0 and holding<0;
AA:=COUNT(cd1,BARPOS)+COUNT(cd2,BARPOS);//之前没有BPK,SPK信号。
BB:=IF(NUMPROFIT(1)=0,ENTERVOL,N);
CC:=IF(AA<1,N,BB);

if CROSS(B,D) then
begin
sellshort(holding<0,holding,market);
buy(holding=0,CC,market);
end

if CROSS(D,B) then
begin
sell(holding>0,holding,market);
buyshort(holding=0,CC,market);
end

//下面这个功能需要使用软件自带的追撤单，无法单纯用代码实现。

////追价委托
//SETSIGPRICETYPE(BPK,TRACING_ORDER);
//SETSIGPRICETYPE(SPK,TRACING_ORDER);
//