커뮤니티

문의드립니다

프로필 이미지
장군
2016-02-10 20:46:59
132
글번호 95248
답변완료
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[0]),sDate[0],sTime[0],max(OO1,C[0])); TL2 = TL_New(DD1,TT1,min(OO1,C[0]),sDate[0],sTime[0],min(OO1,C[0])); TL3 = TL_New(DD1,TT1,min(OO1,C[0]),DD1,TT1,max(OO1,C[1])); TL4 = TL_New(sDate[0],sTime[0],min(OO1,C[0]),sDate[0],sTime[0],max(OO1,C[0])); 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); 현재봉(시가)까지 선이나오게해주시면 감사하겠습니다
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2016-02-11 14:19:16

안녕하세요 예스스탁입니다. 추세선 함수는 완성봉에서만 그려집니다. 미완성봉인 현재봉은 계산에 포함을 할수가 없습니다. 도움을 드리지 못해 죄송합니다. 즐거운 하루되세요 > 장군 님이 쓴 글입니다. > 제목 : 문의드립니다 > 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[0]),sDate[0],sTime[0],max(OO1,C[0])); TL2 = TL_New(DD1,TT1,min(OO1,C[0]),sDate[0],sTime[0],min(OO1,C[0])); TL3 = TL_New(DD1,TT1,min(OO1,C[0]),DD1,TT1,max(OO1,C[1])); TL4 = TL_New(sDate[0],sTime[0],min(OO1,C[0]),sDate[0],sTime[0],max(OO1,C[0])); 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); 현재봉(시가)까지 선이나오게해주시면 감사하겠습니다