
等级: 新手上路
- 注册:
- 2025-9-15
- 曾用名:
|
VARIABLE:LowerBand[2] := (0,0);
VARIABLE:UpperBand[2] := (0,0);
length := 20;
multiple := 5;
TR1 := MAX(MAX((HIGH - LOW), ABS(REF(CLOSE, 1) - HIGH)), ABS(REF(CLOSE, 1) - LOW));
ATR := MA(TR1, length);
HL := (HIGH + LOW) /2;
LowerBand[1] := HL - (multiple * ATR);
UpperBand[1] := HL + (multiple * ATR);
IF LowerBand[1] > LowerBand[2] OR CLOSE[Barpos - 1] < LowerBand[2] THEN
BEGIN
LowerBand[2] := LowerBand[1];
END
ELSE
BEGIN
LowerBand[1] := LowerBand[2];
END
IF UpperBand[1] < UpperBand[2] OR CLOSE[Barpos - 1] > UpperBand[2] THEN
BEGIN
UpperBand[2] := UpperBand[1];
END
ELSE
BEGIN
UpperBand[1] := UpperBand[2];
END
B : LowerBand[1];
A : UpperBand[1];
|
|