커뮤니티
갭관련 검색식 관련해서 다시문의드립니다
2021-02-15 18:44:40
1470
글번호 146347
제가 아래글에서 갭관련 검색식을 문의를 드렸는데
다른종목과 비교해서 순위를 계산하지 못해서 안된다고
하셨는데 저는 특정 종목차트에 적용해서 과거대비 현재까지의
갭이 떳을때 그갭의 순위가 나타나는 검색식을 문의드리고싶습니다
제가 전에 문의드렸던 상승률 순위 검색식(글번호 70992)과 같은 유형이라고
참고해주시면 될거같습니다
가능하다면 상승갭 1위부터5위까지 하락갭 1위부터 5위까지
두가지 종류를 짜주시면 감사하겠습니다
감사합니다 (__)
답변 1
예스스탁 예스스탁 답변
2021-02-16 13:49:41
안녕하세요
예스스탁입니다.
1
var : cnt(0),tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
Array : hh[6](0),dd[6](0),tt[6](0),pp[6](0);
if O > C[1] Then
{
var1 = abs(O-C[1]);
if var1 >= hh[1] Then
{
hh[1] = var1;
dd[1] = sDate;
tt[1] = sTime;
pp[1] = h;
For cnt = 2 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx1);
tx1 = Text_New(dd[1],tt[1],pp[1],"1위");
Text_Delete(tx2);
tx2 = Text_New(dd[2],tt[2],pp[2],"2위");
Text_Delete(tx3);
tx3 = Text_New(dd[3],tt[3],pp[3],"3위");
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[1] and var1 >= hh[2] Then
{
hh[2] = var1;
dd[2] = sDate;
tt[2] = sTime;
pp[2] = h;
For cnt = 3 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx2);
tx2 = Text_New(dd[2],tt[2],pp[2],"2위");
Text_Delete(tx3);
tx3 = Text_New(dd[3],tt[3],pp[3],"3위");
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[2] and var1 >= hh[3] Then
{
hh[3] = var1;
dd[3] = sDate;
tt[3] = sTime;
pp[3] = h;
For cnt = 4 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx3);
tx3 = Text_New(dd[3],tt[3],pp[3],"3위");
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[3] and var1 >= hh[4] Then
{
hh[4] = var1;
dd[4] = sDate;
tt[4] = sTime;
pp[4] = h;
For cnt = 5 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[4] and var1 >= hh[5] Then
{
hh[5] = var1;
dd[5] = sDate;
tt[5] = sTime;
pp[5] = h;
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
}
Text_SetStyle(tx1,2,1);
Text_SetStyle(tx2,2,1);
Text_SetStyle(tx3,2,1);
Text_SetStyle(tx4,2,1);
Text_SetStyle(tx5,2,1);
2
var : cnt(0),tx1(0),tx2(0),tx3(0),tx4(0),tx5(0);
Array : hh[6](0),dd[6](0),tt[6](0),pp[6](0);
if O < C[1] Then
{
var1 = abs(O-C[1]);
if var1 >= hh[1] Then
{
hh[1] = var1;
dd[1] = sDate;
tt[1] = sTime;
pp[1] = h;
For cnt = 2 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx1);
tx1 = Text_New(dd[1],tt[1],pp[1],"1위");
Text_Delete(tx2);
tx2 = Text_New(dd[2],tt[2],pp[2],"2위");
Text_Delete(tx3);
tx3 = Text_New(dd[3],tt[3],pp[3],"3위");
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[1] and var1 >= hh[2] Then
{
hh[2] = var1;
dd[2] = sDate;
tt[2] = sTime;
pp[2] = h;
For cnt = 3 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx2);
tx2 = Text_New(dd[2],tt[2],pp[2],"2위");
Text_Delete(tx3);
tx3 = Text_New(dd[3],tt[3],pp[3],"3위");
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[2] and var1 >= hh[3] Then
{
hh[3] = var1;
dd[3] = sDate;
tt[3] = sTime;
pp[3] = h;
For cnt = 4 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx3);
tx3 = Text_New(dd[3],tt[3],pp[3],"3위");
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[3] and var1 >= hh[4] Then
{
hh[4] = var1;
dd[4] = sDate;
tt[4] = sTime;
pp[4] = h;
For cnt = 5 to 5
{
hh[cnt] = hh[cnt-1][1];
dd[cnt] = dd[cnt-1][1];
tt[cnt] = tt[cnt-1][1];
pp[cnt] = pp[cnt-1][1];
}
Text_Delete(tx4);
tx4 = Text_New(dd[4],tt[4],pp[4],"4위");
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
else if var1 < hh[4] and var1 >= hh[5] Then
{
hh[5] = var1;
dd[5] = sDate;
tt[5] = sTime;
pp[5] = h;
Text_Delete(tx5);
tx5 = Text_New(dd[5],tt[5],pp[5],"5위");
}
}
Text_SetStyle(tx1,2,1);
Text_SetStyle(tx2,2,1);
Text_SetStyle(tx3,2,1);
Text_SetStyle(tx4,2,1);
Text_SetStyle(tx5,2,1);
즐거운 하루되세요
> 그리즐리 님이 쓴 글입니다.
> 제목 : 갭관련 검색식 관련해서 다시문의드립니다
>
제가 아래글에서 갭관련 검색식을 문의를 드렸는데
다른종목과 비교해서 순위를 계산하지 못해서 안된다고
하셨는데 저는 특정 종목차트에 적용해서 과거대비 현재까지의
갭이 떳을때 그갭의 순위가 나타나는 검색식을 문의드리고싶습니다
제가 전에 문의드렸던 상승률 순위 검색식(글번호 70992)과 같은 유형이라고
참고해주시면 될거같습니다
가능하다면 상승갭 1위부터5위까지 하락갭 1위부터 5위까지
두가지 종류를 짜주시면 감사하겠습니다
감사합니다 (__)