커뮤니티

문의드립니다.

프로필 이미지
land22
2016-09-06 20:06:31
148
글번호 101744
답변완료

첨부 이미지

49452 질문 드린 후 아래 수식의 답변을 받았습니다. 1. 답변주신 1번 수식을 위 그림에서 말씀드린 내용으로 수정 부탁드립니다. 2. 수정된 내용으로 2번 봉수지정X 식도 수정 부탁드립니다. 바쁘신데 귀찮게 해서 너무 죄송합니다. ++++++++++++++++++++++++++++++++++++++++++++++++ 답변 주신 수식 1. input : n(220); var : cnt(0),HH(0),LL(0),Hi(0),Li(0); var : LH(0),LHi(0),HL(0); #n봉간 최고가(a), 최저가(b)를 구하고 #현재봉으로 부터 몇봉전인지 저장 HH = H; Hi = 0; LL = L; Li = 0; for cnt = 0 to N-1 { if H[cnt] > HH Then { HH = H[cnt]; Hi = cnt; } if L[cnt] < LL Then { LL = L[cnt]; Li = cnt; } } #최고가와 최저가를 계산완료했고 #최고가가 최저가보다 더 과거이면 if HH > LL and LL > 0 and Hi > Li and Li > 0 Then { #최저가 이후의 최고가 계산(c) LH = H[0]; LHi = 0; for cnt = 0 to Li { if H[cnt] > LH Then { LH = H[cnt]; LHi = cnt; } } #최저가 이후의 최고가(c) 이후 현재까지 최저가 계산(d) if LH > 0 and LHi > 0 Then { #최저가 이후 최고가 HL = L; for cnt = 0 to LHi{ if L[cnt] < HL Then HL = L[cnt]; } if HH > LL and HH > LH and HH >= LL*1.3 and LH > (HH+LL)/2 and HL < (LH+LL)/2 and L == HL Then find(1); } } 2. 봉수지정X var : cnt(0),HH(0),LL(0),LH(0),HL(0),Hi(0),Li(0); if index == 0 Then{ HH = H; LL = L; Hi = index; Li = index; LH = L; } if H > HH Then{ HH = H; Hi = index; } if L < LL Then{ LL = L; Li = index; LH = L; HL = H; } if H > LH Then{ LH = H; HL = H; } if L < HL Then HL = L; if HH > LL and Hi < Li and HH >= LL*1.3 and LH > (HH+LL)/2 and HL < (LH+LL)/2 and L == HL Then find(1);
종목검색
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2016-09-07 09:47:28

안녕하세요 예스스탁입니다. 1. input : n(220); var : cnt(0); var : aa(0),ai(0); var : bb(0),bi(0); var : cc(0),ci(0); var : dd(0),di(0); #a계산 aa = H; ai = 0; for cnt = 0 to N-1 { if H[cnt] > aa Then { aa = H[cnt]; ai = cnt; } } #b계산 if aa > 0 and ai > 0 Then { bb = L; bi = 0; for cnt = 0 to ai { if L[cnt] < bb Then { bb = L[cnt]; bi = cnt; } } } #C계산 if bb > 0 and bi > 0 Then { cc = H; ci = 0; for cnt = 0 to bi { if H[cnt] > cc Then { cc = H[cnt]; ci = cnt; } } } #D계산 if bb > 0 and bi > 0 Then { dd = L; di = 0; for cnt = 0 to ci { if L[cnt] < dd Then { dd = L[cnt]; di = cnt; } } } if ai > bi and bi > ci and ci > di and aa >= bb*1.3 and cc >= (aa+bb)/2 and dd <= (bb+cc)/2 and L == dd then find(1); 2 var : aa(0),ai(0); var : bb(0),bi(0); var : cc(0),ci(0); var : dd(0),di(0); if index == 0 Then{ aa = H; ai = index; bb = L; bi = index; } if H > aa Then{ aa = H; ai = index; bb = L; bi = index; cc = h; ci = index; } if L < bb Then{ bb = L; bi = index; cc = h; ci = index; } if h > cc Then{ cc = h; ci = index; dd = L; di = index; } if L < dd Then{ dd = L; di = index; } if ai < bi and bi < ci and ci < di and aa >= bb*1.3 and cc >= (aa+bb)/2 and dd <= (bb+cc)/2 and L == dd then find(1); 즐거운 하루되세요 > land22 님이 쓴 글입니다. > 제목 : 문의드립니다. > 49452 질문 드린 후 아래 수식의 답변을 받았습니다. 1. 답변주신 1번 수식을 위 그림에서 말씀드린 내용으로 수정 부탁드립니다. 2. 수정된 내용으로 2번 봉수지정X 식도 수정 부탁드립니다. 바쁘신데 귀찮게 해서 너무 죄송합니다. ++++++++++++++++++++++++++++++++++++++++++++++++ 답변 주신 수식 1. input : n(220); var : cnt(0),HH(0),LL(0),Hi(0),Li(0); var : LH(0),LHi(0),HL(0); #n봉간 최고가(a), 최저가(b)를 구하고 #현재봉으로 부터 몇봉전인지 저장 HH = H; Hi = 0; LL = L; Li = 0; for cnt = 0 to N-1 { if H[cnt] > HH Then { HH = H[cnt]; Hi = cnt; } if L[cnt] < LL Then { LL = L[cnt]; Li = cnt; } } #최고가와 최저가를 계산완료했고 #최고가가 최저가보다 더 과거이면 if HH > LL and LL > 0 and Hi > Li and Li > 0 Then { #최저가 이후의 최고가 계산(c) LH = H[0]; LHi = 0; for cnt = 0 to Li { if H[cnt] > LH Then { LH = H[cnt]; LHi = cnt; } } #최저가 이후의 최고가(c) 이후 현재까지 최저가 계산(d) if LH > 0 and LHi > 0 Then { #최저가 이후 최고가 HL = L; for cnt = 0 to LHi{ if L[cnt] < HL Then HL = L[cnt]; } if HH > LL and HH > LH and HH >= LL*1.3 and LH > (HH+LL)/2 and HL < (LH+LL)/2 and L == HL Then find(1); } } 2. 봉수지정X var : cnt(0),HH(0),LL(0),LH(0),HL(0),Hi(0),Li(0); if index == 0 Then{ HH = H; LL = L; Hi = index; Li = index; LH = L; } if H > HH Then{ HH = H; Hi = index; } if L < LL Then{ LL = L; Li = index; LH = L; HL = H; } if H > LH Then{ LH = H; HL = H; } if L < HL Then HL = L; if HH > LL and Hi < Li and HH >= LL*1.3 and LH > (HH+LL)/2 and HL < (LH+LL)/2 and L == HL Then find(1);