커뮤니티
일목균형의 주봉과 원봉 기준선과 전환선을 일봉에 나타낼수 있나요?
2011-09-04 23:17:18
543
글번호 42456
안녕하십니까?
일목균형의 주봉과 원봉 기준선과 전환선을 일봉에 나타내고 십습니다.
잘 부탁 드립니다.
좋은 하루 되세요.
답변 1
예스스탁 예스스탁 답변
2011-09-05 16:37:06
안녕하세요
예스스탁입니다.
Var : 주봉기준선(0), 주봉전환선(0),월봉기준선(0), 월봉전환선(0),cnt(0),widx(0),Midx(0);
Array : WH[100](0),WL[100](0),MH[100](0),ML[100](0);
if DayOfWeek(sdate) <= DayOfWeek(sdate[1]) and sdate > sdate[1] Then{
widx = widx+1;
WH[0] = H;
WL[0] = H;
for cnt = 1 to 99{
WH[cnt] = WH[cnt-1][1];
WL[cnt] = WL[cnt-1][1];
}
}
if H > WH[0] Then
WH[0] = H;
if L < WL[0] Then
WL[0] = L;
if widx >= 9 then{
var1 = WH[0];
var2 = WL[0];
for cnt = 0 to 8{
if WH[cnt] > var1 Then
var1 = WH[cnt];
if WL[cnt] < var2 Then
var2 = WL[cnt];
}
주봉전환선 = (var1 + var2)/2;
}
if widx >= 26 then{
var3 = WH[0];
var4 = WL[0];
for cnt = 0 to 25{
if WH[cnt] > var3 Then
var3 = WH[cnt];
if WL[cnt] < var4 Then
var4 = WL[cnt];
}
주봉기준선 = (var3 + var4)/2;
}
if sdate > sdate[1]+30 Then{
MH[0] = H;
ML[0] = H;
midx = midx+1;
for cnt = 1 to 99{
MH[cnt] = MH[cnt-1][1];
ML[cnt] = ML[cnt-1][1];
}
}
if H > MH[0] Then
MH[0] = H;
if L < ML[0] Then
ML[0] = L;
if midx >= 9 then{
var11 = MH[0];
var12 = ML[0];
for cnt = 0 to 8{
if MH[cnt] > var11 Then
var11 = MH[cnt];
if ML[cnt] < var12 Then
var12 = ML[cnt];
}
}
if midx >= 26 then{
var13 = MH[0];
var14 = ML[0];
for cnt = 0 to 25{
if MH[cnt] > var13 Then
var13 = MH[cnt];
if ML[cnt] < var14 Then
var14 = ML[cnt];
}
}
월봉전환선 = (var11 + var12)/2;
월봉기준선 = (var13 + var14)/2;
plot1(주봉기준선);
plot2(주봉전환선);
plot3(월봉기준선);
plot4(월봉전환선);
즐거운 하루되세요
> 사이먼 님이 쓴 글입니다.
> 제목 : 일목균형의 주봉과 원봉 기준선과 전환선을 일봉에 나타낼수 있나요?
> 안녕하십니까?
일목균형의 주봉과 원봉 기준선과 전환선을 일봉에 나타내고 십습니다.
잘 부탁 드립니다.
좋은 하루 되세요.