안녕하세요 예스스탁입니다. Input:length(15); Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),처리구분(""), TL_Val1(0),TL_Val2(0); var : T(0),LTL1(0),ltl2(0),ltl3(0),ltl4(0); var : HTL1(0),htl2(0),htl3(0),htl4(0); Array:고점[10,2](0),저점[10,2](0); 처리구분 = ""; If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then { If 저점[1,1] > L Then 처리구분 = "저점처리"; If 고점[1,1] < H Then 처리구분 = "고점처리"; } Else If Highest(H,length) == H and lastHiVal <> H Then 처리구분 = "고점처리"; Else If Lowest(L,length) == L and lastLoVal <> L Then 처리구분 = "저점처리"; If 처리구분 == "고점처리" Then { T = 1; lastHiVal = H; If 고점[1,2] < 저점[1,2] Then { For j = 10 DownTo 2 { 고점[j,1] = 고점[j-1,1]; 고점[j,2] = 고점[j-1,2]; } } If 고점[1,2] < 저점[1,2] or 고점[1,1] < H Then { 고점[1,1] = H; 고점[1,2] = Index; sBar = Index - 저점[1,2]; eBar = 0; TL_Delete(HTL4); If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); } TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]); HTL4 = TL_New(sDate[index-고점[3,2]],sTime[index-고점[3,2]],고점[3,1],sDate[eBar],sTime[eBar],고점[1,1]); TL_SetExtRight(HTL4,true); if T[1] != 1 Then{ LTL1 = TL_New(sDate[index-저점[2,2]],sTime[index-저점[2,2]],저점[2,1],sDate[index-저점[1,2]],sTime[index-저점[1,2]],저점[1,1]); LTL2 = LTL1[1]; LTL3 = LTL2[1]; TL_SetExtRight(LTL1,true); TL_SetExtRight(LTL3,False); } If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then { sBar = Index - 저점[2,2]; eBar = Index - 저점[1,2]; } } } If 처리구분 == "저점처리" Then { T = -1; lastLoVal = L; If 저점[1,2] < 고점[1,2] Then { For j = 10 DownTo 2 { 저점[j,1] = 저점[j-1,1]; 저점[j,2] = 저점[j-1,2]; } } If 저점[1,2] < 고점[1,2] or 저점[1,1] > L Then { 저점[1,1] = L; 저점[1,2] = Index; sBar = Index - 고점[1,2]; eBar = 0; TL_Delete(LTL4); If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then { TL_Delete(TL1); } TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]); LTL4 = TL_New(sDate[index-저점[3,2]],sTime[index-저점[3,2]],저점[3,1],sDate[eBar],sTime[eBar],저점[1,1]); TL_SetExtRight(LTL4,true); if T[1] != -1 then{ HTL1 = TL_New(sDate[index-고점[2,2]],sTime[index-고점[2,2]],고점[2,1],sDate[index-고점[1,2]],sTime[index-고점[1,2]],고점[1,1]); HTL2 = HTL1[1]; HTL3 = HTL2[1]; TL_SetExtRight(HTL1,true); TL_SetExtRight(HTL3,false); } If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then { sBar = Index - 고점[2,2]; eBar = Index - 고점[1,2]; } } } TL_SetSize(TL1,2); TL_SetColor(TL1,BLACK); TL_SetColor(LTL1,blue); TL_SetColor(HTL1,red); TL_SetColor(LTL2,red); TL_SetColor(HTL2,blue); TL_SetColor(HTL4,red); TL_SetColor(LTL4,blue); TL_SetSize(LTL1,3); TL_SetSize(HTL1,3); TL_SetSize(LTL2,3); TL_SetSize(HTL2,3); 즐거운 하루되세요 > 동해바다01 님이 쓴 글입니다. > 제목 : 다시 문의 드립니다. > 안녕하세요 답변 주신 지표를 적용하니 옛날 대로 나오지 않고 오른쪽으로 연장도 되지 않고 이상합니다. 원하는 것은 원래 수식에서 현재 고점(핑크 1번)과 전전고점(핑크 3번)과의 추세선 오른쪽 연장 현재 저점(파랑 1번)과 전전저점(파랑 3번)과의 추세선 오른쪽 연장 이렇게 하나만 더 넣고 싶습니다. 그러니까 오른쪽으로 연장되는 추세선은 1. 현재 고점과 전고점 2. 전고점과 전전 고점 3. 현재 고점과 전전고점 4. 현재 저점과 전저점 5. 전저점과 전전저점 6. 현재 저점과 전전저점 이렇게 총 고점 추세선 3개, 저점 추세선 3개 입니다. 다시 한번 부탁드리며 답변 주신 지표를 적용한 그림과 원하는 그림을 첨부 합니다. 감사합니다.