커뮤니티

54371 재질문 드립니다

프로필 이미지
스로우
2017-08-09 13:34:01
90
글번호 111894
답변완료
답변 감사드립니다. 5분챠트에서 15분 주기 잘 확인 되었는데요. 15분 주기 &#49489;팅하고 15분챠트"에서 표현이 안되는 되요. 예전에 60분 주기 세팅하고 이평체크하면 60분챠트에서도 표시가 되던데 뭐가 문제인지 모르겠네요. 도움 부탁립니다 > 예스스탁 님이 쓴 글입니다. > 제목 : Re : Re : Re : 54356 재질문입니다 > 안녕하세요 예스스탁입니다. input : 분주기(30); input : D1(20170804),T1(201500); input : D2(20170804),T2(211500); input : D3(20170804),T3(221500); var : H1(0),L1(0),Tcond1(false),tx11(0),tx12(0); var : H2(0),L2(0),Tcond2(false),tx21(0),tx22(0); var : H3(0),L3(0),Tcond3(false),tx31(0),tx32(0); var : SS(0),DD(0),TM(0),TF(0); var : SD(0),ST(0),HH(0),LL(0); if bdate != Bdate[1] Then{ SS = TimeToMinutes(stime); DD = sdate; } if DD > 0 then{ if sdate == DD Then TM = TimeToMinutes(stime)-SS; Else TM = TimeToMinutes(stime)+1440-SS; TF = TM%분주기; if (Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1])) Then{ SD = Sdate; ST = Stime; HH = H; LL = L; } if H > HH Then HH = H; if L < LL Then LL = L; if SD == D1 and ST == T1 Then{ Tcond1 = true; H1 = HH; L1 = LL; } if SD == D2 and ST == T2 Then{ Tcond2 = true; H2 = HH; L2 = LL; } if SD == D3 and ST == T3 Then{ Tcond3 = true; H3 = HH; L3 = LL; } if Tcond1 == true then{ plot1(H1); plot2(L1); Text_Delete(Tx11); Text_Delete(Tx12); tx11 = Text_New(sdate,stime,H1,NumToStr(H1,2)); tx12 = Text_New(sdate,stime,L1,NumToStr(L1,2)); Text_SetStyle(tx11,0,2); Text_SetStyle(tx12,0,2); } if Tcond2 == true then{ plot3(H2); plot4(L2); Text_Delete(Tx21); Text_Delete(Tx22); tx21 = Text_New(sdate,stime,H2,NumToStr(H2,2)); tx22 = Text_New(sdate,stime,L2,NumToStr(L2,2)); Text_SetStyle(tx21,0,2); Text_SetStyle(tx22,0,2); } if Tcond3 == true then{ plot5(H3); plot6(L3); Text_Delete(Tx31); Text_Delete(Tx32); tx31 = Text_New(sdate,stime,H3,NumToStr(H3,2)); tx32 = Text_New(sdate,stime,L3,NumToStr(L3,2)); Text_SetStyle(tx31,0,2); Text_SetStyle(tx32,0,2); } } 즐거운 하루되세요
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2017-08-09 14:24:04

안녕하세요 예스스탁입니다. 차트와 동일주기도 체크되게 수정했습니다. input : 분주기(15); input : D1(20170804),T1(201500); input : D2(20170804),T2(211500); input : D3(20170804),T3(221500); var : H1(0),L1(0),Tcond1(false),tx11(0),tx12(0); var : H2(0),L2(0),Tcond2(false),tx21(0),tx22(0); var : H3(0),L3(0),Tcond3(false),tx31(0),tx32(0); var : SS(0),DD(0),TM(0),TF(0); var : SD(0),ST(0),HH(0),LL(0); if bdate != Bdate[1] Then{ SS = TimeToMinutes(stime); DD = sdate; } if DD > 0 then{ if sdate == DD Then TM = TimeToMinutes(stime)-SS; Else TM = TimeToMinutes(stime)+1440-SS; TF = TM%분주기; if (Bdate != Bdate[1] or (Bdate == Bdate[1] and (TF < TF[1] or TF == 0))) Then{ SD = Sdate; ST = Stime; HH = H; LL = L; } if H > HH Then HH = H; if L < LL Then LL = L; if SD == D1 and ST == T1 Then{ Tcond1 = true; H1 = HH; L1 = LL; } if SD == D2 and ST == T2 Then{ Tcond2 = true; H2 = HH; L2 = LL; } if SD == D3 and ST == T3 Then{ Tcond3 = true; H3 = HH; L3 = LL; } if Tcond1 == true then{ plot1(H1); plot2(L1); Text_Delete(Tx11); Text_Delete(Tx12); tx11 = Text_New(sdate,stime,H1,NumToStr(H1,2)); tx12 = Text_New(sdate,stime,L1,NumToStr(L1,2)); Text_SetStyle(tx11,0,2); Text_SetStyle(tx12,0,2); } if Tcond2 == true then{ plot3(H2); plot4(L2); Text_Delete(Tx21); Text_Delete(Tx22); tx21 = Text_New(sdate,stime,H2,NumToStr(H2,2)); tx22 = Text_New(sdate,stime,L2,NumToStr(L2,2)); Text_SetStyle(tx21,0,2); Text_SetStyle(tx22,0,2); } if Tcond3 == true then{ plot5(H3); plot6(L3); Text_Delete(Tx31); Text_Delete(Tx32); tx31 = Text_New(sdate,stime,H3,NumToStr(H3,2)); tx32 = Text_New(sdate,stime,L3,NumToStr(L3,2)); Text_SetStyle(tx31,0,2); Text_SetStyle(tx32,0,2); } } 즐거운 하루되세요 > 스로우 님이 쓴 글입니다. > 제목 : 54371 재질문 드립니다 > 답변 감사드립니다. 5분챠트에서 15분 주기 잘 확인 되었는데요. 15분 주기 &#49489;팅하고 15분챠트"에서 표현이 안되는 되요. 예전에 60분 주기 세팅하고 이평체크하면 60분챠트에서도 표시가 되던데 뭐가 문제인지 모르겠네요. 도움 부탁립니다 > 예스스탁 님이 쓴 글입니다. > 제목 : Re : Re : Re : 54356 재질문입니다 > 안녕하세요 예스스탁입니다. input : 분주기(30); input : D1(20170804),T1(201500); input : D2(20170804),T2(211500); input : D3(20170804),T3(221500); var : H1(0),L1(0),Tcond1(false),tx11(0),tx12(0); var : H2(0),L2(0),Tcond2(false),tx21(0),tx22(0); var : H3(0),L3(0),Tcond3(false),tx31(0),tx32(0); var : SS(0),DD(0),TM(0),TF(0); var : SD(0),ST(0),HH(0),LL(0); if bdate != Bdate[1] Then{ SS = TimeToMinutes(stime); DD = sdate; } if DD > 0 then{ if sdate == DD Then TM = TimeToMinutes(stime)-SS; Else TM = TimeToMinutes(stime)+1440-SS; TF = TM%분주기; if (Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1])) Then{ SD = Sdate; ST = Stime; HH = H; LL = L; } if H > HH Then HH = H; if L < LL Then LL = L; if SD == D1 and ST == T1 Then{ Tcond1 = true; H1 = HH; L1 = LL; } if SD == D2 and ST == T2 Then{ Tcond2 = true; H2 = HH; L2 = LL; } if SD == D3 and ST == T3 Then{ Tcond3 = true; H3 = HH; L3 = LL; } if Tcond1 == true then{ plot1(H1); plot2(L1); Text_Delete(Tx11); Text_Delete(Tx12); tx11 = Text_New(sdate,stime,H1,NumToStr(H1,2)); tx12 = Text_New(sdate,stime,L1,NumToStr(L1,2)); Text_SetStyle(tx11,0,2); Text_SetStyle(tx12,0,2); } if Tcond2 == true then{ plot3(H2); plot4(L2); Text_Delete(Tx21); Text_Delete(Tx22); tx21 = Text_New(sdate,stime,H2,NumToStr(H2,2)); tx22 = Text_New(sdate,stime,L2,NumToStr(L2,2)); Text_SetStyle(tx21,0,2); Text_SetStyle(tx22,0,2); } if Tcond3 == true then{ plot5(H3); plot6(L3); Text_Delete(Tx31); Text_Delete(Tx32); tx31 = Text_New(sdate,stime,H3,NumToStr(H3,2)); tx32 = Text_New(sdate,stime,L3,NumToStr(L3,2)); Text_SetStyle(tx31,0,2); Text_SetStyle(tx32,0,2); } } 즐거운 하루되세요