‹‹ 上一主题 | 下一主题 ››
 31 12
发新话题
打印

[发布] 1分钟K线图副图中显示5、15、30、60分钟K线

jesse_huch

正版用户

Rank: 6Rank: 6
1楼 大 中 小 发表于 2005-7-16 15:22  只看该作者

1分钟K线图副图中显示5、15、30、60分钟K线

先编写公式：“HQSJ”,其中CC=C,OO=O,HH=H,LL=L;使用公式时将默认周期设在1分钟。
INPUT:N(2,2,5)
M:=IF(N=2,5,IF(N=3,15,IF(N=4,30,60)));
WAR00:=OPENMINUTES(TIME);
WAR01:=MOD(WAR00,M);
WAR02:=BARSLAST(WAR01=1)+1;
WAR03:=CEILING(M/2);
OO:=STKINDI('','HQSJ.OO',0,N);
CC:=STKINDI('','HQSJ.CC',0,N);
HH:=STKINDI('','HQSJ.HH',0,N);
LL:=STKINDI('','HQSJ.LL',0,N);
STICKLINE(CC>=OO AND WAR02=WAR03,HH,LL,N,0),COLORRED;
STICKLINE(CC<OO AND WAR02=WAR03,HH,LL,N,0),COLORCYAN;
STICKLINE(CC>=OO,OO,CC,10,0),COLORRED;
STICKLINE(CC<OO,OO,CC,10,0),COLORCYAN;
MA1:MA(STKINDI('','MA.MA1',0,N),5),COLORWHITE;
MA2:MA(STKINDI('','MA.MA2',0,N),5),COLORYELLOW;
MA3:MA(STKINDI('','MA.MA3',0,N),5),COLORRED;
MA4:MA(STKINDI('','MA.MA4',0,N),5),COLORGREEN;
DRAWTEXT(N=2 AND BARPOS=SYSPARAM(2),H,'5分钟K线'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=3 AND BARPOS=SYSPARAM(2),H,'15分钟K线'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=4 AND BARPOS=SYSPARAM(2),H,'30分钟K线'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=5 AND BARPOS=SYSPARAM(2),H,'60分钟K线'),ALIGN4,COLORYELLOW;
附件: 您所在的用户组无法下载或查看附件

TOP

joneslee

正版用户

Rank: 6Rank: 6
2楼 大 中 小 发表于 2005-7-16 17:30  只看该作者
传说中的沙发！！！！！

TOP

joneslee

正版用户

Rank: 6Rank: 6
3楼 大 中 小 发表于 2005-7-16 17:35  只看该作者
老兄好！

TOP

股市骑兵00

版主

Rank: 13Rank: 13Rank: 13Rank: 13

技术 热情

4楼 大 中 小 发表于 2005-7-16 18:35  只看该作者
谢谢，支持原码！
顶一下~~

学无止境^_^不断进步

TOP

林枫

正版用户

Rank: 6Rank: 6
5楼 大 中 小 发表于 2005-7-16 18:51  只看该作者
引用:
Originally posted by jesse_huch at 2005-7-16 03:22 PM:
先编写公式：“HQSJ”,其中CC=C,OO=O,HH=H,LL=L;使用公式时将默认周期设在1分钟。
INPUT:N(2,2,5)
M:=IF(N=2,5,IF(N=3,15,IF(N=4,30,60)));
WAR00:=OPENMINUTES(TIME);
WAR01:=MOD(WAR00,M);
WAR02:=BARSLAS ...
怎么会这样？？？？
附件: 您所在的用户组无法下载或查看附件

TOP

joneslee

正版用户

Rank: 6Rank: 6
6楼 大 中 小 发表于 2005-7-16 21:53  只看该作者
第一行加个“；”号。

TOP

zzgzzg

正版用户

Rank: 6Rank: 6
7楼 大 中 小 发表于 2005-8-6 16:30  只看该作者
谢谢，非常好！

TOP

liuxiang

四级狐友

Rank: 4
8楼 大 中 小 发表于 2005-8-6 21:08  只看该作者

请问为和不显示

{多周期K线(一分钟)}
INPUT:N(2,2,5);
M:=IF(N=2,5,IF(N=3,15,IF(N=4,30,60)));
WAR00:=OPENMINUTES(TIME);
WAR01:=MOD(WAR00,M);
WAR02:=BARSLAST(WAR01=1)+1;
WAR03:=CEILING(M/2);
OO:=STKINDI('','HQSJ.OO',0,N);
CC:=STKINDI('','HQSJ.CC',0,N);
HH:=STKINDI('','HQSJ.HH',0,N);
LL:=STKINDI('','HQSJ.LL',0,N);
STICKLINE(CC>=OO AND WAR02=WAR03,HH,LL,N,0),COLORRED;
STICKLINE(CC<OO AND WAR02=WAR03,HH,LL,N,0),COLORCYAN;
STICKLINE(CC>=OO,OO,CC,10,0),COLORRED;
STICKLINE(CC<OO,OO,CC,10,0),COLORCYAN;
MA1:MA(STKINDI('','MA.MA1',0,N),5),COLORWHITE;
MA2:MA(STKINDI('','MA.MA2',0,N),5),COLORYELLOW;
MA3:MA(STKINDI('','MA.MA3',0,N),5),COLORRED;
MA4:MA(STKINDI('','MA.MA4',0,N),5),COLORGREEN;
DRAWTEXT(N=2 AND BARPOS=SYSPARAM(2),H,'5分钟K线'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=3 AND BARPOS=SYSPARAM(2),H,'15分钟K线'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=4 AND BARPOS=SYSPARAM(2),H,'30分钟K线'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=5 AND BARPOS=SYSPARAM(2),H,'60分钟K线'),ALIGN4,COLORYELLOW;

{HQSJ}
CC:C;
OO:O;
HH:H;
LL:L;

以上均设立为一分钟.
附件: 您所在的用户组无法下载或查看附件
股市之道:修心养性,战胜自我.

TOP

liuxiang

四级狐友

Rank: 4
9楼 大 中 小 发表于 2005-8-6 23:54  只看该作者
解决了.默认周期设为一分钟.禁用周期不设置.谢谢!!!
附件: 您所在的用户组无法下载或查看附件
股市之道:修心养性,战胜自我.

TOP

xxllxxll

二级狐友

Rank: 2
10楼 大 中 小 发表于 2005-8-7 10:00  只看该作者
谢谢

TOP

hero999

见习狐友
11楼 大 中 小 发表于 2005-8-7 10:51  只看该作者
bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb

TOP

林枫

正版用户

Rank: 6Rank: 6
12楼 大 中 小 发表于 2005-8-7 13:57  只看该作者
引用:
Originally posted by liuxiang at 2005-8-6 11:54 PM:
解决了.默认周期设为一分钟.禁用周期不设置.谢谢!!!
不显示 ？？？？？？？？？？？
附件: 您所在的用户组无法下载或查看附件

TOP

liuxiang

四级狐友

Rank: 4
13楼 大 中 小 发表于 2005-8-7 14:59  只看该作者
引用:
Originally posted by 林枫 at 2005-8-7 13:57:

不显示 ？？？？？？？？？？？
还应建立这个公式:
{HQSJ}
CC:C;
OO:O;
HH:H;
LL:L;

以上均设立为一分钟.
股市之道:修心养性,战胜自我.

TOP

林枫

正版用户

Rank: 6Rank: 6
14楼 大 中 小 发表于 2005-8-7 16:26  只看该作者
引用:
Originally posted by liuxiang at 2005-8-7 02:59 PM:


还应建立这个公式:
{HQSJ}
CC:C;
OO:O;
HH:H;
LL:L;

以上均设立为一分钟.
？？？？？？？？？？
附件: 您所在的用户组无法下载或查看附件

TOP

林枫

正版用户

Rank: 6Rank: 6
15楼 大 中 小 发表于 2005-8-7 16:27  只看该作者
引用:
Originally posted by 林枫 at 2005-8-7 04:26 PM:

？？？？？？？？？？
？？？？？？？？
附件: 您所在的用户组无法下载或查看附件

TOP

mydg

三级狐友

Rank: 3Rank: 3
16楼 大 中 小 发表于 2005-8-7 18:30  只看该作者
引用:
Originally posted by liuxiang at 2005-8-6 09:08 PM:
{多周期K线(一分钟)}
INPUT:N(2,2,5);
M:=IF(N=2,5,IF(N=3,15,IF(N=4,30,60)));
WAR00:=OPENMINUTES(TIME);
WAR01:=MOD(WAR00,M);
WAR02:=BARSLAST(WAR01=1)+1;
WAR03:=CEILING(M/2);
OO:=STKINDI('','HQS ...
源码通不过，你的是对的。谢谢你！
附件: 您所在的用户组无法下载或查看附件

TOP

gkorange

正版用户

Rank: 6Rank: 6
17楼 大 中 小 发表于 2005-8-10 00:09  只看该作者
多谢分享了

TOP

快乐人生

正版用户

Rank: 6Rank: 6
18楼 大 中 小 发表于 2005-8-15 13:13  只看该作者
不错的东

TOP

LMW

正版用户

Rank: 6Rank: 6
19楼 大 中 小 发表于 2005-8-16 08:50  只看该作者
OK!不错!不错!不错的东东!!!!!!!

TOP

汉子

二级狐友

Rank: 2
20楼 大 中 小 发表于 2005-8-20 14:14  只看该作者
烦请将公式做成文件，方便不熟悉者导入

TOP

jsw945

三级狐友

Rank: 3Rank: 3
21楼 大 中 小 发表于 2005-10-1 10:11  只看该作者
是啊，我也引进不能显示，也已建立hqsj公式，但还是说没有此公式。请老师指教！谢谢！

TOP

liws

二级狐友

Rank: 2
22楼 大 中 小 发表于 2005-11-22 21:27  只看该作者
好东东

TOP

shujenwen

二级狐友

Rank: 2
23楼 大 中 小 发表于 2006-3-18 09:16  只看该作者

3q!

{HQSJ1分-K-5153060K}
INPUT:N(2,2,5);
M:=IF(N=2,5,IF(N=3,15,IF(N=4,30,60)));
WAR00:=OPENMINUTES(TIME);
WAR01:=MOD(WAR00,M);
WAR02:=BARSLAST(WAR01=1)+1;
WAR03:=CEILING(M/2);
OO:=STKINDI('','HQSJ.OO',0,N);
CC:=STKINDI('','HQSJ.CC',0,N);
HH:=STKINDI('','HQSJ.HH',0,N);
LL:=STKINDI('','HQSJ.LL',0,N);
STICKLINE(CC>=OO AND WAR02=WAR03,HH,LL,N,0),COLORff99ff;
STICKLINE(CC<OO AND WAR02=WAR03,HH,LL,N,0),COLORff9900;
STICKLINE(CC>=OO,OO,CC,10,0),COLORff99ff;
STICKLINE(CC<OO,OO,CC,10,0),COLORff9900;
MA1:MA(STKINDI('','MA.MA1',0,N),5),COLORWHITE;
MA2:MA(STKINDI('','MA.MA2',0,N),5),COLORYELLOW;
MA3:MA(STKINDI('','MA.MA3',0,N),5),COLORRED;
MA4:MA(STKINDI('','MA.MA4',0,N),5),COLORGREEN;
DRAWTEXT(N=2 AND BARPOS=SYSPARAM(2),H,'5分K'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=3 AND BARPOS=SYSPARAM(2),H,'15分K'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=4 AND BARPOS=SYSPARAM(2),H,'30分K'),ALIGN4,COLORYELLOW;
DRAWTEXT(N=5 AND BARPOS=SYSPARAM(2),H,'60分K'),ALIGN4,COLORYELLOW;
aa1:=ma(c,3);
ax1:=ref(aa1,1);
STICKLINE(aa1>=ax1,HIGH,LOW,2,0),colorred;
STICKLINE(aa1<ax1,HIGH,LOW,2,0),colorgreen;
STICKLINE(aa1>=ax1,CLOSE,OPEN,8,0),colorred;
STICKLINE(aa1<ax1,CLOSE,OPEN,8,0),colorgreen;

TOP

tzwxlj1

五级狐友

Rank: 5Rank: 5
24楼 大 中 小 发表于 2006-7-5 15:32  只看该作者
多谢分享了

TOP

‹‹ 上一主题 | 下一主题 ››
 31 12
发新话题