커뮤니티

부탁드립니다.

프로필 이미지
서태공
2015-03-31 18:12:22
193
글번호 84623
답변완료
1. 현재 종가가 이동평균선 60일선 위로 상승하면, 그 전 이동평균선 상승시 봉 중에서 최고점인 봉과 그 전전 이동평균선 상승시 봉 중에서 최고점인 봉과 서로 연결하는 추세선을 나올 때마다 우측으로 계속 자동 연장하여 표시되도록 해 주세요(만약,봉의 최고점의 높이가 똑 같을 경우에는 마지막 최근 봉을 기준으로 만들어 주세요) 동시에, 2 현재 종가가 이동평균선 60일선 아래로 하락하면, 그 전 이동평균선 하락시 봉 중에서 최저점인 봉과 그 전전 이동평균선 하락시 봉 중에서 최저점인 봉과 서로 연결하는 추세선을 나올 때마다 우측으로 계속 자동 연장하여 표시되도록 해 주세요(만약,봉의 최저점의 높이가 똑 같을 경우에는 마지막 최근 봉을 기준으로 만들어 주세요)
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2015-04-01 09:33:42

안녕하세요 예스스탁입니다. input : P(60); var : mav(0),T(0),cnt(0),T1(0),T2(0); Array : HD[3](0),HT[3](0),HV[3](0); Array : LD[3](0),LT[3](0),LV[3](0); mav = ma(c,P); if crossup(C,mav) Then{ T = 1; HD[0] = sdate; HT[0] = stime; HV[0] = H; for cnt = 1 to 2{ HD[cnt] = HD[cnt-1][1]; HT[cnt] = HT[cnt-1][1]; HV[cnt] = HV[cnt-1][1]; } } if CrossDown(C,mav) Then{ T = -1; LD[0] = sdate; LT[0] = stime; LV[0] = L; for cnt = 1 to 2{ LD[cnt] = LD[cnt-1][1]; LT[cnt] = LT[cnt-1][1]; LV[cnt] = LV[cnt-1][1]; } } if T == 1 Then{ if H >= HV[0] Then{ HD[0] = sdate; HT[0] = stime; HV[0] = H; } TL_Delete(T1); if HV[1] > HV[2] Then T1 = TL_New(HD[1],HT[1],HV[1],HD[0],HT[0],HV[0]); Else T1 = TL_New(HD[2],HT[2],HV[2],HD[0],HT[0],HV[0]); TL_SetExtRight(T1,true); TL_SetColor(T1,RED); } if T == -1 Then{ if L <= LV[0] Then{ LD[0] = sdate; LT[0] = stime; LV[0] = L; } TL_Delete(T2); if LV[1] < LV[2] Then T2 = TL_New(LD[1],LT[1],LV[1],LD[0],LT[0],LV[0]); Else T2 = TL_New(LD[2],LT[2],LV[2],LD[0],LT[0],LV[0]); TL_SetExtRight(T2,true); TL_SetColor(T2,blue); } 즐거운 하루되세요 > 서태공 님이 쓴 글입니다. > 제목 : 부탁드립니다. > 1. 현재 종가가 이동평균선 60일선 위로 상승하면, 그 전 이동평균선 상승시 봉 중에서 최고점인 봉과 그 전전 이동평균선 상승시 봉 중에서 최고점인 봉과 서로 연결하는 추세선을 나올 때마다 우측으로 계속 자동 연장하여 표시되도록 해 주세요(만약,봉의 최고점의 높이가 똑 같을 경우에는 마지막 최근 봉을 기준으로 만들어 주세요) 동시에, 2 현재 종가가 이동평균선 60일선 아래로 하락하면, 그 전 이동평균선 하락시 봉 중에서 최저점인 봉과 그 전전 이동평균선 하락시 봉 중에서 최저점인 봉과 서로 연결하는 추세선을 나올 때마다 우측으로 계속 자동 연장하여 표시되도록 해 주세요(만약,봉의 최저점의 높이가 똑 같을 경우에는 마지막 최근 봉을 기준으로 만들어 주세요)