커뮤니티
부탁 드립니다.
2015-06-30 10:10:51
130
글번호 87797
안녕하세요?
무더운 여름철에 수고가 많으십니다.
매우 만족할 만한 답변에
진심으로 감사드립니다.
42688번 문의에 이어 동일한 유형으로
부탁 드리고자 합니다.
아래 수식을
1분봉 차트에서 10분봉의 지표를 보고 싶습니다.
운영자님~~~!
노고에 미리 감사드리오며 경배 올립니다.
//**수식**//
Input: p1(5);
Var: Cnt(0),HH(0),LL(0);
Array: tp[100](0), upv[100](0),dnv[100](0);
var1 = ma(c,p1);
If (CrossDown(C, var1)) Then
{
tp[0] = (O + C) / 2;
For Cnt = 1 To 99
{
tp[Cnt] = tp[Cnt -1][1];
}
}
for cnt = 0 to 99
{
if tp[cnt] >= C Then
upv[cnt] = tp[cnt];
Else
upv[cnt] =2;
if tp[cnt] <= C Then
dnv[cnt] = tp[cnt];
Else
dnv[cnt] = 0;
}
HH = 2;
LL = 0;
for cnt = 0 to 99
{
if upv[cnt] < HH Then
HH = upv[cnt];
if dnv[cnt] > LL Then
LL = dnv[cnt];
}
plot1(HH,"상승변곡");
plot2(LL,"하락변곡");
답변 1
예스스탁 예스스탁 답변
2015-06-30 10:58:02
안녕하세요
예스스탁입니다.
해당 내용은 타분봉으로 처리하면
실제 해당 분봉에서 보신것과 차이가 발생할수 있습니다.
42688은 단순 다른 주기의 RSI을 그리는 내용이지만
현재식은 특정조건(crossdown)을 판단해야 하는 부분입니다.
1분봉에서 10분봉의 조건을 판단하는 것은 10분봉 차트에서
미완성시에 조건을 판단한다는 것과 같습니다.
즉 10분봉 미완성시에 crossdown이 발생해서 값을 저장하므로
실제 10분봉 완성시에는 다시 가격이 올라 crossdown이 아닐수 있습니다.
즉 실제 10분봉 완성시를 기준으로 값이 저장되는 것이 아닙니다.
위 내용 참고하시기 바랍니다.
만약 타주기 완성봉만 가지고 판단하시면 2번식 이용하시면 됩니다.
1번
Input: Atime(10),p1(5);
Var: Cnt(0),HH(0),LL(0);
var : count(0),sum1(0),mav1(0),sum2(0),mav2(0),TF(0);
Array: tp[100](0), upv[100](0),dnv[100](0);
Array : OO[100](0),CC[100](0);
TF = TimeToMinutes(stime)%Atime;
if dayindex() == 0 or (TF < TF[1] and stime > stime[1]) Then{
OO[0] = O;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P1] > 0 Then{
sum1 = 0;
sum2 = 0;
for count = 0 to P1-1{
sum1 = sum1+CC[count];
sum2 = sum2+CC[count+1];
}
mav1 = sum1/P1;
mav2 = sum2/P1;
If CrossDown(CC[0],mav1) Then
{
tp[0] = (OO[0] + CC[0]) / 2;
For Cnt = 1 To 99
{
tp[Cnt] = tp[Cnt -1][1];
}
}
for cnt = 0 to 99
{
if tp[cnt] >= C Then
upv[cnt] = tp[cnt];
Else
upv[cnt] =2;
if tp[cnt] <= C Then
dnv[cnt] = tp[cnt];
Else
dnv[cnt] = 0;
}
HH = 2;
LL = 0;
for cnt = 0 to 99
{
if upv[cnt] < HH Then
HH = upv[cnt];
if dnv[cnt] > LL Then
LL = dnv[cnt];
}
plot1(HH,"상승변곡");
plot2(LL,"하락변곡");
}
2번
Input: Atime(10),p1(5);
Var: Cnt(0),HH(0),LL(0);
var : count(0),sum1(0),mav1(0),sum2(0),mav2(0),TF(0);
Array: tp[100](0), upv[100](0),dnv[100](0);
Array : OO[100](0),CC[100](0);
TF = TimeToMinutes(stime)%Atime;
if dayindex() == 0 or (TF < TF[1] and stime > stime[1]) Then{
OO[0] = O;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P1+1] > 0 and dayindex() == 0 or (TF < TF[1] and stime > stime[1]) Then{
sum1 = 0;
sum2 = 0;
for count = 0 to P1-1{
sum1 = sum1+CC[count+1];
sum2 = sum2+CC[count+2];
}
mav1 = sum1/P1;
mav2 = sum2/P1;
If (CC[1] < mav1 and CC[2] >= mav2) Then
{
tp[0] = (OO[1] + CC[1]) / 2;
For Cnt = 1 To 99
{
tp[Cnt] = tp[Cnt -1][1];
}
}
for cnt = 0 to 99
{
if tp[cnt] >= C Then
upv[cnt] = tp[cnt];
Else
upv[cnt] = 2;
if tp[cnt] <= C Then
dnv[cnt] = tp[cnt];
Else
dnv[cnt] = 0;
}
HH = 2;
LL = 0;
for cnt = 0 to 99
{
if upv[cnt] < HH Then
HH = upv[cnt];
if dnv[cnt] > LL Then
LL = dnv[cnt];
}
plot1(HH,"상승변곡");
plot2(LL,"하락변곡");
}
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 안녕하세요?
무더운 여름철에 수고가 많으십니다.
매우 만족할 만한 답변에
진심으로 감사드립니다.
42688번 문의에 이어 동일한 유형으로
부탁 드리고자 합니다.
아래 수식을
1분봉 차트에서 10분봉의 지표를 보고 싶습니다.
운영자님~~~!
노고에 미리 감사드리오며 경배 올립니다.
//**수식**//
Input: p1(5);
Var: Cnt(0),HH(0),LL(0);
Array: tp[100](0), upv[100](0),dnv[100](0);
var1 = ma(c,p1);
If (CrossDown(C, var1)) Then
{
tp[0] = (O + C) / 2;
For Cnt = 1 To 99
{
tp[Cnt] = tp[Cnt -1][1];
}
}
for cnt = 0 to 99
{
if tp[cnt] >= C Then
upv[cnt] = tp[cnt];
Else
upv[cnt] =2;
if tp[cnt] <= C Then
dnv[cnt] = tp[cnt];
Else
dnv[cnt] = 0;
}
HH = 2;
LL = 0;
for cnt = 0 to 99
{
if upv[cnt] < HH Then
HH = upv[cnt];
if dnv[cnt] > LL Then
LL = dnv[cnt];
}
plot1(HH,"상승변곡");
plot2(LL,"하락변곡");
다음글
이전글