• 커뮤니티
  • 질의응답
  • 예스랭귀지 Q&A

커뮤니티

분봉에 일봉 겹쳐보기

프로필 이미지
당일선물
2018-03-24 23:56:24
378
글번호 117667
답변완료

첨부 이미지

그림1
그림1
그림2
그림2
[대신사이보스]에서 제공되는 분봉에 일봉을 겹쳐서 보이게 하는 "다른주기봉" 지표입니다. 1. 일봉챠트에서 주봉챠트를 겹쳐 볼 수 있는 지표 2. 분봉챠트에서 일봉챠트를 겹쳐 볼 수 있는 지표 3. 작은 분봉에서 큰 분봉을 겹쳐 볼 수 있는 지표 (예 5분챠트에 60분봉 겹쳐보기) 부탁드립니다. 감사합니다.
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2018-03-26 14:44:49

안녕하세요 예스스탁입니다. 올려주신 그림과 같이 표시는 어렵습니다. 올려주신 내용을 구현하려면 추세선 함수로 그리는 방법뿐이 없는데 박스 내부에 색을 채우는 부분은 가능하지 않습니다. 1 var : d1(0),t1(0),hh(0),ll(0),oo(0),cc(0),ii(0),mm(0); var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0); if dayofweek(bdate) < DayOfWeek(bdate[1]) Then{ d1 = sdate; t1 = stime; OO = o; HH = h; LL = l; CC = C; ii = 0; tl1 = TL_New(d1,t1,max(OO,CC),d1,t1,min(OO,CC)); tl2 = TL_New(sdate,stime,max(OO,CC),sdate,stime,min(OO,CC)); tl3 = TL_New(d1,t1,OO,sdate,stime,OO); tl4 = TL_New(d1,t1,CC,sdate,stime,CC); tl5 = TL_New(d1,t1,max(CC,OO),sdate,stime,HH); tl6 = TL_New(d1,t1,min(CC,OO),sdate,stime,LL); TL_SetSize(Tl1,1); TL_SetSize(Tl2,1); TL_SetSize(Tl3,1); TL_SetSize(Tl4,1); TL_SetSize(Tl5,1); TL_SetSize(Tl6,1); } else{ ii = ii +1; if ii%2 == 0 then mm = ii/2; Else mm = round(ii/2,0); CC = C; if h > hh Then hh = h; if L < ll Then ll = l; TL_SetBegin(tl1,d1,t1,max(OO,CC)); TL_SetEnd(tl1,d1,t1,min(OO,CC)); TL_SetBegin(tl2,sdate,stime,max(OO,CC)); TL_SetEnd(tl2,sdate,stime,min(OO,CC)); TL_SetBegin(tl3,d1,t1,OO); TL_SetEnd(tl3,sdate,stime,OO); TL_SetBegin(tl4,d1,t1,CC); TL_SetEnd(tl4,sdate,stime,CC); TL_SetBegin(tl5,sdate[mm],stime[mm],max(CC,OO)); TL_SetEnd(tl5,sdate[mm],stime[mm],HH); TL_SetBegin(tl6,sdate[mm],stime[mm],min(CC,OO)); TL_SetEnd(tl6,sdate[mm],stime[mm],LL); } TL_SetColor(tl1,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl2,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl3,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl4,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl5,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl6,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); 2 var : d1(0),t1(0),hh(0),ll(0),oo(0),cc(0),ii(0),mm(0); var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0); if bdate != bdate[1] Then{ d1 = sdate; t1 = stime; OO = o; HH = h; LL = l; CC = C; ii = 0; tl1 = TL_New(d1,t1,max(OO,CC),d1,t1,min(OO,CC)); tl2 = TL_New(sdate,stime,max(OO,CC),sdate,stime,min(OO,CC)); tl3 = TL_New(d1,t1,OO,sdate,stime,OO); tl4 = TL_New(d1,t1,CC,sdate,stime,CC); tl5 = TL_New(d1,t1,max(CC,OO),sdate,stime,HH); tl6 = TL_New(d1,t1,min(CC,OO),sdate,stime,LL); TL_SetSize(Tl1,1); TL_SetSize(Tl2,1); TL_SetSize(Tl3,1); TL_SetSize(Tl4,1); TL_SetSize(Tl5,1); TL_SetSize(Tl6,1); } else{ ii = ii +1; if ii%2 == 0 then mm = ii/2; Else mm = round(ii/2,0); CC = C; if h > hh Then hh = h; if L < ll Then ll = l; TL_SetBegin(tl1,d1,t1,max(OO,CC)); TL_SetEnd(tl1,d1,t1,min(OO,CC)); TL_SetBegin(tl2,sdate,stime,max(OO,CC)); TL_SetEnd(tl2,sdate,stime,min(OO,CC)); TL_SetBegin(tl3,d1,t1,OO); TL_SetEnd(tl3,sdate,stime,OO); TL_SetBegin(tl4,d1,t1,CC); TL_SetEnd(tl4,sdate,stime,CC); TL_SetBegin(tl5,sdate[mm],stime[mm],max(CC,OO)); TL_SetEnd(tl5,sdate[mm],stime[mm],HH); TL_SetBegin(tl6,sdate[mm],stime[mm],min(CC,OO)); TL_SetEnd(tl6,sdate[mm],stime[mm],LL); } TL_SetColor(tl1,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl2,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl3,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl4,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl5,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl6,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); 3 input : 타주기분(30); var : S1(0),N1(0),TM(0),TF(0),cnt(0); var : d1(0),t1(0),hh(0),ll(0),oo(0),cc(0),ii(0),mm(0); var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0); if Bdate != Bdate[1] Then{ S1 = TimeToMinutes(stime); N1 = sdate; } if N1 > 0 then{ if sdate == N1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%타주기분; if bdate != bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then{ d1 = sdate; t1 = stime; OO = o; HH = h; LL = l; CC = C; ii = 0; tl1 = TL_New(d1,t1,max(OO,CC),d1,t1,min(OO,CC)); tl2 = TL_New(sdate,stime,max(OO,CC),sdate,stime,min(OO,CC)); tl3 = TL_New(d1,t1,OO,sdate,stime,OO); tl4 = TL_New(d1,t1,CC,sdate,stime,CC); tl5 = TL_New(d1,t1,max(CC,OO),sdate,stime,HH); tl6 = TL_New(d1,t1,min(CC,OO),sdate,stime,LL); TL_SetSize(Tl1,1); TL_SetSize(Tl2,1); TL_SetSize(Tl3,1); TL_SetSize(Tl4,1); TL_SetSize(Tl5,1); TL_SetSize(Tl6,1); } else { ii = ii +1; if ii%2 == 0 then mm = ii/2; Else mm = round(ii/2,0); CC = C; if h > hh Then hh = h; if L < ll Then ll = l; TL_SetBegin(tl1,d1,t1,max(OO,CC)); TL_SetEnd(tl1,d1,t1,min(OO,CC)); TL_SetBegin(tl2,sdate,stime,max(OO,CC)); TL_SetEnd(tl2,sdate,stime,min(OO,CC)); TL_SetBegin(tl3,d1,t1,OO); TL_SetEnd(tl3,sdate,stime,OO); TL_SetBegin(tl4,d1,t1,CC); TL_SetEnd(tl4,sdate,stime,CC); TL_SetBegin(tl5,sdate[mm],stime[mm],max(CC,OO)); TL_SetEnd(tl5,sdate[mm],stime[mm],HH); TL_SetBegin(tl6,sdate[mm],stime[mm],min(CC,OO)); TL_SetEnd(tl6,sdate[mm],stime[mm],LL); } TL_SetColor(tl1,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl2,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl3,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl4,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl5,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); TL_SetColor(tl6,iff(CC>OO,red,iff(CC<OO,blue,GREEN))); } 즐거운 하루되세요 > 당일선물 님이 쓴 글입니다. > 제목 : 분봉에 일봉 겹쳐보기 > [대신사이보스]에서 제공되는 분봉에 일봉을 겹쳐서 보이게 하는 "다른주기봉" 지표입니다. 1. 일봉챠트에서 주봉챠트를 겹쳐 볼 수 있는 지표 2. 분봉챠트에서 일봉챠트를 겹쳐 볼 수 있는 지표 3. 작은 분봉에서 큰 분봉을 겹쳐 볼 수 있는 지표 (예 5분챠트에 60분봉 겹쳐보기) 부탁드립니다. 감사합니다.
등록