等级: 免费版
- 注册:
- 2021-12-26
- 曾用名:
|
楼主 |
发表于 2022-1-8 21:47
|
显示全部楼层
VARIABLE:B=0;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
DKX10:(10*MID+9*REF(MID,1)+8*REF(MID,2)+7*REF(MID,3)+
6*REF(MID,4)+5*REF(MID,5)+4*REF(MID,6)+
3*REF(MID,7)+2*REF(MID,8)+REF(MID,9))/55,COLOR7DFF7D;
DKX60:(60*MID+59*REF(MID,1)+58*REF(MID,2)+57*REF(MID,3)+
56*REF(MID,4)+55*REF(MID,5)+54*REF(MID,6)+
53*REF(MID,7)+52*REF(MID,8)+51*REF(MID,9)+50*REF(MID,10)+
49*REF(MID,11)+48*REF(MID,12)+47*REF(MID,13)+
46*REF(MID,14)+45*REF(MID,15)+44*REF(MID,16)+
43*REF(MID,17)+42*REF(MID,18)+41*REF(MID,19)+
40*REF(MID,20)+39*REF(MID,21)+38*REF(MID,22)+
37*REF(MID,23)+36*REF(MID,24)+35*REF(MID,25)+
34*REF(MID,26)+33*REF(MID,27)+32*REF(MID,28)+
31*REF(MID,29)+30*REF(MID,30)+29*REF(MID,31)+
28*REF(MID,32)+27*REF(MID,33)+26*REF(MID,34)+
25*REF(MID,35)+24*REF(MID,36)+23*REF(MID,37)+
22*REF(MID,38)+21*REF(MID,39)+20*REF(MID,40)+
19*REF(MID,41)+18*REF(MID,42)+17*REF(MID,43)+
16*REF(MID,44)+15*REF(MID,45)+14*REF(MID,46)+
13*REF(MID,47)+12*REF(MID,48)+11*REF(MID,49)+
10*REF(MID,50)+9*REF(MID,51)+8*REF(MID,52)+
7*REF(MID,53)+6*REF(MID,54)+5*REF(MID,55)+
4*REF(MID,56)+3*REF(MID,57)+2*REF(MID,58)+
REF(MID,60))/1830,COLORFFFF80,LINETHICK1;
多单条件1:=DKX10>REF(DKX10,1) ;
多单条件2:=DKX60>REF(DKX60,1);
平多仓条件1:CLOSE-ENTERPRICE>=10 OR ENTERPRICE-CLOSE>=10;
平多仓条件2:CLOSE-ENTERPRICE>=20 OR ENTERPRICE-CLOSE>=20;
IF 多单条件1 THEN BEGIN
DKX10多:BUY(HOLDING<=0 and EXITBARS>2 OR EXITBARS=-1,1,THISCLOSE);
B:=1;
END
IF B:=1 THEN BEGIN
DKX10平:SELL( 平仓多条件1,1 ,LIMITR,CLOSE),COLORMAGENTA;
B:=0;
END
IF 多单条件2 THEN BEGIN
DKX60多:BUY(HOLDING<=0 and EXITBARS>2 OR EXITBARS=-1,1,THISCLOSE);
B:=2;
END
IF B:=2 THEN BEGIN
DKX60平:SELL(平仓多条件2,1 ,LIMITR,CLOSE),COLORRED;
B:=0;
END
没能实现,麻烦老师看看哪里错了。。测试中 DKX60 开的多单 变量B1 去执行了。想 要B2去执行的。
补充内容 (2022-1-8 21:53):
平多仓条件 打错了 |
|