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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 凌乱了走完K线

   

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


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

主题:凌乱了走完K线

帅哥哟,离线,有人找我吗?
李亚弟
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:198 积分:745 威望:0 精华:0 注册:2013/1/15 22:12:44
凌乱了走完K线  发帖心情 Post By:2013/5/29 14:34:52    Post IP:116.231.107.107[显示全部帖子]

要执行debugfile须得 holding<0,可是当hold=0时,竟然也debugfile。怎么是这样子
图片点击可在新窗口打开查看此主题相关图片如下:仅刷最后一个k.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看此主题相关图片如下:平空.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:连续平空信息.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:走完k线.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
李亚弟
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:198 积分:745 威望:0 精华:0 注册:2013/1/15 22:12:44
  发帖心情 Post By:2013/5/29 14:46:09    Post IP:117.25.183.62[显示全部帖子]

//05  测试交易控制符
runmode:0;
variable:cc=0,zs=0,zy=0,daywindot=0,kcj=0;
exittime:=time>=145400; 
closetime1:=time>=150500;

{ 信号输出需要添加的代码 --- BEGIN }
{ 变量(writeFileFlag + 3) --- 3是代表策略编号,不同策略编号唯一;
  writeFileFlag3 指的是开仓方向: 1-开多 2-平多  3-开空 4-平空  }
globalvariable:writeFileFlag3=0,longFlag=0,shortFlag=0,initFlag=0;

if ISLASTBAR and initFlag = 0 then BEGIN
if holding > 0 then begin longFlag := 1; end
if holding < 0 then begin shortFlag := 1; end
initFlag := 1;
end
{ 信号输出需要添加的代码 --- END }

A:MA(C,M);
B:MA(C,N);
bb:=REF(C,1)>REF(B,1);{bb - 开多条件}
pd:=REF(C,1)<REF(A,1);{pd - 平多条件}
ss:=REF(C,1)<REF(A,1);{ss - 开空条件}
pk:=REF(C,1)>REF(B,1);{pk - 平空条件}

if cc>0 and pd then begin cc:=0; end //平多单 drawtext(1,o,'2',colorred,4);
if cc<0 and pk then begin cc:=0; end  //平空单


//平空
if holding<0 and cc>=0 then begin 
sellshort(1,1,market); 
debugfile('d:\jzt\sinnal14.txt','运行了1次平空,holding是%.2f',holding);
pcj:=o;
//drawtext(1,o,'4',colorgreen,4);
if islastbar && writeFileFlag3 <> 4 && shortFlag = 1 then begin
shortFlag := 0;
writeFileFlag3 := 4;
debugfile2('D:\jzt\signal3.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ','+ '%.2f', pcj,0);
debugfile2('D:\jzt\signal3copy.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ','+ '%.2f', pcj,0);
end 
end 


//开空单
if cc=0 and ss then begin
cc:=-1;
zs:=c+c*30/10000;//空单止损条件
zy:=c-c*30*100/10000;//多单止盈条件
end

if exittime then begin
cc:=0;
end 


 
//开空单
if holding=0 and cc<0 then  begin 
    buyshort(1,1,market); 
    debugfile('d:\jzt\sinnal14.txt','运行了1次开空,holding是%.2f',holding);
    kcj:=open;
    //drawtext(1,o,'3',colorgreen,4);
    if islastbar && writeFileFlag3 <> 3 && shortFlag = 0 then begin
shortFlag := 1;
writeFileFlag3 := 3;
debugfile2('D:\jzt\signal3.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ',' + '%.2f', kcj,0);
debugfile2('D:\jzt\signal3copy.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ',' + '%.2f', kcj,0);
end 
end

if closetime1 then begin  cc:=0;  end  




 回到顶部
帅哥哟,离线,有人找我吗?
李亚弟
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:198 积分:745 威望:0 精华:0 注册:2013/1/15 22:12:44
  发帖心情 Post By:2013/5/29 15:06:13    Post IP:117.25.183.62[显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:仅刷最后一个k.png
图片点击可在新窗口打开查看
这个不是可以替代islastbar吗?

 回到顶部
帅哥哟,离线,有人找我吗?
李亚弟
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:198 积分:745 威望:0 精华:0 注册:2013/1/15 22:12:44
  发帖心情 Post By:2013/5/29 15:14:06    Post IP:117.25.183.62[显示全部帖子]

只要有行情过来公式是一直在刷新 ”,这个是以前我不懂的。但是刷新归刷新,难道连 if 不能满足的语句都会被执行吗?

 回到顶部
帅哥哟,离线,有人找我吗?
李亚弟
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:198 积分:745 威望:0 精华:0 注册:2013/1/15 22:12:44
  发帖心情 Post By:2013/5/30 10:26:59    Post IP:117.25.183.62[显示全部帖子]

没有下文了吗?

 回到顶部
帅哥哟,离线,有人找我吗?
李亚弟
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:198 积分:745 威望:0 精华:0 注册:2013/1/15 22:12:44
完整代码  发帖心情 Post By:2013/5/30 13:31:05    Post IP:117.25.183.62[显示全部帖子]

//05  测试交易控制符
runmode:0;
variable:cc=0,zs=0,zy=0,daywindot=0,kcj=0;
exittime:=time>=145400; 
closetime1:=time>=150500;

{ 信号输出需要添加的代码 --- BEGIN }
{ 变量(writeFileFlag + 3) --- 3是代表策略编号,不同策略编号唯一;
  writeFileFlag3 指的是开仓方向: 1-开多 2-平多  3-开空 4-平空  }
globalvariable:writeFileFlag3=0,longFlag=0,shortFlag=0,initFlag=0;

if ISLASTBAR and initFlag = 0 then BEGIN
if holding > 0 then begin longFlag := 1; end
if holding < 0 then begin shortFlag := 1; end
initFlag := 1;
end
{ 信号输出需要添加的代码 --- END }

A:MA(C,M);
B:MA(C,N);
bb:=REF(C,1)>REF(B,1);{bb - 开多条件}
pd:=REF(C,1)<REF(A,1);{pd - 平多条件}
ss:=REF(C,1)<REF(A,1);{ss - 开空条件}
pk:=REF(C,1)>REF(B,1);{pk - 平空条件}

if cc>0 and pd then begin cc:=0; end //平多单 drawtext(1,o,'2',colorred,4);
if cc<0 and pk then begin cc:=0; end  //平空单


//平空
if holding<0 and cc>=0 then begin 
sellshort(1,1,market); 
debugfile('d:\jzt\sinnal14.txt','运行了1次平空,holding是%.2f',holding);
pcj:=o;
//drawtext(1,o,'4',colorgreen,4);
if islastbar && writeFileFlag3 <> 4 && shortFlag = 1 then begin
shortFlag := 0;
writeFileFlag3 := 4;
debugfile2('D:\jzt\signal3.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ','+ '%.2f', pcj,0);
debugfile2('D:\jzt\signal3copy.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ','+ '%.2f', pcj,0);
end 
end 


//开空单
if cc=0 and ss then begin
cc:=-1;
zs:=c+c*30/10000;//空单止损条件
zy:=c-c*30*100/10000;//多单止盈条件
end

if exittime then begin
cc:=0;
end 


 
//开空单
if holding=0 and cc<0 then  begin 
    buyshort(1,1,market); 
    debugfile('d:\jzt\sinnal14.txt','运行了1次开空,holding是%.2f',holding);
    kcj:=open;
    //drawtext(1,o,'3',colorgreen,4);
    if islastbar && writeFileFlag3 <> 3 && shortFlag = 0 then begin
shortFlag := 1;
writeFileFlag3 := 3;
debugfile2('D:\jzt\signal3.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ',' + '%.2f', kcj,0);
debugfile2('D:\jzt\signal3copy.txt', numtostr(date+19000000,0) + ',' + numtostr(time,3) + ',' +  numtostr(writeFileFlag3,0) + ',' + '%.2f', kcj,0);
end 
end

if closetime1 then begin  cc:=0;  end  

 回到顶部
帅哥哟,离线,有人找我吗?
李亚弟
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:198 积分:745 威望:0 精华:0 注册:2013/1/15 22:12:44
添加了islastbar 还是那样  发帖心情 Post By:2013/5/30 14:35:46    Post IP:117.25.183.62[显示全部帖子]

添加了islastbar还
图片点击可在新窗口打开查看此主题相关图片如下:islastbar.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:islastbar持续输出.png
图片点击可在新窗口打开查看
是会持续输出debugfile
[此贴子已经被作者于2013-5-30 14:36:27编辑过]

 回到顶部