안녕하세요 예스스탁입니다. INPUT : SIG(5); var : EP(0),idx(0); Var : h1(0),h2(0),h3(0); Var : l1(0),l2(0),l3(0); Ep = 2/(SIG+1); if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then { h1 = h; h2 = 0; h3 = 0; l1 = l; l2 = 0; l3 = 0; idx = 0; var1 = 0; var2 = 0; var3 = 0; var21 = 0; var22 = 0; var23 = 0; } else { if H1 == 0 or (H1 > 0 and h > h1) Then { h1 = h; h2 = h1[1]; h3 = h2[1]; } if (H2 == 0 or (H2 > 0 and h > h2)) and h < h1 Then { h2 = h; h3 = h2[1]; } if (H3 == 0 or (H3 > 0 and h > h3))and h < h2 Then { h3 = h; } if L1 == 0 or (L1 > 0 and l < l1) Then { l1 = l; l2 = l1[1]; l3 = l2[1]; } if (L2 == 0 or (L2 > 0 and l < l2 )) and l > l1 Then { l2 = l; l3 = l2[1]; } if (L3 == 0 or (L3 > 0 and l < l3 )) and l > l2 Then { l3 = l; } } if h1 > 0 Then var1=h1; if h2 > 0 Then var2=h2; if h3 > 0 Then var3=h3; if l1 > 0 Then var21 = l1; if l2 > 0 Then var22 = l2; if l3 > 0 Then var23 = l3; if var1 > 0 and var2 > 0 and var3 > 0 and var21 > 0 and var22 > 0 and var23 > 0 then { idx = idx+1; var51=(var1+var2+var3)/3; var61=(var21+var22+var23)/3; var71=(var51+var61)/2; } if idx == 0 then { var81 = 0; } Else var81 = (C-var71) * EP + var81 * (1-EP); plot1(var81); 즐거운 하루되세요 > 뮬리 님이 쓴 글입니다. > 제목 : 부탁 드립니다. > 도움에 감사 드립니다. 다음 var81값이 해선 주초 시작 시간에 계산을 시작 및 주초에 zero로 세팅하고 계산을 하도록 부탁 드립니다. 미리 감사드립니다. INPUT:n(10),SIG(5); var : cnt(0); Var : h1(0),h2(0),h3(0); Var : l1(0),l2(0),l3(0); h1 = 0; l1 = 0; for cnt = 0 to n-1 { if h1 == 0 or (h1 > 0 and h[cnt] > h1) Then h1 = h[cnt]; if l1 == 0 or (l1 > 0 and l[cnt] < l1) Then l1 = l[cnt]; } h2 = 0; l2 = 0; for cnt = 0 to n-1 { if h[cnt] < h1 and (h2 == 0 or (h2 > 0 and h[cnt] > h2)) Then h2 = h[cnt]; if l[cnt] > l1 and (l2 == 0 or (l2 > 0 and l[cnt] < l2)) Then l2 = l[cnt]; } h3 = 0; l3 = 0; for cnt = 0 to n-1 { if h[cnt] < h2 and (h3 == 0 or (h3 > 0 and h[cnt] > h3)) Then h3 = h[cnt]; if l[cnt] > l2 and (l3 == 0 or (l3 > 0 and l[cnt] < l3)) Then l3 = l[cnt]; } if h1 > 0 Then var1=h1; if h2 > 0 Then var2=h2; if h3 > 0 Then var3=h3; if l1 > 0 Then var21=(l1); if l2 > 0 Then var22=(l2); if l3 > 0 Then var23=(l3); var51=(var1+var2+var3)/3; var61=(var21+var22+var23)/3; var71=(var51+var61)/2; var81=ema((c-var71),sig);