커뮤니티
항상 감사드립니다.
2013-02-26 10:33:21
275
글번호 59972
문의드립니다.
1분봉에서 일간ATR 을 이용하고 싶습니다.
당일 포함, 당일 미포함 두개의 식을 부탁드립니다.
항상 감사드립니다.
답변 3
예스스탁 예스스탁 답변
2013-02-26 11:00:19
안녕하세요
예스스탁입니다.
input : P(14);
var : cnt(0),TH(0),TL(0),Sum(0),TR(0),DayATR(0),TH1(0),TL1(0),Sum1(0),TR1(0),DayATR1(0);
sum = 0;
sum1 = 0;
for cnt = 0 to P-1{
If DayClose(cnt+1) > dayhigh(cnt) then
TH = DayClose(cnt+1);
else
TH = dayhigh(cnt);
If DayClose(cnt+1) < DayLow(cnt) then
TL = DayClose(cnt+1);
else
TL = daylow(cnt);
TR = TH-TL;
Sum = Sum+TR;
If DayClose(cnt+2) > dayhigh(cnt+1) then
TH1 = DayClose(cnt+2);
else
TH1 = dayhigh(cnt+1);
If DayClose(cnt+2) < DayLow(cnt+1) then
TL1 = DayClose(cnt+2);
else
TL1 = daylow(cnt+1);
TR1 = TH1-TL1;
Sum1 = Sum1+TR1;
}
DayATR = Sum/P;
DayATR1 = Sum1/P;
plot1(DayATR,"당일기준");
plot2(DayATR1,"전일기준");
즐거운 하루되세요
> 사우로스 님이 쓴 글입니다.
> 제목 : 항상 감사드립니다.
>
문의드립니다.
1분봉에서 일간ATR 을 이용하고 싶습니다.
당일 포함, 당일 미포함 두개의 식을 부탁드립니다.
항상 감사드립니다.
사우로스
2013-02-26 11:53:50
아래 식을 data2 에 적용할 수 있도록 수정해 주십시오.
직접 해보니 잘 안됩니다.
감사합니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 항상 감사드립니다.
> 안녕하세요
예스스탁입니다.
input : P(14);
var : cnt(0),TH(0),TL(0),Sum(0),TR(0),DayATR(0),TH1(0),TL1(0),Sum1(0),TR1(0),DayATR1(0);
sum = 0;
sum1 = 0;
for cnt = 0 to P-1{
If DayClose(cnt+1) > dayhigh(cnt) then
TH = DayClose(cnt+1);
else
TH = dayhigh(cnt);
If DayClose(cnt+1) < DayLow(cnt) then
TL = DayClose(cnt+1);
else
TL = daylow(cnt);
TR = TH-TL;
Sum = Sum+TR;
If DayClose(cnt+2) > dayhigh(cnt+1) then
TH1 = DayClose(cnt+2);
else
TH1 = dayhigh(cnt+1);
If DayClose(cnt+2) < DayLow(cnt+1) then
TL1 = DayClose(cnt+2);
else
TL1 = daylow(cnt+1);
TR1 = TH1-TL1;
Sum1 = Sum1+TR1;
}
DayATR = Sum/P;
DayATR1 = Sum1/P;
plot1(DayATR,"당일기준");
plot2(DayATR1,"전일기준");
즐거운 하루되세요
> 사우로스 님이 쓴 글입니다.
> 제목 : 항상 감사드립니다.
>
문의드립니다.
1분봉에서 일간ATR 을 이용하고 싶습니다.
당일 포함, 당일 미포함 두개의 식을 부탁드립니다.
항상 감사드립니다.
예스스탁 예스스탁 답변
2013-02-26 15:20:42
안녕하세요
예스스탁입니다.
input : P(14);
var : cnt(0,data1),TH(0,data2),TL(0,data2),Sum(0,data2),TR(0,data2),DayATR(0,data2);
var : TH1(0,data2),TL1(0,data2),Sum1(0,data2),TR1(0,data2),DayATR1(0,data2);
Array : D2H[50](0,data2),D2L[50](0,data2),D2C[50](0,data2);
if data2(date != date[1]) Then{
D2H[0] = data2(H);
D2L[0] = data2(L);
D2C[0] = data2(c);
for cnt = 1 to 49{
D2H[cnt] = D2H[cnt-1][1];
D2L[cnt] = D2L[cnt-1][1];
D2C[cnt] = D2C[cnt-1][1];
}
}
if data2(H) > D2H[0] Then
D2H[0] = data2(H);
if data2(L) < D2L[0] Then
D2L[0] = data2(L);
D2C[0] = data2(c);
sum = 0;
sum1 = 0;
for cnt = 0 to P-1{
If D2C[cnt+1] > D2H[cnt] then
TH = D2C[cnt+1];
else
TH = D2H[cnt];
If D2C[cnt+1] < D2L[cnt] then
TL = D2C[cnt+1];
else
TL = D2L[cnt];
TR = TH-TL;
Sum = Sum+TR;
If D2C[cnt+2] > D2H[cnt+1] then
TH1 = D2C[cnt+2];
else
TH1 = D2H[cnt+1];
If D2C[cnt+2] < D2L[cnt+1] then
TL1 = D2C[cnt+2];
else
TL1 = D2L[cnt+1];
TR1 = TH1-TL1;
Sum1 = Sum1+TR1;
}
DayATR = Sum/P;
DayATR1 = Sum1/P;
plot1(DayATR,"당일기준");
plot2(DayATR1,"전일기준");
즐거운 하루되세요
> 사우로스 님이 쓴 글입니다.
> 제목 : Re : Re : 항상 감사드립니다.
>
아래 식을 data2 에 적용할 수 있도록 수정해 주십시오.
직접 해보니 잘 안됩니다.
감사합니다.
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 항상 감사드립니다.
> 안녕하세요
예스스탁입니다.
input : P(14);
var : cnt(0),TH(0),TL(0),Sum(0),TR(0),DayATR(0),TH1(0),TL1(0),Sum1(0),TR1(0),DayATR1(0);
sum = 0;
sum1 = 0;
for cnt = 0 to P-1{
If DayClose(cnt+1) > dayhigh(cnt) then
TH = DayClose(cnt+1);
else
TH = dayhigh(cnt);
If DayClose(cnt+1) < DayLow(cnt) then
TL = DayClose(cnt+1);
else
TL = daylow(cnt);
TR = TH-TL;
Sum = Sum+TR;
If DayClose(cnt+2) > dayhigh(cnt+1) then
TH1 = DayClose(cnt+2);
else
TH1 = dayhigh(cnt+1);
If DayClose(cnt+2) < DayLow(cnt+1) then
TL1 = DayClose(cnt+2);
else
TL1 = daylow(cnt+1);
TR1 = TH1-TL1;
Sum1 = Sum1+TR1;
}
DayATR = Sum/P;
DayATR1 = Sum1/P;
plot1(DayATR,"당일기준");
plot2(DayATR1,"전일기준");
즐거운 하루되세요
> 사우로스 님이 쓴 글입니다.
> 제목 : 항상 감사드립니다.
>
문의드립니다.
1분봉에서 일간ATR 을 이용하고 싶습니다.
당일 포함, 당일 미포함 두개의 식을 부탁드립니다.
항상 감사드립니다.
다음글