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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 帮我把以下的图表交易程序改成后台交易程序

   

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


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

主题:帮我把以下的图表交易程序改成后台交易程序

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


加好友 发短信
等级:论坛游民 帖子:306 积分:0 威望:0 精华:0 注册:2014/1/9 15:46:26
帮我把以下的图表交易程序改成后台交易程序  发帖心情 Post By:2014/2/28 9:45:45    Post IP:220.191.231.218[显示全部帖子]

帮我把以下的图表交易程序改成后台交易程序,是只改个交易命令还是还要改其他的?我的程序如下:

 

INPUT:N(1,1,100,1),NMIN(10,1,100,1),SS(1,1,10000,1),x(20,10,100,1),q(10,1,50,1),ks(500,100,3000,100);
VARIABLE:趋买势:=0,k1:=0.7,k2:=0.7,y=:0;

M:=NUMTOSTR(N,0);
p:=NUMTOSTR(q,0);
S:=TODAYBAR;
HH:=HHV(H,S);//当日最高价
LL:=LLV(L,S);//当日最低价
OO:=STKINDI('','MAO.MAO1(1)',0,6,0);//当日开盘价
昨收:=stkindi('','MAO.MAO2(1)',0,6,-1);
昨昨收:=stkindi('','MAO.MAO2(1)',0,6,-2);//昨天的前一天的收盘价,暂称为昨昨收


昨高:=STKINDI('','MAO.hh('&M&')',0,6,-1);
昨低:=STKINDI('','MAO.ll('&M&')',0,6,-1);
高收:=STKINDI('','MAO.hc('&M&')',0,6,-1);
低收:=STKINDI('','MAO.lc('&M&')',0,6,-1);
关键点:=(stkindi('','MAO.MAO2(1)',0,6,-1)-stkindi('','MAO.MAO2(1)',0,6,-q))/(stkindi('','MAO.hh(&q&)',0,6,-1)-stkindi('','MAO.ll(&q&)',0,6,-1))*100;


浮动区间:=MAX(昨高-低收,高收-昨低);//RANGE


if 昨收>昨昨收 then begin
    if 关键点<x then begin
      k1:=0.35;
      k2:=0.7;
    end
    if 关键点>=x then BEGIN
      k1:=0.7;
      k2:=0.35;
    end
end

if 昨收<=昨昨收 then begin
   if 关键点<x then begin
   k1:=0.7;
   k2:=0.35;
   end
   if 关键点>=x then BEGIN
   k1:=0.35;
   k2:=0.7;
   end
end


上轨:OO+K1*浮动区间;
下轨:OO-K2*浮动区间;
今日开盘:oo;
T1:=TIME>OPENTIME(1) AND TIME<CLOSETIME(0)-NMIN*100;
T2:=TIME>=CLOSETIME(0)-NMIN*100;
手数:=SS;
a1:=ref(asset,todaybar);
if a1-asset>ks then y:=1;


//交易条件
开多条件:=C>上轨 AND (HOLDING=0 or holding<0) and y=0;
开空条件:=C<下轨 AND (HOLDING=0 or holding>0) and y=0;
平空条件:=C>上轨 AND HOLDING<0;
平多条件:=C<下轨 AND HOLDING>0;

 


//交易系统
平空:sellshort(平空条件 and t1,手数,market);
开多:BUY(开多条件 AND T1,手数,MARKET);
平多:sell(平多条件 and t1,手数,market);
开空:BUYSHORT(开空条件 AND T1,手数,MARKET);

//亏损1000元自动止损可以写成这样
if asset-a1<=-ks then begin
   sell(1,0,market);
   sellshort(1,0,market);
end


收盘平多:SELL(T2,手数,MARKET);
收盘平空:SELLSHORT(T2,手数,MARKET);

ak1:k1,LINETHICK0;
ak2:k2,LINETHICK0;

if time=closetime(0) then y:=0;

 


//最后每天收盘时重置全局变量
亏损:a1,LINETHICK0;
总亏损:a1-asset,LINETHICK0;
浮动盈亏:OPENPROFIT,LINETHICK0;
当前持仓:HOLDING,COLORGRAY,LINETHICK0;
当前资产:ASSET,NOAXIS,COLORGRAY;//输出当前资产,但不影响坐标最高最低值


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


加好友 发短信
等级:论坛游民 帖子:306 积分:0 威望:0 精华:0 注册:2014/1/9 15:46:26
  发帖心情 Post By:2014/2/28 10:15:40    Post IP:220.191.231.218[显示全部帖子]


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


加好友 发短信
等级:论坛游民 帖子:306 积分:0 威望:0 精华:0 注册:2014/1/9 15:46:26
  发帖心情 Post By:2014/3/3 9:26:06    Post IP:220.191.231.218[显示全部帖子]

那么怎么实现日亏损1000元平仓不再开仓?整条语句帮我改成后台运行的行吗?就用rb1405的吧。


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


加好友 发短信
等级:论坛游民 帖子:306 积分:0 威望:0 精华:0 注册:2014/1/9 15:46:26
  发帖心情 Post By:2014/3/3 10:28:13    Post IP:220.191.231.218[显示全部帖子]


 回到顶部