• 커뮤니티
  • 질의응답
  • 예스랭귀지 Q&A

커뮤니티

문의 드립니다..

프로필 이미지
쿠베라
2016-02-03 19:14:04
119
글번호 95153
답변완료
아래 삼족오님이 문의하신 추세선박스를 보면 위아래선이 고점, 저점으로 좌우는 점선으로되 있는데.. 이걸 위아래선이 시가, 종가로 좌우는 점선으로 만들어 주실수 있는지요.. 답변해주신 수식 첨부합니다.. 부탁드립니다.. Input:분봉(30); Var:TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0),TL8(0); var : Tcond(false),T(0),S1(0),S2(0),TM(0),TF(0); var : OO(0),HH(0),LL(0),DD(0),TT(0); var : OO1(0),HH1(0),LL1(0),DD1(0),TT1(0); if Bdate != Bdate[1] Then{ Tcond = true; S1 = 480;//8시에 해당하는 TimeToMinutes T = 1; } if date != date[1] and Bdate == Bdate[1] Then{ S2 = 1440-S1; T = 2; } if T == 1 then TM = TimeToMinutes(stime)-S1; if T == 2 Then TM = TimeToMinutes(stime)+S2; TF = TM%분봉; If TF < TF[1] Then { OO = O; HH = H; LL = L; DD = sdate; TT = stime; OO1 = OO[1]; HH1 = HH[1]; LL1 = LL[1]; DD1 = DD[1]; TT1 = TT[1]; } Else { if H > HH Then HH = H; if L < LL Then LL = L; } If TF < TF[1] Then { TL1 = TL_New(DD1,TT1,HH1,sDate[1],sTime[1],HH1); TL2 = TL_New(DD1,TT1,LL1,sDate[1],sTime[1],LL1); TL3 = TL_New(DD1,TT1,LL1,DD1,TT1,HH1); TL4 = TL_New(sDate[1],sTime[1],LL1,sDate[1],sTime[1],HH1); TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); If OO1 <= C[1] Then { TL_SetColor(TL1,RED); TL_SetColor(TL2,RED); TL_SetColor(TL3,GRAY); TL_SetColor(TL4,GRAY); } Else { TL_SetColor(TL1,BLUE); TL_SetColor(TL2,BLUE); TL_SetColor(TL3,GRAY); TL_SetColor(TL4,GRAY); } } Else { TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); TL5 = TL_New(DD,TT,HH,sDate,sTime,HH); TL6 = TL_New(DD,TT,LL,sDate,sTime,LL); TL7 = TL_New(DD,TT,LL,DD,TT,HH); TL8 = TL_New(sDate,sTime,LL,Date,sTime,HH); If OO <= C Then { TL_SetColor(TL5,RED); TL_SetColor(TL6,RED); TL_SetColor(TL7,GRAY); TL_SetColor(TL8,GRAY); } Else { TL_SetColor(TL5,BLUE); TL_SetColor(TL6,BLUE); TL_SetColor(TL7,GRAY); TL_SetColor(TL8,GRAY); } } TL_SetSize(TL1,1); TL_SetSize(TL2,1); TL_SetSize(TL3,0); TL_SetSize(TL4,0); TL_SetSize(TL5,1); TL_SetSize(TL6,1); TL_SetSize(TL7,0); TL_SetSize(TL8,0); TL_SetStyle(TL3,3); TL_SetStyle(TL4,3); TL_SetStyle(TL7,3); TL_SetStyle(TL8,3);
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2016-02-04 09:39:03

안녕하세요 예스스탁입니다. Input:분봉(30); Var:TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0),TL8(0); var : Tcond(false),T(0),S1(0),S2(0),TM(0),TF(0); var : OO(0),HH(0),LL(0),DD(0),TT(0); var : OO1(0),HH1(0),LL1(0),DD1(0),TT1(0); if Bdate != Bdate[1] Then{ Tcond = true; S1 = 480;//8시에 해당하는 TimeToMinutes T = 1; } if date != date[1] and Bdate == Bdate[1] Then{ S2 = 1440-S1; T = 2; } if T == 1 then TM = TimeToMinutes(stime)-S1; if T == 2 Then TM = TimeToMinutes(stime)+S2; TF = TM%분봉; If TF < TF[1] Then { OO = O; HH = H; LL = L; DD = sdate; TT = stime; OO1 = OO[1]; HH1 = HH[1]; LL1 = LL[1]; DD1 = DD[1]; TT1 = TT[1]; } Else { if H > HH Then HH = H; if L < LL Then LL = L; } If TF < TF[1] Then { TL1 = TL_New(DD1,TT1,max(OO1,C[1]),sDate[1],sTime[1],max(OO1,C[1])); TL2 = TL_New(DD1,TT1,min(OO1,C[1]),sDate[1],sTime[1],min(OO1,C[1])); TL3 = TL_New(DD1,TT1,min(OO1,C[1]),DD1,TT1,max(OO1,C[1])); TL4 = TL_New(sDate[1],sTime[1],min(OO1,C[1]),sDate[1],sTime[1],max(OO1,C[1])); TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); If OO1 <= C[1] Then { TL_SetColor(TL1,RED); TL_SetColor(TL2,RED); TL_SetColor(TL3,GRAY); TL_SetColor(TL4,GRAY); } Else { TL_SetColor(TL1,BLUE); TL_SetColor(TL2,BLUE); TL_SetColor(TL3,GRAY); TL_SetColor(TL4,GRAY); } } Else { TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); TL5 = TL_New(DD,TT,max(OO,C),sDate,sTime,max(OO,C)); TL6 = TL_New(DD,TT,min(OO,C),sDate,sTime,min(OO,C)); TL7 = TL_New(DD,TT,min(OO,C),DD,TT,max(OO,C)); TL8 = TL_New(sDate,sTime,min(OO,C),Date,sTime,max(OO,C)); If OO <= C Then { TL_SetColor(TL5,RED); TL_SetColor(TL6,RED); TL_SetColor(TL7,GRAY); TL_SetColor(TL8,GRAY); } Else { TL_SetColor(TL5,BLUE); TL_SetColor(TL6,BLUE); TL_SetColor(TL7,GRAY); TL_SetColor(TL8,GRAY); } } TL_SetSize(TL1,1); TL_SetSize(TL2,1); TL_SetSize(TL3,0); TL_SetSize(TL4,0); TL_SetSize(TL5,1); TL_SetSize(TL6,1); TL_SetSize(TL7,0); TL_SetSize(TL8,0); TL_SetStyle(TL3,3); TL_SetStyle(TL4,3); TL_SetStyle(TL7,3); TL_SetStyle(TL8,3); 즐거운 하루되세요 > 쿠베라 님이 쓴 글입니다. > 제목 : 문의 드립니다.. > 아래 삼족오님이 문의하신 추세선박스를 보면 위아래선이 고점, 저점으로 좌우는 점선으로되 있는데.. 이걸 위아래선이 시가, 종가로 좌우는 점선으로 만들어 주실수 있는지요.. 답변해주신 수식 첨부합니다.. 부탁드립니다.. Input:분봉(30); Var:TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0),TL8(0); var : Tcond(false),T(0),S1(0),S2(0),TM(0),TF(0); var : OO(0),HH(0),LL(0),DD(0),TT(0); var : OO1(0),HH1(0),LL1(0),DD1(0),TT1(0); if Bdate != Bdate[1] Then{ Tcond = true; S1 = 480;//8시에 해당하는 TimeToMinutes T = 1; } if date != date[1] and Bdate == Bdate[1] Then{ S2 = 1440-S1; T = 2; } if T == 1 then TM = TimeToMinutes(stime)-S1; if T == 2 Then TM = TimeToMinutes(stime)+S2; TF = TM%분봉; If TF < TF[1] Then { OO = O; HH = H; LL = L; DD = sdate; TT = stime; OO1 = OO[1]; HH1 = HH[1]; LL1 = LL[1]; DD1 = DD[1]; TT1 = TT[1]; } Else { if H > HH Then HH = H; if L < LL Then LL = L; } If TF < TF[1] Then { TL1 = TL_New(DD1,TT1,HH1,sDate[1],sTime[1],HH1); TL2 = TL_New(DD1,TT1,LL1,sDate[1],sTime[1],LL1); TL3 = TL_New(DD1,TT1,LL1,DD1,TT1,HH1); TL4 = TL_New(sDate[1],sTime[1],LL1,sDate[1],sTime[1],HH1); TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); If OO1 <= C[1] Then { TL_SetColor(TL1,RED); TL_SetColor(TL2,RED); TL_SetColor(TL3,GRAY); TL_SetColor(TL4,GRAY); } Else { TL_SetColor(TL1,BLUE); TL_SetColor(TL2,BLUE); TL_SetColor(TL3,GRAY); TL_SetColor(TL4,GRAY); } } Else { TL_Delete(TL5); TL_Delete(TL6); TL_Delete(TL7); TL_Delete(TL8); TL5 = TL_New(DD,TT,HH,sDate,sTime,HH); TL6 = TL_New(DD,TT,LL,sDate,sTime,LL); TL7 = TL_New(DD,TT,LL,DD,TT,HH); TL8 = TL_New(sDate,sTime,LL,Date,sTime,HH); If OO <= C Then { TL_SetColor(TL5,RED); TL_SetColor(TL6,RED); TL_SetColor(TL7,GRAY); TL_SetColor(TL8,GRAY); } Else { TL_SetColor(TL5,BLUE); TL_SetColor(TL6,BLUE); TL_SetColor(TL7,GRAY); TL_SetColor(TL8,GRAY); } } TL_SetSize(TL1,1); TL_SetSize(TL2,1); TL_SetSize(TL3,0); TL_SetSize(TL4,0); TL_SetSize(TL5,1); TL_SetSize(TL6,1); TL_SetSize(TL7,0); TL_SetSize(TL8,0); TL_SetStyle(TL3,3); TL_SetStyle(TL4,3); TL_SetStyle(TL7,3); TL_SetStyle(TL8,3);
등록