커뮤니티

수식수정부탁드립니다

프로필 이미지
수색대대
2019-10-19 12:36:34
256
글번호 132938
답변완료

첨부 이미지

input : ntime(101500); var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),Tcond(False); if (sdate != sdate[1] and stime >= ntime) or (sdate == sdate[1] and stime >= ntime and stime[1] < ntime) Then { Tcond = true; var1=DayHigh(1); var2=DayLow(1); var3=(DayHigh(1)+DayLow(1))/2; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL1 = TL_New(sdate[1],stime[1],var1,sdate,stime,var1); TL2 = TL_New(sdate[1],stime[1],var3,sdate,stime,var3); TL3 = TL_New(sdate[1],stime[1], var2,sdate,stime,var2); TL_SetExtright(TL1,True); TL_SetExtleft(TL1,True); TL_SetExtRight(TL2,True); TL_SetExtleft(TL2,True); TL_SetExtRight(TL3,True); TL_SetExtleft(TL3,True); if (sdate != sdate[2] and stime >= ntime) or (sdate == sdate[2] and stime >= ntime and stime[2] < ntime) Then { Tcond = true; var4=DayHigh(2); var5=daylow(2); var6=(DayHigh(2)+DayLow(2))/2; TL_Delete(TL4); TL_Delete(TL5); TL_Delete(TL6); TL4 = TL_New(sdate[2],stime[2],var4,sdate,stime,var4); TL5 = TL_New(sdate[2],stime[2],var6,sdate,stime,var6); TL6 = TL_New(sdate[2],stime[2], var5,sdate,stime,var5); TL_SetExtright(TL4,True); TL_SetExtleft(TL4,True); TL_SetExtRight(TL5,True); TL_SetExtleft(TL5,True); TL_SetExtRight(TL6,True); TL_SetExtleft(TL6,True); TL_SetColor(TL1,red); TL_SetColor(TL2,YELLOW); TL_SetColor(TL3,blue); TL_SetSize(TL1,0); TL_SetSize(TL2,0); TL_SetSize(TL3,0); TL_SetColor(TL4,MAGENTA); TL_SetColor(TL5,white); TL_SetColor(TL6,pink); TL_SetSize(TL4,0); TL_SetSize(TL5,0); TL_SetSize(TL6,0); }} 상기 수식은 항셍 전일고점,저점,중심,전전일고점,저점,중심 라인이 표시되는것입니다. 그런데 그림과 같이 고점,저점,중심,라인이 상이하게 나타납니다 수식수정부탁드립니다 항상감사합니다
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2019-10-21 10:45:50

안녕하세요 예스스탁입니다. 항셍의 경우에는 해당 종목의 거래소에서는 새로운 영업일 변경을 한국시간 18시15분(거래소시간 17시 15분)을 기준으로 합니다. 선물/증권사에서는 모두 거래소의 영업일 기준으로 일간시고저종가를 제공하고 있습니다. 거래소의 영업일 변경시간과 다른 시간을 하루기준으로 삼으시면 아래와 같이 별도로 시간을 지정해 일간시고저종가를 계산해 사용하셔야 합니다. input : 기준시간(101500); var : cnt(0); Array : DO[20](0),DH[20](0),DL[20](0),DC[20](0); var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),Tcond(False); if (sdate != sdate[1] and stime >= 기준시간) or (sdate == sdate[1] and stime >= 기준시간 and stime[1] < 기준시간) Then { DO[0] = O; DH[0] = H; DL[0] = L; for cnt = 1 to 19 { DO[cnt] = DO[cnt-1][1]; DH[cnt] = DH[cnt-1][1]; DL[cnt] = DL[cnt-1][1]; DC[cnt] = DC[cnt-1][1]; } var1 = DH[1]; var2 = DL[1]; var3 = (var1+var2)/2; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL1 = TL_New(sdate[1],stime[1],var1,sdate,stime,var1); TL2 = TL_New(sdate[1],stime[1],var3,sdate,stime,var3); TL3 = TL_New(sdate[1],stime[1], var2,sdate,stime,var2); TL_SetExtright(TL1,True); TL_SetExtleft(TL1,True); TL_SetExtRight(TL2,True); TL_SetExtleft(TL2,True); TL_SetExtRight(TL3,True); TL_SetExtleft(TL3,True); TL_SetColor(TL1,red); TL_SetColor(TL2,YELLOW); TL_SetColor(TL3,blue); TL_SetSize(TL1,0); TL_SetSize(TL2,0); TL_SetSize(TL3,0); var4 = DH[2]; var5 = DL[2]; var6 = (var4+var5)/2; TL_Delete(TL4); TL_Delete(TL5); TL_Delete(TL6); TL4 = TL_New(sdate[2],stime[2],var4,sdate,stime,var4); TL5 = TL_New(sdate[2],stime[2],var6,sdate,stime,var6); TL6 = TL_New(sdate[2],stime[2], var5,sdate,stime,var5); TL_SetExtright(TL4,True); TL_SetExtleft(TL4,True); TL_SetExtRight(TL5,True); TL_SetExtleft(TL5,True); TL_SetExtRight(TL6,True); TL_SetExtleft(TL6,True); TL_SetColor(TL4,MAGENTA); TL_SetColor(TL5,white); TL_SetColor(TL6,pink); TL_SetSize(TL4,0); TL_SetSize(TL5,0); TL_SetSize(TL6,0); } DC[0] = C; if H > DH[0] Then DH[0] = H; if L < DL[0] Then DL[0] = L; 즐거운 하루되세요 > 수색대대 님이 쓴 글입니다. > 제목 : 수식수정부탁드립니다 > input : ntime(101500); var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),Tcond(False); if (sdate != sdate[1] and stime >= ntime) or (sdate == sdate[1] and stime >= ntime and stime[1] < ntime) Then { Tcond = true; var1=DayHigh(1); var2=DayLow(1); var3=(DayHigh(1)+DayLow(1))/2; TL_Delete(TL1); TL_Delete(TL2); TL_Delete(TL3); TL1 = TL_New(sdate[1],stime[1],var1,sdate,stime,var1); TL2 = TL_New(sdate[1],stime[1],var3,sdate,stime,var3); TL3 = TL_New(sdate[1],stime[1], var2,sdate,stime,var2); TL_SetExtright(TL1,True); TL_SetExtleft(TL1,True); TL_SetExtRight(TL2,True); TL_SetExtleft(TL2,True); TL_SetExtRight(TL3,True); TL_SetExtleft(TL3,True); if (sdate != sdate[2] and stime >= ntime) or (sdate == sdate[2] and stime >= ntime and stime[2] < ntime) Then { Tcond = true; var4=DayHigh(2); var5=daylow(2); var6=(DayHigh(2)+DayLow(2))/2; TL_Delete(TL4); TL_Delete(TL5); TL_Delete(TL6); TL4 = TL_New(sdate[2],stime[2],var4,sdate,stime,var4); TL5 = TL_New(sdate[2],stime[2],var6,sdate,stime,var6); TL6 = TL_New(sdate[2],stime[2], var5,sdate,stime,var5); TL_SetExtright(TL4,True); TL_SetExtleft(TL4,True); TL_SetExtRight(TL5,True); TL_SetExtleft(TL5,True); TL_SetExtRight(TL6,True); TL_SetExtleft(TL6,True); TL_SetColor(TL1,red); TL_SetColor(TL2,YELLOW); TL_SetColor(TL3,blue); TL_SetSize(TL1,0); TL_SetSize(TL2,0); TL_SetSize(TL3,0); TL_SetColor(TL4,MAGENTA); TL_SetColor(TL5,white); TL_SetColor(TL6,pink); TL_SetSize(TL4,0); TL_SetSize(TL5,0); TL_SetSize(TL6,0); }} 상기 수식은 항셍 전일고점,저점,중심,전전일고점,저점,중심 라인이 표시되는것입니다. 그런데 그림과 같이 고점,저점,중심,라인이 상이하게 나타납니다 수식수정부탁드립니다 항상감사합니다