커뮤니티
문의드립니다
2023-09-21 23:40:00
792
글번호 172668
주봉기준 볼린저밴드 상한선과 하한선 두가지 함수값을 구하고 싶습니다
함수명은
상한선:weekbbup
하한선:weekbbdn
기간과 표준편차는 20 ,2로 부탁드립니다
답변 1
예스스탁 예스스탁 답변
2023-09-22 15:26:45
안녕하세요
예스스탁입니다.
1
사용자함수명 : weekbbup
반환값형 : 숫자
input : Period(Numeric),Dv(Numeric);
var : cnt(0),sum(0),mav(0),BBup(0),BBdn(0),SumSqrt(0),Counter(0),Stdv(0);
Array : WeekC[100](0);
if dayofweek(bdate) < dayofweek(bdate[1]) Then
{
for cnt = 99 downto 1
{
WeekC[cnt] = WeekC[cnt-1];
}
}
WeekC[0] = C;
If WeekC[Period] != 0 Then
{
sum = 0;
for cnt = 0 to Period-1
{
sum = sum+WeekC[cnt];
}
mav = sum/Period;
SumSqrt = 0;
For cnt = 0 To Period - 1
{
SumSqrt = SumSqrt + (WeekC[cnt] - mav) * (WeekC[cnt] - mav);
}
Stdv = SquareRoot(SumSqrt / Period);
weekbbup = mav + (Dv * Stdv);
}
2
사용자함수명 : weekbbdn
반환값형 : 숫자
input : Period(Numeric),Dv(Numeric);
var : cnt(0),sum(0),mav(0),BBup(0),BBdn(0),SumSqrt(0),Counter(0),Stdv(0);
Array : WeekC[100](0);
if dayofweek(bdate) < dayofweek(bdate[1]) Then
{
for cnt = 99 downto 1
{
WeekC[cnt] = WeekC[cnt-1];
}
}
WeekC[0] = C;
If WeekC[Period] != 0 Then
{
sum = 0;
for cnt = 0 to Period-1
{
sum = sum+WeekC[cnt];
}
mav = sum/Period;
SumSqrt = 0;
For cnt = 0 To Period - 1
{
SumSqrt = SumSqrt + (WeekC[cnt] - mav) * (WeekC[cnt] - mav);
}
Stdv = SquareRoot(SumSqrt / Period);
weekbbdn = mav - (Dv * Stdv);
}
즐거운 하루되세요
> kns 님이 쓴 글입니다.
> 제목 : 문의드립니다
> 주봉기준 볼린저밴드 상한선과 하한선 두가지 함수값을 구하고 싶습니다
함수명은
상한선:weekbbup
하한선:weekbbdn
기간과 표준편차는 20 ,2로 부탁드립니다
다음글
이전글