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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 如果在账户中检查有没有别的品种持仓用什么函数

   

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


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

主题:如果在账户中检查有没有别的品种持仓用什么函数

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


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 9:16:02    Post IP:58.246.57.26[显示全部帖子]

1,您这个是图表交易系统,主图显示的那个品种才会交易那个品种

2,交易过程中不要随意切换当前品种,另外看下你的实际交易账户是多少?不是登的公用的模拟账户把?



金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 9:44:02    Post IP:58.246.57.26[显示全部帖子]

1,你的意思是不是当六个品种中的某个品种值排名第一,开仓后等该品种平仓才会去对其它品种开仓?还是一直只开RU的仓位


金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 10:06:12    Post IP:58.246.57.26[显示全部帖子]

如果再全范围的控制,使用EXTGBDATASET定义的全局变量

学习下对应EXTGBDATASET的使用方法,整个金字塔软件范围内共享

 

例如

 

X1:=STKINDI('RU13','MACD.MACD1',0,4,-1),LINETHICK0;
X2:=STKINDI('JM13','MACD.MACD1',0,4,-1),LINETHICK0;
X3:=STKINDI('I13','MACD.MACD1',0,4,-1),LINETHICK0;
X4:=STKINDI('JD13','MACD.MACD1',0,4,-1),LINETHICK0;
X5:=STKINDI('BB13','MACD.MACD1',0,4,-1),LINETHICK0;
X6:=STKINDI('J13','MACD.MACD1',0,4,-1),LINETHICK0;
act:=STKINDI('','MACD.MACD1',0,4,-1),LINETHICK0;
//
s30:X1+X2+X3+X4+X5+X6,LINETHICK0;
MA30:MA(s30,30),LINETHICK0;
A1:=Max(X1,Max(X2,Max(X3,Max(X4,Max(X5,x6))))),LINETHICK0;
B1:=Min(X1,Min(X2,Min(X3,Min(X4,Min(X5,x6))))),LINETHICK0;

KD:=abs(s30)>abs(MA30) and s30>0 AND ma30>0 and IF(act=A1,1,0); //开多条件
PD:=abs(s30)<abs(MA30);//平多条件
KK:=abs(s30)>abs(MA30) and s30<0 AND ma30<0and IF(act=B1,1,0); //开空条件
PK:=abs(s30)<abs(MA30);//平空条件

IF KD AND HOLDING=0  AND EXTGBDATA('控制')=0 THEN
BEGIN
开多:BUY(1,1,THISCLOSE);//开多信号
EXTGBDATASET('控制',1);
END
IF PD THEN
BEGIN
平多:SELL(1 ,abs(HOLDING),THISCLOSE);//平多信号
EXTGBDATASET('控制',0);
END
 

 

 

[此贴子已经被作者于2014/6/24 10:41:48编辑过]


金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 10:43:01    Post IP:58.246.57.26[显示全部帖子]

看下你编译不通过的提示, 很简单的一个问题,自己完全可以处理的哦

 

HOLDING//表示虚拟持仓



金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 10:58:14    Post IP:58.246.57.26[显示全部帖子]

1,还没尝试您就放弃了,任何东西都是在学习中进步的。

 对应代码运行出了问题,我们不可能实时跟着你走。请学会基本的,谢谢

 

 

X1:=STKINDI('RU13','MACD.MACD1',0,4,-1),LINETHICK0;
X2:=STKINDI('JM13','MACD.MACD1',0,4,-1),LINETHICK0;
X3:=STKINDI('I13','MACD.MACD1',0,4,-1),LINETHICK0;
X4:=STKINDI('JD13','MACD.MACD1',0,4,-1),LINETHICK0;
X5:=STKINDI('BB13','MACD.MACD1',0,4,-1),LINETHICK0;
X6:=STKINDI('J13','MACD.MACD1',0,4,-1),LINETHICK0;
act:=STKINDI('','MACD.MACD1',0,4,-1),LINETHICK0;
//
s30:X1+X2+X3+X4+X5+X6,LINETHICK0;
MA30:MA(s30,30),LINETHICK0;
A1:=Max(X1,Max(X2,Max(X3,Max(X4,Max(X5,x6))))),LINETHICK0;
B1:=Min(X1,Min(X2,Min(X3,Min(X4,Min(X5,x6))))),LINETHICK0;

KD:=abs(s30)>abs(MA30) and s30>0 AND ma30>0 and IF(act=A1,1,0); //开多条件
PD:=abs(s30)<abs(MA30);//平多条件
KK:=abs(s30)>abs(MA30) and s30<0 AND ma30<0 and IF(act=B1,1,0); //开空条件
PK:=abs(s30)<abs(MA30);//平空条件


//开多:BUY(KD AND HOLDING=0 ,1,THISCLOSE);//开多信号
//开空:BUYSHORT(KK AND HOLDING=0 ,1,THISCLOSE);//开空信号
//平多:SELL(PD ,abs(HOLDING),THISCLOSE);//平多信号
//平空:SELLSHORT(PK,abs(HOLDING),THISCLOSE) ;//平空信号
WARNING_DISABLE:4;
if ISLASTBAR then
BEGIN
IF KD AND HOLDING=0 AND EXTGBDATA('KDA1')=0 THEN
BEGIN
开多:BUY(1,1,THISCLOSE);//开多信号
EXTGBDATASET('KDA1',1);
END
IF PD THEN
BEGIN
平多:SELL(1 ,abs(HOLDING),THISCLOSE);//平多信号
EXTGBDATASET('KDA1',0);
END

IF KK AND HOLDING=0 AND EXTGBDATA('KKB1')=0 THEN
BEGIN
开空:BUYSHORT(1,1,THISCLOSE);//开空信号
EXTGBDATASET('KKB1',1);
END
IF PK THEN
BEGIN
平空:SELLSHORT(1 ,abs(HOLDING),THISCLOSE);//平空信号
EXTGBDATASET('KKB1',0);
END
END
[此贴子已经被作者于2014/6/24 11:10:48编辑过]


金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 11:11:43    Post IP:58.246.57.26[显示全部帖子]

 重新复制下,基础的代码编写资料在论坛和网站都有。

http://www.weistock.com:8080/down/class/?4.html

[此贴子已经被作者于2014/6/24 11:11:59编辑过]


金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 11:21:16    Post IP:58.246.57.26[显示全部帖子]

都看了您会不知道HODLING这个函数?

 

http://www.weistock.com/bbs/dispbbs.asp?boardid=4&Id=332 学习下图表的调试功能



金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 14:14:16    Post IP:58.246.57.26[显示全部帖子]

您没照我的方法改啊,图表依据于历史交易信号。不要加ISLASTBAR这种控制条件

 

X1:=STKINDI('RU13','MACD.MACD1',0,4,-1),LINETHICK0;
X2:=STKINDI('JM13','MACD.MACD1',0,4,-1),LINETHICK0;
X3:=STKINDI('I13','MACD.MACD1',0,4,-1),LINETHICK0;
X4:=STKINDI('JD13','MACD.MACD1',0,4,-1),LINETHICK0;
X5:=STKINDI('BB13','MACD.MACD1',0,4,-1),LINETHICK0;
X6:=STKINDI('J13','MACD.MACD1',0,4,-1),LINETHICK0;
act:=STKINDI('','MACD.MACD1',0,4,-1),LINETHICK0;
//
s30:X1+X2+X3+X4+X5+X6,LINETHICK0;
MA30:MA(s30,30),LINETHICK0;
A1:=Max(X1,Max(X2,Max(X3,Max(X4,Max(X5,x6))))),LINETHICK0;
B1:=Min(X1,Min(X2,Min(X3,Min(X4,Min(X5,x6))))),LINETHICK0;

KD:=abs(s30)>abs(MA30) and s30>0 AND ma30>0 and IF(act=A1,1,0); //开多条件
PD:=abs(s30)<abs(MA30);//平多条件
KK:=abs(s30)>abs(MA30) and s30<0 AND ma30<0 and IF(act=B1,1,0); //开空条件
PK:=abs(s30)<abs(MA30);//平空条件
WARNING_DISABLE:4;
IF KD AND HOLDING=0 AND EXTGBDATA('KDA1')=0 THEN
BEGIN
开多:BUY(1,1,THISCLOSE);//开多信号
EXTGBDATASET('KDA1',1);
END
IF PD THEN
BEGIN
平多:SELL(1 ,abs(HOLDING),THISCLOSE);//平多信号
EXTGBDATASET('KDA1',0);
END

IF KK AND HOLDING=0 AND EXTGBDATA('KKB1')=0 THEN
BEGIN
开空:BUYSHORT(1,1,THISCLOSE);//开空信号
EXTGBDATASET('KKB1',1);
END
IF PK THEN
BEGIN
平空:SELLSHORT(1 ,abs(HOLDING),THISCLOSE);//平空信号
EXTGBDATASET('KKB1',0);
END
 


金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 14:53:22    Post IP:58.246.57.26[显示全部帖子]

1,没有看见信号出现在中间哦。这样控制以后和以前的信号位置一定是有变化的

把对应多头和空头的控制分开

 

X1:=STKINDI('RU13','MACD.MACD1',0,4,-1),LINETHICK0;
X2:=STKINDI('JM13','MACD.MACD1',0,4,-1),LINETHICK0;
X3:=STKINDI('I13','MACD.MACD1',0,4,-1),LINETHICK0;
X4:=STKINDI('JD13','MACD.MACD1',0,4,-1),LINETHICK0;
X5:=STKINDI('BB13','MACD.MACD1',0,4,-1),LINETHICK0;
X6:=STKINDI('J13','MACD.MACD1',0,4,-1),LINETHICK0;
act:=STKINDI('','MACD.MACD1',0,4,-1),LINETHICK0;
//
s30:X1+X2+X3+X4+X5+X6,LINETHICK0;
MA30:MA(s30,30),LINETHICK0;
A1:=Max(X1,Max(X2,Max(X3,Max(X4,Max(X5,x6))))),LINETHICK0;
B1:=Min(X1,Min(X2,Min(X3,Min(X4,Min(X5,x6))))),LINETHICK0;


KD:abs(s30)>abs(MA30) and s30>0 AND ma30>0 and IF(act=A1,1,0),NOAXIS; //开多条件
PD:abs(s30)<abs(MA30),NOAXIS;//平多条件
KK:abs(s30)>abs(MA30) and s30<0 AND ma30<0 and IF(act=B1,1,0),NOAXIS; //开空条件
PK:abs(s30)<abs(MA30),NOAXIS;//平空条件
WARNING_DISABLE:4;

//开多:BUY(KD AND HOLDING=0  ,1,THISCLOSE);//开多信号
//开空:BUYSHORT(KK AND HOLDING=0 ,1,THISCLOSE);//开空信号
//平多:SELL(PD ,abs(HOLDING),THISCLOSE);//平多信号
//平空:SELLSHORT(PK,abs(HOLDING),THISCLOSE) ;//平空信号

 

 

 

 

 


IF KD AND HOLDING=0 AND EXTGBDATA('KDA1')=0 THEN
BEGIN
开多:BUY(1,1,THISCLOSE);//开多信号
EXTGBDATASET('KDA1',1);
END
IF PD THEN
BEGIN
平多:SELL(1 ,abs(HOLDING),THISCLOSE);//平多信号
EXTGBDATASET('KDA1',0);
END


IF KK AND HOLDING=0 AND EXTGBDATA('KKB21')=0 THEN
BEGIN
开空:BUYSHORT(1,1,THISCLOSE);//开空信号
EXTGBDATASET('KKB21',1);
END
IF PK THEN
BEGIN
平空:SELLSHORT(1 ,abs(HOLDING),THISCLOSE);//平空信号
EXTGBDATASET('KKB21',0);
END



金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
FexTel
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5960 积分:0 威望:0 精华:2 注册:2014/6/12 11:29:04
  发帖心情 Post By:2014/6/24 15:11:54    Post IP:58.246.57.26[显示全部帖子]

1,这个你自己调试下,看下中间出现的是同方向的信号?另外查看下当时EXTGBDATASET定义的变量值不就清楚了么


金字塔—专业程序化交易量化投资平台

产品部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
总数 17 1 2 下一页