커뮤니티
항상 감사드립니다
2014-10-14 12:05:56
154
글번호 79361
항상 성의 있는 답변에 감사드립니다.
어제 질문드린 월물첫날 저가를 기준가를 하는 식을 잘되나 월물초부터 월고 월저를 예전에 주신수식에 대입하였으나 제가 워낙 수식에 문외한이라 저번 수식 으로 다시 한번 부탁드리겟습니다.죄송합니다
두번째주목요일이 공휴일때 수식 부탁드리겠습니다.
var: H1(0,data1),L1(0,data1),cond1(false,data1),month1(0,data1),nday1(0,data1),week1(0,data1);
var: H2(0,data2),L2(0,data2),cond2(false,data2),month2(0,data2),nday2(0,data2),week2(0,data2);
month1 = data1(int(date/100)-int(date/10000)*100);
nday1 = data1(date - int(date/100)*100);
week1 = data1(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if nday1 >= 8 and nday1 <= 14 and week1 == 4 then
Cond1 = True;
Else
Cond1 = false;
if data1(index == 0 or (Cond1 == false and Cond1[1] == true and date != date[1])) Then{
H1 = data1(H);
L1 = data1(L);
}
if data1(H) > H1 Then
H1 = data1(H);
if data1(L) < L1 Then
L1 = data1(L);
month2 = data2(int(date/100)-int(date/10000)*100);
nday2 = data2(date - int(date/100)*100);
week2 = data2(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if nday2 >= 8 and nday2 <= 14 and week2 == 4 then
Cond2 = True;
Else
Cond2 = false;
if data2(index == 0 or (Cond2 == false and Cond2[1] == true and date != date[1])) Then{
H2 = data2(H);
L2 = data2(L);
}
if data2(H) > H2 Then
H2 = data2(H);
if data2(L) < L2 Then
L2 = data2(L);
plot1(H1);
plot2(L1);
plot3(H2);
plot4(L2);
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
var1 = Text_New(sdate,stime,H1,"콜월고"+NumToStr(H1,2));
var2 = Text_New(sdate,stime,L1,"콜월저"+NumToStr(L1,2));
var3 = Text_New(sdate,stime,H2,"풋월고"+NumToStr(H2,2));
var4 = Text_New(sdate,stime,L2,"풋월저"+NumToStr(L2,2));
답변 2
예스스탁 예스스탁 답변
2014-10-14 16:24:21
안녕하세요
예스스탁입니다.
수식에서 만기일은 봉의 날짜를 이용해 두번째 목요일로 계산을 합니다.
두번째 목요일이 휴일이면 만기일이 전일이 되는데 수식에서는 해당 부분이
인식이 되지 않아 다음날로 인식합니다.
데이터에 휴일을 알려주는 데이터가 없어 로직안에서 계산이 가능하지 않습니다.
아래와 같이 if문에 날짜를 나열해 지정해 주는 방법외에는 없습니다.
cond1과 cond2의 if문 참고하시기 바랍니다.
순연될 날을 직전 지정해 주셔야 합니다.
var: H1(0,data1),L1(0,data1),cond1(false,data1),month1(0,data1),nday1(0,data1),week1(0,data1);
var: H2(0,data2),L2(0,data2),cond2(false,data2),month2(0,data2),nday2(0,data2),week2(0,data2);
month1 = data1(int(date/100)-int(date/10000)*100);
nday1 = data1(date - int(date/100)*100);
week1 = data1(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if (nday1 >= 8 and nday1 <= 14 and week1 == 4) or data1(sdate == 20141008) then #만기일이 공휴일이어서 날짜가 당겨진날 지정
Cond1 = True;
Else
Cond1 = false;
if data1(index == 0 or (Cond1 == false and Cond1[1] == true and date != date[1])) Then{
H1 = data1(H);
L1 = data1(L);
}
if data1(H) > H1 Then
H1 = data1(H);
if data1(L) < L1 Then
L1 = data1(L);
month2 = data2(int(date/100)-int(date/10000)*100);
nday2 = data2(date - int(date/100)*100);
week2 = data2(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if (nday2 >= 8 and nday2 <= 14 and week2 == 4) or data2(sdate == 20141008) then #만기일이 공휴일이어서 날짜가 당겨진날 지정
Cond2 = True;
Else
Cond2 = false;
if data2(index == 0 or (Cond2 == false and Cond2[1] == true and date != date[1])) Then{
H2 = data2(H);
L2 = data2(L);
}
if data2(H) > H2 Then
H2 = data2(H);
if data2(L) < L2 Then
L2 = data2(L);
plot1(H1);
plot2(L1);
plot3(H2);
plot4(L2);
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
var1 = Text_New(sdate,stime,H1,"콜월고"+NumToStr(H1,2));
var2 = Text_New(sdate,stime,L1,"콜월저"+NumToStr(L1,2));
var3 = Text_New(sdate,stime,H2,"풋월고"+NumToStr(H2,2));
var4 = Text_New(sdate,stime,L2,"풋월저"+NumToStr(L2,2));
즐거운 하루되세요
> 좋은하루7 님이 쓴 글입니다.
> 제목 : 항상 감사드립니다
> 항상 성의 있는 답변에 감사드립니다.
어제 질문드린 월물첫날 저가를 기준가를 하는 식을 잘되나 월물초부터 월고 월저를 예전에 주신수식에 대입하였으나 제가 워낙 수식에 문외한이라 저번 수식 으로 다시 한번 부탁드리겟습니다.죄송합니다
두번째주목요일이 공휴일때 수식 부탁드리겠습니다.
var: H1(0,data1),L1(0,data1),cond1(false,data1),month1(0,data1),nday1(0,data1),week1(0,data1);
var: H2(0,data2),L2(0,data2),cond2(false,data2),month2(0,data2),nday2(0,data2),week2(0,data2);
month1 = data1(int(date/100)-int(date/10000)*100);
nday1 = data1(date - int(date/100)*100);
week1 = data1(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if nday1 >= 8 and nday1 <= 14 and week1 == 4 then
Cond1 = True;
Else
Cond1 = false;
if data1(index == 0 or (Cond1 == false and Cond1[1] == true and date != date[1])) Then{
H1 = data1(H);
L1 = data1(L);
}
if data1(H) > H1 Then
H1 = data1(H);
if data1(L) < L1 Then
L1 = data1(L);
month2 = data2(int(date/100)-int(date/10000)*100);
nday2 = data2(date - int(date/100)*100);
week2 = data2(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if nday2 >= 8 and nday2 <= 14 and week2 == 4 then
Cond2 = True;
Else
Cond2 = false;
if data2(index == 0 or (Cond2 == false and Cond2[1] == true and date != date[1])) Then{
H2 = data2(H);
L2 = data2(L);
}
if data2(H) > H2 Then
H2 = data2(H);
if data2(L) < L2 Then
L2 = data2(L);
plot1(H1);
plot2(L1);
plot3(H2);
plot4(L2);
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
var1 = Text_New(sdate,stime,H1,"콜월고"+NumToStr(H1,2));
var2 = Text_New(sdate,stime,L1,"콜월저"+NumToStr(L1,2));
var3 = Text_New(sdate,stime,H2,"풋월고"+NumToStr(H2,2));
var4 = Text_New(sdate,stime,L2,"풋월저"+NumToStr(L2,2));
좋은하루7
2014-10-15 07:57:28
감사합니다
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 항상 감사드립니다
>
안녕하세요
예스스탁입니다.
수식에서 만기일은 봉의 날짜를 이용해 두번째 목요일로 계산을 합니다.
두번째 목요일이 휴일이면 만기일이 전일이 되는데 수식에서는 해당 부분이
인식이 되지 않아 다음날로 인식합니다.
데이터에 휴일을 알려주는 데이터가 없어 로직안에서 계산이 가능하지 않습니다.
아래와 같이 if문에 날짜를 나열해 지정해 주는 방법외에는 없습니다.
cond1과 cond2의 if문 참고하시기 바랍니다.
순연될 날을 직전 지정해 주셔야 합니다.
var: H1(0,data1),L1(0,data1),cond1(false,data1),month1(0,data1),nday1(0,data1),week1(0,data1);
var: H2(0,data2),L2(0,data2),cond2(false,data2),month2(0,data2),nday2(0,data2),week2(0,data2);
month1 = data1(int(date/100)-int(date/10000)*100);
nday1 = data1(date - int(date/100)*100);
week1 = data1(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if (nday1 >= 8 and nday1 <= 14 and week1 == 4) or data1(sdate == 20141008) then #만기일이 공휴일이어서 날짜가 당겨진날 지정
Cond1 = True;
Else
Cond1 = false;
if data1(index == 0 or (Cond1 == false and Cond1[1] == true and date != date[1])) Then{
H1 = data1(H);
L1 = data1(L);
}
if data1(H) > H1 Then
H1 = data1(H);
if data1(L) < L1 Then
L1 = data1(L);
month2 = data2(int(date/100)-int(date/10000)*100);
nday2 = data2(date - int(date/100)*100);
week2 = data2(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if (nday2 >= 8 and nday2 <= 14 and week2 == 4) or data2(sdate == 20141008) then #만기일이 공휴일이어서 날짜가 당겨진날 지정
Cond2 = True;
Else
Cond2 = false;
if data2(index == 0 or (Cond2 == false and Cond2[1] == true and date != date[1])) Then{
H2 = data2(H);
L2 = data2(L);
}
if data2(H) > H2 Then
H2 = data2(H);
if data2(L) < L2 Then
L2 = data2(L);
plot1(H1);
plot2(L1);
plot3(H2);
plot4(L2);
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
var1 = Text_New(sdate,stime,H1,"콜월고"+NumToStr(H1,2));
var2 = Text_New(sdate,stime,L1,"콜월저"+NumToStr(L1,2));
var3 = Text_New(sdate,stime,H2,"풋월고"+NumToStr(H2,2));
var4 = Text_New(sdate,stime,L2,"풋월저"+NumToStr(L2,2));
즐거운 하루되세요
> 좋은하루7 님이 쓴 글입니다.
> 제목 : 항상 감사드립니다
> 항상 성의 있는 답변에 감사드립니다.
어제 질문드린 월물첫날 저가를 기준가를 하는 식을 잘되나 월물초부터 월고 월저를 예전에 주신수식에 대입하였으나 제가 워낙 수식에 문외한이라 저번 수식 으로 다시 한번 부탁드리겟습니다.죄송합니다
두번째주목요일이 공휴일때 수식 부탁드리겠습니다.
var: H1(0,data1),L1(0,data1),cond1(false,data1),month1(0,data1),nday1(0,data1),week1(0,data1);
var: H2(0,data2),L2(0,data2),cond2(false,data2),month2(0,data2),nday2(0,data2),week2(0,data2);
month1 = data1(int(date/100)-int(date/10000)*100);
nday1 = data1(date - int(date/100)*100);
week1 = data1(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if nday1 >= 8 and nday1 <= 14 and week1 == 4 then
Cond1 = True;
Else
Cond1 = false;
if data1(index == 0 or (Cond1 == false and Cond1[1] == true and date != date[1])) Then{
H1 = data1(H);
L1 = data1(L);
}
if data1(H) > H1 Then
H1 = data1(H);
if data1(L) < L1 Then
L1 = data1(L);
month2 = data2(int(date/100)-int(date/10000)*100);
nday2 = data2(date - int(date/100)*100);
week2 = data2(DayOfWeek(date));
#선물만기일이면 month%3 == 0 조건 추가
if nday2 >= 8 and nday2 <= 14 and week2 == 4 then
Cond2 = True;
Else
Cond2 = false;
if data2(index == 0 or (Cond2 == false and Cond2[1] == true and date != date[1])) Then{
H2 = data2(H);
L2 = data2(L);
}
if data2(H) > H2 Then
H2 = data2(H);
if data2(L) < L2 Then
L2 = data2(L);
plot1(H1);
plot2(L1);
plot3(H2);
plot4(L2);
Text_Delete(var1);
Text_Delete(var2);
Text_Delete(var3);
Text_Delete(var4);
var1 = Text_New(sdate,stime,H1,"콜월고"+NumToStr(H1,2));
var2 = Text_New(sdate,stime,L1,"콜월저"+NumToStr(L1,2));
var3 = Text_New(sdate,stime,H2,"풋월고"+NumToStr(H2,2));
var4 = Text_New(sdate,stime,L2,"풋월저"+NumToStr(L2,2));