[求助]新手，麻烦老师帮修改下简单的股票公式　[金字塔]

策略的意图是当根K线收盘价大于前10天的最高价则开仓占总资金的10%，开仓以后价格每上涨10%加仓总资金的10%。

当根K线收盘价小于10日最低价则全部平仓。

以下是我自己编写的，但测出来每次开仓、平仓都是间隔10根K线，而且不能实现加仓。麻烦老师帮改改，谢谢

VARIABLE:bprice=0;//记录开仓价

temp:=ref(hhv(h,10),1);//

temp1:=ref(llv(l,10),1);//

if c<temp1 and holding>0 then sell(1,100%,limit,c);//收盘价小于10日最低价全平

con:=c>=temp and holding=0;//收盘价大于10日最高价开仓

if con then

BEGIN

buy(1,asset*0.1,limit,c);

bprice:=c;//记录开仓价

end

if holding>0 then

begin

buy(holding=1 and c>1.1*bprice,asset*0.1,limit,c);//上涨10%再开一手

buy(holding=2 and c>1.2*bprice,asset*0.1,limit,c);//上涨20%再开一手

buy(holding=3 and c>1.3*bprice,asset*0.1,limit,c);//上涨30%再开一手

buy(holding=4 and c>1.4*bprice,asset*0.1,limit,c);//上涨40%再开一手

buy(holding=5 and c>1.5*bprice,asset*0.1,limit,c);//上涨50%再开一手

buy(holding=6 and c>1.6*bprice,asset*0.1,limit,c);//上涨60%再开一手

end

VARIABLE:bprice=0;//记录开仓价

temp:=ref(hhv(h,10),1);//

temp1:=ref(llv(l,10),1);//

if c<temp1 and holding>0 then sell(1,100%,limitr,c),pertrader;//收盘价小于10日最低价全平

con:=c>=temp and holding=0;//收盘价大于10日最高价开仓

if con then

BEGIN

buy(1,asset*0.1,limitr,c);

bprice:=c;//记录开仓价

end

if holding>0 then

begin

buy( c>1.1*bprice,10%,limitr,c),pertrader;//上涨10%再开一手

buy(c>1.2*bprice,10%,limitr,c),pertrader;//上涨20%再开一手

buy( c>1.3*bprice,10%,limitr,c),pertrader;//上涨30%再开一手

buy(c>1.4*bprice,10%,limitr,c),pertrader;//上涨40%再开一手

buy( c>1.5*bprice,10%,limitr,c),pertrader;//上涨50%再开一手

buy(c>1.6*bprice,10%,limitr,c),pertrader;//上涨60%再开一手

end

VARIABLE:bprice=0;//记录开仓价

temp:=ref(hhv(h,10),1);//

temp1:=ref(llv(l,10),1);//

if c<temp1 and holding>0 then sell(1,100%,limitr,c),pertrader;//收盘价小于10日最低价全平

con:=c>=temp and holding=0;//收盘价大于10日最高价开仓

if con then

BEGIN

buy(1,10%,limitr,c),pertrader;

bprice:=c;//记录开仓价

end

if holding>0 then

begin

buy( c>1.1*bprice,10%,limitr,c),pertrader;//上涨10%再开一手

buy(c>1.2*bprice,10%,limitr,c),pertrader;//上涨20%再开一手

buy( c>1.3*bprice,10%,limitr,c),pertrader;//上涨30%再开一手

buy(c>1.4*bprice,10%,limitr,c),pertrader;//上涨40%再开一手

buy( c>1.5*bprice,10%,limitr,c),pertrader;//上涨50%再开一手

buy(c>1.6*bprice,10%,limitr,c),pertrader;//上涨60%再开一手

end