안녕하세요 예스스탁입니다. 이전 답변식에 부등호가 반대로된 부분이 있어 2번으로 수정식 다시 올려드립니다. 1 input : P1(9),P2(10),P3(26),P4(27); var : cnt(0),h1(0),l1(0),m1(0),h2(0),l2(0),m2(0); var : h3(0),l3(0),m3(0),h4(0),l4(0),m4(0); Array : HH[100](0),LL[100](0); if Bdate > Bdate[1]+30 Then { For cnt = 1 to 99 { HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } HH[0] = H; LL[0] = L; } if HH[0] > 0 and H > HH[0] Then HH[0] = H; if LL[0] > 0 and L < LL[0] Then LL[0] = L; if HH[p2] > 0 Then { h1 = 0; l1 = 0; h2 = 0; l2 = 0; For cnt = 0 to max(P1,P2)-1 { if cnt < P1 Then { if h1 == 0 or (h1 > 0 and hh[cnt] > h1) Then h1 = hh[cnt]; if l1 == 0 or (l1 > 0 and ll[cnt] < l1) Then l1 = ll[cnt]; } if cnt < P2 Then { if h2 == 0 or (h2 > 0 and hh[cnt] > h2) Then h2 = hh[cnt]; if l2 == 0 or (l2 > 0 and ll[cnt] < l2) Then l2 = ll[cnt]; } } m1 = (h1+l1)/2; m2 = (h2+l2)/2; Plot1(m1); Plot2(m2); if m1 < m2 and m1[1] == m2[1] Then { var1 = h; Var2 = l; } if var1 > 0 Then { Plot3(var1); Plot4(var2); } } if HH[p4] > 0 Then { h3 = 0; l3 = 0; h4 = 0; l4 = 0; For cnt = 0 to max(P3,P4)-1 { if cnt < P3 Then { if h3 == 0 or (h3 > 0 and hh[cnt] > h3) Then h3 = hh[cnt]; if l3 == 0 or (l3 > 0 and ll[cnt] < l3) Then l3 = ll[cnt]; } if cnt < P4 Then { if h4 == 0 or (h4 > 0 and hh[cnt] > h4) Then h4 = hh[cnt]; if l4 == 0 or (l4 > 0 and ll[cnt] < l4) Then l4 = ll[cnt]; } } m3 = (h3+l3)/2; m4 = (h4+l4)/2; plot5(m3); plot6(m4); if m3 < m4 and m3[1] == m4[1] Then { var3 = h; Var4 = l; } if var3 > 0 Then { Plot7(var3); Plot8(var4); } } 2 input : P1(9),P2(10); var : cnt(0),h1(0),l1(0),m1(0),h2(0),l2(0),m2(0); Array : HH[100](0),LL[100](0); if Bdate > Bdate[1]+30 Then { For cnt = 1 to 99 { HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } HH[0] = H; LL[0] = L; } if HH[0] > 0 and H > HH[0] Then HH[0] = H; if LL[0] > 0 and L < LL[0] Then LL[0] = L; if HH[p2] > 0 Then { h1 = 0; l1 = 0; h2 = 0; l2 = 0; For cnt = 0 to max(P1,P2)-1 { if cnt < P1 Then { if h1 == 0 or (h1 > 0 and hh[cnt] > h1) Then h1 = hh[cnt]; if l1 == 0 or (l1 > 0 and ll[cnt] < l1) Then l1 = ll[cnt]; } if cnt < P2 Then { if h2 == 0 or (h2 > 0 and hh[cnt] > h2) Then h2 = hh[cnt]; if l2 == 0 or (l2 > 0 and ll[cnt] < l2) Then l2 = ll[cnt]; } } m1 = (h1+l1)/2; m2 = (h2+l2)/2; if m1 > m2 and m1[1] == m2[1] Then { var1 = h; Var2 = l; } if m1 < m2 and m1[1] == m2[1] Then { var3 = h; Var4 = l; } if var1 > 0 Then { Plot1(var1); Plot2(var2); } if var3 > 0 Then { Plot3(var3); Plot4(var4); } } 즐거운 하루되세요 > para 님이 쓴 글입니다. > 제목 : 지표 질문입니다 > 월간 차트의 9개월 중심선(A)과 10개월 중심선(B)를 일간 차트에 표시한다 월간 차트의 26개월 중심선(C)과 27개월 중심선(D)를 일간 차트에 표시한다 A와 B 값이 일치하다가 A가 B보다 작게 되는 캔들 고가(E)와 저가(F)를 표시한다 C와 D 값이 일치하다가 C가 D보다 작게 되는 캔들 고가(G)와 저가(H)를 표시한다 A,B,C,D,E,F,G,H 가 모두 표출되도록 부탁합니다 감사합니다 -------------------------------------------------------------------------------- 지난번에 답변해주신 79652 번 수식입니다 1. 월간 차트의 9개월 중심선(A)과 10개월 중심선(B)를 표시한다 A와 B 값이 일치하다가 A가 B보다 크게 되는 캔들 고가(C)와 저가(D)를 표시한다 A와 B 값이 일치하다가 A가 B보다 작게 되는 캔들 고가(E)와 저가(F)를 표시한다 안녕하세요 예스스탁입니다. 1 A가 B보다 큰 경우는 없습니다. 수식에는 추가해 드립니다. input : P1(9),P2(10); var : cnt(0),h1(0),l1(0),m1(0),h2(0),l2(0),m2(0); Array : HH[100](0),LL[100](0); if Bdate > Bdate[1]+30 Then { For cnt = 1 to 99 { HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } HH[0] = H; LL[0] = L; } if HH[0] > 0 and H > HH[0] Then HH[0] = H; if LL[0] > 0 and L < LL[0] Then LL[0] = L; if HH[p2] > 0 Then { h1 = 0; l1 = 0; h2 = 0; l2 = 0; For cnt = 0 to max(P1,P2)-1 { if cnt < P1 Then { if h1 == 0 or (h1 > 0 and hh[cnt] > h1) Then h1 = hh[cnt]; if l1 == 0 or (l1 > 0 and ll[cnt] > l1) Then l1 = ll[cnt]; } if cnt < P2 Then { if h2 == 0 or (h2 > 0 and hh[cnt] > h2) Then h2 = hh[cnt]; if l2 == 0 or (l2 > 0 and ll[cnt] > l2) Then l2 = ll[cnt]; } } m1 = (h1+l1)/2; m2 = (h2+l2)/2; if m1 > m2 and m1[1] == m2[1] Then { var1 = h; Var2 = l; } if m1 < m2 and m1[1] == m2[1] Then { var3 = h; Var4 = l; } if var1 > 0 Then { Plot1(var1); Plot2(var2); } if var3 > 0 Then { Plot3(var3); Plot4(var4); } }