커뮤니티
부탁 드립니다.
2019-06-07 21:18:03
304
글번호 129272
도움주심에 감사 드립니다.
n일전에서 계산하는 것을
n주전으로 수정 부탁 드립니다.
미리 감사 드립니다.
input : N(1);
Array : sumo[10](0),sumh[10](0),suml[10](0),sumc[10](0),sumi[10](0);
var : accumo(0),accumh(0),accuml(0),accumc(0),accumi(0);
var : avgo(0),avgh(0),avgl(0),avgc(0);
var : s1(0),d1(0),tm(0),tf(0),cnt(0);
if bdate != Bdate[1] Then{
sumo[0] = 0;
sumh[0] = 0;
suml[0] = 0;
sumc[0] = 0;
sumi[0] = 0;
for cnt = 1 to 9{
sumo[cnt] = sumo[cnt-1][1];
sumh[cnt] = sumh[cnt-1][1];
suml[cnt] = suml[cnt-1][1];
sumc[cnt] = sumc[cnt-1][1];
sumi[cnt] = sumi[cnt-1][1];
}
S1 = TimeToMinutes(stime);
D1 = sdate;
}
sumo[0] = sumo[0]+o;
sumh[0] = sumh[0]+h;
suml[0] = suml[0]+l;
sumc[0] = sumc[0]+c;
sumi[0] = sumi[0]+1;
#전일 첫봉부터 현재까지 평균
accumO = 0;
accumh = 0;
accuml = 0;
accumc = 0;
accumi = 0;
for cnt = 0 to N{
accumO = accumO+sumO[cnt];
accumh = accumh+sumh[cnt];
accuml = accuml+suml[cnt];
accumc = accumc+sumc[cnt];
accumi = accumi+sumi[cnt];
}
avgo = accumo/accumi;
avgh = accumh/accumi;
avgl = accuml/accumi;
avgc = accumc/accumi;
if D1 > 0 then{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%120;
if bdate != bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then{
var1 = avgo;
var2 = avgh;
var3 = avgl;
var4 = avgc;
}
plot1(var1,"o",red,def,0);
plot2(var2,"h",yellow,def,0);
plot3(var3,"L",BLUE,DEF,0);
plot4(var4,"C",MAGENTA,DEF,0);
PLOT5(L,"LOW",RED,DEF,0);
PLOT6(H,"HIGH",YELLOW,DEF,0);
}
답변 1
예스스탁 예스스탁 답변
2019-06-10 09:28:33
안녕하세요
예스스탁입니다.
input : N(1);
Array : sumo[10](0),sumh[10](0),suml[10](0),sumc[10](0),sumi[10](0);
var : accumo(0),accumh(0),accuml(0),accumc(0),accumi(0);
var : avgo(0),avgh(0),avgl(0),avgc(0);
var : s1(0),d1(0),tm(0),tf(0),cnt(0);
if DayOfWeek(sdate) <= DayOfWeek(Bdate[1]) Then
{
sumo[0] = 0;
sumh[0] = 0;
suml[0] = 0;
sumc[0] = 0;
sumi[0] = 0;
for cnt = 1 to 9
{
sumo[cnt] = sumo[cnt-1][1];
sumh[cnt] = sumh[cnt-1][1];
suml[cnt] = suml[cnt-1][1];
sumc[cnt] = sumc[cnt-1][1];
sumi[cnt] = sumi[cnt-1][1];
}
}
sumo[0] = sumo[0]+o;
sumh[0] = sumh[0]+h;
suml[0] = suml[0]+l;
sumc[0] = sumc[0]+c;
sumi[0] = sumi[0]+1;
#전일 첫봉부터 현재까지 평균
accumO = 0;
accumh = 0;
accuml = 0;
accumc = 0;
accumi = 0;
for cnt = 0 to N
{
accumO = accumO+sumO[cnt];
accumh = accumh+sumh[cnt];
accuml = accuml+suml[cnt];
accumc = accumc+sumc[cnt];
accumi = accumi+sumi[cnt];
}
avgo = accumo/accumi;
avgh = accumh/accumi;
avgl = accuml/accumi;
avgc = accumc/accumi;
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%120;
if bdate != bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
var1 = avgo;
var2 = avgh;
var3 = avgl;
var4 = avgc;
}
plot1(var1,"o",red,def,0);
plot2(var2,"h",yellow,def,0);
plot3(var3,"L",BLUE,DEF,0);
plot4(var4,"C",MAGENTA,DEF,0);
PLOT5(L,"LOW",RED,DEF,0);
PLOT6(H,"HIGH",YELLOW,DEF,0);
}
즐거운 하루되세요
> 뮬리 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움주심에 감사 드립니다.
n일전에서 계산하는 것을
n주전으로 수정 부탁 드립니다.
미리 감사 드립니다.
input : N(1);
Array : sumo[10](0),sumh[10](0),suml[10](0),sumc[10](0),sumi[10](0);
var : accumo(0),accumh(0),accuml(0),accumc(0),accumi(0);
var : avgo(0),avgh(0),avgl(0),avgc(0);
var : s1(0),d1(0),tm(0),tf(0),cnt(0);
if bdate != Bdate[1] Then{
sumo[0] = 0;
sumh[0] = 0;
suml[0] = 0;
sumc[0] = 0;
sumi[0] = 0;
for cnt = 1 to 9{
sumo[cnt] = sumo[cnt-1][1];
sumh[cnt] = sumh[cnt-1][1];
suml[cnt] = suml[cnt-1][1];
sumc[cnt] = sumc[cnt-1][1];
sumi[cnt] = sumi[cnt-1][1];
}
S1 = TimeToMinutes(stime);
D1 = sdate;
}
sumo[0] = sumo[0]+o;
sumh[0] = sumh[0]+h;
suml[0] = suml[0]+l;
sumc[0] = sumc[0]+c;
sumi[0] = sumi[0]+1;
#전일 첫봉부터 현재까지 평균
accumO = 0;
accumh = 0;
accuml = 0;
accumc = 0;
accumi = 0;
for cnt = 0 to N{
accumO = accumO+sumO[cnt];
accumh = accumh+sumh[cnt];
accuml = accuml+suml[cnt];
accumc = accumc+sumc[cnt];
accumi = accumi+sumi[cnt];
}
avgo = accumo/accumi;
avgh = accumh/accumi;
avgl = accuml/accumi;
avgc = accumc/accumi;
if D1 > 0 then{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%120;
if bdate != bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then{
var1 = avgo;
var2 = avgh;
var3 = avgl;
var4 = avgc;
}
plot1(var1,"o",red,def,0);
plot2(var2,"h",yellow,def,0);
plot3(var3,"L",BLUE,DEF,0);
plot4(var4,"C",MAGENTA,DEF,0);
PLOT5(L,"LOW",RED,DEF,0);
PLOT6(H,"HIGH",YELLOW,DEF,0);
}