커뮤니티
안녕하세요
2017-02-22 20:55:40
133
글번호 107149
아래내용으로 봉처리를 하다보니 처리속도가 상당히 늦은것 같읍니다.
너무 무식하게 코딩을 하지안았나 하는 생각이듭니다.
차트를 띄어놓고 시스템식 가동할려면 메모리가 부족하다고 나올정도인데
코딩 문제인지 다른 문제인지 모르겠습니다.
혹시 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);
답변 1
예스스탁 예스스탁 답변
2017-02-23 11:31:25
안녕하세요
예스스탁입니다.
올려주신 수식은 수식적으로 줄일만한 부분은 없습니다.
출력되는 추세선의 갯수를 줄여 로드를 줄이셔야 합니다.
즐거운 하루되세요
> 자라도 님이 쓴 글입니다.
> 제목 : 안녕하세요
> 아래내용으로 봉처리를 하다보니 처리속도가 상당히 늦은것 같읍니다.
너무 무식하게 코딩을 하지안았나 하는 생각이듭니다.
차트를 띄어놓고 시스템식 가동할려면 메모리가 부족하다고 나올정도인데
코딩 문제인지 다른 문제인지 모르겠습니다.
혹시 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);