커뮤니티
부탁 드립니다.
2020-03-16 09:35:19
329
글번호 136885
도움에 감사 드립니다.
타주기(분용)으로 부탁 드립니다.
미리 감사 드립니다.
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;
var61=c-var33;
var71=ma(var61,sig);
답변 1
예스스탁 예스스탁 답변
2020-03-16 17:58:11
안녕하세요
예스스탁입니다.
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);
}
}
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움에 감사 드립니다.
타주기(분용)으로 부탁 드립니다.
미리 감사 드립니다.
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;
var61=c-var33;
var71=ma(var61,sig);