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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 请老师帮改一个文华的模型 我想在金字塔上使用

   

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


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

主题:请老师帮改一个文华的模型 我想在金字塔上使用

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


加好友 发短信
等级:新手上路 帖子:13 积分:0 威望:0 精华:0 注册:2017/6/2 16:37:49
请老师帮改一个文华的模型 我想在金字塔上使用  发帖心情 Post By:2017/6/20 22:26:35    Post IP:180.127.176.108[只看该作者]

VAR1:=EMA(CLOSE,15);
VAR2:=EMA(CLOSE,60);
红多:(CLOSE-VAR1)*2/(15+1)+VAR1,LINETHICK3, COLORRED;
VAR3:=(CLOSE-VAR2)*2/(60+1)+VAR2;
蓝空:IF(红多>VAR3,VAR3,红多),LINETHICK3, COLORBLUE;
生命线:VAR3,LINETHICK3, COLORYELLOW;
STICKLINE1(红多>VAR3,红多,VAR3,0,0),COLORRED;
STICKLINE1(红多<VAR3,红多,VAR3,0,0),COLORGREEN;
DRAWICON(FILTER(CROSS(红多,VAR3),30),红多,6);
DRAWICON(FILTER(CROSS(VAR3,红多),30),红多,5);
SW1:=(EMA(CLOSE,5)*7+EMA(CLOSE, 10)*3)/10;
PARTLINE(SW1>VAR3,SW1,COLORRED),LINETHICK2;
PARTLINE(SW1<VAR3,SW1,COLORWHITE),LINETHICK2;
DRAWTEXT(CROSS(SW1,VAR3),VAR3,'多'),COLORYELLOW;
DRAWTEXT(CROSS(VAR3,SW1),VAR3,'空'),COLORGREEN;
CROSS(SW1,VAR3),SOUND('A');
CROSS(VAR3,SW1),SOUND('B');
DRAWKLINE(8/10,COLORRED,1,COLORCYAN,0);

DC:=VALUEWHEN( CROSS(SW1,VAR3),C);
KC:=VALUEWHEN( CROSS(VAR3,SW1),C);

DN:=BARSLAST(CROSS(SW1,VAR3))+1;
KN:=BARSLAST(CROSS(VAR3,SW1))+1;

DD:=BARSLAST(CROSS( 红多,VAR3));
KK:=BARSLAST(CROSSDOWN( 红多,VAR3));


BKVOL=0&& CROSS( C,DC+20*MINPRICE)  &&DN<KN&& COUNTSIG(BK,DD)<1,BK;
BKVOL>0&&C>=BKPRICE+20*MINPRICE,SP;
BKVOL<0&&C>=BKPRICE-20*MINPRICE,SP;
BKVOL>0&&CROSS(VAR3,SW1),SP;


SKVOL=0&& CROSS(KC-20*MINPRICE ,C)  &&KN<DN&& COUNTSIG(SK,KK)<1,SK;
SKVOL>0&&C<=SKPRICE-20*MINPRICE,BP;
SKVOL>0&&C>=SKPRICE+20*MINPRICE,BP;

SKVOL>0&&CROSS(SW1,VAR3),BP;

MULTSIG(0,0,1,0);


AUTOFILTER;

 回到顶部
美女呀,离线,留言给我吧!
pyd
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:8439 积分:0 威望:0 精华:0 注册:2014/7/14 13:43:36
  发帖心情 Post By:2017/6/21 9:01:54    Post IP:180.169.30.6[只看该作者]

改写中请稍等

 回到顶部
美女呀,离线,留言给我吧!
pyd
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:8439 积分:0 威望:0 精华:0 注册:2014/7/14 13:43:36
  发帖心情 Post By:2017/6/21 9:04:40    Post IP:180.169.30.6[只看该作者]

解释下这两个函数

SOUND('A');

MULTSIG(0,0,1,0);


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


加好友 发短信
等级:超级版主 帖子:18691 积分:0 威望:0 精华:0 注册:2013/7/15 9:22:16
  发帖心情 Post By:2017/6/21 10:18:17    Post IP:180.169.30.6[只看该作者]

COUNTSIG 这个函数在网上没找到说明,能否给出文华下的函数说明呢?

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


加好友 发短信
等级:超级版主 帖子:18691 积分:0 威望:0 精华:0 注册:2013/7/15 9:22:16
  发帖心情 Post By:2017/6/21 12:06:50    Post IP:180.169.30.6[只看该作者]

仅供参考,有些细节没办法完全实现,比较是两个不同的软件,一些基本的机制方面还是有差异的。

 

variable:Kk=0;//用于统计开多和开空次数的变量
variable:Kd=0;
VAR1:=EMA(CLOSE,15);
VAR2:=EMA(CLOSE,60);
红多:(CLOSE-VAR1)*2/(15+1)+VAR1,LINETHICK3, COLORRED;
VAR3:=(CLOSE-VAR2)*2/(60+1)+VAR2;
蓝空:IF(红多>VAR3,VAR3,红多),LINETHICK3, COLORBLUE;
生命线:VAR3,LINETHICK3, COLORYELLOW;

STICKLINE(红多>VAR3,红多,VAR3,10,0,COLORRED);
STICKLINE(红多<VAR3,红多,VAR3,10,0,COLORGREEN);
DRAWICON(FILTER(CROSS(红多,VAR3),30),红多,1);//这里实现不了文华的花样的图标,建议客户对照金字塔的函数说明,理解下和文华的区别
DRAWICON(FILTER(CROSS(VAR3,红多),30),红多,1);
SW1:=(EMA(CLOSE,5)*7+EMA(CLOSE, 10)*3)/10;
PARTLINE(SW1>VAR3,SW1,COLORRED),LINETHICK2;
PARTLINE(SW1<VAR3,SW1,COLORWHITE),LINETHICK2;
DRAWTEXT(CROSS(SW1,VAR3),VAR3,'多',COLORYELLOW);
DRAWTEXT(CROSS(VAR3,SW1),VAR3,'空',COLORGREEN);
//CROSS(SW1,VAR3),SOUND('A');  金字塔无法实现此类的sound的效果的,但是有可参照的函数:PLAYSOUND( , ),不过这个函数需要你自己准备一个声音文件
//CROSS(VAR3,SW1),SOUND('B');
//DRAWKLINE(8/10,COLORRED,1,COLORCYAN,0);K线自定义颜色等设置,需在金字塔软件设置界面操作,但是只能修改颜色,无法自定义宽度。


DC:=VALUEWHEN( CROSS(SW1,VAR3),C);
KC:=VALUEWHEN( CROSS(VAR3,SW1),C);


DN:=BARSLAST(CROSS(SW1,VAR3))+1;
KN:=BARSLAST(CROSS(VAR3,SW1))+1;


DD:=BARSLAST(CROSS( 红多,VAR3));
KK:=BARSLAST(CROSS( VAR3,红多));

if  CROSS(C,DC+20*MINDIFF)&&DN<KN&&count(Kk=1,DD)=0  then begin  buy(holding=0,1,marketr); Kk:=1; end;//使用marketr 是为了对应MULTSIG(0,0,1,0)函数第一个参数的含义。
if  C>=ref(enterprice,typebar(1,1))+20*MINDIFF  then sell(holding>0,holding,marketr);
if  C>=ref(enterprice,typebar(1,1))-20*MINDIFF  then sell(holding>0,holding,marketr);
if  CROSS(VAR3,SW1)  then sell(holding>0,holding,marketr);
 

if CROSS(KC-20*MINDIFF ,C)&&KN<DN&&count(Kd=1,KK)=0  then begin buyshort(holding=0,1,marketr);Kd:=1; end;
if C<=:ref(enterprice,typebar(1,3))-20*MINDIFF  then  SELLSHORT(holding<0,holding,marketr);
if C>=:ref(enterprice,typebar(1,3))+20*MINDIFF  then  SELLSHORT(holding<0,holding,marketr);
if CROSS(SW1,VAR3) then  SELLSHORT(holding<0,holding,marketr);

 

//MULTSIG(0,0,1,0);  这个函数的功能需要在软件界面设置,和文华的不完全一致。具体是要设置固定轮询,时间间隔为一秒。

 


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


加好友 发短信
等级:新手上路 帖子:13 积分:0 威望:0 精华:0 注册:2017/6/2 16:37:49
  发帖心情 Post By:2017/6/21 13:27:39    Post IP:117.92.127.92[只看该作者]

SOUND('A');  这个是 条件成立就  播放提示音  A为提示音的编号


MULTSIG(0,0,1,0);这个是TICK逐笔回测,每一个TICK计算一次模型 然后满足条件后直接发出委托  一个K线上只允许一个信号

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


加好友 发短信
等级:新手上路 帖子:13 积分:0 威望:0 精华:0 注册:2017/6/2 16:37:49
  发帖心情 Post By:2017/6/21 13:28:46    Post IP:117.92.127.92[只看该作者]

COUNTSIG(X,N); 统计N周期内,X信号的数量;

用法:
X可以为BK、SK、SP、BP、SPK、BPK、CLOSEOUT、STOP


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


加好友 发短信
等级:新手上路 帖子:13 积分:0 威望:0 精华:0 注册:2017/6/2 16:37:49
  发帖心情 Post By:2017/6/21 13:30:08    Post IP:117.92.127.92[只看该作者]

COUNTSIG(X,N); 统计N周期内,X信号的数量;

用法:
X可以为BK、SK、SP、BP、SPK、BPK、CLOSEOUT、STOP


 回到顶部
美女呀,离线,留言给我吧!
pyd
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:8439 积分:0 威望:0 精华:0 注册:2014/7/14 13:43:36
  发帖心情 Post By:2017/6/21 14:20:05    Post IP:180.169.30.6[只看该作者]

VAR1:=EMA(CLOSE,15);
VAR2:=EMA(CLOSE,60);
红多:(CLOSE-VAR1)*2/(15+1)+VAR1,LINETHICK3, COLORRED,NOAXIS;
VAR3:=(CLOSE-VAR2)*2/(60+1)+VAR2;
蓝空:IF(红多>VAR3,VAR3,红多),LINETHICK3, COLORBLUE,NOAXIS;
生命线:VAR3,LINETHICK3, COLORYELLOW,NOAXIS;
STICKLINE(红多>VAR3,红多,VAR3,0,0),COLORRED;
STICKLINE(红多<VAR3,红多,VAR3,0,0),COLORGREEN;
DRAWICON(FILTER(CROSS(红多,VAR3),30),红多,6);
DRAWICON(FILTER(CROSS(VAR3,红多),30),红多,5);
SW1:=(EMA(CLOSE,5)*7+EMA(CLOSE, 10)*3)/10;
PARTLINE(SW1>VAR3,SW1,COLORRED),LINETHICK2;
PARTLINE(SW1<VAR3,SW1,COLORWHITE),LINETHICK2;
DRAWTEXT(CROSS(SW1,VAR3),VAR3,'多'),COLORYELLOW;
DRAWTEXT(CROSS(VAR3,SW1),VAR3,'空'),COLORGREEN;
//CROSS(SW1,VAR3),SOUND('A');  金字塔里用PLAYSOUND( , )对照函数说明写这个函数需要你自己准备一个声音文件
//CROSS(VAR3,SW1),SOUND('B');
//DRAWKLINE(8/10,COLORRED,1,COLORCYAN,0);金字塔里用kline函数对照函数说明写

 

DC:=VALUEWHEN( CROSS(SW1,VAR3),C);
KC:=VALUEWHEN( CROSS(VAR3,SW1),C);


DN:=BARSLAST(CROSS(SW1,VAR3))+1;
KN:=BARSLAST(CROSS(VAR3,SW1))+1;


DD:=BARSLAST(CROSS( 红多,VAR3));
KK:=BARSLAST(CROSS( VAR3,红多));


if holding=0 and  CROSS( C,DC+20*MINdiff)   and DN<KN  then buy(1,1,marketr);
if holding>0 and (C>=enterprice+20*MINdiff or CROSS(VAR3,SW1))then sell(1,holding,marketr);


if holding=0 and  CROSS(KC-20*MINdiff ,C)   and KN<DN  then buyshort(1,1,marketr);
if holding<0 and (C<=enterprice-20*MINdiff or CROSS(SW1,VAR3)) then sellshort(1,holding,marketr)


 


 回到顶部