60분봉에서의 거래량가중이동평균 100일선 과
60분봉에서의 이동평균 50일,200일,400일선을
1분봉에서 띄우고 싶습니당 감사합니당!
답변 1
예스스탁
예스스탁 답변
2025-03-31 10:04:15
안녕하세요
예스스탁입니다.
차트에 봉을 최대인 1만봉 조회하고 적용하시기 바랍니다.
input : 분(60),Period(100),P1(50),P2(200),P3(400);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : vsum1(0),vsum2(0),vwma(0);
var : sum1(0),mav1(0);
var : sum2(0),mav2(0);
var : sum3(0),mav3(0);
Array : CC[500](0),VV[500](0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 분 > 1 and TM >= TM[1]+분) or
(Bdate == Bdate[1] and 분 == 1 and TM > TM[1]) Then
{
for cnt = 499 downto 1
{
CC[cnt] = CC[cnt-1];
VV[cnt] = VV[cnt-1];
}
VV[0] = 0;
}
CC[0] = C;
VV[0] = VV[0]+V;
if VV[Period-1] > 0 then
{
vsum1 = 0;
vsum2 = 0;
for cnt = 0 to Period-1
{
vsum1 = vsum1 + (CC[cnt]*VV[cnt]);
vsum2 = vsum2 + VV[cnt];
}
vwma = vsum1/vsum2;
plot1(vwma,"거래량가중이동평균");
}
if CC[P1-1] > 0 then
{
sum1 = 0;
for cnt = 0 to P1-1
{
sum1 = sum1+CC[cnt];
}
mav1 = sum1/P1;
plot2(mav1,"단순이평1");
}
if CC[P2-1] > 0 then
{
sum2 = 0;
for cnt = 0 to P2-1
{
sum2 = sum2+CC[cnt];
}
mav2 = sum2/P2;
plot3(mav2,"단순이평2");
}
if CC[P3-1] > 0 then
{
sum3 = 0;
for cnt = 0 to P3-1
{
sum3 = sum3+CC[cnt];
}
mav3 = sum3/P3;
plot4(mav3,"단순이평3");
}
}
즐거운 하루되세요
> yaggaboy 님이 쓴 글입니다.
> 제목 : 항상 감사드립니다.
> 60분봉에서의 거래량가중이동평균 100일선 과
60분봉에서의 이동평균 50일,200일,400일선을
1분봉에서 띄우고 싶습니당 감사합니당!