Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共31 条记录, 每页显示 10 条, 页签: [1] [2][3][4]
[浏览完整版]

标题:请高手指点往QQ发消息的问题

1楼
atom_pt 发表于:2012/9/19 9:45:08

CC1:=MA(ABS(REF("AG.OPENINT1##DAY",1)-REF("AG.OPENINT1##DAY",2)),LENGTH);
IF(C>="AG.OPEN1##DAY") THEN
BEGIN
X1:=("AG12$OPENINT"-CC1)/CC1;
X101:=0;
END
IF(C<"AG.OPEN1##DAY") THEN
BEGIN
X1:=0;
X101:=("AG12$OPENINT"-CC1)/CC1;
END
CC2:=MA(ABS(REF("AU.OPENINT1##DAY",1)-REF("AU.OPENINT1##DAY",2)),LENGTH);
IF(C>="AU.OPEN1##DAY") THEN
BEGIN
X2:=("AU12$OPENINT"-CC2)/CC2;
X102:=0;
END
IF(C<"AU.OPEN1##DAY") THEN
BEGIN
X2:=0;
X102:=("AU12$OPENINT"-CC2)/CC2;
END

 

CONDITION1:=ABS("AG12$OPENINT"-REF("AG12$OPENINT",1))>CC1;

CONDITION2:=ABS("AU12$OPENINT"-REF("AU12$OPENINT",1))>CC2;

 

XMAX1:=MAX(X1,X2);

CONDITION_BK1:=CONDITION1 AND X1=XMAX1;
CONDITION_BK2:=CONDITION2 AND X2=XMAX1;

 

IF CONDITION_BK1 THEN
BEGIN
 extgbstringSet('QQSTR','买入,白银');
 VQQM:=QQMSGX(1,close);
END
IF CONDITION_BK2 THEN
BEGIN
 extgbstringSet('QQSTR','买入,黄金');
  VQQM:=QQMSGX(1,close);
END

 


 

2楼
atom_pt 发表于:2012/9/19 9:49:23

问题:

1,在15分钟线上跑,cc1等等都是空值?

2,为什么QQ上没显示(VBA程序已经修改完成)?

3,我这个策略是否一定要窗口上跑?

4,程序是否还有其他问题。

 

付思路:黄金、白银依据“开盘价”分多空,如果同为多,在依据“即时持仓量变化”做买入标志。

3楼
jinzhe 发表于:2012/9/19 9:54:26
cc1你要引用的是什么?
4楼
atom_pt 发表于:2012/9/19 9:55:54
引用“日持仓量变化的均值”
5楼
jinzhe 发表于:2012/9/19 10:03:26
直接引用ma(openint,length)的日线值;不就行了
6楼
atom_pt 发表于:2012/9/19 10:06:05

要在15分钟线上跑啊

 

直接引用,不就成了15分钟的持仓量了么

 

而且,用到的还是持仓的变化量

7楼
jinzhe 发表于:2012/9/19 10:13:52
是的,任意周期引用日线数值,用stkindi函数
8楼
atom_pt 发表于:2012/9/19 10:22:01

谢谢

 

那其他的呢

9楼
jinzhe 发表于:2012/9/19 10:25:14

先看看引用的数值对不对,再往后一点点调试

基本的调试技巧:http://www.weistock.com/bbs/dispbbs.asp?boardid=4&id=1246&page=1&star=1

[此贴子已经被作者于2012-9-19 10:25:31编辑过]
10楼
atom_pt 发表于:2012/9/19 10:42:05

CC1:=MA(ABS(STKINDI('AG12','OPENINT',0,6,-1)-STKINDI('AG12','OPENINT',0,6,-1)),LENGTH);
IF(C>=STKINDI('AG12','OPEN',0,6,0)) THEN
BEGIN
X1:=(STKINDI('AG12','OPENINT',0,3,0)-CC1)/CC1;
X101:=0;
END
IF(C<STKINDI('AG12','OPEN',0,6,0)) THEN
BEGIN
X1:=0;
X101:=(STKINDI('AG12','OPENINT',0,3,0)-CC1)/CC1;
END

 

第一段改成这个了,调试后,cc1,x1,x101还是空值

共31 条记录, 每页显示 10 条, 页签: [1] [2][3][4]


Powered By Dvbbs Version 8.3.0
Processed in 0.02734 s, 3 queries.