关于后台程序保本策略的问题

汇聚

[PEL] 复制代码

 { ----------------------------------------以下为保本模块---------------------------------------- } 
 
 STR1:=STKLABEL&'_H';


//初始化全局变量

IF TBUYHOLDINGEX( '','' ,1 )>0 AND EXTGBDATA(STR1)<DYNAINFO(7) THEN BEGIN
	
   EXTGBDATASET(STR1,DYNAINFO(7));

END

DYK:DYNAINFO(  7)-多均价;

MAXPRO1:EXTGBDATA(STR1)-多均价;

IF 多可用=1 AND ABS(MAXPRO1)>=10 AND DYK<=2 AND EXTGBDATA(STR1 )>0 THEN BEGIN
	
TSELL(1,1,LMT,多均价);

EXTGBDATASET( STR1,0);

END
 
 
 STR2:=STKLABEL&'_L'; 

IF TSELLHOLDINGEX( '','' ,1 )>0 AND EXTGBDATA(STR2)<DYNAINFO(7) THEN BEGIN
	
EXTGBDATASET(STR2,DYNAINFO(7));

END

 
KYK:ABS(空均价-DYNAINFO(  7));

MAXPRO2:ABS(空均价-EXTGBDATA(STR2));

空单回撤:IF(空可用=1,KYK/MAXPRO2,0);
 
IF 空可用=1 AND ABS(MAXPRO2)>=10 AND KYK<=2 AND EXTGBDATA(STR2 )>0 THEN BEGIN
	
TSELLSHORT(1,1,LMT,空均价);

EXTGBDATASET( STR1,0);

END 

老师，请帮忙检查下，上述保本平仓策略是否写法正确，在实际盘中触发感觉是乱的，多数不能有效执行，麻烦老师了。


补充内容 (2023-6-28 13:23):
当前持仓为0时，是否需要把MAXPRO1和DYK，以及MAXPRO2和KYK重置为0？

技术009

开仓位置是否有给全局变量赋值？如果有，赋值又是怎样赋值的？

汇聚

技术009 发表于 2023-6-28 13:38
开仓位置是否有给全局变量赋值？如果有，赋值又是怎样赋值的？

{ ----------------------------------------以下为全局变量---------------------------------------- }

input:n(5,1,100,1);//参数定义

多可用:tbuyholdingex('','',1);

空可用:tsellholdingex('','',1);

多均价:tavgenterpriceex2('','',0);

空均价:tavgenterpriceex2('','',1);

全部的都在这里了

技术009

我没看到你开仓语句。你如果是手工开仓，你要考虑到一个你加仓 或者其他干预仓位时候 持仓均价会变化的问题。这个变化是会影响到这里的逻辑的。

汇聚

技术009 发表于 2023-6-29 09:21
我没看到你开仓语句。你如果是手工开仓，你要考虑到一个你加仓 或者其他干预仓位时候 持仓均价会变化的问题 ...

VARIABLE:HIGHPRICE=0;
EMA13:=EMA(C,10),COLORWHITE;
EMA21:=EMA(C,21),COLORYELLOW;
EMA34:=EMA(C,34),COLORFF00FF;
EMA60:=MA(C,55),COLORFFCC66;
X1:=(C+L+H)/3;
X2:=EMA(X1,5);
X3:=EMA(X2,4);
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
AA:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
DK:=IF(X2>X3 AND C>EMA13 AND CROSS(C,AA),1,0);
KK:=IF(X2<X3 AND C<EMA13 AND CROSS(AA,C),1,0);

//开多单
  IF DK THEN BEGIN
   多开:TBUY(1,1,MKT);
  END

没有进行过手工开单，是不是要改成1秒钟轮循模式？现在是1分钟周期收盘模式。

技术009

你这种肯定不能走完K的。否则价格更新 写入不到你这里的全局变量里的。
你改成轮训模式。