안녕하세요 예스스탁입니다. 해외선물은 수식으로 만기체크가 가능하지 않습니다. 예를들어 항셍의 경우 '계약월 최종 영업일의 전 영업일"와 같은 날짜로 랭귀지는 차트의 데이타로만 날짜를 파악하는데 차트에 달력데이타나 휴일데이타가 없어 수식으로 체크가 가능하지 않습습니다. 도움을 드리지 못해 죄송합니다. 즐거운 하루되세요 > 크라켄 님이 쓴 글입니다. > 제목 : 부탁드립니다 > $,안녕하세요 아래식은 국내 옵션 만기일주기 로직입니다 이식을 해외선물 항생지수선물 만기일주기 로직으로 수정요청드립니다. input : N(5); var : idx(0),HH(0),LL(0),RR(0),T(0); var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0); var : tx7(0),tx8(0),tx9(0),tx10(0),tx11(0),tx12(0); var : month(0),nday(0),week(0),EX(False); month = int(date/100)-int(date/10000)*100; nday = date - int(date/100)*100; Week = DayOfWeek(date); if ( nday >= 8 and nday <= 14 and week == 4) Then EX = true; Else EX = False; if EX == False and EX[1] == true Then { HH = H; LL = L; idx = 0; } idx = idx+1; if idx <= N Then { if HH > 0 and H > HH Then HH = H; if LL > 0 and L < LL Then LL = L; RR = HH-LL; } if HH > 0 and LL > 0 Then { plot1(HH,"최고",IFf(T == 1,MAGENTA,MAGENTA)); plot2(HH+RR*1,"최고1",IFf(T == 1,MAGENTA,MAGENTA)); plot3(HH+RR*2,"최고2",IFf(T == 1,MAGENTA,MAGENTA)); plot4(HH+RR*3,"최고3",IFf(T == 1,MAGENTA,MAGENTA)); plot5(HH+RR*4,"최고4",IFf(T == 1,MAGENTA,MAGENTA)); plot6(HH+RR*5,"최고5",IFf(T == 1,MAGENTA,MAGENTA)); plot7(HH+RR*6,"최고6",IFf(T == 1,MAGENTA,MAGENTA)); plot8(LL,"최저",IFf(T == 1,BLUE,BLUE)); plot9(LL-RR*1,"최저1",IFf(T == 1,BLUE,BLUE)); plot10(LL-RR*2,"최저2",IFf(T == 1,BLUE,BLUE)); plot11(LL-RR*3,"최저3",IFf(T == 1,BLUE,BLUE)); plot12(LL-RR*4,"최저4",IFf(T == 1,BLUE,BLUE)); plot13(LL-RR*5,"최저5",IFf(T == 1,BLUE,BLUE)); plot14(LL-RR*6,"최저6",IFf(T == 1,BLUE,BLUE)); plot15((HH+LL)/2); plot16((HH+(HH+RR*1))/2); plot17((LL+(LL-RR*1))/2); plot18(((HH+RR*1)+(HH+RR*2))/2); plot19(((LL-RR*1)+(LL-RR*2))/2); plot20(((HH+RR*2)+(HH+RR*3))/2); plot21(((LL-RR*2)+(LL-RR*3))/2); plot22(((HH+RR*3)+(HH+RR*4))/2); plot23(((LL-RR*3)+(LL-RR*4))/2); plot24(((HH+RR*4)+(HH+RR*5))/2); plot25(((LL-RR*4)+(LL-RR*5))/2); plot26(((HH+RR*5)+(HH+RR*6))/2); plot27(((LL-RR*5)+(LL-RR*6))/2); if idx <= N then{ Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); Text_Delete(tx8); Text_Delete(tx9); Text_Delete(tx10); Text_Delete(tx11); Text_Delete(tx12); tx1 = Text_New(sdate,stime,HH," 최고:"+NumToStr(HH,2)); tx2 = Text_New(sdate,stime,HH+RR*1," 최고1:"+NumToStr(HH+RR*1,2)); tx3 = Text_New(sdate,stime,HH+RR*2," 최고2:"+NumToStr(HH+RR*2,2)); tx4 = Text_New(sdate,stime,HH+RR*3," 최고3:"+NumToStr(HH+RR*3,2)); tx5 = Text_New(sdate,stime,HH+RR*4," 최고4:"+NumToStr(HH+RR*4,2)); tx6 = Text_New(sdate,stime,HH+RR*5," 최고5:"+NumToStr(HH+RR*5,2)); tx7 = Text_New(sdate,stime,LL," 최저:"+NumToStr(LL,2)); tx8 = Text_New(sdate,stime,LL-RR*1," 최저1:"+NumToStr(LL-RR*1,2)); tx9 = Text_New(sdate,stime,LL-RR*2," 최저2:"+NumToStr(LL-RR*2,2)); tx10 = Text_New(sdate,stime,LL-RR*3," 최저3:"+NumToStr(LL-RR*3,2)); tx11 = Text_New(sdate,stime,LL-RR*4," 최저4:"+NumToStr(LL-RR*4,2)); tx12 = Text_New(sdate,stime,LL-RR*5," 최저5:"+NumToStr(LL-RR*5,2)); Text_SetStyle(tx1,5,2); Text_SetStyle(tx2,5,2); Text_SetStyle(tx3,5,2); Text_SetStyle(tx4,5,2); Text_SetStyle(tx5,5,2); Text_SetStyle(tx6,5,2); Text_SetStyle(tx7,5,2); Text_SetStyle(tx8,5,2); Text_SetStyle(tx9,5,2); Text_SetStyle(tx10,5,2); Text_SetStyle(tx11,5,2); Text_SetStyle(tx12,5,2); Text_SetColor(tx1,IFf(T == 1,RED,RED)); Text_SetColor(tx2,IFf(T == 1,RED,RED)); Text_SetColor(tx3,IFf(T == 1,MAGENTA,RED)); Text_SetColor(tx4,IFf(T == 1,MAGENTA,RED)); Text_SetColor(tx5,IFf(T == 1,MAGENTA,RED)); Text_SetColor(tx6,IFf(T == 1,MAGENTA,RED)); Text_SetColor(tx7,IFf(T == 1,BLUE,BLUE)); Text_SetColor(tx8,IFf(T == 1,MAGENTA,BLUE)); Text_SetColor(tx9,IFf(T == 1,MAGENTA,BLUE)); Text_SetColor(tx10,IFf(T == 1,MAGENTA,BLUE)); Text_SetColor(tx11,IFf(T == 1,MAGENTA,BLUE)); Text_SetColor(tx12,IFf(T == 1,MAGENTA,BLUE)); } else{ Text_SetLocation(tx1,sdate,stime,HH); Text_SetLocation(tx2,sdate,stime,HH+RR*1); Text_SetLocation(tx3,sdate,stime,HH+RR*2); Text_SetLocation(tx4,sdate,stime,HH+RR*3); Text_SetLocation(tx5,sdate,stime,HH+RR*4); Text_SetLocation(tx6,sdate,stime,HH+RR*5); Text_SetLocation(tx7,sdate,stime,LL); Text_SetLocation(tx8,sdate,stime,LL-RR*1); Text_SetLocation(tx9,sdate,stime,LL-RR*2); Text_SetLocation(tx10,sdate,stime,LL-RR*3); Text_SetLocation(tx11,sdate,stime,LL-RR*4); Text_SetLocation(tx12,sdate,stime,LL-RR*5); } } $$,고맙습니다