피보나치 되돌림 비율 선은 파동선이 먼저 그려져야 의미가 있으므로 위의 그림처럼 작성하실 수 있습니다. 의도하는 바가 맞다고 하신다면 수식을 올려놓겠습니다. > 등대 님이 쓴 글입니다. > 제목 : fibonacci retracement line > 안녕하십니까? 질문1. 상기 line 이 실시간 자동으로 그려질수 있나요? 만일 없다면 개발부탁드립니다 질문2. % line 이 동일색,동일선굵기로 표시되는데 다른색,다른 굵기의 표시방법은? 현재 없다면 역시 부탁드립니다 감사합니다

> 수식지왕 님이 쓴 글입니다. > 제목 : Re : fibonacci retracement line > 피보나치 되돌림 비율 선은 파동선이 먼저 그려져야 의미가 있으므로 위의 그림처럼 작성하실 수 있습니다. 의도하는 바가 맞다고 하신다면 수식을 올려놓겠습니다. > 등대 님이 쓴 글입니다. > 제목 : fibonacci retracement line > 안녕하십니까? 질문1. 상기 line 이 실시간 자동으로 그려질수 있나요? 만일 없다면 개발부탁드립니다 질문2. % line 이 동일색,동일선굵기로 표시되는데 다른색,다른 굵기의 표시방법은? 현재 없다면 역시 부탁드립니다 감사합니다

아래수식은 SwingHigh와 SwingLow에 의해 파동선이 그려지고 그 파동 높이를 근간으로 피보나치 라인을 그리는 지표식입니다. 반등과 반락을 하나의 차트에 모두 표시하게 되면 복잡해서 알아볼 수 없으므로 구분자를 통해 한방향만 지표로 출력토록 해 보았습니다. //작성자 : 수식지왕 input:left(5),right(5),구분(1); var:j(0),prehv(0),prelv(0),prehb(0),prelb(0),tmpv(0),tmpb(0), ovr(0),반등(1),반락(-1); array:hv[10](0),lv[10](0),hb[10](0),lb[10](0), r[8](0),fr[8](0); r[0] = 0; r[1] = 0.236; r[2] = 0.382; r[3] = 0.50; r[4] = 0.618; r[5] = 0.764; r[6] = 1; r[7] = 1.618; #==============================================================================# # 변곡점 계산 #==============================================================================# //파동선 작성 설명은 자주 했으므로 생략 if highest(h[1],left) <= h then { prehv = h; prehb = 0; } else prehb = prehb + 1; if lowest(l[1],left) >= l then { prelv = l; prelb = 0; } else prelb = prelb + 1; for j = 1 to 9 begin hb[j] = hb[j] + 1; lb[j] = lb[j] + 1; end; if prehb == right and highest(h,right) <= h[right] then { for j = 9 downto 2 { hv[j] = hv[j-1]; hb[j] = hb[j-1]; } hv[1] = prehv; hb[1] = prehb; if lb[1] > hb[2] then { for j = 9 downto 2 { lv[j] = lv[j-1]; lb[j] = lb[j-1]; } tmpv = 0; for j = hb[1] + 1 to hb[2] - 1 { if tmpv > l[j] or tmpv ==0 then { tmpv = l[j]; tmpb = j; } } lv[1] = tmpv; lb[1] = tmpb; } } if prelb == right and lowest(l,right) >= l[right] then { for j = 9 downto 2 { lv[j] = lv[j-1]; lb[j] = lb[j-1]; } lv[1] = prelv; lb[1] = prelb; if hb[1] > lb[2] then { for j = 9 downto 2 { hv[j] = hv[j-1]; hb[j] = hb[j-1]; } tmpv = 0; for j = lb[1] + 1 to lb[2] - 1 { if tmpv < h[j] or tmpv ==0 then { tmpv = h[j]; tmpb = j; } } hv[1] = tmpv; hb[1] = tmpb; } } #==============================================================================# # Fibonacci Retracements 계산 #==============================================================================# //반등과 반락을 모두 표시하게 되면 복잡해지므로 한 방향만 표시하는 것이 옳음 if 구분 == 반등 then { if crossup(lb[1],hb[1]) then { for j = 0 to 7 begin fr[j] = hv[1] - (hv[1] - lv[1]) * r[j]; end; ovr = 0; } if fr[6]>l then ovr = 1; } if 구분 == 반락 then { if crossup(hb[1],lb[1]) then { for j = 0 to 7 begin fr[j] = lv[1] + (hv[1] - lv[1]) * r[j]; end; ovr = 0; } if fr[6]>l then ovr = 1; } #==============================================================================# # 지표출력 #==============================================================================# if hb[1]==right then plot1(hv[1],"파동선",GREEN); if lb[1]==right then plot1(lv[1],"파동선",GREEN); plot2(fr[0],"0%",BLUE); plot3(fr[1],"23.6%",RED); plot4(fr[2],"38.2%",MAGENTA); plot5(fr[3],"50%",GRAY); plot6(fr[4],"61.8%",LBLUE); plot7(fr[5],"76.4%",LGREEN); plot8(fr[6],"100%",PINK); if ovr then plot9(fr[7],"161.8%",LMAGENTA); //점 그래프로 표시

감사드립니다 꾸벅 > 수식지왕 님이 쓴 글입니다. > 제목 : Re : fibonacci retracement line > 아래수식은 SwingHigh와 SwingLow에 의해 파동선이 그려지고 그 파동 높이를 근간으로 피보나치 라인을 그리는 지표식입니다. 반등과 반락을 하나의 차트에 모두 표시하게 되면 복잡해서 알아볼 수 없으므로 구분자를 통해 한방향만 지표로 출력토록 해 보았습니다. //작성자 : 수식지왕 input:left(5),right(5),구분(1); var:j(0),prehv(0),prelv(0),prehb(0),prelb(0),tmpv(0),tmpb(0), ovr(0),반등(1),반락(-1); array:hv[10](0),lv[10](0),hb[10](0),lb[10](0), r[8](0),fr[8](0); r[0] = 0; r[1] = 0.236; r[2] = 0.382; r[3] = 0.50; r[4] = 0.618; r[5] = 0.764; r[6] = 1; r[7] = 1.618; #==============================================================================# # 변곡점 계산 #==============================================================================# //파동선 작성 설명은 자주 했으므로 생략 if highest(h[1],left) <= h then { prehv = h; prehb = 0; } else prehb = prehb + 1; if lowest(l[1],left) >= l then { prelv = l; prelb = 0; } else prelb = prelb + 1; for j = 1 to 9 begin hb[j] = hb[j] + 1; lb[j] = lb[j] + 1; end; if prehb == right and highest(h,right) <= h[right] then { for j = 9 downto 2 { hv[j] = hv[j-1]; hb[j] = hb[j-1]; } hv[1] = prehv; hb[1] = prehb; if lb[1] > hb[2] then { for j = 9 downto 2 { lv[j] = lv[j-1]; lb[j] = lb[j-1]; } tmpv = 0; for j = hb[1] + 1 to hb[2] - 1 { if tmpv > l[j] or tmpv ==0 then { tmpv = l[j]; tmpb = j; } } lv[1] = tmpv; lb[1] = tmpb; } } if prelb == right and lowest(l,right) >= l[right] then { for j = 9 downto 2 { lv[j] = lv[j-1]; lb[j] = lb[j-1]; } lv[1] = prelv; lb[1] = prelb; if hb[1] > lb[2] then { for j = 9 downto 2 { hv[j] = hv[j-1]; hb[j] = hb[j-1]; } tmpv = 0; for j = lb[1] + 1 to lb[2] - 1 { if tmpv < h[j] or tmpv ==0 then { tmpv = h[j]; tmpb = j; } } hv[1] = tmpv; hb[1] = tmpb; } } #==============================================================================# # Fibonacci Retracements 계산 #==============================================================================# //반등과 반락을 모두 표시하게 되면 복잡해지므로 한 방향만 표시하는 것이 옳음 if 구분 == 반등 then { if crossup(lb[1],hb[1]) then { for j = 0 to 7 begin fr[j] = hv[1] - (hv[1] - lv[1]) * r[j]; end; ovr = 0; } if fr[6]>l then ovr = 1; } if 구분 == 반락 then { if crossup(hb[1],lb[1]) then { for j = 0 to 7 begin fr[j] = lv[1] + (hv[1] - lv[1]) * r[j]; end; ovr = 0; } if fr[6]>l then ovr = 1; } #==============================================================================# # 지표출력 #==============================================================================# if hb[1]==right then plot1(hv[1],"파동선",GREEN); if lb[1]==right then plot1(lv[1],"파동선",GREEN); plot2(fr[0],"0%",BLUE); plot3(fr[1],"23.6%",RED); plot4(fr[2],"38.2%",MAGENTA); plot5(fr[3],"50%",GRAY); plot6(fr[4],"61.8%",LBLUE); plot7(fr[5],"76.4%",LGREEN); plot8(fr[6],"100%",PINK); if ovr then plot9(fr[7],"161.8%",LMAGENTA); //점 그래프로 표시