主题：求助阿火版主帮写个日内系统

汗。今天忙

上面的的第一句不能这样用，会导致hhv(h,nn)出错

其他部分不符合逻辑，是开仓后最高价触及日内最高点，才把离场位置为30周期低点，否则，是以日内最低点离场并反手

晚点写

variable:hl=0;
cond:=date<>ref(date,1);
nn:=barslast(cond)+1;
hi:=ref(hhv(h,nn),1);
lo:=ref(llv(l,nn),1);
hi30:=ref(hhv(h,30),1);
lo30:=ref(llv(l,30),1);
entertime:=time>093500 and time<145800;

if holding>0 and (l<lo or (l<lo30 and hl<0)) then begin//hl<0代表的开仓后的最高价达到日内最高点
 sell(1,1,market);
 buyshort(entertime,1,market);
 hl:=l;
 goto skip@; //这里要跳转一下，防止当根K线开空立即被下面的平仓语句平了
end

if holding<0 and (h>hi or (h>hi30 and hl<0)) then begin
 sellshort(1,1,market);
 buy(entertime,1,market);
 hl:=h;
end

if holding=0 and entertime and h>hi30 then begin
 buy(1,1,market);
 hl:=h;//记录开仓后的最高价
end

if holding=0 and entertime and l<lo30 then begin
 buyshort(1,1,market);
 hl:=l;
end
skip@;
if holding>0 and h>=abs(hl) then begin//因为用了hl的正负号来记录信息，所以需用abs(hl)
 hl:=h;//记录抬升的最高价
 if hl>hi then hl:=-hl;//如果触碰日内最高点，则把hl赋值为负值
end
if holding<0 and l<=abs(hl) then begin
 hl:=l;
 if hl<lo then hl:=-hl;
end

if time>=145800 then begin
 sell(1,1,market);
 sellshort(1,1,market);
end

我的成果被你改成这样！~~~

你这样会有问题的。假设某根K线下破lo30（此时还未创日内新高），而后才创日内新高，之后价格一路扶摇直上。

这种情况，按你的改动，就会平仓了。

可按本意，是要创新高后，再下破30周期低点才离场。这有一个先后顺序的问题