안녕하세요 예스스탁입니다. 띠가 어떤 것을 의미하는지 모르겠습니다. 각 값의 위아래 선을 추가하고자 하시면 아래식 이용하시면 됩니다. input : 타주기분1(15),타주기분2(30),폭(3); 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"); plot21(H1[0]+PriceScale*폭,"고가1+"); plot22(H1[0]-PriceScale*폭,"고가1-"); plot3(L1[0],"저가1"); plot31(L1[0]+PriceScale*폭,"저가1+"); plot32(L1[0]-PriceScale*폭,"저가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"); plot51(H2[0]+PriceScale*폭,"고가2+"); plot52(H2[0]-PriceScale*폭,"고가2-"); plot6(L2[0],"저가2"); plot61(L2[0]+PriceScale*폭,"저가2+"); plot62(L2[0]-PriceScale*폭,"저가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.1고가 2고가 2.1저가 2저가 띠간격(폭)은3정도요 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); } 감사합니다