欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 图表改后台 回测没有数据

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有2543人关注过本帖树形打印复制链接

主题：图表改后台 回测没有数据
帅哥哟，离线，有人找我吗？
f三年
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：38 积分：0 威望：0 精华：0 注册：2018/10/23 11:12:13 		图表改后台 回测没有数据  发帖心情 Post By：2019/1/13 15:06:02    Post IP：180.169.30.6[只看该作者]



图表改后台程序   回测没有数据 请教老师哪边改错了

图表程序：
INPUT: SETUPLEN(120,1,500,1),ATRPCNT(2.5,0.1,10,0.1),Fund(20000,1,200000,1),TRS(150,1,1000,1);
VARIABLE:LSETUP:=0,SSETUP:=0,LEPRICE:=0,SEPRICE:=0;

Lots:=MAX(1,INTPART(Fund/(O*MULTIPLIER*0.1)));
bartoday:=date<>REF(date,1);
MA360:=MA(REF(C,1),360);
MOMVALUE:=C-REF(C,SETUPLEN);
CD:=REF(C,1);

If bartoday Then Begin
AVGLENG:=1;
end;
If bartoday=False Then Begin
AVGLENG:=AVGLENG+1;
AVGLENG:=max(AVGLENG,SETUPLEN);
end;

VWM:=EMA(VOL*MOMVALUE,AVGLENG);//????????VWM

IF HIGH>REF(C,1) Then begin

TRUEHIGH1:=HIGH;
end;
IF HIGH<=REF(C,1) Then begin
TRUEHIGH1:=CD; 
end;

IF LOW<=REF(C,1) Then begin
TRUELOW1:=LOW;
end;
IF LOW>REF(C,1) Then begin
TRUELOW1:=CD;
end;

IF BarStatus=2 Then begin
TRUERANGE1:=H-L;
end;
IF BarStatus<>2 Then begin
TRUERANGE1:=TRUEHIGH1-TRUELOW1;
end;

AATR:=MA(TRUERANGE1,AVGLENG);//?????    
BULLSETUP:=CROSS(VWM,0) ;//UWM?????????
BEARSETUP:=CROSS(0,VWM);//UWM?????????

If BARPOS=1 or REF(BULLSETUP,1) Then begin
LSETUP:=0;
end;
If NOT(BARPOS=1 or REF(BULLSETUP,1)) Then begin
LSETUP:=LSETUP+1;
end;
If BULLSETUP Then begin
LEPRICE:=H;
end;

If BARPOS=1 or REF(BEARSETUP,1) Then begin 
SSETUP:=0;
end;
If NOT(BARPOS=1 or  REF(BEARSETUP,1)) Then begin 
SSETUP:=SSETUP+1;
end;
If BEARSETUP then begin
SEPRICE:=L;
end;




If BARPOS>AVGLENG and REF(LEPRICE,1)>0 and  REF(C,1)>=REF(LEPRICE,1)+(ATRPCNT*REF(AATR,1)) and REF(LSETUP,1)<=SETUPLEN and REF(LSETUP,1)>=1 and  REF(C,1)>MA360 and HOLDING <=0 Then begin 
平空:SellSHORT(1,0,MARKETR);
开多:Buy(1,Lots,MARKETR);
LowerAfterEntry:=ENTERPRICE; 
end;

if BARPOS>AVGLENG and REF(SEPRICE,1)>0 and  REF(C,1)<=REF(SEPRICE,1)-(ATRPCNT*REF(AATR,1)) and REF(SSETUP,1)<=SETUPLEN and REF(SSETUP,1)>=1 and  REF(C,1)<MA360 and HOLDING >=0 Then begin

平多:Sell(1,0,MARKETR);
开空:BUYSHORT(1,Lots,MARKETR); 
HigherAfterEntry:=ENTERPRICE;
end;

//------------------------------------------------------------------------------------------------
//记录入场后的最高价和最低价
//------------------------------------------------------------------------------------------------

LowerAfterEntryss:= REF(LowerAfterEntry,1);
HigherAfterEntryss:=REF(HigherAfterEntry,1);
Closelp:=REF(Close,1);
If HOLDING >0 and  ENTERBARS = 0 Then BEGIN
LowerAfterEntry:=Max(LowerAfterEntry,Low);
HigherAfterEntry:=HigherAfterEntryss;
end
if HOLDING <0 and  ENTERBARS = 0 Then BEGIN
HigherAfterEntry:= Min(HigherAfterEntry,HIGH);
LowerAfterEntry:=LowerAfterEntryss;
end
if HOLDING <> 0 and ENTERBARS >= 1 Then BEGIN

LowerAfterEntry:= Max(LowerAfterEntryss,Low);
HigherAfterEntry:= Min(HigherAfterEntryss,HIGH);
End
//------------------------------------------------------------------------------------------------
//跟踪止损
//------------------------------------------------------------------------------------------------
MyPrice2:=LowerAfterEntry - Open*TRS/1000;
If HOLDING>0 And Low <= Myprice2 and  ENTERBARS > 0 Then BEGIN
多损:sell(1,HOLDING,MARKETR);
End

Myprice3:=HigherAfterEntry + Open*TRS/1000;
If HOLDING<0 And High >= Myprice3 and ENTERBARS > 0 THEN BEGIN//空头跟踪止损

空损:SellSHORT(1,HOLDING,MARKETR);

End



后台程序

 INPUT: SETUPLEN(120,1,500,1),ATRPCNT(2.5,0.1,10,0.1),Fund(20000,1,200000,1),TRS(150,1,1000,1);
GLOBALVARIABLE:LSETUP:=0,SSETUP:=0,LEPRICE:=0,SEPRICE:=0;

Lots:=MAX(1,INTPART(Fund/(O*MULTIPLIER*0.1)));
bartoday:=date<>REF(date,1);
MA360:=MA(REF(C,1),360);//后台上用了这么大的均线周期，必须有充足的数据量，后台设置的数据量也必须满足这个。
MOMVALUE:=C-REF(C,SETUPLEN);
CD:=REF(C,1);

If bartoday Then Begin
AvGLENG:=1;
end;
If bartoday=False Then Begin
AvGLENG:=AvGLENG+1;
AvGLENG:=max(AvGLENG,SETUPLEN);
end;

VWM:=EMA(VOL*MOMVALUE,AvGLENG);
TRUERANGE1:=H-L;
AATR:=MA(TRUERANGE1,AvGLENG);  
BULLSETUP:=CROSS(VWM,0) ;
BEARSETUP:=CROSS(0,VWM);

If REF(BULLSETUP,1) Then begin
LSETUP:=0;
end;
If NOT(REF(BULLSETUP,1)) Then begin
LSETUP:=LSETUP+1;
end;
If BULLSETUP Then begin
LEPRICE:=H;
end;

If REF(BEARSETUP,1) Then begin 
SSETUP:=0;
end;
If NOT(REF(BEARSETUP,1)) Then begin 
SSETUP:=SSETUP+1;
end;
If BEARSETUP then begin
SEPRICE:=L;
end;

If BARPOS>AvGLENG and REF(LEPRICE,1)>0 and  REF(C,1)>=REF(LEPRICE,1)+(ATRPCNT*REF(AATR,1)) and REF(LSETUP,1)<=SETUPLEN and REF(LSETUP,1)>=1 and  REF(C,1)>MA360 and tsellHOLDING(1) <=0 Then begin 

平空:tSellSHORT(1,0,mkt);
开多:tBuy(1,Lots,mkt);
LowerAfterEntry:=tENTERPRICE; 
end;

if BARPOS>AvGLENG and REF(SEPRICE,1)>0 and  REF(C,1)<=REF(SEPRICE,1)-(ATRPCNT*REF(AATR,1)) and REF(SSETUP,1)<=SETUPLEN and REF(SSETUP,1)>=1 and  REF(C,1)<MA360 and tbuyHOLDING(1) >=0 Then begin

平多:tSell(1,0,mkt);
开空:tBUYSHORT(1,Lots,mkt); 
HigherAfterEntry:=tENTERPRICE;
end;


 //------------------------------------------------------------------------------------------------
//记录入场后的最高价和最低价
//------------------------------------------------------------------------------------------------

LowerAfterEntryss:= REF(LowerAfterEntry,1);
HigherAfterEntryss:=REF(HigherAfterEntry,1);
Closelp:=REF(Close,1);
If tbuyHOLDING(1) >0 and  tENTERBARS = 0 Then BEGIN

LowerAfterEntry:=Max(LowerAfterEntry,Low);
HigherAfterEntry:=HigherAfterEntryss;
end
if tsellHOLDING(1) <0 and  tENTERBARS = 0 Then BEGIN

HigherAfterEntry:= Min(HigherAfterEntry,HIGH);
LowerAfterEntry:=LowerAfterEntryss;
end
if tHOLDING2 <> 0 and tENTERBARS >= 1 Then BEGIN
LowerAfterEntry:= Max(LowerAfterEntryss,Low);
HigherAfterEntry:= Min(HigherAfterEntryss,HIGH);
End
//------------------------------------------------------------------------------------------------
//跟踪止损
//------------------------------------------------------------------------------------------------
MyPrice2:=LowerAfterEntry - Open*TRS/1000;
If tbuyHOLDING(1)>0 And Low <= Myprice2 and  tENTERBARS > 0 Then BEGIN
多损:tsell(1,TSELLHOLDINGEX('','',1),mkt);
End

Myprice3:=HigherAfterEntry + Open*TRS/1000;
If tsellHOLDING(1)<0 And High >= Myprice3 and tENTERBARS > 0 THEN BEGIN//空头跟踪止损
空损:tSellSHORT(1,TSELLHOLDINGEX('','',1),mkt);
End

图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20190113145607.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：14496 积分：0 威望：0 精华：0 注册：2017/7/4 13:40:18 		  发帖心情 Post By：2019/1/14 8:56:18    Post IP：180.169.30.6[只看该作者]

 建议先加载在图表上进行调试，如果图表上能调试出来信号，回测才能有信号。


命数如织，当如磐石。
 回到顶部
帅哥哟，离线，有人找我吗？
f三年
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：38 积分：0 威望：0 精华：0 注册：2018/10/23 11:12:13 		  发帖心情 Post By：2019/1/14 9:14:00    Post IP：119.233.223.162[只看该作者]

这张附件就是图表测试结果    图表测试都是好的    后台就是没有数据出来  请教老师  检测下哪边出问题了  谢谢

 回到顶部
帅哥哟，离线，有人找我吗？
yukizzc
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：21598 积分：0 威望：0 精华：1 注册：2010/7/31 16:35:30 		  发帖心情 Post By：2019/1/14 9:20:13    Post IP：180.169.30.6[只看该作者]

交易-后台程序化交易

精细化回测

 

后台的策略需要在这边进行回测
 回到顶部
帅哥哟，离线，有人找我吗？
f三年
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：38 积分：0 威望：0 精华：0 注册：2018/10/23 11:12:13 		  发帖心情 Post By：2019/1/14 9:33:30    Post IP：119.233.223.162[只看该作者]

是的    我的操作都没有错哦  老师  您哪边可以把程序进去试试   有数据吗  

 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：14496 积分：0 威望：0 精华：0 注册：2017/7/4 13:40:18 		  发帖心情 Post By：2019/1/14 9:53:20    Post IP：180.169.30.6[只看该作者]

 1.你这个后台代码不能在日线上，代码里面有限制。换成小周期。
 2. 你回测时候要有足够数据

命数如织，当如磐石。
 回到顶部
帅哥哟，离线，有人找我吗？
f三年
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：38 积分：0 威望：0 精华：0 注册：2018/10/23 11:12:13 		  发帖心情 Post By：2019/1/14 9:58:18    Post IP：119.233.223.162[只看该作者]

我是测试15分钟线的   2018/1/1-2018/12/31   补充了5分钟线的  测试的是指数 

 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：14496 积分：0 威望：0 精华：0 注册：2017/7/4 13:40:18 		  发帖心情 Post By：2019/1/14 10:09:51    Post IP：180.169.30.6[只看该作者]

 截图看下你后台的设置。以及回测的设置。


命数如织，当如磐石。
 回到顶部
帅哥哟，离线，有人找我吗？
f三年
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：38 积分：0 威望：0 精华：0 注册：2018/10/23 11:12:13 		  发帖心情 Post By：2019/1/14 10:10:40    Post IP：119.233.223.162[只看该作者]

15分钟线  

 回到顶部
帅哥哟，离线，有人找我吗？
f三年
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：38 积分：0 威望：0 精华：0 注册：2018/10/23 11:12:13 		  发帖心情 Post By：2019/1/14 10:13:14    Post IP：119.233.223.162[只看该作者]

后台回测设置

 回到顶部
总数 12 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.44141 秒, 6 次数据查询