等级: 专业版
- 注册:
- 2022-1-11
- 曾用名:
|
改为后台后出现如题所述问题!开多条件:=(CT上&&上2&&DGB>0)||(CT下&&下2)||(CT下&&下1&&TBBI3)||(C下T&&下3&&TBBI3)||(C上T&&上3&&TBBI3&&DGB>0)||(C上T&&C下T&&上3&&下3&&TBBI3);
开空条件:=(C上T&&上2&&DGB<0)||(C下T&&下2)||(C上T&&上3&&TBBI1)||(CT上&&上1&&TBBI1)||(CT下&&下1&&TBBI1&&DGB<0)||(CT上&&CT下&&上1&&下1&&TBBI1);
IF 开多条件 AND HOLDING<=0 THEN BEGIN
SELLSHORT(1,Lots,MARKET);
TSELLSHORT(1,Lots,mkt);
if holding=0&&(AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
KCN:=0;
BUY(HOLDING=0&&TZKC=0,Lots,MARKET);//
TBUY(HOLDING=0&&TZKC=0,Lots,mkt);//
KCN:=1;
KCF:=1;
end
IF 开空条件 AND HOLDING>=0 THEN BEGIN
SELL(1,Lots,MARKET);
TSELL(1,Lots,mkt);
KCN:=0;
if holding=0&&(AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
BUYSHORT(HOLDING=0&&TZKC=0,Lots,MARKET);//
TBUYSHORT(HOLDING=0&&TZKC=0,Lots,mkt);//
KCN:=-1;
KCF:=-1;
END
//======================================
if KCN=1&&JCSPK&&OPENPROFIT<=0&&(RMAZDLY>0.002) AND HOLDING>=0 then BEGIN
SELL(1,Lots,MARKET);
TSELL(1,Lots,mkt);
KCN:=0;
if holding=0&&(AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
BUYSHORT(HOLDING=0&&TZKC=0,Lots,MARKET);//
TBUYSHORT(HOLDING=0&&TZKC=0,Lots,mkt);//
KCF:=-1;
end
IF KCN=-1&&JCBPK&&OPENPROFIT<=0&&(RMAZDLY>0.002) AND HOLDING<=0 THEN BEGIN
SELLSHORT(1,Lots,MARKET);
TSELLSHORT(1,Lots,mkt);
KCN:=0;
if holding=0&&(AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
BUY(HOLDING=0&&TZKC=0,Lots,MARKET);//
TBUY(HOLDING=0&&TZKC=0,Lots,mkt);//
KCF:=1;
end
//==========================================
if holding>=0&&KCN=0&&((JCSPK0&&(OPENPROFIT<0))) AND HOLDING>=0 then BEGIN//||(RMAZDLY>0.02)
SELL(1,Lots,MARKET);
TSELL(1,Lots,mkt);
KCN:=0;
if holding=0&&(AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
BUYSHORT(HOLDING=0&&TZKC=0,Lots,MARKET);//
TBUYSHORT(HOLDING=0&&TZKC=0,Lots,mkt);//
KCF:=-1;
end
IF holding<=0&&KCN=0&&((JCBPK0&&(OPENPROFIT<0))) AND HOLDING<=0 THEN BEGIN//||(RMAZDLY>0.02)
SELLSHORT(1,Lots,MARKET);
TSELLSHORT(1,Lots,mkt);
KCN:=0;
if holding=0&&(AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
BUY(HOLDING=0&&TZKC=0,Lots,MARKET);//
TBUY(HOLDING=0&&TZKC=0,Lots,mkt);//
KCF:=1;
end
//=========================目标平仓================================================
IF HOLDING>0&&(DRMACD<0||DRJ<0)&&(AA0>=1000||RAA0>=1000) THEN BEGIN
SELL(1,Lots,MARKET);
TSELL(1,Lots,mkt);
TZKC:=1;
end
IF HOLDING<0&&(DRMACD>0||DRJ>0)&&(AA0>=1000||RAA0>=1000) THEN BEGIN
SELLSHORT(1,Lots,MARKET);
TSELLSHORT(1,Lots,mkt);
TZKC:=1;
end
//===================获利了结========================
HLZY:=RAA0>500&&((RAA0>=10000&&(RAA0-AA0)/RAA0>0.15)||(RAA0<10000&&RAA0>=5000&&(RAA0-AA0)/RAA0>0.20)||(RAA0<5000&&RAA0>=2500&&(RAA0-AA0)/RAA0>0.25)||(RAA0<2500&&RAA0>=1000&&(RAA0-AA0)/RAA0>0.30)||(RAA0<1000&&RAA0>=500&&(RAA0-AA0)/RAA0>0.40));//||(RAA0<1000&&RAA0>=500&&(突破箱体||突破箱底))
exittime:=time>=185900;
if holding>0&&((exittime&&AA0>=1000)||HLZY) then begin
sell(1,Lots,MARKET);
Tsell(1,Lots,mkt);
if (AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
end
if holding<0&&((exittime&&AA0>=1000)||HLZY) then begin
sellshort(1,Lots,MARKET);
TSELLSHORT(1,Lots,mkt);
if (AA0>=1000||RAA0>=1000)&&AA0>0 then TZKC:=1;
end
//=================================
if AA0<ZDKS then ZDKS:=AA0;
QUITLINE@ EXIT;
补充内容 (2025-1-9 06:49):
版本7.02
补充内容 (2025-1-9 06:51):
固定时间起点,K线走完
|
|