커뮤니티
문의 (RB)
2014-02-18 17:01:26
174
글번호 72681
VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
Price = gCLOSE;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
1번라인과 2번라인의 정배열 역배열을 구하고자 하는데 뭐가 잘못되었는지 모르겠습니다. 도움부탁드립니다.
감사합니다.
답변 3
예스스탁 예스스탁 답변
2014-02-19 10:55:47
안녕하세요
예스스탁입니다.
아래식 정삭적으로 값 구현이 됩니다.
gClose는 갭보정값으로 보여 해당식 추가했습니다.
VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
var : sumGap(0), gap(0),gClose(0);
if date!=date[1] then {
gap = Open-Close[1];
sumGap = sumGap+gap;
}
GClose = C - sumGap;
Price = gClose;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
plot1(iff(RMAxF == true,1,0));
plot2(iff(RMAxR == true,1,0));
즐거운 하루되세요
> TRF 님이 쓴 글입니다.
> 제목 : 문의 (RB)
> VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
Price = gCLOSE;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
1번라인과 2번라인의 정배열 역배열을 구하고자 하는데 뭐가 잘못되었는지 모르겠습니다. 도움부탁드립니다.
감사합니다.
TRF
2014-02-19 12:25:17
답변 감사드립니다.
시스템식에서 plot1, plot2 부분을 삭제하고 아래식을 이용하면 매수매도 진입신호가 발생되어야 하는게 아닌지요? 아무것도 표기가 되질 않습니다. 다시한번 부탁드립니다.
if (RMA[1] > RMA[2]) then buy("AA");
if (RMA[1] < RMA[2]) then sell("BB");
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 문의 (RB)
>
안녕하세요
예스스탁입니다.
아래식 정삭적으로 값 구현이 됩니다.
gClose는 갭보정값으로 보여 해당식 추가했습니다.
VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
var : sumGap(0), gap(0),gClose(0);
if date!=date[1] then {
gap = Open-Close[1];
sumGap = sumGap+gap;
}
GClose = C - sumGap;
Price = gClose;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
plot1(iff(RMAxF == true,1,0));
plot2(iff(RMAxR == true,1,0));
즐거운 하루되세요
> TRF 님이 쓴 글입니다.
> 제목 : 문의 (RB)
> VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
Price = gCLOSE;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
1번라인과 2번라인의 정배열 역배열을 구하고자 하는데 뭐가 잘못되었는지 모르겠습니다. 도움부탁드립니다.
감사합니다.
예스스탁 예스스탁 답변
2014-02-19 13:00:06
안녕하세요
예스스탁입니다.
아래식 적용해도 신호가 정상적으로 나오고 있습니다.
VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
var : sumGap(0), gap(0),gClose(0);
if date!=date[1] then {
gap = Open-Close[1];
sumGap = sumGap+gap;
}
GClose = C - sumGap;
Price = gClose;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
if (RMA[1] > RMA[2]) then buy("AA");
if (RMA[1] < RMA[2]) then sell("BB");
즐거운 하루되세요
> TRF 님이 쓴 글입니다.
> 제목 : Re : Re : 문의 (RB)
> 답변 감사드립니다.
시스템식에서 plot1, plot2 부분을 삭제하고 아래식을 이용하면 매수매도 진입신호가 발생되어야 하는게 아닌지요? 아무것도 표기가 되질 않습니다. 다시한번 부탁드립니다.
if (RMA[1] > RMA[2]) then buy("AA");
if (RMA[1] < RMA[2]) then sell("BB");
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 문의 (RB)
>
안녕하세요
예스스탁입니다.
아래식 정삭적으로 값 구현이 됩니다.
gClose는 갭보정값으로 보여 해당식 추가했습니다.
VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
var : sumGap(0), gap(0),gClose(0);
if date!=date[1] then {
gap = Open-Close[1];
sumGap = sumGap+gap;
}
GClose = C - sumGap;
Price = gClose;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
plot1(iff(RMAxF == true,1,0));
plot2(iff(RMAxR == true,1,0));
즐거운 하루되세요
> TRF 님이 쓴 글입니다.
> 제목 : 문의 (RB)
> VARS: Price(0), BaseLength(10), Multiplier(10);
VARS: Counter(0);
ARRAYS: Length[8](0), SmoothingFactor[8](0), RMA[8](0), Color[8](0);
Price = gCLOSE;
if (CurrentBar == 0) then
begin
Length[1] = BaseLength;
SmoothingFactor[1] = 2 / (Length[1] + 1);
RMA[1] = Price;
Color[1] = RGB(255, 255, 255);
for Counter = 1 to 7
begin
Length[ Counter + 1] = Length[Counter] + Multiplier;
SmoothingFactor[Counter + 1] = 2 / (Length[Counter + 1] + 1);
RMA[Counter + 1] = Price;
Color[Counter + 1] = RGB(0, int((255/8) * (Counter + 1)), 255);
end;
end
else
begin
for Counter = 1 to 8
begin
RMA[Counter] = RMA[Counter][1] + SmoothingFactor[Counter] * (Price - RMA[Counter][1]);
end;
end;
VARS: RMAxF(FALSE), RMAxR(FALSE);
RMAxF = (RMA[1] > RMA[2]);
RMAxR = (RMA[1] < RMA[2]);
1번라인과 2번라인의 정배열 역배열을 구하고자 하는데 뭐가 잘못되었는지 모르겠습니다. 도움부탁드립니다.
감사합니다.
다음글
이전글