* 많은 도움에 고맙습니다.
* 1분봉 차트에 2분봉 이격도를 부탁 드립니다.
2분봉 이격도 : 20분봉, 60분봉 이격선 두개 필요합니다.
## 아래 수식은 찾아보니 타주기 일봉인데
2분봉으로 전환후 주석 좀 부탁 드립니다.
input : Atime1(3),P(20);
var : cnt(0),sum1(0),mav1(0),S1(0),D1(0),TM(0),TF1(0);
Array : C1[50](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;
TF1 = TM%Atime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then
{
for cnt = 1 to 49
{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if C1[P] > 0 then{
sum1 = 0;
for cnt = 0 to P-1{
sum1 = sum1+C1[cnt];
}
mav1 = sum1/P;
plot1(c/mav1*100);
}
}
* 고맙습니다. 부탁 드립니다.
답변 1
예스스탁
예스스탁 답변
2022-07-26 10:56:56
안녕하세요
예스스탁입니다.
input : Atime1(2),P1(20),P2(60);
var : cnt(0),S1(0),D1(0),TM(0),TF1(0);
var : sum1(0),mav1(0),dis1(0),sum2(0),mav2(0),dis2(0);
Array : CC[100](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;
TF1 = TM%Atime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then
{
for cnt = 99 downto 1
{
CC[cnt] = CC[cnt-1];
}
}
CC[0] = C;
if CC[P1-1] > 0 then
{
sum1 = 0;
for cnt = 0 to P1-1
{
sum1 = sum1+CC[cnt];
}
mav1 = sum1/P1;
dis1 = c/mav1*100;
plot1(dis1);
}
if CC[P2-1] > 0 then
{
sum2 = 0;
for cnt = 0 to P2-1
{
sum2 = sum2+CC[cnt];
}
mav2 = sum2/P2;
dis2 = c/mav2*100;
plot2(dis2);
}
PlotBaseLine1(100);
}
즐거운 하루되세
> 요타 님이 쓴 글입니다.
> 제목 : 타주기 이격도 부탁 드립니다.
> * 많은 도움에 고맙습니다.
* 1분봉 차트에 2분봉 이격도를 부탁 드립니다.
2분봉 이격도 : 20분봉, 60분봉 이격선 두개 필요합니다.
## 아래 수식은 찾아보니 타주기 일봉인데
2분봉으로 전환후 주석 좀 부탁 드립니다.
input : Atime1(3),P(20);
var : cnt(0),sum1(0),mav1(0),S1(0),D1(0),TM(0),TF1(0);
Array : C1[50](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;
TF1 = TM%Atime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF1 < TF1[1]) Then
{
for cnt = 1 to 49
{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if C1[P] > 0 then{
sum1 = 0;
for cnt = 0 to P-1{
sum1 = sum1+C1[cnt];
}
mav1 = sum1/P;
plot1(c/mav1*100);
}
}
* 고맙습니다. 부탁 드립니다.