예스스탁
예스스탁 답변
2020-03-17 14:03:28
안녕하세요
예스스탁입니다.
1
ma(var51,sig)를 기존수식 하단에 var81로 추가해 드립니다.
input : ntime(10),P(20),sig(3);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum1(0),i1(0),sum2(0),i2(0),sum3(0),sum4(0);
Array : C1[100](0),O1[100](0),v61[100](0),v51[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;
TF = TM%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or
(Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then
{
O1[0] = O;
for cnt = 1 to 99
{
C1[cnt] = C1[cnt-1][1];
O1[cnt] = O1[cnt-1][1];
v51[cnt] = v61[cnt-1][1];
v61[cnt] = v61[cnt-1][1];
}
}
C1[0] = C;
if O1[P] > 0 then
{
sum1 = 0;
i1 = 0;
sum2 = 0;
i2 = 0;
for cnt = 0 to P
{
if C1[cnt] > O1[cnt] Then
{
sum1 = sum1+C1[cnt];
i1 = i1+1;
}
if C1[cnt] < O1[cnt] Then
{
sum2 = sum2+C1[cnt];
i2 = i2+1;
}
}
if i1 == 0 Then
var5 = C1[P-1];
Else
var5 = sum1/i1;
if i2 == 0 Then
var15 = C1[P-1];
Else
var15 = sum2/i2;
v51[0] = (var5+var15)/2;
v61[0] = C-var51;
/*
sum3 = 0;
for cnt = 0 to sig
{
sum3 = sum3 + v61[cnt];
}
var71 = sum3/sig;
plot1(var71);
*/
sum4 = 0;
for cnt = 0 to sig
{
sum4 = sum4 + v51[cnt];
}
var81 = sum4/sig;
plot2(var81);
}
}
2
input:p(20),sig(3);
var : cnt(0);
var3 = 0;
var4 = 0;
var13 = 0;
var14 = 0;
for cnt = 0 to P-1
{
if DayClose(cnt) > DayOpen(cnt) Then
{
var3 = var3 + DayClose(cnt);
var4 = var4 + 1;
}
if DayClose(cnt) < DayOpen(cnt) Then
{
var13 = var13 + DayClose(cnt);
var14 = var14 + 1;
}
}
if var4 == 0 Then
var5 = DayClose(P-1);
Else
var5 = var3/var4;
if var14 == 0 Then
var15 = DayClose(P-1);
Else
var15 = var13/var14;
var51 = (var5+var15)/2;
plot1(var51);
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 깊이 감사 드립니다.
어제 66514번의 답변 수식에 만족합니다.
질문1)
수식의 끝부분쪽에
v61을 계산치 아니하고
var51=(var5+var15)/2; 을 계산 하고자 한다면
즉 ma(var51,sig);를 계산한다면
타분형 수식의
끝부분을 어떻게 하여야 하는지요?
질문2)
일봉 지표를 분봉에 나타 나도록 부탁 드립니다.
미리 감사 드립니다.
input:p(20),sig(3);;
var1=iff(c>o,c,0);
var2=iff(c>o,1,0);
var3=AccumN(var1,p);
var4=accumn(var2,p);
var5=iff(var1==0 or var2==0 ,c[p-1],var1/var2);
var11=iff(c<o,c,0);
var12=iff(c<o,1,0);
var13=AccumN(var11,p);
var14=accumn(var12,p);
var15=iff(var11==0 or var12==0 ,c[p-1],var11/var12);
var51=(var5+var15)/2;
타분형 수식)
input : ntime(10),P(20),sig(3);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum1(0),i1(0),sum2(0),i2(0),sum3(0);
Array : C1[100](0),O1[100](0),v61[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;
TF = TM%ntime;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or
(Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then
{
O1[0] = O;
for cnt = 1 to 49
{
C1[cnt] = C1[cnt-1][1];
O1[cnt] = O1[cnt-1][1];
v61[cnt] = v61[cnt-1][1];
}
}
C1[0] = C;
if O1[P] > 0 then
{
sum1 = 0;
i1 = 0;
sum2 = 0;
i2 = 0;
for cnt = 0 to P
{
if C1[cnt] > O1[cnt] Then
{
sum1 = sum1+C1[cnt];
i1 = i1+1;
}
if C1[cnt] < O1[cnt] Then
{
sum2 = sum2+C1[cnt];
i2 = i2+1;
}
}
if i1 == 0 Then
var5 = C1[P-1];
Else
var5 = sum1/i1;
if i2 == 0 Then
var15 = C1[P-1];
Else
var15 = sum2/i2;
var51 = (var5+var15)/2;
v61[0] = C-var51;
sum3 = 0;
for cnt = 0 to P
{
sum3 = sum3 + v61[cnt];
}
var71 = sum3/sig;
plot1(var71);
}
}