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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 请老师帮忙编一个交易例子

   

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


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

主题:请老师帮忙编一个交易例子

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


加好友 发短信
等级:新手上路 帖子:10 积分:0 威望:0 精华:0 注册:2018/2/25 10:44:41
请老师帮忙编一个交易例子  发帖心情 Post By:2018/2/25 10:50:35    Post IP:223.113.3.109[只看该作者]

新手报到,请老师帮忙编一个交易例子

 

开多:
上穿MA20,同时上穿MA60为开仓信号,这根对应k线定义为K1,下根K线开盘价开多;
止损一,开仓前一根K线(即K1的)的最低价作止损,
止损二,如果最新价减开仓价的值大于K1的实体长度1.5倍,把新的止损设置为开仓价。
止损三,如果最新价减开仓价的值大于K1的实体长度3倍,把新的止损设置为开仓价+K1的实体长度1.5倍的值。以后最新价每次达到K1的实体长度1.5倍时,按同样条件的值加到上次止损价上作为新止损。
止损四,收盘价小于MA60时,平仓

 

资金使用20%。

开空:
反之。

 

谢谢

 


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


加好友 发短信
等级:管理员 帖子:26631 积分:0 威望:0 精华:7 注册:2015/4/9 14:59:07
  发帖心情 Post By:2018/2/25 19:58:16    Post IP:101.224.59.231[只看该作者]

VARIABLE:aa=0,flag=0;
ma20:ma(c,20);
ma60:ma(c,60);
cond:CROSS(c,ma20) and CROSS(c,ma60);
ref_open:=VALUEWHEN(cond=1,open);
ref_close:=VALUEWHEN(cond=1,close);
if (CROSS(c,ma20) and CROSS(c,ma60))=1 and holding=0 then BEGIN
 buy(1,20%,LIMIT,open),IGNORECHECKPRICE;
 aa:=low;
 
end
if (holding>0 and  c< aa ) or c<ma60 then begin
 sell(1,0,MARKET);
 aa:=0;
end
if holding>0 and  c-ENTERPRICE>ABS    (ref_open-ref_close)*1.5  then  BEGIN
 aa:=ENTERPRICE;
end
if holding>0 and  c-ENTERPRICE>ABS(ref_open-ref_close)*3 then  BEGIN
 aa:=ENTERPRICE+c-ENTERPRICE>ABS(ref_open-ref_close)*1.5;
end

以后最新价每次达到K1的实体长度1.5倍时,按同样条件的值加到上次止损价上作为新止损。
这段话实现不了,没有任何意义,因为存在多根连续大于其实体的k线,这样貌似永远不会触发止损动作。
另外,由于您是新用户,建议您循序渐进先熟悉软件,逐步接触编程。
[此贴子已经被作者于2018/2/25 20:03:05编辑过]


编程无捷径,技巧靠积累。
 回到顶部
帅哥哟,离线,有人找我吗?
PBTCA
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:10 积分:0 威望:0 精华:0 注册:2018/2/25 10:44:41
  发帖心情 Post By:2018/3/5 13:28:55    Post IP:49.80.157.125[只看该作者]

谢谢老师!

 

下面是我以前用的三线反转图,转到金字塔中后出现问题,说是使用了循环语句,请帮我改正,另外,请加上开平仓语句。

 

 

VARIABLE:
fc:=close,fh:=h,fl:=l,fcolor:=0,ft1:=0,fb1:=0,fi:=0,t[4]=0,b[4]=0,pt=1,pb=1;
if datacount<2 then exit;
for i=1 to 4 do begin t[i]:=i;b[i]:=1; end; for i=2 to datacount do begin
    if fc[i]>fc[t[pt]] then begin        
        fh[i]:=fc[i];fl[i]:=fc[t[1]];fcolor[i]:=1;         b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=t[1];         t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=i;         pt:=1;

        pb:=if(pb=3,3,pb+1);     end;
    else if fc[i]<fc[b[pb]] then begin
        fh[i]:=fc[b[1]];fl[i]:=fc[i];fcolor[i]:=-1;         t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=b[1];         b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=i;         pb:=1;
        pt:=if(pt=3,3,pt+1);             end;
    else if fc[i]<=fc[t[pt]] and fc[i]>=fc[b[pb]] then begin
        fh[i]:=fh[i-1];fl[i]:=fl[i-1]; fcolor[i]:=fcolor[i-1];            end;
    ft1[i]:=t[1];fb1[i]:=b[1];fi[i]:=i; end;
STICKLINE(fcolor=1,fh,fl,10,0) colorred; STICKLINE(fcolor=-1,fh,fl,10,0) colorgreen;


谢谢!


 回到顶部