主题：开仓类型识别

定义三个全局变量，variable:num1=0,num2=0,num3=0;

if cond1 then

begin

buy();

num1:=1;

end

 

if 平多1 and num1=1 then

begin

sell();

num1=0;

end

你测试时什么问题，具体说明下

不会的，你完整代码发下。

应该是重新给pc1赋值为0的条件成立了才会变为0

   if kd2n=1 then BEGIN
       平多2:sell(dfx,0,market);
       kd2n:=0;
    end

 

 

你这样写逻辑上当然有问题了，你开多后kd2n变成了1，然后这里条件成立当然又会赋值为2。

你把平仓条件放到if里面去.

if kd2n=1 and dfx then           //开多2后并且平仓条件满足才

begin

平多2:sell();

kd2n:=0;

end