커뮤니티
검색식 부탁드립니다
2021-01-05 03:05:46
572
글번호 145103
안녕하세요 새해부터 수고가 만으십니다
전에 만들어주신 검색식(글번호 70418)의 개량버전과
반대버전을 만들어주시면 감사하겠습니다
전에 부탁드렸던 검색식은 분봉상 현재봉기준 1위부터 5위까지
양봉의 변동성이 높은 검색식이었습니다
전에 보내주신 검색식은 아주잘 받았습니다 감사합니다
그런데 윗꼬리를 포함하지안고 시가와 종가자체의 변동성이
높은 봉들이 검색되기를 원합니다
또한 음봉버전의 검색식(아랫꼬리제외)또한 만들어주시면 감사하겠습니다
감사합니다 새해복마니받으세요!
답변 1
예스스탁 예스스탁 답변
2021-01-05 15:33:30
안녕하세요
예스스탁입니다.
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 C > O Then
{
var1 = abs(c-O);
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 C < O Then
{
var1 = abs(c-O);
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);
즐거운 하루되세요
> 그리즐리 님이 쓴 글입니다.
> 제목 : 검색식 부탁드립니다
>
안녕하세요 새해부터 수고가 만으십니다
전에 만들어주신 검색식(글번호 70418)의 개량버전과
반대버전을 만들어주시면 감사하겠습니다
전에 부탁드렸던 검색식은 분봉상 현재봉기준 1위부터 5위까지
양봉의 변동성이 높은 검색식이었습니다
전에 보내주신 검색식은 아주잘 받았습니다 감사합니다
그런데 윗꼬리를 포함하지안고 시가와 종가자체의 변동성이
높은 봉들이 검색되기를 원합니다
또한 음봉버전의 검색식(아랫꼬리제외)또한 만들어주시면 감사하겠습니다
감사합니다 새해복마니받으세요!