이전 문의 답변 감사합니다.
섬머타임이 적용되지 않은것 같은데
부탁드리겠습니다.
아 그리고 적어주신 전일 종가는 선물에서 섬머타임 시간 기준
06:00의 가격이 종가로 책정이 되는데
05:00의 가격을 기준으로 종가설정을 하고싶습니다.
답변 1
예스스탁
예스스탁 답변
2020-08-12 14:06:35
안녕하세요
예스스탁입니다.
썸머타임이 아닐경우 233000완성시 진입하고 0시에 청산해야 하는데
당일청산함수에 0을 지정하면 당일청산을 해제하는 옵션이라 235900에 청산하게 작성해 드립니다.
var : Summer(False);
var : S1(0),S2(0),E1(0),E2(0),cnt(0),ST(0),ET(0),CC(0);
var : Tcond(false),Endtime(0);
if sdate != sdate[1] Then
{
S1 = Floor(sdate/10000)*10000+0300;
E1 = Floor(sdate/10000)*10000+1100;
var1 = 0;
var2 = 0;
for cnt = 1 to 31
{
if DayOfWeek(S1+cnt) == 0 Then
{
var1 = var1+1;
if var1 == 2 then
{
S2 = S1+cnt;
}
}
if DayOfWeek(E1+cnt) == 0 and cnt <= 31 Then
{
var2 = var2+1;
if var2 == 1 then
{
E2 = E1+cnt;
}
}
}
Summer = sdate > S2 And sdate < E2;
}
if bdate != bdate[1] Then
SetStopEndofday(0);
if summer == true then
{
if stime < 050000 Then
CC = c;
if (sdate != sdate[1] and stime >= 223000) or
(sdate == sdate[1] and stime >= 223000 and stime[1] < 223000) Then
{
var1 = O;
if var1 > CC and CC > 0 Then
Buy("b1",AtMarket);
if var1 < CC and CC > 0 Then
Sell("s1",AtMarket);
SetStopEndofday(230000);
}
}
if summer == false then
{
if stime < 060000 Then
CC = c;
if (sdate != sdate[1] and stime >= 233000) or
(sdate == sdate[1] and stime >= 233000 and stime[1] < 233000) Then
{
var1 = O;
if var1 > CC and CC > 0 Then
Buy("b2",AtMarket);
if var1 < CC and CC > 0 Then
Sell("s2",AtMarket);
SetStopEndofday(235900);
}
}
즐거운 하루되세요
> 예스모어 님이 쓴 글입니다.
> 제목 : 68732번 문의에서 섬머타임적용
> 이전 문의 답변 감사합니다.
섬머타임이 적용되지 않은것 같은데
부탁드리겠습니다.
아 그리고 적어주신 전일 종가는 선물에서 섬머타임 시간 기준
06:00의 가격이 종가로 책정이 되는데
05:00의 가격을 기준으로 종가설정을 하고싶습니다.