盈利加仓的程序编写

106137

盈利加仓的程序编写，第一次开仓手数1手，平仓后若盈利则第二次开仓手数开2手，若盈利则第三次开仓手数开3手，最多到6手，6手后仍然盈利以后也是开仓6手。只要有一次亏损，则下一次开仓为1手。我写的程序测试过，好像不能完全判定是否盈利，请老师帮我检查下程序是代码顺序不对还是代码错误？帮我改正下

手数:=1;

ariable:num:=0;

cs:=5;//加仓次数上限

开多条件:=

开空条件:=

//交易系统

if HOLDING=0 THEN  BEGIN

         BUY(开多条件 ,手数+num,LIMIT,OPEN);

         BUYSHORT(开空条件 ,手数+num,LIMIT,OPEN);  

END

平多条件:=

平空条件:=

if HOLDING>0  THEN BEGIN

         SELL(平多条件1,HOLDING,market);

         ifNUMPROFIT(1)>0 then   num:=num+1;

         if NUMPROFIT(1)<=0 then  num:=0;         

END

if HOLDING<0  THEN BEGIN

   SELLSHORT(平空条件1 ,HOLDING,market);

   if NUMPROFIT(1)>0 then  num:=num+1;

   if NUMPROFIT(1)<=0 then  num:=0;           

END

清仓时间:=TIME>=183000 and time<=183100;//14点30分清仓

SELL(1,HOLDING,LIMITR,CLOSE);//

SELLSHORT(1,HOLDING,LIMITR,CLOSE); //

END

if num=cs then num:=0;//连赢CS次数后，重置盈利次数为0.手数恢复默认值

         

持仓:holding;

资深技术05

1.涉及到全局变量控制的if条件，必须是完整的条件。否则容易 交易语句没触发，但是全局变量已经重新赋值了
2.num只在亏损时候重置就行。达到最大 上限不用管（如果需要达到最大手数后 重置手数 那可以重置），下单时候取最小值处理就可以控制手数不超过6手。

[PEL] 复制代码

手数:=1;
variable:num:=0;
cs:=5;//加仓次数上限

开多条件:=c>o;
开空条件:=c<o;
//交易系统
if holding=0 then  
begin
buy(开多条件 ,min(cs+手数,手数+num),limit,open);
buyshort(开空条件 ,min(cs+手数,手数+num),limit,open);  
end

平多条件:=cross(ma(c,3),c);
平空条件:=cross(c,ma(c,5));

if holding>0 and 平多条件 then begin
 sell(1,holding,market);
if numprofit(1)>0  then  num:=num+1;
if numprofit(1)<=0 then  num:=0;         
end

if holding<0 and 平空条件  then begin
   sellshort(1,holding,market);
   if numprofit(1)>0  then  num:=num+1;
   if numprofit(1)<=0 then  num:=0;           
end

清仓时间:=time>=183000 and time<=183100;//14点30分清仓
if 清仓时间 and holding<>0 then 
begin
sell(1,holding,limitr,close);//
sellshort(1,holding,limitr,close); //
if numprofit(1)>0 then  num:=num+1;
if numprofit(1)<=0 then  num:=0;  
end


最近一次盈亏:NUMPROFIT(1);
连赢次数:num;
持仓:holding;