커뮤니티
수식 부탁 드림니다
2026-07-30 15:37:01
21
글번호 233040
안녕 하세요
수식 문의 드립니다
첨부된 챠트를 부탁 드림니다
박스 지표
1. 변수
봉 개수(현재 종개수 ; 5 )
선의 굵기
----------------------------------------------
항상 감사 합니다
- 1. 예스 스탁 질의(260730).xlsx (0.02 MB)
답변 1
예스스탁 예스스탁 답변
2026-07-30 16:45:01
안녕하세요
예스스탁입니다.
input : 봉갯수(5),굵기(1);
var : b(0),tf(0),dd(0),tt(0);
var : oo(0),hh(0),ll(0),ii(0);
var : Box(0),tl1(0),tl2(0);
if Bdate != Bdate[1] Then
b = 0;
Else
b = b+1;
tf = b%봉갯수;
if tf == 0 or (tf<tf[1]) Then
{
dd = sDate;
tt = sTime;
oo = o;
hh = h;
ll = l;
ii = 0;
box = box_new(dd,tt,OO,NextBarSdate,NextBarStime,c);
tl1 = TL_New(sDate,sTime,max(c,oo),sDate,sTime,hh);
tl2 = TL_New(sDate,sTime,min(c,oo),sDate,sTime,ll);
Box_SetSize(box,굵기);
TL_SetSize(tl1,굵기);
TL_SetSize(tl2,굵기);
TL_SetDrawMode(tl1,0);
TL_SetDrawMode(tl1,0);
}
Else
{
ii = ii +1;
if h > hh Then
hh = h;
if l < ll Then
ll = l;
Box_SetEnd(box,NextBarSdate,NextBarStime,c);
TL_SetBegin(tl1,sDate[Ceiling(ii/2)],sTime[Ceiling(ii/2)],max(C,OO));
TL_SetEnd(tl1,sDate[Ceiling(ii/2)],sTime[Ceiling(ii/2)],hh);
TL_SetBegin(tl2,sDate[Ceiling(ii/2)],sTime[Ceiling(ii/2)],min(C,OO));
TL_SetEnd(tl2,sDate[Ceiling(ii/2)],sTime[Ceiling(ii/2)],ll);
}
Box_SetColor(box,IFF(C>OO,Red,IFF(C<OO,Blue,Green)));
TL_SetColor(tl1,IFF(C>OO,Red,IFF(C<OO,Blue,Green)));
TL_SetColor(tl2,IFF(C>OO,Red,IFF(C<OO,Blue,Green)));
즐거운 하루되세요