- 精华
- 3
- 在线时间
- 196 小时
- UID
- 2459
- 积分
- 14103
- 帖子
- 179
- 阅读权限
- 150
- 注册时间
- 2008-9-26
- 最后登录
- 2015-12-3
- 精华
- 3
- UID
- 2459
- 积分
- 14103
- 帖子
- 179
- 主题
- 19
- 阅读权限
- 150
- 注册时间
- 2008-9-26
- 最后登录
- 2015-12-3
|
本帖最后由 hyjok 于 2010-8-13 08:33 编辑
根据TB内置函数CloseD做修改,得出实现跨周期求周收盘价以及跨周期求小时收盘价的函数,跨周期求周收盘价的函数见帖子http://www.tradeblazer.net/forum/thread-9288-1-1.html
对CloseD稍作修改可以得出小时线以下周期图表中实现跨周期求小时线收盘价的函数,函数代码如下- //------------------------------------------------------------------------
- // 简称: CloseH
- // 名称: 求N小时前的收盘价
- // 类别: 用户函数
- // 类型: 内建函数
- // 输出: 数值型
- //------------------------------------------------------------------------
- Params
- Numeric hoursAgo(2);
- Vars
- NumericSeries barCnt;
- NumericSeries hourClose;
- Numeric i;
- Numeric j;
- Numeric nIndex(0);
- Begin
- If (Hour != Hour[1])
- {
- barCnt = 1;
- }Else
- {
- barCnt = barCnt[1] + 1;
- }
- hourClose = Close;
-
- If (hoursAgo == 0)
- {
- Return hourClose;
- }Else
- {
- For i = 1 To hoursAgo
- {
- If (i == 1)
- {
- j = 0;
- }Else
- {
- j = j + barCnt[j];
- }
- If (j > CurrentBar) Return InvalidNumeric;
- nIndex = nIndex + barCnt[j];
- }
- Return hourClose[nIndex];
- }
- End
- //------------------------------------------------------------------------
- // 编译版本 GS2004.06.12
- // 用户版本 2010/08/12 21:41
- // 版权所有 hyjok
- // 更改声明 TradeBlazer Software保留对TradeBlazer平台
- // 每一版本的TrabeBlazer公式修改和重写的权利
- //------------------------------------------------------------------------
复制代码 说明:求N小时前的收盘价,应用周期为60分钟以下的分钟线,比如1分钟、5分钟周期图表 |
|