커뮤니티
수식 문의 드립니다
2023-06-22 12:11:54
1271
글번호 169991
안녕하세요.
중앙선 수식 문의 드립니다.
1. 일봉 개수별 중앙선을 차트에 표시할 수 있습니까?
ex) 일봉 2개, 3개 ... 등
2. 월, 주봉 중앙선을 차트에 표시할 수 있습니까?
-표시되면 일봉 처럼 개수별로 표시하는 방법도 알려주세요
3. 월, 주봉 시가와 종가를 표시할 수 있습니까?
답변 1
예스스탁 예스스탁 답변
2023-06-23 09:53:43
안녕하세요
예스스탁입니다.
1
input : n(3);
var : cnt(0),dhv(0),dlv(0);
dhv = 0;
dlv = 0;
For cnt = 0 to n-1
{
if dhv == 0 or (dhv > 0 and DayHigh(cnt) > dhv) Then
dhv = DayHigh(cnt);
if dlv == 0 or (dlv > 0 and DayLow(cnt) < dlv) Then
dlv = DayLow(cnt);
}
Plot1((dhv+dlv)/2);
2
input : n(3);
var : cnt(0),whv(0),wlv(0),mhv(0),mlv(0);
Array : wo[50](0),wh[50](0),wl[50](0),Wc[50](0);
Array : mo[50](0),mh[50](0),ml[50](0),mc[50](0);
if DayOfWeek(Bdate) < DayOfWeek(Bdate[1]) Then
{
For cnt = 49 Downto 1
{
wo[cnt] = wo[cnt-1];
wh[cnt] = wh[cnt-1];
wl[cnt] = wl[cnt-1];
wc[cnt] = wc[cnt-1];
}
wo[0] = o;
wh[0] = h;
wl[0] = l;
}
if wh[0] > 0 and h > wh[0] Then
wh[0] = h;
if wl[0] > 0 and l < wl[0] Then
wl[0] = l;
wc[0] = c;
if bdate > Bdate[1]+30 Then
{
For cnt = 49 Downto 1
{
mo[cnt] = mo[cnt-1];
mh[cnt] = mh[cnt-1];
ml[cnt] = ml[cnt-1];
mc[cnt] = mc[cnt-1];
}
mo[0] = o;
mh[0] = h;
ml[0] = l;
}
if mh[0] > 0 and h > mh[0] Then
mh[0] = h;
if ml[0] > 0 and l < ml[0] Then
ml[0] = l;
mc[0] = c;
if wh[n-1] > 0 and wl[n-1] > 0 Then
{
whv = 0;
wlv = 0;
For cnt = 0 to n-1
{
if whv == 0 or (whv > 0 and wh[cnt] > whv) Then
whv = wh[cnt];
if wlv == 0 or (wlv > 0 and wl[cnt] < wlv) Then
wlv = wl[cnt];
}
Plot1((whv+wlv)/2);
}
if mh[n-1] > 0 and ml[n-1] > 0 Then
{
mhv = 0;
mlv = 0;
For cnt = 0 to n-1
{
if mhv == 0 or (mhv > 0 and mh[cnt] > mhv) Then
mhv = mh[cnt];
if mlv == 0 or (mlv > 0 and ml[cnt] < mlv) Then
mlv = ml[cnt];
}
Plot2((mhv+mlv)/2);
}
3
input : n(3);
var : cnt(0),whv(0),wlv(0),mhv(0),mlv(0);
Array : wo[50](0),wh[50](0),wl[50](0),Wc[50](0);
Array : mo[50](0),mh[50](0),ml[50](0),mc[50](0);
if DayOfWeek(Bdate) < DayOfWeek(Bdate[1]) Then
{
For cnt = 49 Downto 1
{
wo[cnt] = wo[cnt-1];
wh[cnt] = wh[cnt-1];
wl[cnt] = wl[cnt-1];
wc[cnt] = wc[cnt-1];
}
wo[0] = o;
wh[0] = h;
wl[0] = l;
}
if wh[0] > 0 and h > wh[0] Then
wh[0] = h;
if wl[0] > 0 and l < wl[0] Then
wl[0] = l;
wc[0] = c;
if bdate > Bdate[1]+30 Then
{
For cnt = 49 Downto 1
{
mo[cnt] = mo[cnt-1];
mh[cnt] = mh[cnt-1];
ml[cnt] = ml[cnt-1];
mc[cnt] = mc[cnt-1];
}
mo[0] = o;
mh[0] = h;
ml[0] = l;
}
if mh[0] > 0 and h > mh[0] Then
mh[0] = h;
if ml[0] > 0 and l < ml[0] Then
ml[0] = l;
mc[0] = c;
if wo[n] > 0 Then
{
Plot1(wo[n]);
Plot2(wc[n]);
}
if mo[n] > 0 Then
{
Plot3(mo[n]);
Plot4(mc[n]);
}
즐거운 하루되세요
> 부활 님이 쓴 글입니다.
> 제목 : 수식 문의 드립니다
> 안녕하세요.
중앙선 수식 문의 드립니다.
1. 일봉 개수별 중앙선을 차트에 표시할 수 있습니까?
ex) 일봉 2개, 3개 ... 등
2. 월, 주봉 중앙선을 차트에 표시할 수 있습니까?
-표시되면 일봉 처럼 개수별로 표시하는 방법도 알려주세요
3. 월, 주봉 시가와 종가를 표시할 수 있습니까?