请问这个编写模版还能用吗？

金子阳光

19
“后台下单模板”，可用于各种模型。不会写后台模型的塔友，以后不用写了，复制此模板即OK  发帖心情 Post By：2011/11/24 9:50:42 [只看该作者]

为了支持金字塔全速发展，切实解决塔友实际困难
响应金字塔号召
特公布此模板

只要把此模板放在 模型的最后面，就可以后台全自动化交易了。
有个性化需求的，也可在此模板上的基础上定制。

runmode:0;
Globalvariable:hold=drawnull;
……//这里添加上你自己的模型
……//这里添加上你自己的模型
cc800988:=holding;//这句放在信号稳定的地方
drawtextex(1,1,800,0,'虚拟持仓为：'+numtostr(cc800988,0));//在图表上输入虚拟持仓以便监控
if not(islastbar) or workmode<>1 then exit;
xiadan800988:=cc800988-hold;
if xiadan800988>0.5 then begin
cang:=min(xiadan800988,abs(hold));
if hold<0 then begin
  tsellshort(1,cang,mkt,0,0,'800988'),allowrepeat;
  debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 平空 %.0f',cang);
end
cang:=xiadan800988+min(hold,0);
if cang>0 then begin
  tbuy(1,cang,mkt,0,0,'800988'),allowrepeat;
  debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 开多 %.0f',cang);
end
end
if xiadan800988<-0.5 then begin
cang:=min(abs(xiadan800988),abs(hold));
if hold>0 then begin
  tsell(1,cang,mkt,0,0,'800988'),allowrepeat;
  debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 平多 %.0f',cang);
end
cang:=abs(xiadan800988)-max(hold,0);
if cang>0 then begin
  tbuyshort(1,cang,mkt,0,0,'800988'),allowrepeat;
  debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 开空 %.0f',cang);
end
end
hold:=cc800988;

金子阳光

实例二、即时下单模型（固定时间间隔） Globalvariable:hold=drawnull; //蓝色部分改为你自己的模型 buycond:=h>ref(hhv(h,10),1); sellcond:=l<ref(llv(l,10),1); if holding>0 and sellcond then sell(1,1,market); if holding<0 and buycond then sellshort(1,1,market); if holding=0 and buycond then buy(1,1,market); if holding=0 and sellcond then buyshort(1,1,market); cc800988:=holding;//这句放在信号稳定的地方  drawtextex(1,1,800,0,'虚拟持仓为：'+numtostr(cc800988,0));//在图表上输入虚拟持仓以便监控 if not(islastbar) or workmode<>1 then exit; xiadan800988:=cc800988-hold; if xiadan800988>0.5 then begin  cang:=min(xiadan800988,abs(hold));  if hold<0 then begin   tsellshort(1,cang,mkt,0,0,'800988'),allowrepeat;   debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 平空 %.0f',cang);  end  cang:=xiadan800988+min(hold,0);  if cang>0 then begin   tbuy(1,cang,mkt,0,0,'800988'),allowrepeat;   debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 开多 %.0f',cang);  end end if xiadan800988<-0.5 then begin  cang:=min(abs(xiadan800988),abs(hold));  if hold>0 then begin   tsell(1,cang,mkt,0,0,'800988'),allowrepeat;   debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 平多 %.0f',cang);  end  cang:=abs(xiadan800988)-max(hold,0);  if cang>0 then begin   tbuyshort(1,cang,mkt,0,0,'800988'),allowrepeat;   debugfile('D:\800988.txt',numtostr(hold,0)+' '+numtostr(cc800988,0)+' 开空 %.0f',cang);  end end hold:=cc800988;

技术009

用是能用，但是大部分范例代码都是给客户提供思路参考的，用户需要能理解这段代码的思路。也需要有一定改写能力，否则硬套过去用肯定存在很多问题的。