혹서기 무더위에 매번 감사드립니다.
아래의 주봉 수식을 일봉의 수식으로 변환하여 주시기바랍니다
Input : N(20);
var : Energe1(0),Energe2(0);
Energe1 = accumN(H-O,N)/accumN(O-L,N)*100;
Energe2 = accumN(H-C,N)/accumN(C-L,N)*100;
if Energe1 > Energe2 Then
find(1);
감사합니다
답변 1
예스스탁
예스스탁 답변
2020-08-21 15:43:11
안녕하세요
예스스탁입니다.
일봉에서 20주(N)이면 한주에 5봉으로 해서 최소 100봉이 필요하고 종목검색의 기본봉으로 1개봉이상 필요합니다.
종목검색속성에서 검색에필요한최소기간에 넉넉히 110봉 이상 지정하고 검색하시기 바랍니다.
input : N(20);
var : cnt(0),sum1(0),sum2(0),sum3(0),sum4(0);
var : Energe1(0),Energe2(0);
Array : OO[100](0),HH[100](0),LL[100](0),CC[100](0);
if DayOfWeek(sdate) < DayOfWeek(sdate[1]) Then
{
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 49
{
OO[cnt] = OO[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
CC[0] = C;
if OO[N-1] > 0 Then
{
sum1 = 0;
sum2 = 0;
sum3 = 0;
sum4 = 0;
for cnt = 0 to N-1
{
sum1 = sum1 + (HH[cnt]-OO[cnt]);
sum2 = sum2 + (OO[cnt]-LL[cnt]);
sum3 = sum3 + (HH[cnt]-CC[cnt]);
sum4 = sum4 + (CC[cnt]-LL[cnt]);
}
Energe1 = sum1/sum2*100;
Energe2 = sum3/sum4*100;
if Energe1 > Energe2 Then
Find(1);
}
즐거운 하루되세요
> 천년대로 님이 쓴 글입니다.
> 제목 : 수식부탁 드립니다
> 혹서기 무더위에 매번 감사드립니다.
아래의 주봉 수식을 일봉의 수식으로 변환하여 주시기바랍니다
Input : N(20);
var : Energe1(0),Energe2(0);
Energe1 = accumN(H-O,N)/accumN(O-L,N)*100;
Energe2 = accumN(H-C,N)/accumN(C-L,N)*100;
if Energe1 > Energe2 Then
find(1);
감사합니다