等级: 免费版
- 注册:
- 2021-10-23
- 曾用名:
|
COMD1:=REF( HIGH,1)<C;
COMD2:=REF(LOW ,1)>C;
开多条件:=COMD1 ;
开空条件:=COMD2 ;
平多条件:=COMD2 ;
平空条件:=COMD1 ;
VARIABLE:DUOKONG=0;
TSFS:=0; {停损反手,1-反手 0-不反手}
ORDVOL:=1000; {开仓手数}
ZSDS:=5; {止损点数}
VARIABLE:YDZY=1; {移动止盈总开关,1为开,0为关}
VARIABLE:HIGHPRICE=0,LOWPRICE=0; {保存开仓后的最高价、最低价}
VARIABLE:DHCDS=6,KHCDS=6; {多、空单回撤点数}
VARIABLE:DYLDS=10,KYLDS=10; {多、空单盈利点数,当盈利点数达到这个标准后,如果回撤达到上面的参数值就平仓}
VARIABLE:Z5B1:=1; {赚5保1开关}
DUOKONG:=1;
//持有空单
IF HOLDING<0 THEN BEGIN
IF 平空条件 THEN BEGIN //平空单
空平:SELLSHORT(1,0,MARKET),ORDERQUEUE;
END
//止损
IF C-ENTERPRICE>=ZSDS THEN BEGIN
空损:SELLSHORT(1,0,MARKET),ORDERQUEUE;
END
//移动止盈
IF YDZY=1 THEN BEGIN
//每周期判断是否创新低
IF L<LOWPRICE THEN BEGIN
LOWPRICE:=L;
END
//如果盈利超过10点之后回撤达到6点,就平仓,保住盈利
IF ENTERPRICE-LOWPRICE>=KYLDS THEN BEGIN
IF L-LOWPRICE>=KHCDS THEN BEGIN //回撤超过6点
空赢:SELLSHORT(1,0,MARKET);
END
END
END
//赚5保1
IF Z5B1=1 THEN BEGIN
IF ENTERPRICE-LOWPRICE>=5 THEN BEGIN
IF ENTERPRICE-L<=1 THEN BEGIN
空保:SELLSHORT(1,0,MARKET);
END
END
END
END
//开多单
IF HOLDING=0 THEN BEGIN
IF DUOKONG=1 OR DUOKONG=2 THEN BEGIN
IF 开多条件 THEN BEGIN
多开:BUY(1=1,ORDVOL,MARKET);
HIGHPRICE:=ENTERPRICE; //将开仓价保存到最高价
END
END
END
//持有多单
IF HOLDING>0 THEN BEGIN
IF 平多条件 THEN BEGIN {平多单}
多平:SELL(1,0,MARKET),ORDERQUEUE;
END
//多单管理
//止损
IF ENTERPRICE-C>=ZSDS THEN BEGIN
多损:SELL(1,0,MARKET),ORDERQUEUE;
END
//移动止盈
IF YDZY=1 THEN BEGIN
//每周期判断是否创新高
IF H>HIGHPRICE THEN BEGIN
HIGHPRICE:=H;
END
//如果盈利超过10点之后回撤达到6点,就平仓,保住盈利
IF HIGHPRICE-ENTERPRICE>=DYLDS THEN BEGIN
IF HIGHPRICE-H>=DHCDS THEN BEGIN //回撤超过6点
多赢:SELL(1,0,MARKET);
END
END
END
//赚5保1
IF Z5B1=1 THEN BEGIN
IF HIGHPRICE-ENTERPRICE>=5 THEN BEGIN
IF H-ENTERPRICE<=1 THEN BEGIN
多保:SELL(1,0,MARKET);
END
END
END
END
//开空单
IF HOLDING=0 THEN BEGIN
IF DUOKONG=1 OR DUOKONG=3 THEN BEGIN
IF 开空条件 THEN BEGIN
空开:BUYSHORT(1=1,ORDVOL,MARKET);
LOWPRICE:=ENTERPRICE;
END
END
END
当前持仓:HOLDING,COLORGRAY,LINETHICK0;
当前资产:ASSET,NO |
|