커뮤니티
수식 문의 드립니다.
2025-03-05 15:30:17
360
글번호 188799
수고하십니다.
첨부된 서식은 며칠전 문의드린 서식을 '이평선과의 차이와 기준값으로 구한 식'인데
자꾸 오류가 납니다.
첨부서식 수정 바랍니다.
※ 차트상 분봉 가격변화시 서식의 값이 수시로 변화하지 않게
당일시가,주봉시가,월봉시가에 나타난 이평선값으로만 계산되게 바랍니다.
그리고 위 서식대로 주봉이평선과 월봉이평선의 수식도 부탁드립니다.
- 1. 서식.xlsx (0.01 MB)
답변 1
예스스탁 예스스탁 답변
2025-03-05 16:27:56
안녕하세요
예스스탁입니다.
1
input : P(5);
var : cnt(0);
var : sumV1(0),sumV2(0), mav1(0),mav2(0),diff(0),value(0);
if DayClose(P) > 0 Then
{
sumV1 = DayOpen;
sumV2 = DayOpen;
for cnt = 1 to P-1
{
sumV1 = sumV1+DayClose(cnt);
sumV2 = sumV2+DayClose(cnt+1);
}
maV1 = sumV1 / P;#당일기준 일봉이평
maV2 = sumV2 / P;#전일기준 일봉이평
diff = mav2-mav1;#전일-당일
}
input : P1(10);
var : sumV3(0),sumV4(0), mav3(0),mav4(0),diff1(0),value1(0);
if DayClose(P1) > 0 Then
{
sumV3 = DayOpen;
sumV4 = DayOpen;
for cnt = 1 to P1-1
{
sumV3 = sumV3+DayClose(cnt);
sumV4 = sumV4+DayClose(cnt+1);
}
maV3 = sumV3 / P1;#당일기준 일봉이평
maV4 = sumV4 / P1;#전일기준 일봉이평
diff1 = mav4-mav3;#전일-당일
plot1(dayhigh(1)-diff+diff1,"5,10크로스");
}
input : P2(20);
var : sumV5(0),sumV6(0), mav5(0),mav6(0),diff2(0),value2(0);
if DayClose(P2) > 0 Then
{
sumV5 = DayOpen;
sumV6 = DayOpen;
for cnt = 1 to P2-1
{
sumV5 = sumV5+DayClose(cnt);
sumV6 = sumV6+DayClose(cnt+1);
}
maV5 = sumV5 / P2;#당일기준 일봉이평
maV6 = sumV6 / P2;#전일기준 일봉이평
diff2 = mav6-mav5;#전일-당일
plot2(dayhigh(1)-diff+diff1+diff2,"5,10,20크로스");
}
2
input : P(5);
var : cnt(0);
var : sumV1(0),sumV2(0), mav1(0),mav2(0),diff(0),value(0);
Array : WC[100](0),WH[100](0),WO[100](0);
if bdate != Bdate[1] and DayOfWeek(Bdate) <= DayOfWeek(Bdate[1]) Then
{
For cnt = 99 DownTo 1
{
WC[cnt] = WC[cnt-1];
WH[cnt] = WH[cnt-1];
WO[cnt] = WO[cnt-1];
}
WH[0] = H;
WO[0] = O;
}
WC[0] = C;
if WH[0] > 0 and H > WH[0] Then
WH[0] = H;
if WC[P] > 0 Then
{
sumV1 = WO[0];
sumV2 = WO[0];
for cnt = 1 to P-1
{
sumV1 = sumV1+WC[cnt];
sumV2 = sumV2+WC[cnt+1];
}
maV1 = sumV1 / P;
maV2 = sumV2 / P;
diff = mav2-mav1;
}
input : P1(10);
var : sumV3(0),sumV4(0), mav3(0),mav4(0),diff1(0),value1(0);
if WC[P] > 0 Then
{
sumV3 = WO[0];
sumV4 = WO[0];
for cnt = 1 to P1-1
{
sumV3 = sumV3+WC[cnt];
sumV4 = sumV4+WC[cnt+1];
}
maV3 = sumV3 / P1;
maV4 = sumV4 / P1;
diff1 = mav4-mav3;
plot1(WH[1]-diff+diff1,"5,10크로스");
}
input : P2(20);
var : sumV5(0),sumV6(0), mav5(0),mav6(0),diff2(0),value2(0);
if WC[P2] > 0 Then
{
sumV5 = WO[0];
sumV6 = WO[0];
for cnt = 1 to P2-1
{
sumV5 = sumV5+WC[cnt];
sumV6 = sumV6+WC[cnt+1];
}
maV5 = sumV5 / P2;
maV6 = sumV6 / P2;
diff2 = mav6-mav5;
plot2(WH[1]-diff+diff1+diff2,"5,10,20크로스");
}
3
input : P(5);
var : cnt(0);
var : sumV1(0),sumV2(0), mav1(0),mav2(0),diff(0),value(0);
Array : MC[100](0),MH[100](0),MO[100](0);
if bdate > Bdate[1]+30 Then
{
For cnt = 99 DownTo 1
{
MC[cnt] = MC[cnt-1];
MH[cnt] = MH[cnt-1];
MO[cnt] = MO[cnt-1];
}
MH[0] = H;
MO[0] = O;
}
MC[0] = C;
if MH[0] > 0 and H > MH[0] Then
MH[0] = H;
if MC[P] > 0 Then
{
sumV1 = MO[0];
sumV2 = MO[0];
for cnt = 1 to P-1
{
sumV1 = sumV1+MC[cnt];
sumV2 = sumV2+MC[cnt+1];
}
maV1 = sumV1 / P;
maV2 = sumV2 / P;
diff = mav2-mav1;
}
input : P1(10);
var : sumV3(0),sumV4(0), mav3(0),mav4(0),diff1(0),value1(0);
if MC[P] > 0 Then
{
sumV3 = MO[0];
sumV4 = MO[0];
for cnt = 1 to P1-1
{
sumV3 = sumV3+MC[cnt];
sumV4 = sumV4+MC[cnt+1];
}
maV3 = sumV3 / P1;
maV4 = sumV4 / P1;
diff1 = mav4-mav3;
plot1(MH[1]-diff+diff1,"5,10크로스");
}
input : P2(20);
var : sumV5(0),sumV6(0), mav5(0),mav6(0),diff2(0),value2(0);
if MC[P2] > 0 Then
{
sumV5 = MO[0];
sumV6 = MO[0];
for cnt = 1 to P2-1
{
sumV5 = sumV5+MC[cnt];
sumV6 = sumV6+MC[cnt+1];
}
maV5 = sumV5 / P2;
maV6 = sumV6 / P2;
diff2 = mav6-mav5;
plot2(MH[1]-diff+diff1+diff2,"5,10,20크로스");
}
즐거운 하루되세요
> 부활 님이 쓴 글입니다.
> 제목 : 수식 문의 드립니다.
>
수고하십니다.
첨부된 서식은 며칠전 문의드린 서식을 '이평선과의 차이와 기준값으로 구한 식'인데
자꾸 오류가 납니다.
첨부서식 수정 바랍니다.
※ 차트상 분봉 가격변화시 서식의 값이 수시로 변화하지 않게
당일시가,주봉시가,월봉시가에 나타난 이평선값으로만 계산되게 바랍니다.
그리고 위 서식대로 주봉이평선과 월봉이평선의 수식도 부탁드립니다.