커뮤니티
부탁드립니다
2014-03-09 20:08:08
101
글번호 73333
수고많으십니다~
일봉에서보는 주봉볼린저를 작성하고 있읍니다
(c+h+l)/3 값으로 작성하는데 그림이 영 틀리게 나옵니다
수정좀 부탁드립니다~
input : weekPeriod(5),weekDv(2);
var : weekcnt(0),weekcount(0),weeksum(0),weekmav(0),weekBBup(0),weekBBdn(0),weekSumSqrt(0),weekCounter(0),weekStdv(0);
Array : weekC[120](0),weekh[120](0),weekl[120](0);
if dayofweek(date) < dayofweek(date[1]) Then{
weekh[0] = h;
weekl[0] = l;
for weekcnt = 1 to weekPeriod+1{
weekC[weekcnt] = weekC[weekcnt-1][1];
weekh[weekcnt] = weekh[weekcnt-1][1];
weekl[weekcnt] = weekl[weekcnt-1][1];
}
}
if H > weekh[0] Then weekh[0] = H;
if L < weekl[0] Then weekl[0] = L;
weekC[0] = C;
If (weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3 != 0 Then {
weeksum = 0;
for weekcount = 0 to weekPeriod-1{
weeksum = weeksum+((weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3);
}
weekmav = weeksum/weekPeriod;
weekSumSqrt = 0;
For weekCounter = 0 To weekPeriod - 1 {
weekSumSqrt = weekSumSqrt + (((weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3)- weekmav) *
(((weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3)- weekmav);
}
weekStdv = SquareRoot(weekSumSqrt / weekPeriod);
weekBBup = weekmav + (weekDv * weekStdv);
weekBBdn = weekmav - (weekDv * weekStdv);
plot1(weekBBup);
plot2(weekmav );
plot3(weekBBdn);
답변 1
예스스탁 예스스탁 답변
2014-03-10 15:31:16
안녕하세요
예스스탁입니다.
input : weekPeriod(20),weekDv(2);
var : weekcnt(0),weekcount(0),weeksum(0),weekmav(0),weekBBup(0),weekBBdn(0),weekSumSqrt(0),weekCounter(0),weekStdv(0);
var : WeeKH(0),WeekL(0);
Array : weekMid[120](0);
if dayofweek(date) < dayofweek(date[1]) Then{
weekH = H;
weekL = L;
for weekcnt = 1 to weekPeriod+1{
weekMid[weekcnt] = weekMid[weekcnt-1][1];
}
}
if H > weekh Then
weekh = H;
if L < weekL Then
weekl = L;
weekMid[0] = (C+WeekH+WeeKL)/3;
If weekMid[weekPeriod] != 0 Then {
weeksum = 0;
for weekcount = 0 to weekPeriod-1{
weeksum = weeksum+weekMid[weekcount];
}
weekmav = weeksum/weekPeriod;
weekSumSqrt = 0;
For weekCounter = 0 To weekPeriod - 1 {
weekSumSqrt = weekSumSqrt + (weekMid[weekCounter] - weekmav) * (weekMid[weekCounter] - weekmav);
}
weekStdv = SquareRoot(weekSumSqrt / weekPeriod);
weekBBup = weekmav + (weekDv * weekStdv);
weekBBdn = weekmav - (weekDv * weekStdv);
plot1(weekBBup);
plot2(weekmav );
plot3(weekBBdn);
}
즐거운 하루되세요
> 빈둥빈둥 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> 수고많으십니다~
일봉에서보는 주봉볼린저를 작성하고 있읍니다
(c+h+l)/3 값으로 작성하는데 그림이 영 틀리게 나옵니다
수정좀 부탁드립니다~
input : weekPeriod(5),weekDv(2);
var : weekcnt(0),weekcount(0),weeksum(0),weekmav(0),weekBBup(0),weekBBdn(0),weekSumSqrt(0),weekCounter(0),weekStdv(0);
Array : weekC[120](0),weekh[120](0),weekl[120](0);
if dayofweek(date) < dayofweek(date[1]) Then{
weekh[0] = h;
weekl[0] = l;
for weekcnt = 1 to weekPeriod+1{
weekC[weekcnt] = weekC[weekcnt-1][1];
weekh[weekcnt] = weekh[weekcnt-1][1];
weekl[weekcnt] = weekl[weekcnt-1][1];
}
}
if H > weekh[0] Then weekh[0] = H;
if L < weekl[0] Then weekl[0] = L;
weekC[0] = C;
If (weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3 != 0 Then {
weeksum = 0;
for weekcount = 0 to weekPeriod-1{
weeksum = weeksum+((weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3);
}
weekmav = weeksum/weekPeriod;
weekSumSqrt = 0;
For weekCounter = 0 To weekPeriod - 1 {
weekSumSqrt = weekSumSqrt + (((weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3)- weekmav) *
(((weekC[weekcount]+weekh[weekcount]+weekl[weekcount])/3)- weekmav);
}
weekStdv = SquareRoot(weekSumSqrt / weekPeriod);
weekBBup = weekmav + (weekDv * weekStdv);
weekBBdn = weekmav - (weekDv * weekStdv);
plot1(weekBBup);
plot2(weekmav );
plot3(weekBBdn);