커뮤니티
수정 부탁드립니다
2018-06-02 07:10:56
282
글번호 119409
안녕하십니까?
1. 방향(1)지우고 Period 값으로 상승시 Period 값 고가 돌파하면 상승 방향 전환되고,
하락시 Period 값 저가 이탈하면 하락챠트가 만들어지도 부탁드립니다.
( 아래 것은 첫봉 기준으로 등분되는 것을 Period 값 고가 저가 기준으로
등분되도록 부탁드립니다. )
#==========================================#
# 지 표 명 : 피보나치 되돌림비율
# 작 성 자 : 수식지왕
# 블 로 그 : http://yahoosir.blog.me
#==========================================#
Var:방향(1),Period(20);
Var:j(0),k(0),고(0),저(0),고Bar(0),저Bar(0);
Array:r[8](0),fr[8](0);
#==============================================================================#
# 초기처리 (Initialize Routine)
#==============================================================================#
r[0] = 0.;
r[1] = 0.236;
r[2] = 0.382;
r[3] = 0.5;
r[4] = 0.618;
r[5] = 0.764;
r[6] = 1;
r[7] = 1.25;
#==============================================================================#
# 메인처리 (Main Routine)
#==============================================================================#
고Bar = 고Bar + 1;
저Bar = 저Bar + 1;
#=========================================================#
# 상승방향
#=========================================================#
If 방향 >= 1 Then
{
#---------------------------------------------------------#
# 최고/최저점 계산
#---------------------------------------------------------#
if H==Highest(H, Period) then
{
고 = H;
고Bar = 0;
}
if L==Lowest(L, Period) then
{
저 = L;
저Bar = 0;
}
#---------------------------------------------------------#
# Fibonacci Retracements 계산
#---------------------------------------------------------#
k = Highest(H,저Bar+1);
for j = 0 to 7
{
fr[j] = 저 + ((k - 저) * r[j]);
}
}
#=========================================================#
# 하락방향
#=========================================================#
Else
{
#---------------------------------------------------------#
# 최고/최저점 계산
#---------------------------------------------------------#
if H==Highest(H, Period) then
{
고 = H;
고Bar = 0;
}
if L==Lowest(L, Period) then
{
저 = L;
저Bar = 0;
}
#---------------------------------------------------------#
# Fibonacci Retracements 계산
#---------------------------------------------------------#
k = Lowest(L,고Bar+1);
for j = 0 to 7 {
fr[j] = 고 - ((고 - k) * r[j]);
}
}
#==============================================================================#
# 지표출력
#==============================================================================#
Plot1(fr[0], "0%",Iff(방향>=0,BLACK,LBLUE));
Plot2(fr[1], "24%",Iff(방향>=0,BLACK,LGREEN));
Plot3(fr[2], "38%",Iff(방향>=0,BLACK,LCYAN));
Plot4(fr[3], "50%",Iff(방향>=0,BLACK,PINK));
Plot5(fr[4], "62%",Iff(방향>=0,BLACK,LMAGENTA));
Plot6(fr[5][1], "76%",Iff(방향>=0,BLACK,LYELLOW));
Plot7(fr[6],"100%",Iff(방향>=0,BLACK,BWHITE));
Plot8(fr[7],"123%",Iff(방향>=0,BLACK,BWHITE));
답변 1
예스스탁 예스스탁 답변
2018-06-04 10:47:06
안녕하세요
예스스탁입니다.
Var:Period(20);
Var:j(0),k(0),고(0),저(0),고Bar(0),저Bar(0),T(0);
Array:r[8](0),fr[8](0);
r[0] = 0.;
r[1] = 0.236;
r[2] = 0.382;
r[3] = 0.5;
r[4] = 0.618;
r[5] = 0.764;
r[6] = 1;
r[7] = 1.25;
고Bar = 고Bar + 1;
저Bar = 저Bar + 1;
if H==Highest(H, Period) then
{
T = 1;
고 = H;
고Bar = 0;
}
if L==Lowest(L, Period) then
{
T = -1;
저 = L;
저Bar = 0;
}
if T == 1 then{
k = Highest(H,저Bar+1);
for j = 0 to 7
{
fr[j] = 저 + ((k - 저) * r[j]);
}
}
if T == -1 Then
{
k = Lowest(L,고Bar+1);
for j = 0 to 7 {
fr[j] = 고 - ((고 - k) * r[j]);
}
}
#==============================================================================#
# 지표출력
#==============================================================================#
Plot1(fr[0], "0%",Iff(T>=0,BLACK,LBLUE));
Plot2(fr[1], "24%",Iff(T>=0,BLACK,LGREEN));
Plot3(fr[2], "38%",Iff(T>=0,BLACK,LCYAN));
Plot4(fr[3], "50%",Iff(T>=0,BLACK,PINK));
Plot5(fr[4], "62%",Iff(T>=0,BLACK,LMAGENTA));
Plot6(fr[5][1], "76%",Iff(T>=0,BLACK,LYELLOW));
Plot7(fr[6],"100%",Iff(T>=0,BLACK,BWHITE));
Plot8(fr[7],"123%",Iff(T>=0,BLACK,BWHITE));
즐거운 하루되세요
> fill 님이 쓴 글입니다.
> 제목 : 수정 부탁드립니다
> 안녕하십니까?
1. 방향(1)지우고 Period 값으로 상승시 Period 값 고가 돌파하면 상승 방향 전환되고,
하락시 Period 값 저가 이탈하면 하락챠트가 만들어지도 부탁드립니다.
( 아래 것은 첫봉 기준으로 등분되는 것을 Period 값 고가 저가 기준으로
등분되도록 부탁드립니다. )
#==========================================#
# 지 표 명 : 피보나치 되돌림비율
# 작 성 자 : 수식지왕
# 블 로 그 : http://yahoosir.blog.me
#==========================================#
Var:방향(1),Period(20);
Var:j(0),k(0),고(0),저(0),고Bar(0),저Bar(0);
Array:r[8](0),fr[8](0);
#==============================================================================#
# 초기처리 (Initialize Routine)
#==============================================================================#
r[0] = 0.;
r[1] = 0.236;
r[2] = 0.382;
r[3] = 0.5;
r[4] = 0.618;
r[5] = 0.764;
r[6] = 1;
r[7] = 1.25;
#==============================================================================#
# 메인처리 (Main Routine)
#==============================================================================#
고Bar = 고Bar + 1;
저Bar = 저Bar + 1;
#=========================================================#
# 상승방향
#=========================================================#
If 방향 >= 1 Then
{
#---------------------------------------------------------#
# 최고/최저점 계산
#---------------------------------------------------------#
if H==Highest(H, Period) then
{
고 = H;
고Bar = 0;
}
if L==Lowest(L, Period) then
{
저 = L;
저Bar = 0;
}
#---------------------------------------------------------#
# Fibonacci Retracements 계산
#---------------------------------------------------------#
k = Highest(H,저Bar+1);
for j = 0 to 7
{
fr[j] = 저 + ((k - 저) * r[j]);
}
}
#=========================================================#
# 하락방향
#=========================================================#
Else
{
#---------------------------------------------------------#
# 최고/최저점 계산
#---------------------------------------------------------#
if H==Highest(H, Period) then
{
고 = H;
고Bar = 0;
}
if L==Lowest(L, Period) then
{
저 = L;
저Bar = 0;
}
#---------------------------------------------------------#
# Fibonacci Retracements 계산
#---------------------------------------------------------#
k = Lowest(L,고Bar+1);
for j = 0 to 7 {
fr[j] = 고 - ((고 - k) * r[j]);
}
}
#==============================================================================#
# 지표출력
#==============================================================================#
Plot1(fr[0], "0%",Iff(방향>=0,BLACK,LBLUE));
Plot2(fr[1], "24%",Iff(방향>=0,BLACK,LGREEN));
Plot3(fr[2], "38%",Iff(방향>=0,BLACK,LCYAN));
Plot4(fr[3], "50%",Iff(방향>=0,BLACK,PINK));
Plot5(fr[4], "62%",Iff(방향>=0,BLACK,LMAGENTA));
Plot6(fr[5][1], "76%",Iff(방향>=0,BLACK,LYELLOW));
Plot7(fr[6],"100%",Iff(방향>=0,BLACK,BWHITE));
Plot8(fr[7],"123%",Iff(방향>=0,BLACK,BWHITE));