커뮤니티

수정 부탁드려요

프로필 이미지
정상에서야
2017-03-15 11:00:54
141
글번호 107805
답변완료
52376 댓글에 보완 사항을 적었습니다 확인해보시고 수정 부탁드립니다
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2017-03-15 11:52:21

안녕하세요 예스스탁입니다. 아래 내용 참고하시기 바랍니다 var : T(0),S(0),count(0),H1(0),L1(0),HH(0),LL(0); var1 = ma(C,20); if C > var1 and countif(C>O,2) == 2 Then T = 1; if C < var1 and countif(C<O,2) == 2 Then T = -1; if C > O Then S = 1; if C < O Then S = -1; #상승반전 카운트 초기화 if T == 1 and T[1] != 1 Then{ count = 0; } #하락반전 카운트 초기화 if T == 1 and T[1] != 1 Then{ count = 0; } #양봉구간 최고가 if S == 1 and S[1] != 1 Then HH = H; if S == 1 and H > HH Then HH = H; #음봉구간 최저가 if S == -1 and S[1] != -1 Then LL = L; if S == -1 and L < LL Then LL = L; #상승구간 if T == 1 then{ #양봉구간이다가 음봉발생 if S == -1 and S[1] == 1 Then{ #횟수 카운트 if count == 0 Then{ count = 1; H1 = HH; } Else{ if HH > H1 Then{ H1 = HH; count = count+1; } } if count != count[1] then{ #횟수에 따라 지정된 숫자 출력 if count == 1 Then Text_New(sdate[1],stime[1],H[1],NumToStr(1,0)); #카운트가 1이면 전봉고가에 1출력 if count == 2 Then Text_New(sdate[1],stime[1],H[1],NumToStr(3,0)); #카운트가 2이면 전봉고가에 3출력 if count == 3 Then Text_New(sdate[1],stime[1],H[1],NumToStr(5,0)); #카운트가 3이면 전봉고가에 5출력 if count == 4 Then Text_New(sdate[1],stime[1],H[1],NumToStr(7,0)); #카운트가 4이면 전봉고가에 7출력 if count == 5 Then Text_New(sdate[1],stime[1],H[1],NumToStr(9,0)); #카운트가 5이면 전봉고가에 9출력 if count == 6 Then Text_New(sdate[1],stime[1],H[1],NumToStr(11,0)); #카운트가 6이면 전봉고가에 11출력 if count == 7 Then Text_New(sdate[1],stime[1],H[1],NumToStr(13,0)); #카운트가 7이면 전봉고가에 13출력 if count == 8 Then Text_New(sdate[1],stime[1],H[1],NumToStr(15,0)); #카운트가 8이면 전봉고가에 13출력 } } } #하락구간 if T == 1 then{ #음봉구간이다가 양봉발생 if S == 1 and S[1] == -1 Then{ #횟수 카운트 if count == 0 Then{ count = 1; L1 = LL; } Else{ if LL < L1 Then{ L1 = LL; count = count+1; } } if count != count[1] then{ #횟수에 따라 지정된 숫자 출력 if count == 1 Then Text_New(sdate[1],stime[1],H[1],NumToStr(1,0)); #카운트가 1이면 전봉고가에 1출력 if count == 2 Then Text_New(sdate[1],stime[1],H[1],NumToStr(3,0)); #카운트가 2이면 전봉고가에 3출력 if count == 3 Then Text_New(sdate[1],stime[1],H[1],NumToStr(5,0)); #카운트가 3이면 전봉고가에 5출력 if count == 4 Then Text_New(sdate[1],stime[1],H[1],NumToStr(7,0)); #카운트가 4이면 전봉고가에 7출력 if count == 5 Then Text_New(sdate[1],stime[1],H[1],NumToStr(9,0)); #카운트가 5이면 전봉고가에 9출력 if count == 6 Then Text_New(sdate[1],stime[1],H[1],NumToStr(11,0)); #카운트가 6이면 전봉고가에 11출력 if count == 7 Then Text_New(sdate[1],stime[1],H[1],NumToStr(13,0)); #카운트가 7이면 전봉고가에 13출력 if count == 8 Then Text_New(sdate[1],stime[1],H[1],NumToStr(15,0)); #카운트가 8이면 전봉고가에 13출력 } } } 즐거운 하루되세요 > 정상에서야 님이 쓴 글입니다. > 제목 : 수정 부탁드려요 > 52376 댓글에 보완 사항을 적었습니다 확인해보시고 수정 부탁드립니다