这样不会加仓　[金字塔]

runmode:1;
input:lots(1,1,10,1);

 账户:='';
 
品种1:='SRX05';
品种2:='SRX09';
p_m:=1;
品种1最新价:=dynainfo2(7,品种1);
品种2最新价:=dynainfo2(7,品种2);
n:=2;

if 品种2最新价-品种1最新价<>0 and  extgbdata('n1')=0 and TBuyHoldingEx('账户','SRX05',0)=0 AND TSellHoldingEx('账户','SRX09',0)=0 then begin
    tbuy(1,lots,lmt,品种1最新价,0,账户,品种1);
    tbuyshort(1,lots,lmt,品种2最新价,0,账户,品种2);
    aa:=品种2最新价-品种1最新价;
    extgbdataset('SRX基础价差',aa);
    extgbdataset('n1',1);
end

if 品种2最新价-品种1最新价>=extgbdata('SRX基础价差')+n*p_m and extgbdata('n2')=0 and TBuyHoldingEx('账户','SRX05',0)=1 AND TSellHoldingEx('账户','SRX09',0)=1 then begin
  tbuy(1,lots,lmt,品种1最新价,0,账户,品种1);
    tbuyshort(1,lots,lmt,品种2最新价,0,账户,品种2);
    extgbdataset('n2',1);
end

第二次为什么不能进场

就是第二段下单不执行？

给你的条件办法，你照里面的办法把所有的条件全都输出一遍，看看是哪个条件不满足

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