
等级: 新手上路
- 注册:
- 2021-6-29
- 曾用名:
|
WARNING_DISABLE:4;
RK:VALUEWHEN(DATE<>REF(DATE,1),OPEN);//今日首根K线开盘价
JX:=CROSS(CLOSE,RK); // 金叉标记
Variable:LMYK=0;//累计毛盈亏
Variable:LSXF=0;//累计手续费
Variable:LJYK=0;//累计净盈亏
Variable:DSXF=0;//单笔手续费
Variable:DMYK=0;//单笔毛盈亏
EXTGBDATASET('ZTYK',LJYK); //全局数据库变量
JXDN:=BARSLAST(JX); //开多位置
DKC:REF(CLOSE,JXDN)*10000,NODRAW;//开多价格*10000(期权价格乘数)=实际开多价格
MBJ:DKC*(1+0.1)+4,NODRAW; //单笔止盈的价格+手续费(4元)
ZSJ:REF(LOW,JXDN)*10000,NODRAW; //单笔止损的价格
ZYPD:=HIGH>(MBJ/10000) OR TIME=145500; //单笔盘中止盈条件
ZSPD:=CROSS(ZSJ/10000,CLOSE) OR TIME=145500; //单笔盘中止损条件
SHOU:CEILING((1000-EXTGBDATA('ZTYK')+DSXF)/(DKC*0.1)); //开仓手数
//SHOU:CEILING((1000-LJYK+DSXF)/(DKC*0.1)),NODRAW; //开仓手数
If ZYPD AND THOLDING()>0 then begin //单笔盘中止盈条件判断
DMYK:=(MBJ-DKC)*SHOU;
LMYK:=LMYK+DMYK;
DSXF:=SHOU*-4;
LSXF:=LSXF+DSXF;
LJYK:=LMYK+LSXF;
DMYK:=0;
DSXF:=0;
LJYK:=0;
EXTGBDATASET('ZTYK',LJYK);
End
If ZSPD AND THOLDING()>0 then begin //单笔盘中止损条件判断
DMYK:=(ZSJ-DKC)*SHOU;
LMYK:=LMYK+DMYK;
DSXF:=SHOU*-4;
LSXF:=LSXF+DSXF;
LJYK:=LMYK+LSXF;
EXTGBDATASET('ZTYK',LJYK);
DMYK:=0;
DSXF:=0;
End
TSELL((ZYPD OR ZSPD) AND THOLDING()>0,0,MKT);
TBUY(JX AND THOLDING()=0,SHOU,MKT);
IF TIME=CLOSETIME(0) THEN LMYK:=0;
IF TIME=CLOSETIME(0) THEN LSXF:=0;
IF TIME=CLOSETIME(0) THEN LJYK:=0;
IF TIME=CLOSETIME(0) THEN DSXF:=0;
IF TIME=CLOSETIME(0) THEN DMYK:=0;
|
|