커뮤니티
문의드립니다.
2013-02-17 22:02:28
209
글번호 59599
지표식관련 문의드립니다.
분봉차트에서 일봉의 (가중 거래대금/거래량 ) 이평을 불러오고자 합니다.
아래의 지표식 폼으로 작성해 주시기 바랍니다.
input : LENGTH1(20),
Period11(3),Period12(5),Period13(10),Period14(20), ## 일봉
var : mcnt(0),wcnt(0),cnt(0);
var : TCHAN1(0);
var : sum11(0),CSum11(0),sum12(0),CSum12(0),sum13(0),CSum13(0),sum14(0),CSum14(0); ## 일봉
var : counter(0);
Array : DM[30](0),DV[30](0); ## 일봉
## 일봉
##if DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] Then{
DM[0] = 0;
DV[0] = 0;
for cnt = 1 to 21{
DM[cnt] = DM[cnt-1][1];
DV[cnt] = DV[cnt-1][1];
}
}
DM[0] = DM[0] + M;
DV[0] = DV[0] + V;
Sum11 = 0;
CSum11 = 0;
For counter = 0 To Period11-1 {
Sum11 = Sum11 + (DM[counter]/DV[counter])*(Period11 - counter);
CSum11 = CSum11 + Period11 - counter;
}
Sum12 = 0;
CSum12 = 0;
For counter = 0 To Period12-1 {
Sum12 = Sum12 + (DM[counter]/DV[counter])*(Period12 - counter);
CSum12 = CSum12 + Period12 - counter;
}
Sum13 = 0;
CSum13 = 0;
For counter = 0 To Period13-1 {
Sum13 = Sum13 + (DM[counter]/DV[counter])*(Period13 - counter);
CSum13 = CSum13 + Period13 - counter;
}
Sum14 = 0;
CSum14 = 0;
For counter = 0 To Period14-1 {
Sum14 = Sum14 + (DM[counter]/DV[counter])*(Period14 - counter);
CSum14 = CSum14 + Period14 - counter;
}
var1 = Sum11/CSum11; ## 일 평균가격 3
var2 = Sum12/CSum12; ## 일 평균가격 5
var3 = Sum13/CSum13; ## 일 평균가격 10
var4 = Sum14/CSum14; ## 일 평균가격 20
TCHAN1 = HIGHEST(M/V, LENGTH1)[1]; ## 일봉20 최고 거래대금/거래량
답변 1
예스스탁 예스스탁 답변
2013-02-18 11:44:52
안녕하세요
예스스탁입니다.
input : LENGTH1(20), Period11(3),Period12(5),Period13(10),Period14(20); ## 일봉
var : mcnt(0),wcnt(0),cnt(0);
var : TCHAN1(0);
var : sum11(0),CSum11(0),sum12(0),CSum12(0),sum13(0),CSum13(0),sum14(0),CSum14(0); ## 일봉
var : counter(0);
Array : DM[30](0),DV[30](0); ## 일봉
## 일봉
if date != date[1] Then{
DM[0] = 0;
DV[0] = 0;
for cnt = 1 to 21{
DM[cnt] = DM[cnt-1][1];
DV[cnt] = DV[cnt-1][1];
}
}
DM[0] = DM[0] + M;
DV[0] = DV[0] + V;
Sum11 = 0;
CSum11 = 0;
For counter = 0 To Period11-1 {
Sum11 = Sum11 + (DM[counter]/DV[counter])*(Period11 - counter);
CSum11 = CSum11 + Period11 - counter;
}
Sum12 = 0;
CSum12 = 0;
For counter = 0 To Period12-1 {
Sum12 = Sum12 + (DM[counter]/DV[counter])*(Period12 - counter);
CSum12 = CSum12 + Period12 - counter;
}
Sum13 = 0;
CSum13 = 0;
For counter = 0 To Period13-1 {
Sum13 = Sum13 + (DM[counter]/DV[counter])*(Period13 - counter);
CSum13 = CSum13 + Period13 - counter;
}
Sum14 = 0;
CSum14 = 0;
For counter = 0 To Period14-1 {
Sum14 = Sum14 + (DM[counter]/DV[counter])*(Period14 - counter);
CSum14 = CSum14 + Period14 - counter;
}
var1 = Sum11/CSum11; ## 일 평균가격 3
var2 = Sum12/CSum12; ## 일 평균가격 5
var3 = Sum13/CSum13; ## 일 평균가격 10
var4 = Sum14/CSum14; ## 일 평균가격 20
TCHAN1 = DM[0]/DV[0];
For counter = 1 To LENGTH1 {
if DM[counter]/DV[counter] > TCHAN1 Then
TCHAN1 = DM[counter]/DV[counter];
}
즐거운 하루되세요
> 맥스 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 지표식관련 문의드립니다.
분봉차트에서 일봉의 (가중 거래대금/거래량 ) 이평을 불러오고자 합니다.
아래의 지표식 폼으로 작성해 주시기 바랍니다.
input : LENGTH1(20),
Period11(3),Period12(5),Period13(10),Period14(20), ## 일봉
var : mcnt(0),wcnt(0),cnt(0);
var : TCHAN1(0);
var : sum11(0),CSum11(0),sum12(0),CSum12(0),sum13(0),CSum13(0),sum14(0),CSum14(0); ## 일봉
var : counter(0);
Array : DM[30](0),DV[30](0); ## 일봉
## 일봉
##if DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] Then{
DM[0] = 0;
DV[0] = 0;
for cnt = 1 to 21{
DM[cnt] = DM[cnt-1][1];
DV[cnt] = DV[cnt-1][1];
}
}
DM[0] = DM[0] + M;
DV[0] = DV[0] + V;
Sum11 = 0;
CSum11 = 0;
For counter = 0 To Period11-1 {
Sum11 = Sum11 + (DM[counter]/DV[counter])*(Period11 - counter);
CSum11 = CSum11 + Period11 - counter;
}
Sum12 = 0;
CSum12 = 0;
For counter = 0 To Period12-1 {
Sum12 = Sum12 + (DM[counter]/DV[counter])*(Period12 - counter);
CSum12 = CSum12 + Period12 - counter;
}
Sum13 = 0;
CSum13 = 0;
For counter = 0 To Period13-1 {
Sum13 = Sum13 + (DM[counter]/DV[counter])*(Period13 - counter);
CSum13 = CSum13 + Period13 - counter;
}
Sum14 = 0;
CSum14 = 0;
For counter = 0 To Period14-1 {
Sum14 = Sum14 + (DM[counter]/DV[counter])*(Period14 - counter);
CSum14 = CSum14 + Period14 - counter;
}
var1 = Sum11/CSum11; ## 일 평균가격 3
var2 = Sum12/CSum12; ## 일 평균가격 5
var3 = Sum13/CSum13; ## 일 평균가격 10
var4 = Sum14/CSum14; ## 일 평균가격 20
TCHAN1 = HIGHEST(M/V, LENGTH1)[1]; ## 일봉20 최고 거래대금/거래량