- 精华
- 0
- 在线时间
- 21 小时
- UID
- 180415
- 积分
- 30
- 帖子
- 19
- 阅读权限
- 10
- 注册时间
- 2014-2-13
- 最后登录
- 2014-3-5
- 精华
- 0
- UID
- 180415
- 积分
- 30
- 帖子
- 19
- 主题
- 9
- 阅读权限
- 10
- 注册时间
- 2014-2-13
- 最后登录
- 2014-3-5
|
- Params
- NumericSeries Price(1);
- Numeric Length(10);
- Bool bMax(True);
- NumericRef ExtremeBar;
- Vars
- NumericSeries MyVal;
- NumericSeries MyBar;
- Numeric i;
- Begin
- MyVal = Price;
- MyBar = 0;
-
- If ( CurrentBar <= Length - 1 || MyBar[1] == Length - 1)
- {
- for i = 1 to Length - 1
- {
- If (bMax )
- {
- If ( Price[i] > MyVal)
- {
- MyVal = Price[i];
- MyBar = i;
- }
- }Else
- {
- If ( Price[i] < MyVal)
- {
- MyVal = Price[i];
- MyBar = i;
- }
- }
- }
- }Else
- {
- If ( bMax )
- {
- If ( Price >= MyVal[1])
- {
- MyVal = Price;
- MyBar = 0;
- }Else
- {
- MyVal = MyVal[1];
- MyBar = MyBar[1] + 1;
- }
- }Else
- {
- If ( Price <= MyVal[1])
- {
- MyVal = Price;
- MyBar = 0;
- }Else
- {
- MyVal = MyVal[1];
- MyBar = MyBar[1] + 1;
- }
- }
- }
- ExtremeBar = MyBar;
- Return MyVal;
- End
复制代码 判断条件MyBar[1] == Length - 1中MyBar[1] 值是多少? |
|