커뮤니티

안녕하세요

프로필 이미지
byeongup
2018-12-27 12:34:57
148
글번호 124796
답변완료
아래식을 1.3분차트에 15분봉의 값 2.3분차트에 30분봉의 값 상기1.2항을(채우기)로 동시에 사용하고자 합니다 input : 타주기분(30); var : S1(0),D1(0),TM(0),TF(0),cnt(0); var : tx1(0),tx2(0),tx3(0); Array : OO[100](0),HH[100](0),LL[100](0); if Bdate != Bdate[1] Then{ S1 = TimeToMinutes(stime); D1 = sdate; } 감사합니다 if D1 > 0 then{ if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%타주기분; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then { OO[0] = O; HH[0] = H; LL[0] = L; for cnt = 1 to 99 { OO[cnt] = OO[cnt-1][1]; HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } } if H > HH[0] Then HH[0] = H; if L < LL[0] Then LL[0] = L; plot1(OO[0],"시가"); plot2(HH[0],"고가"); plot3(LL[0],"저가"); Text_Delete(tx1); Text_Delete(tx2); tx1 = Text_New(sdate,stime,HH[0],NumToStr(HH[0],2)); tx2 = Text_New(sdate,stime,LL[0],NumToStr(LL[0],2)); Text_SetStyle(tx1,0,1); Text_SetStyle(tx2,0,0); } 감사합니다
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2018-12-27 16:28:42

안녕하세요 예스스탁입니다. 2개의 다른 주기값을 출력하게 수정해 드립니다. input : 타주기분1(15),타주기분2(30); var : S1(0),D1(0),TM(0),TF1(0),TF2(0),cnt(0); var : tx1(0),tx2(0),tx3(0),tx4(0); Array : O1[100](0),H1[100](0),L1[100](0); Array : O2[100](0),H2[100](0),L2[100](0); if Bdate != Bdate[1] Then{ S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; //15분 TF1 = TM%타주기분1; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then { O1[0] = O; H1[0] = H; L1[0] = L; for cnt = 1 to 99 { O1[cnt] = O1[cnt-1][1]; H1[cnt] = H1[cnt-1][1]; L1[cnt] = L1[cnt-1][1]; } } if H > H1[0] Then H1[0] = H; if L < L1[0] Then L1[0] = L; plot1(O1[0],"시가1"); plot2(H1[0],"고가1"); plot3(L1[0],"저가1"); Text_Delete(tx1); Text_Delete(tx2); tx1 = Text_New(sdate,stime,H1[0],NumToStr(H1[0],2)); tx2 = Text_New(sdate,stime,L1[0],NumToStr(L1[0],2)); Text_SetStyle(tx1,0,1); Text_SetStyle(tx2,0,0); //30분 TF2 = TM%타주기분2; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF2 < TF2[1]) Then { O2[0] = O; H2[0] = H; L2[0] = L; for cnt = 1 to 99 { O2[cnt] = O2[cnt-1][1]; H2[cnt] = H2[cnt-1][1]; L2[cnt] = L2[cnt-1][1]; } } if H > H2[0] Then H2[0] = H; if L < L2[0] Then L2[0] = L; plot4(O2[0],"시가2"); plot5(H2[0],"고가2"); plot6(L2[0],"저가2"); Text_Delete(tx3); Text_Delete(tx4); tx3 = Text_New(sdate,stime,H2[0],NumToStr(H2[0],2)); tx4 = Text_New(sdate,stime,L2[0],NumToStr(L2[0],2)); Text_SetStyle(tx3,0,1); Text_SetStyle(tx4,0,0); } 즐거운 하루되세요 > byeongup 님이 쓴 글입니다. > 제목 : 안녕하세요 > 아래식을 1.3분차트에 15분봉의 값 2.3분차트에 30분봉의 값 상기1.2항을(채우기)로 동시에 사용하고자 합니다 input : 타주기분(30); var : S1(0),D1(0),TM(0),TF(0),cnt(0); var : tx1(0),tx2(0),tx3(0); Array : OO[100](0),HH[100](0),LL[100](0); if Bdate != Bdate[1] Then{ S1 = TimeToMinutes(stime); D1 = sdate; } 감사합니다 if D1 > 0 then{ if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%타주기분; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then { OO[0] = O; HH[0] = H; LL[0] = L; for cnt = 1 to 99 { OO[cnt] = OO[cnt-1][1]; HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } } if H > HH[0] Then HH[0] = H; if L < LL[0] Then LL[0] = L; plot1(OO[0],"시가"); plot2(HH[0],"고가"); plot3(LL[0],"저가"); Text_Delete(tx1); Text_Delete(tx2); tx1 = Text_New(sdate,stime,HH[0],NumToStr(HH[0],2)); tx2 = Text_New(sdate,stime,LL[0],NumToStr(LL[0],2)); Text_SetStyle(tx1,0,1); Text_SetStyle(tx2,0,0); } 감사합니다