안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.

예스스탁입니다. 해당식 모두 영업일 변경시가을 기준으로작성이 된 식입니다.12시 기준으로 되어 있지 않습니다. 기본적으로 당일시고저종가는 영업일 변경시간을 기준으로 값이 리턴되고 주/월/년별 지표도 Bdate를 기주으로 작성이 되어 있습니다. 수식 내용 확인하시기 바랍니다. 일별과 같은 경우 당일 그리지 않는 조건때문에 당일 12시 이후에 그려지지 않는 것 뿐입니다. 아래와 같이 해당 조건 삭제하고 보시기 바랍니다. input : Per1(61.8),Per2(50.0),Per3(38.2); var : HH(0),LL(0),DD(0),TT(0); HH = dayhigh(0); LL = daylow(0); var1 = 10^(LOG10(LL)+(LOG10(HH)-LOG10(LL))*(Per1/100)); var2 = 10^(LOG10(LL)+(LOG10(HH)-LOG10(LL))*(Per2/100)); var3 = 10^(LOG10(LL)+(LOG10(HH)-LOG10(LL))*(Per3/100)); plot1(HH,"최고"); plot3(var1,"61.8"); plot4(var2,"50.0"); plot5(var3,"38.2"); plot7(LL,"최저"); ============================================================== 이 식으로는 이상하게 15:00이나 20:30 등에서 그림이 꺾입니다. 하루 지난 전일 그림이기 때문에 장개시 후부터 새벽야간장이 마칠 때까지를 당일로 보고 고저가가 같은 수평선으로 나오게 해 주시면 감사하겠습니다. 야간장 때문에 Dayhigh와 Daylow 함수가 문제가 된 듯 합니다. 그냥 09:00 부터 익일 09:00 이전까지의 high와 low를 사용해야 할 듯 합니다.

수고하십니다. 아래 수식이 하루전 20일이평이 60일이평 보다 크면서 이평선의 수치가 1%이내로 근접하였다 오늘 상승하였다라고 하는데,, 제가 붙임 사진과 같이 검색한 종목(2.22일 검색, 체크 된)은 60과 20이평이 너무 이격이 큰데 검색이 되었습니다. 이해가 잘 않되는 부분입니다. 설명을 부탁드리며,, 식이 잘못되었다면 수정을 부탁드립니다. input : P(1); //지지선 혹은 저항선 근접정도(P%이내) var : Bcnt(0),Scnt(0); //Bcnt는 20이평이 60이평보다 클때 카운트 되므로 20이평이 60이평보다 작을&#46468;는 0값 if ma(C,20) < ma(C,60) Then{ Bcnt = 0; } if CountIF(ma(C,20) > ma(C,60), 3) == 3 and //3봉연속 20이평이 60이평보다 크고 ma(c,20) > ma(c,20)[1] and ma(C,20)[1] < ma(c,20)[2] and //20이평이 V자형태이고 ma(c,20)[1] <= ma(c,60)[1] * (1+ P/100) Then //P%이내 근접한후 상향 Bcnt = Bcnt+1; if Bcnt == 1 Then{ //첫번째 V형태일때// find(1); }

1. 예스차트이용할려고 할려면 어떻게 해야 하나요? 홈페이지에 따로 나와있는곳이 없네요~ 결제해야되면 결제금액은 얼마인지 안내되어있는곳이 안보입니다. 그리고 예스차트에 해외선물의 분데이터와 함께 틱데이터도 제공이 되는지 궁금합니다.~ 2. 예스트레이더에서 분차트가지고 1년치를 불러와서 보니깐 과거차트에서는 봉이 거의없으면서 제대로 시뮬레이션이 안되더라구요 이것도 모르고 성과가 안좋은갚다 하고 생각하고 있었거든요~ 과거돌려보니깐 봉이 이상했고 최근에만 봉이 제대로 나오는 거 같이 보였는데 예스차트를 통하지 않고 예스트레이더자체에서 해외선물 연결선물로 불러왔을때에 명확하게 시뮬레이션 할 수 있는 기간이 얼마정도 됩니까? 틱은5000봉까지 불러와지고 일주일정도는 볼 수 있더라구요 분차트는 불러는 와지는데 얼마정도가 오류없이 시뮬레이션 할 수 있는 기간인지요? 3. 현재 2개시스템을 합성해서 적용할려고 하는데요 과최적화가 되어서 신호가 너무많이 나오더라구요 a시스템과 b시스템이 있다고 가정했을때에 a시스템에서 매수전략에 따른 청산전략을 a시스템의 청산전략과 함께 b시스템의매수청산전략을 같이적용하고 b시스템의 매수는 b시스템의 매수청산전략만 적용하는 식으루요 각각시스템의 매수매도전략에 따라서 청산전략을 각각 구분해서 적용하고 각각매수매도전략도 구분해서 적용할려면 어떻게 해야되는지 문의드립니다~ 4. 청산수식에서 1)진입후에 25틱이상움직였을때 이전저점1틱아래에서 익절(꼭지점스탑방식) 2)50틱이상움직였을때 10일선이탈시점에 익절 각각수식좀 부탁드립니다~ 5.항생시가선수식인데요 제대로 적용이 안되어서 수정 좀 부탁드립니다~ var : cnt(0),Tcond(false); Array : DO[100](0),DH[100](0),DL[100](0),DC[100](0); if stime == 101400 or (stime > 101400 and stime[1] < 101400) Then{ DO[0] = O; DH[0] = H; DL[0] = L; for cnt = 1 to 99{ DO[cnt] = DO[cnt-1][1]; DH[cnt] = DH[cnt-1][1]; DL[cnt] = DL[cnt-1][1]; DC[cnt] = DC[cnt-1][1]; } } if H > DH[0] Then DH[0] = H; if L < DL[0] Then DL[0] = L; DC[0] = C; plot2(DH[0]); plot3(DL[0]); plot4(DC[0]); if C == DO[0] Then plot1(DO[0],"시가선",GREEN); if C > DO[0] Then plot1(DO[0],"시가선",RED); if C < dayopen Then plot1(DO[0],"시가선",blue); 6.이전질문내용에서 틱에서 30분단위로 불러와서 적용을해서 잘 사용하고 잇는데요 이게 문제가 이전30분종가기준으로 가격이 계산되는게 아니고 예를들어서5봉전30분종가보다 클때를 조건문으로 적용하면 5봉전가격에서 틱봉상 30분이 끝나고 나서 그다음봉이 완성되고나서 가격이 계산됩니다. 30분시작봉이 작으면 별로 문제가 안되는데 10틱넘어가버리면 오차범위가 커서요~ 틱봉에서 30분주기로 계산될때에 30분종가기준으로 계산되게 할 수 있는 방법이 있을까요? 감사합니다~ 좋은하루되시구요!

청산후에는 청산 전에 발생한 신호와 같은 방향으로는 진입 금지 하는 청산 식을 삽입하고자 본 게시판을 검색하여 아래와 같이 청산수식을 삽입하였습니다. 그런데 청산 전에 발생한 신호와 같은 방향으로 진입하는 경우가 자주 있습니다. (첨부 이미지 참고) 어디가 문제인지 수정좀 부탁합니다. input : Period(3), Period1(1), Period2(2); var : T(0); value3 = StochasticsK(Period, Period1); value4 = StochasticsD(Period, Period1, Period2); value5 = (highest(H,1)+lowest(L,1))/2; value8 = (highest(H,32)+lowest(L,32))/2; if T <= 0 and CrossUp(value3, value4) Then{ T = 1; value1 = C; } if T >= 0 and CrossDown(value3, value4) Then{ T = -1; value1 = C; } Condition1 = MarketPosition == 0 and MarketPosition(1) == 1 and IsExitName("StopLoss",1) == true ; Condition2 = MarketPosition == 0 and MarketPosition(1) == -1 and IsExitName("StopLoss",1) == true ; if Condition1 == false and (Close >= (value1 + (PriceScale * 5))) Then Buy("매수", OnClose); if Condition2 == false and (Close <= (value1 - (PriceScale *5))) Then Sell("매도", OnClose); SetStopLoss(1.25,PointStop); if highest(H,BarsSinceEntry) >= EntryPrice+PriceScale*11 and value5 - value8 < PriceScale*-1 Then ExitLong("매수청산"); if lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*11 and value8 - value5 < PriceScale*-1 Then ExitShort("매도청산"); if MarketPosition == 1 Then{ var1 = Floor((highest(H,BarsSinceEntry)-EntryPrice)/(PriceScale*3)); if var1 > var1[1] Then Text_New(sdate,stime,H,NumToStr(var1*3,0)+"틱"); } if MarketPosition == -1 Then{ var1 = Floor((EntryPrice-Lowest(L,BarsSinceEntry))/(PriceScale*3)); if var1 > var1[1] Then Text_New(sdate,stime,H,NumToStr(var1*3,0)+"틱"); }

안녕하세요 하기 수식문의 드립니다. input : P(14),BBP(20),dv(2),MAP(60); input : short(12),long(26),sig(9); var : ADXV(0),DP(0),DM(0),T(0),BBup(0),BBdn(0),mav(0); var : MACDV(0),MACDS(0),Bcond(false),Scond(False),bbmd(0),diff(0),cnt(0),count(0); ADXV = ADX(P); DP = Diplus(P); DM = DiMinus(P); bbmd = ma(c,BBP); BBup = BollBandUp(BBP,dv); BBdn = BollBandDown(BBP,dv); mav = ma(C,MAP); MACDV = MACD(short,long); MACDS = ema(MACDV,sig); diff = C-O; if MarketPosition <= 0 and C > BBup and C > O and countif(C > C[1],2) == 2 and (ADXV < 40 or (ADXV > 40 and DP > DM)) and BBup-BBdn >= PriceScale*30 and countif(adxv > adxv[1],2) == 2 Then{ buy("b2"); } if MarketPosition >= 0 and C < BBdn and C < O and countif(C < C[1],2) == 2 and (ADXV < 40 or (ADXV > 40 and DP < DM)) and BBup-BBdn >= PriceScale*30 and countif(adxv > adxv[1],2) == 2 Then{ sell("s2"); } 상기 수식에서 손절방법을 부탁드립니다. 1. 매도든 매수든 가격이 볼린져 밴드 중앙선과 닿으면 손절하는 수식 부탁드립니다. 2. MACD oscillator 가 바뀌면 손절하는 수식 부탁드립니다. 그리고 MACD ocillator 변경이 진입후 3개 봉이내에 바뀔경우에는 반대매매 부탁드립니다. 반대매매는 한번만 들어가는 것으로 부탁드립니다. 3. 더이상 ADX 라인이 증가하지 않으면, 매도 진입했던 것은 매수로 반대매매 진입, 매수 진입했던 것은 매도로 반대매매 진입 부탁드립니다. 감사합니다.

아래 2개의 수식에서 각각 신호수식 부탁합니다. #,3분봉 기준에서 직전3개연속 양봉으로 4번째양봉이 polt1을 상향돌파시(거래량증가동반) 매수신호발생(텍스트표시) #,3분봉 기준에서 직전3개연속 음봉으로 4번째음봉이 plot1를 하향이탈시(거래량증가동반) 매도신호발생(텍스트표시) 1) var : TF(0),S1(0),S2(0),T(0),TM(0); if Bdate != Bdate[1] Then{ S1 = TimeToMinutes(stime); 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%240; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then{ var1 = Open; } plot1(var1); ------------------------------------------------------------------- 2) var : Ov(0),Hv(0),Lv(0); if (stime == 80000 or (stime > 80000 and stime[1] < 80000)) or (stime == 103000 or (stime > 103000 and stime[1] < 103000)) or (stime == 160000 or (stime > 160000 and stime[1] < 160000)) or (stime == 233000 or (stime > 233000 and stime[1] < 233000)) or (stime == 40000 or (stime > 40000 and stime[1] < 40000)) Then{ Ov = O; Hv = H; Lv = L; } if H > Hv Then Hv = H; if L < Lv Then Lv = L; plot1(Ov); 언제나 늘 감사합니다.

NH트레이더를 사용하고 있습니다. 거래량을 특징으로검색하기 위한 검색식을 알려주세요!. 주봉에서 최근 4주간 중 한주간 거래량이 20주 이평거래량보다 5배 또는 10배 이상 거래된 종목을 검색하고 싶습니다. 부탁드립니다.

첨부된 내용수정가능할까요 ? 수식은 아래와 같습니다 input:P1(20), p2(60); var1=ma(c,p1); var2=ma(c,p2); if crossup(var1,var2) then var3=var2; if CrossDown(var1,var2) then var4=var2; plot1(var1, "단기이평"); plot2(var2, "중기이평"); if var1 > var2 then plot3(var3, "상승교차"); if var1<var2 Then plot4(var4, "하락교차");

아래내용으로 봉처리를 하다보니 처리속도가 상당히 늦은것 같읍니다. 너무 무식하게 코딩을 하지안았나 하는 생각이듭니다. 차트를 띄어놓고 시스템식 가동할려면 메모리가 부족하다고 나올정도인데 코딩 문제인지 다른 문제인지 모르겠습니다. 혹시 for 문이나 기타의 방법으로 코딩을 간결하게 하고 처리속도에 영양이 있다면 처리속도도 빠르게 되게할수있나요? 아울러 아래식에는 직전봉에 관해서는 모두 표시를 하지 못했습니다. 직전봉도 #1 , #2 , #3 , #4 , #5 에 관해서 선을 표시할수있게 부탁드립니다. 표현은 몸통중간, 위꼬리 중간, 아래꼬리 중간, 고점과 고점, 저점과 저점 표시입니다. input : N1(5),N2(4),N3(3),N4(2),N5(1),N6(0); var : TL11(0),TL12(0), TL13(0),TL14(0),TL15(0),TL16(0),TL17(0),TL18(0),TL19(0), TL111(0),TL112(0),TL113(0), TL114(0),TL115(0),TL116(0),TL117(0),TL118(0),TL119(0), TL120(0),TL121(0),TL122(0),TL123(0),TL124(0),TL125(0),TL126(0),TL127(0),TL128(0),TL129(0), TL21(0),TL22(0),TL23(0),TL24(0),TL25(0),TL26(0),TL27(0),TL28(0),TL29(0),TL221(0),TL222(0), TL223(0),TL224(0),TL225(0),TL226(0),TL227(0),TL228(0),TL229(0), TL230(0),TL231(0),TL232(0),TL233(0),TL234(0),TL235(0),TL236(0),TL237(0),TL238(0),TL239(0), TL3(0),TL31(0),TL32(0),TL33(0),TL34(0),TL35(0), TL4(0),TL41(0),TL42(0),TL43(0),TL44(0), TL5(0),TL51(0),TL52(0),TL53(0),TL54(0); var1 = (DayOpen+DayClose)/2; if bdate != Bdate[1] Then{ value1 = sdate; value2 = stime; value11 = value1[1]; value21 = value2[1]; } #1 TL_Delete(TL11); TL_Delete(TL12); TL_Delete(TL13); TL_Delete(TL14); TL_Delete(TL15); TL_Delete(TL16); TL_Delete(TL17); TL_Delete(TL18); TL_Delete(TL19); TL_Delete(TL111); TL_Delete(TL112); TL_Delete(TL113); TL_Delete(TL114); TL_Delete(TL115); TL_Delete(TL116); TL_Delete(TL117); TL_Delete(TL118); TL_Delete(TL119); TL_Delete(TL120); TL_Delete(TL121); TL_Delete(TL122); TL_Delete(TL123); TL_Delete(TL124); TL_Delete(TL125); TL_Delete(TL126); TL_Delete(TL127); TL_Delete(TL128); TL_Delete(TL129); TL11 = TL_New(Sdate[N1],Stime[N1],H[N1],sdate[N2],stime[N2],H[N2]); TL12 = TL_New(Sdate[N1],Stime[N1],L[N1],sdate[N2],stime[N2],L[N2]); TL13 = TL_New(Sdate[N1],Stime[N1],H[N1],sdate[N3],stime[N3],H[N3]); TL14 = TL_New(Sdate[N1],Stime[N1],L[N1],sdate[N3],stime[N3],L[N3]); TL15 = TL_New(Sdate[N1],Stime[N1],H[N1],sdate[N4],stime[N4],H[N4]); TL16 = TL_New(Sdate[N1],Stime[N1],L[N1],sdate[N4],stime[N4],L[N4]); TL17 = TL_New(Sdate[N1],Stime[N1],H[N1],sdate[N5],stime[N5],H[N5]); TL18 = TL_New(Sdate[N1],Stime[N1],L[N1],sdate[N5],stime[N5],L[N5]); TL19 = TL_New(Sdate[N1],Stime[N1],H[N1],sdate[N6],stime[N6],H[N6]); TL111 = TL_New(Sdate[N1],Stime[N1],L[N1],sdate[N6],stime[N6],L[N6]); TL112 = TL_New(Sdate[N2],Stime[N2],H[N2],sdate[N3],stime[N3],H[N3]); TL113 = TL_New(Sdate[N2],Stime[N2],L[N2],sdate[N3],stime[N3],L[N3]); TL114 = TL_New(Sdate[N2],Stime[N2],H[N2],sdate[N4],stime[N4],H[N4]); TL115 = TL_New(Sdate[N2],Stime[N2],L[N2],sdate[N4],stime[N4],L[N4]); TL116 = TL_New(Sdate[N2],Stime[N2],H[N2],sdate[N5],stime[N5],H[N5]); TL117 = TL_New(Sdate[N2],Stime[N2],L[N2],sdate[N5],stime[N5],L[N5]); TL118 = TL_New(Sdate[N2],Stime[N2],H[N2],sdate[N6],stime[N6],H[N6]); TL119 = TL_New(Sdate[N2],Stime[N2],L[N2],sdate[N6],stime[N6],L[N6]); TL120 = TL_New(Sdate[N3],Stime[N3],H[N3],sdate[N4],stime[N4],H[N4]); TL121 = TL_New(Sdate[N3],Stime[N3],L[N3],sdate[N4],stime[N4],L[N4]); TL122 = TL_New(Sdate[N3],Stime[N3],H[N3],sdate[N5],stime[N5],H[N5]); TL123 = TL_New(Sdate[N3],Stime[N3],L[N3],sdate[N5],stime[N5],L[N5]); TL124 = TL_New(Sdate[N3],Stime[N3],H[N3],sdate[N6],stime[N6],H[N6]); TL125 = TL_New(Sdate[N3],Stime[N3],L[N3],sdate[N6],stime[N6],L[N6]); TL126 = TL_New(Sdate[N4],Stime[N4],H[N4],sdate[N5],stime[N5],H[N5]); TL127 = TL_New(Sdate[N4],Stime[N4],L[N4],sdate[N5],stime[N5],L[N5]); TL128 = TL_New(Sdate[N4],Stime[N4],H[N4],sdate[N6],stime[N6],H[N6]); TL129 = TL_New(Sdate[N4],Stime[N4],L[N4],sdate[N6],stime[N6],L[N6]); TL_SetExtRight(TL11,true); TL_SetExtRight(TL12,true); TL_SetExtRight(TL13,true); TL_SetExtRight(TL14,true); TL_SetExtRight(TL15,true); TL_SetExtRight(TL16,true); TL_SetExtRight(TL17,true); TL_SetExtRight(TL18,true); TL_SetExtRight(TL19,true); TL_SetExtRight(TL111,true); TL_SetExtRight(TL112,true); TL_SetExtRight(TL113,true); TL_SetExtRight(TL114,true); TL_SetExtRight(TL115,true); TL_SetExtRight(TL116,true); TL_SetExtRight(TL117,true); TL_SetExtRight(TL118,true); TL_SetExtRight(TL119,true); TL_SetExtRight(TL120,true); TL_SetExtRight(TL121,true); TL_SetExtRight(TL122,true); TL_SetExtRight(TL123,true); TL_SetExtRight(TL124,true); TL_SetExtRight(TL125,true); TL_SetExtRight(TL126,true); TL_SetExtRight(TL127,true); TL_SetExtRight(TL128,true); TL_SetExtRight(TL129,true); TL_SetColor(TL11,RED); TL_SetColor(TL12,BLUE); TL_SetColor(TL13,RED); TL_SetColor(TL14,BLUE); TL_SetColor(TL15,RED); TL_SetColor(TL16,BLUE); TL_SetColor(TL17,RED); TL_SetColor(TL18,BLUE); TL_SetColor(TL19,RED); TL_SetColor(TL111,BLUE); TL_SetColor(TL112,RED); TL_SetColor(TL113,BLUE); TL_SetColor(TL114,RED); TL_SetColor(TL115,BLUE); TL_SetColor(TL116,RED); TL_SetColor(TL117,BLUE); TL_SetColor(TL118,RED); TL_SetColor(TL119,BLUE); TL_SetColor(TL120,RED); TL_SetColor(TL121,BLUE); TL_SetColor(TL122,RED); TL_SetColor(TL123,BLUE); TL_SetColor(TL124,RED); TL_SetColor(TL125,BLUE); TL_SetColor(TL126,RED); TL_SetColor(TL127,BLUE); TL_SetColor(TL128,RED); TL_SetColor(TL129,BLUE); #2 TL_Delete(TL21); TL_Delete(TL22); TL_Delete(TL23); TL_Delete(TL24); TL_Delete(TL25); TL_Delete(TL26); TL_Delete(TL27); TL_Delete(TL28); TL_Delete(TL29); TL_Delete(TL221); TL_Delete(TL222); TL_Delete(TL223); TL_Delete(TL224); TL_Delete(TL225); TL_Delete(TL226); TL_Delete(TL227); TL_Delete(TL228); TL_Delete(TL229); TL_Delete(TL230); TL_Delete(TL231); TL_Delete(TL232); TL_Delete(TL233); TL_Delete(TL234); TL_Delete(TL235); TL_Delete(TL236); TL_Delete(TL237); TL_Delete(TL238); TL_Delete(TL239); TL21 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N2],stime[N2],(H[N2]+max(C[N2],O[N2]))/2); TL22 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N2],stime[N2],(L[N2]+min(C[N2],O[N2]))/2); TL23 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N3],stime[N3],(H[N3]+max(C[N3],O[N3]))/2); TL24 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N3],stime[N3],(L[N3]+min(C[N3],O[N3]))/2); TL25 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N4],stime[N4],(H[N4]+max(C[N4],O[N4]))/2); TL26 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N4],stime[N4],(L[N4]+min(C[N4],O[N4]))/2); TL27 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N5],stime[N5],(H[N5]+max(C[N5],O[N5]))/2); TL28 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N5],stime[N5],(L[N5]+min(C[N5],O[N5]))/2); TL29 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N6],stime[N6],(H[N6]+max(C[N6],O[N6]))/2); TL221 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N6],stime[N6],(L[N6]+min(C[N6],O[N6]))/2); TL222 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N3],stime[N3],(H[N3]+max(C[N3],O[N3]))/2); TL223 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N3],stime[N3],(L[N3]+min(C[N3],O[N3]))/2); TL224 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N4],stime[N4],(H[N4]+max(C[N4],O[N4]))/2); TL225 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N4],stime[N4],(L[N4]+min(C[N4],O[N4]))/2); TL226 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N5],stime[N5],(H[N5]+max(C[N5],O[N5]))/2); TL227 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N5],stime[N5],(L[N5]+min(C[N5],O[N5]))/2); TL228 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N6],stime[N6],(H[N6]+max(C[N6],O[N6]))/2); TL229 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N6],stime[N6],(L[N6]+min(C[N6],O[N6]))/2); TL230 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N4],stime[N4],(H[N4]+max(C[N4],O[N4]))/2); TL231 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N4],stime[N4],(L[N4]+min(C[N4],O[N4]))/2); TL232 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N5],stime[N5],(H[N5]+max(C[N5],O[N5]))/2); TL233 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N5],stime[N5],(L[N5]+min(C[N5],O[N5]))/2); TL234 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N6],stime[N6],(H[N6]+max(C[N6],O[N6]))/2); TL235 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N6],stime[N6],(L[N6]+min(C[N6],O[N6]))/2); TL236 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N5],stime[N5],(H[N5]+max(C[N5],O[N5]))/2); TL237 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N5],stime[N5],(L[N5]+min(C[N5],O[N5]))/2); TL238 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N6],stime[N6],(H[N6]+max(C[N6],O[N6]))/2); TL239 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N6],stime[N6],(L[N6]+min(C[N6],O[N6]))/2); TL_SetExtRight(TL21,true); TL_SetExtRight(TL22,true); TL_SetExtRight(TL23,true); TL_SetExtRight(TL24,true); TL_SetExtRight(TL25,true); TL_SetExtRight(TL26,true); TL_SetExtRight(TL27,true); TL_SetExtRight(TL28,true); TL_SetExtRight(TL29,true); TL_SetExtRight(TL221,true); TL_SetExtRight(TL222,true); TL_SetExtRight(TL223,true); TL_SetExtRight(TL224,true); TL_SetExtRight(TL225,true); TL_SetExtRight(TL226,true); TL_SetExtRight(TL227,true); TL_SetExtRight(TL228,true); TL_SetExtRight(TL229,true); TL_SetExtRight(TL230,true); TL_SetExtRight(TL231,true); TL_SetExtRight(TL232,true); TL_SetExtRight(TL233,true); TL_SetExtRight(TL234,true); TL_SetExtRight(TL235,true); TL_SetExtRight(TL236,true); TL_SetExtRight(TL237,true); TL_SetExtRight(TL238,true); TL_SetExtRight(TL239,true); TL_SetColor(TL21,RED); TL_SetColor(TL22,BLUE); TL_SetColor(TL23,RED); TL_SetColor(TL24,BLUE); TL_SetColor(TL25,RED); TL_SetColor(TL26,BLUE); TL_SetColor(TL27,RED); TL_SetColor(TL28,BLUE); TL_SetColor(TL29,RED); TL_SetColor(TL221,BLUE); TL_SetColor(TL222,RED); TL_SetColor(TL223,BLUE); TL_SetColor(TL224,RED); TL_SetColor(TL225,BLUE); TL_SetColor(TL226,RED); TL_SetColor(TL227,BLUE); TL_SetColor(TL228,RED); TL_SetColor(TL229,BLUE); TL_SetColor(TL230,RED); TL_SetColor(TL231,BLUE); TL_SetColor(TL232,RED); TL_SetColor(TL233,BLUE); TL_SetColor(TL234,RED); TL_SetColor(TL235,BLUE); TL_SetColor(TL236,RED); TL_SetColor(TL237,BLUE); TL_SetColor(TL238,RED); TL_SetColor(TL239,BLUE); #3 TL_Delete(TL3); TL3 = TL_New(Sdate[N1],Stime[N1],(C[N1]+O[N1])/2,sdate[N2],stime[N2],(C[N1]+O[N1])/2); TL_SetExtRight(TL3,true); TL_Delete(TL31); TL31 = TL_New(Sdate[N2],Stime[N2],(C[N2]+O[N2])/2,sdate[N3],stime[N3],(C[N2]+O[N2])/2); TL_SetExtRight(TL31,true); TL_Delete(TL32); TL32 = TL_New(Sdate[N3],Stime[N3],(C[N3]+O[N3])/2,sdate[N4],stime[N4],(C[N3]+O[N3])/2); TL_SetExtRight(TL32,true); TL_Delete(TL33); TL33 = TL_New(Sdate[N4],Stime[N4],(C[N4]+O[N4])/2,sdate[N5],stime[N5],(C[N4]+O[N4])/2); TL_SetExtRight(TL33,true); TL_Delete(TL34); TL34 = TL_New(Sdate[N5],Stime[N5],(C[N5]+O[N5])/2,sdate[N6],stime[N6],(C[N5]+O[N5])/2); TL_SetExtRight(TL34,true); TL_Delete(TL35); TL35 = TL_New(value11,value21,var1,value1,value2,var1); TL_SetExtRight(TL35,true); #4 TL_Delete(TL4); TL4 = TL_New(Sdate[N1],Stime[N1],(H[N1]+max(C[N1],O[N1]))/2,sdate[N2],stime[N2],(H[N1]+max(C[N1],O[N1]))/2); TL_SetExtRight(TL4,true); TL_Delete(TL41); TL41 = TL_New(Sdate[N2],Stime[N2],(H[N2]+max(C[N2],O[N2]))/2,sdate[N3],stime[N3],(H[N2]+max(C[N2],O[N2]))/2); TL_SetExtRight(TL41,true); TL_Delete(TL42); TL42 = TL_New(Sdate[N3],Stime[N3],(H[N3]+max(C[N3],O[N3]))/2,sdate[N4],stime[N4],(H[N3]+max(C[N3],O[N3]))/2); TL_SetExtRight(TL42,true); TL_Delete(TL43); TL43 = TL_New(Sdate[N4],Stime[N4],(H[N4]+max(C[N4],O[N4]))/2,sdate[N5],stime[N5],(H[N4]+max(C[N4],O[N4]))/2); TL_SetExtRight(TL43,true); TL_Delete(TL44); TL44 = TL_New(Sdate[N5],Stime[N5],(H[N5]+max(C[N5],O[N5]))/2,sdate[N6],stime[N6],(H[N5]+max(C[N5],O[N5]))/2); TL_SetExtRight(TL44,true); TL_SetColor(TL4,RED); TL_SetColor(TL41,RED); TL_SetColor(TL42,RED); TL_SetColor(TL43,RED); TL_SetColor(TL44,RED); #5 TL_Delete(TL5); TL5 = TL_New(Sdate[N1],Stime[N1],(L[N1]+min(C[N1],O[N1]))/2,sdate[N2],stime[N2],(L[N1]+min(C[N1],O[N1]))/2); TL_SetExtRight(TL5,true); TL_Delete(TL51); TL51 = TL_New(Sdate[N2],Stime[N2],(L[N2]+min(C[N2],O[N2]))/2,sdate[N3],stime[N3],(L[N2]+min(C[N2],O[N2]))/2); TL_SetExtRight(TL51,true); TL_Delete(TL52); TL52 = TL_New(Sdate[N3],Stime[N3],(L[N3]+min(C[N3],O[N3]))/2,sdate[N4],stime[N4],(L[N3]+min(C[N3],O[N3]))/2); TL_SetExtRight(TL52,true); TL_Delete(TL53); TL53 = TL_New(Sdate[N4],Stime[N4],(L[N4]+min(C[N4],O[N4]))/2,sdate[N5],stime[N5],(L[N4]+min(C[N4],O[N4]))/2); TL_SetExtRight(TL53,true); TL_Delete(TL54); TL54 = TL_New(Sdate[N5],Stime[N5],(L[N5]+min(C[N5],O[N5]))/2,sdate[N6],stime[N6],(L[N5]+min(C[N5],O[N5]))/2); TL_SetExtRight(TL54,true); TL_SetColor(TL5,BLUE); TL_SetColor(TL51,BLUE); TL_SetColor(TL52,BLUE); TL_SetColor(TL53,BLUE); TL_SetColor(TL54,BLUE);