예스스탁
예스스탁 답변
2024-04-25 14:14:09
안녕하세요
예스스탁입니다.
input : n(1);
var : cnt(0);
var : DD(0),Year(0),V1(0),V2(0),V3(0),V4(0),summer(False);
var : ET1(0),XT1(0),ET2(0),XT2(0),Tcond(False),entry(0),week(0);
array : DO[20](0),DH[20](0),DL[20](0),DC[20](0);
array : WO[20](0),WH[20](0),WL[20](0),WC[20](0);
if sDate != sDate[1] Then
{
DD = DayOfWeek(sDate);
Year = Floor(sDate/10000);
V1 = (10000 * Year) + (100 * 3) + 1;
V2 = 15 - dayofweek(v1);
v3 = (10000 * Year) + (100 * 11) + 1;
v4 = 8 - dayofweek(v3);
Summer = Sdate > (10000 * Year) + (100 * 3) + v2 and Sdate < (10000 * Year) + (100 * 11) + v4;
if summer == False Then
{
ET1 = 233000;
XT1 = 060000;
}
Else
{
ET1 = 223000;
XT1 = 050000;
}
}
if (sDate != sDate[1] and sTime >= XT1) or
(sDate == sDate[1] and sTime >= XT1 and sTime[1] < XT1) Then
{
Tcond = False;
}
if (sDate != sDate[1] and sTime >= ET1) or
(sDate == sDate[1] and sTime >= ET1 and sTime[1] < ET1) Then
{
Tcond = true;
entry = 0;
for cnt = 19 downto 1
{
DO[cnt] = DO[cnt-1];
DH[cnt] = DH[cnt-1];
DL[cnt] = DL[cnt-1];
DC[cnt] = DC[cnt-1];
}
DO[0] = O;
DH[0] = H;
DL[0] = L;
week = DayOfWeek(Bdate);
if week < week[1] Then
{
for cnt = 19 downto 1
{
WO[cnt] = WO[cnt-1];
WH[cnt] = WH[cnt-1];
WL[cnt] = WL[cnt-1];
WC[cnt] = WC[cnt-1];
}
WO[0] = DO[0];
WH[0] = DH[0];
WL[0] = DL[0];
}
}
if Tcond == true Then
{
DC[0] = C;
if DH[0] > 0 and H > DH[0] Then
DH[0] = H;
if DL[0] > 0 and L < DL[0] Then
DL[0] = L;
WC[0] = DC[0];
if WH[0] > 0 and DH[0] > WH[0] Then
WH[0] = DH[0];
if WL[0] > 0 and DL[0] < WL[0] Then
WL[0] = DL[0];
}
//plot1(DO[n],"n일전시가");
//plot2(DH[n],"n일전고가");
//plot3(DC[n],"n일전종가");
//plot4(DL[n],"n일전저가");
if WO[n] > 0 Then
{
plot1(WO[n],"n주전시가");
plot2(WH[n],"n주전고가");
plot3(WC[n],"n주전종가");
plot4(WL[n],"n주전저가");
}
즐거운 하루되세요
> 시고르시고르 님이 쓴 글입니다.
> 제목 : 문의드립니다
> var : DD(0),Year(0),V1(0),V2(0),V3(0),V4(0),summer(False);
var : ET1(0),XT1(0),ET2(0),XT2(0),Tcond(False),entry(0);
if sDate != sDate[1] Then
{
DD = DayOfWeek(sDate);
Year = Floor(sDate/10000);
V1 = (10000 * Year) + (100 * 3) + 1;
V2 = 15 - dayofweek(v1);
v3 = (10000 * Year) + (100 * 11) + 1;
v4 = 8 - dayofweek(v3);
Summer = Sdate > (10000 * Year) + (100 * 3) + v2 and Sdate < (10000 * Year) + (100 * 11) + v4;
if summer == False Then
{
ET1 = 233000;
XT1 = 060000;
}
Else
{
ET1 = 223000;
XT1 = 050000;
}
}
var : cnt(0);
Array : DO[20](0),DH[20](0),DL[20](0),DC[20](0);
if (sDate != sDate[1] and sTime >= XT1) or
(sDate == sDate[1] and sTime >= XT1 and sTime[1] < XT1) Then
{
Tcond = False;
}
if (sDate != sDate[1] and sTime >= ET1) or
(sDate == sDate[1] and sTime >= ET1 and sTime[1] < ET1) Then
{
Tcond = true;
entry = 0;
for cnt = 19 downto 1
{
DO[cnt] = DO[cnt-1];
DH[cnt] = DH[cnt-1];
DL[cnt] = DL[cnt-1];
DC[cnt] = DC[cnt-1];
}
DO[0] = O;
DH[0] = H;
DL[0] = L;
}
if Tcond == true Then
{
DC[0] = C;
if DH[0] > 0 and H > DH[0] Then
DH[0] = H;
if DL[0] > 0 and L < DL[0] Then
DL[0] = L;
}
//plot1(DO[n],"n일전시가");
//plot2(DH[n],"n일전고가");
//plot3(DC[n],"n일전종가");
//plot4(DL[n],"n일전저가");
정해진 시간 구간을 잡아서 일봉의 고가저가를 구하는 지표인데
이렇게 구해진 일봉의 가격을 이용하여 주봉의 시고저종을 구하는 지표를 만들수 있을까요
예스스탁에 언제나 감사드립니다.