主题：[求助]请求将TB四周法则改写为金字塔图表逐K线语言程序

好，明天帮你改改

看着真累。好像是说从买入后的最高点回落1.8倍的atr离场，突破4周低点也离场的 意思？

variable:hl=0,zs=0;
input:B_Length1(22),B_Length2(4),B_ATRLength(32),B_TrailStopNumATR(1.80);
input:S_Length1(8),S_Length2(30),S_ATRLength(12),S_TrailStopNumATR(4),lots(1);
HiBand1:=ref(hhv(h,B_Length1),1);
LoBand2:=llv(l,B_Length2);
LoBand1:=ref(llv(l,S_Length1),1);
HiBand2:=hhv(h,S_Length2);
B_atr:=B_TrailStopNumATR*ma(tr,B_ATRLength);
S_atr:=S_TrailStopNumATR*ma(tr,S_ATRLength);
if islastbar and dynainfo(207)<opentime(1) then exit;//过滤集合竞价
if holding>0 and l<zs then begin
 sell(1,1,limitr,min(o,zs));
 goto skip@;//平仓当根不开空，看你TB模型的意思
end
if holding<0 and h>zs then begin
 sellshort(1,1,limitr,max(o,zs));
 goto skip@;//平仓当根不开多，看你TB模型的意思
end
if holding=0 and h>HiBand1 then begin
 buy(1,1,limitr,max(o,HiBand1));
 hl:=h;
end
if holding=0 and l<LoBand1 then begin
 buyshort(1,1,limitr,min(o,LoBand1));
 hl:=l;
end
skip@;
if holding>0 and h>=hl then begin
 hl:=h;
 zs:=max(hl-B_TrailStopNumATR*B_atr,LoBand2);
end
if holding<0 and l<=hl then begin
 hl:=l;
 zs:=min(hl+S_TrailStopNumATR*S_atr,HiBand2);
end

TB模型里，突破开多以开盘瞬间或者颈线为开仓价，沿用此写法。但提出一下，实盘时这个价格基本难以成交

至少要加一个滑点测试吧。比如：突破3000，条件成立瞬间价格至少是3000.2（股指），以3000进行测试，有点“欺人”味道吧

1，没有关系

2，在第一根K线图可能发信号的模型里，需要过滤