커뮤니티
재문의드립니다
2019-07-29 16:39:52
280
글번호 130760
63510 2번 수식이 전전봉에 안 나오는데 다시한번 검토부탁드립니다
답변 1
예스스탁 예스스탁 답변
2019-07-29 16:54:47
안녕하세요
예스스탁입니다.
식을 잘못 올려드렸습니다.
기존식은 당일 최고가와 최저가 기준으로
각 라인을 최근 3개봉에 그리는 식입니다.
기존식계산식(최근완성봉고가저가기준 라인)을
n봉전 부터 그리고자 하시면 아래식 이용하시면 됩니다.
input : per1(23.6),per2(38.2),per3(50.0),per4(61.8),per5(76.4),n(2);
var : hh(0),ll(0),h1(0),l1(0),dd(0),tt(0),d1(0),t1(0);
var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0),tl7(0);
if bdate > bdate[1]-1 then
{
hh = h;
ll = l;
h1 = hh[1];
l1 = ll[1];
dd = sdate[n];
tt = stime[n];
d1 = dd[1];
t1 = tt[1];
TL_Delete(tl1);
TL_Delete(tl2);
TL_Delete(tl3);
TL_Delete(tl4);
TL_Delete(tl5);
TL_Delete(tl6);
TL_Delete(tl7);
tl1 = TL_New(dd,tt,hh,sdate,stime,hh);
tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100));
tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100));
tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100));
tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100));
tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100));
tl7 = TL_New(dd,tt,ll,sdate,stime,ll);
}
if h > hh Then
{
hh = h;
TL_Delete(tl1);
TL_Delete(tl2);
TL_Delete(tl3);
TL_Delete(tl4);
TL_Delete(tl5);
TL_Delete(tl6);
TL_Delete(tl7);
tl1 = TL_New(dd,tt,hh,sdate,stime,hh);
tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100));
tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100));
tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100));
tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100));
tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100));
tl7 = TL_New(dd,tt,ll,sdate,stime,ll);
}
if l < ll Then
{
ll = l;
TL_Delete(tl1);
TL_Delete(tl2);
TL_Delete(tl3);
TL_Delete(tl4);
TL_Delete(tl5);
TL_Delete(tl6);
TL_Delete(tl7);
tl1 = TL_New(dd,tt,hh,sdate,stime,hh);
tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100));
tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100));
tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100));
tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100));
tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100));
tl7 = TL_New(dd,tt,ll,sdate,stime,ll);
}
즐거운 하루되세요
> 유선 님이 쓴 글입니다.
> 제목 : 재문의드립니다
> 63510 2번 수식이 전전봉에 안 나오는데 다시한번 검토부탁드립니다
이전글