主题：求高手编一个时间开盘收盘的问题

也就是希望一个 公式能够对应全部的交易所的交易时间，是吧？

看你的写法是只分早晚，中午的那段休息不单独列出来，是吧？

MM:=marketlabel;
if strcmp(mm,'ZJ')=0 then begin
 kc:=time>091500 and time<151400;
 pc:=time>=151400 and time<=151500;
end

if strcmp(mm,'SQ')=0 then begin
 kc:=(time>010000 and time<062900) or (time>130000 and time<185900);
 pc:=(time>=062900 and time<=063000) or (time>=185900 and time<=190000);
end

if strcmp(mm,'ZQ')=0 then begin
 kc:=(time>010000 and time<032900) or (time>130000 and time<185900);
 pc:=(time>=032900 and time<=033000) or (time>=185900 and time<=190000);
end

if strcmp(mm,'DQ')=0 then begin
 kc:=(time>010000 and time<062900) or (time>130000 and time<185900);
 pc:=(time>=062900 and time<=063000) or (time>=185900 and time<=190000);
end

 

 

kc就是开仓时间

pc就是平仓时间

原来你针对的是不同的合约啊？那么你强调市场干什么，

MM:=strleft(stklabel,2);
drawtext(islastbar,close,mm);
if strcmp(mm,'RB')=0 then begin
 kc:=(time>010000 and time<045900) or (time>130000 and time<185900);
 pc:=(time>=045900 and time<=050000) or (time>=185900 and time<=190000);
end

if strcmp(mm,'AG')=0 then begin
 kc:=(time>010000 and time<062900) or (time>130000 and time<185900);
 pc:=(time>=062900 and time<=063000) or (time>=185900 and time<=190000);
end

 

类似这样的枚举法，

注意1：通用的可以把全部满足符合的都写上。比如说第二个，在IF strcmp(mm,'AG')=0后面还可以加上or strcmp(mm,'AU')=0

注意2：有的合约只有英文缩写只有一个，那么mm就不能通用了，需要特别的定义。比如说豆粕，需要写成strcmp(strleft(stklabel,1),'M')=0,参数改为1，取一个字母

也可以，套入上面的市场系统就行，

MM:=marketlabel;

if strcmp(mm,'SQ')=0 then begin
 kc:=(time0>timetot0(opentime(1)) and time0<timetot0(closetime(1))-60) or (time0>timetot0(opentime(2)) and time0<timetot0(closetime(0))-60);
 pc:=(time0>=timetot0(closetime(1))-60 and time0<=timetot0(closetime(1))) or (time0>=timetot0(closetime(0))-60 and time<=timetot0(closetime(0)));
end

if strcmp(mm,'ZJ')=0 then begin
 kc:=time0>timetot0(opentime(1)) and time0<timetot0(closetime(0))-60;
 pc:=time0>=timetot0(closetime(0))-60 and time0<=timetot0(closetime(0));
end

if strcmp(mm,'ZQ')=0 then begin
 kc:=(time0>timetot0(opentime(1)) and time0<timetot0(closetime(1))-60) or (time0>timetot0(opentime(2)) and time0<timetot0(closetime(0))-60);
 pc:=(time0>=timetot0(closetime(1))-60 and time0<=timetot0(closetime(1))) or (time0>=timetot0(closetime(0))-60 and time<=timetot0(closetime(0)));
end

if strcmp(mm,'DQ')=0 then begin
 kc:=(time0>timetot0(opentime(1)) and time0<timetot0(closetime(1))-60) or (time0>timetot0(opentime(2)) and time0<timetot0(closetime(0))-60);
 pc:=(time0>=timetot0(closetime(1))-60 and time0<=timetot0(closetime(1))) or (time0>=timetot0(closetime(0))-60 and time<=timetot0(closetime(0)));
end

。。。就不能先本地测试一下吗

此主题相关图片如下：1.png


此主题相关图片如下：2.png

可以

if strcmp(mm,'SQ')=0  or strcmp(mm,'DQ')=0 or strcmp(mm,'ZQ')=0  then  begin........

这样的话这个公式也能套进股票和外汇里面，还是稳妥点好，用原来的