커뮤니티
수식부탁드립니다.
2019-01-07 14:22:17
192
글번호 125041
지난번 일봉볼밴과 일목기준선을 각분봉에 출력하는 수식은
도움주신 덕분에 유용하게 잘 사용하고 있습니다.
비슷한 부탁인데 월봉볼밴과 월봉 일목기준선을 각 분봉에 출력하는 수식을 부탁드립니다.
답변 1
예스스탁 예스스탁 답변
2019-01-07 15:52:46
안녕하세요
예스스탁입니다.
분봉차트에 지정한 월단위의 지표를 계산할 만큼 데이터가 충분해야
계산하고 지표를 그릴 수 있습니다.
차트는 최대 1만개봉까지 지원되므로 최대한 조회하고 적용하시기 바랍니다.
1.
input : MPeriod(20),MDv(2);
var : Mcnt(0),Msum(0),Mmav(0),MBBup(0),MBBdn(0),MSumSqrt(0),MCounter(0),MStdv(0);
Array : MC[100](0);
if bdate > bdate[1]+30 Then
{
for Mcnt = 1 to 99
{
MC[Mcnt] = MC[Mcnt-1][1];
}
}
MC[0] = C;
If MC[MPeriod] != 0 Then
{
Msum = 0;
for Mcnt = 0 to MPeriod-1
{
Msum = Msum+MC[Mcnt];
}
Mmav = Msum/MPeriod;
MSumSqrt = 0;
For Mcnt = 0 To MPeriod - 1
{
MSumSqrt = MSumSqrt + (MC[Mcnt] - Mmav) * (MC[Mcnt] - Mmav);
}
MStdv = SquareRoot(MSumSqrt / MPeriod);
MBBup = Mmav + (MDv * MStdv);
MBBdn = Mmav - (MDv * MStdv);
plot1(MBBup);
plot2(Mmav );
plot3(MBBdn);
}
2
input : MPeriod(26);
var : Mcnt(0),Hv(0),Lv(0);
Array : MH[100](0),ML[100](0);
if bdate > bdate[1]+30 Then
{
MH[0] = H;
ML[0] = L;
for Mcnt = 1 to 99
{
MH[Mcnt] = MH[Mcnt-1][1];
ML[Mcnt] = ML[Mcnt-1][1];
}
}
if H > MH[0] Then
MH[0] = H;
if L < ML[0] Then
ML[0] = L;
If MH[MPeriod] > 0 and ML[MPeriod] > 0 Then
{
Hv = MH[0];
Lv = ML[0];
for Mcnt = 0 to MPeriod-1
{
if MH[Mcnt] > Hv Then
Hv = MH[Mcnt];
if ML[Mcnt] < Lv Then
Lv = ML[Mcnt];
}
var1 = (Hv+Lv)/2;
plot1(var1,"월간기준선");
}
즐거운 하루되세요
> beautyin 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다.
> 지난번 일봉볼밴과 일목기준선을 각분봉에 출력하는 수식은
도움주신 덕분에 유용하게 잘 사용하고 있습니다.
비슷한 부탁인데 월봉볼밴과 월봉 일목기준선을 각 분봉에 출력하는 수식을 부탁드립니다.
다음글
이전글