- 精华
- 3
- 在线时间
- 12229 小时
- UID
- 5
- 积分
- 26584
- 帖子
- 12686
- 阅读权限
- 200
- 注册时间
- 2007-7-20
- 最后登录
- 2021-11-3
- 精华
- 3
- UID
- 5
- 积分
- 26584
- 帖子
- 12686
- 主题
- 49
- 阅读权限
- 200
- 注册时间
- 2007-7-20
- 最后登录
- 2021-11-3
|
下面,我们会用一个全局变量所编写的Tick计数器。掌握此例,有助于交易者理解全局变量的运行机制并能更好的学习及使用全局变量。
新建一个公式应用:- Vars
- NumericSeries TickCnt;
- Numeric bartime;
- Begin
- bartime = GetGlobalVar(0);
- if (bartime == InvalidNumeric)
- {
- bartime = 0;
- SetGlobalVar(0,bartime);
- TickCnt = 1;
- SetGlobalVar(1,TickCnt);
- FileAppend("d:\\Sample_13.log","Bartime =“+DateTimeToString(date+time)
- +"\t 计数器初始化, Global(0) = "+text(bartime)+"\t Global(1) = "+Text(TickCnt));
- }
- if (Date+Time > bartime)
- {
- bartime = Date + Time;
- SetGlobalVar(0,bartime);
- TickCnt = 1;
- SetGlobalVar(1,TickCnt);
- FileAppend("d:\\Sample_13.log","Bartime = “+DateTimeToString(date+time)+"\t 新K线
- 产生, Global(0) = “+DateTimeToString(bartime)+"\t Global(1) = “+Text(TickCnt));
- } Else If (Date+Time==bartime)
- {
- TickCnt = GetGlobalVar(1) + 1;
- SetGlobalVar(1,TickCnt);
- FileAppend("d:\\Sample_13.log","Bartime = “+DateTimeToString(date+time)+"\t 原K线
- 增加计数, Global(0) = “+DateTimeToString(bartime)+"\t Global(1) = “+Text(TickCnt));
- }
- Commentary("TickCnt="+text(TickCnt));
- End
-
复制代码 |
|