커뮤니티
수정부탁드립니다
2022-07-12 15:38:25
1319
글번호 160680
#,안녕하세요
아래식을 일봉,주봉에 적용할수 있도록 도움 부탁드립니다.
input : N(0),추세선굵기(0),추세선색상(0);
var : DD(0),D1(0),T1(0),idx(0),TF(0),TL(0),TL11(0),hh(0),ll(0),box(0);
var : MM1(0),박스색상(0),HH1(0),LL1(0);
if Bdate != Bdate[1] Then
{
DD = sDate;
idx = 0;
}
Else
idx = idx+1;
if DD > 0 Then
{
TF = idx%N;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
D1 = sDate;
T1 = sTime;
TL = TL_new(D1,T1,C,NextBarSdate,NextBarStime,C);
TL_SetColor(TL,추세선색상);
TL_SetSize(TL,추세선굵기);
hh = h;
ll = l;
HH1 = HH[1];
LL1 = LL[1];
MM1 = (HH1+LL1)/2;
box = Box_New(d1,t1,hh,NextBarSdate,NextBarStime,ll);
Box_SetFill(box,true);
}
Else
{
TL_SetBegin(TL,D1,T1,C);
TL_SetEnd(TL,sDate,sTime,C);
if h > hh Then
hh = h;
if l < ll Then
ll = l;
Box_SetBegin(box,d1,t1,hh);
Box_SetEnd(box,sDate,sTime,ll);
}
}
if C > MM1 Then
박스색상 = Magenta;#Magenta
Else
박스색상 = Blue;#LCyan
Box_SetColor(box,박스색상);
답변 1
예스스탁 예스스탁 답변
2022-07-13 10:33:50
안녕하세요
예스스탁입니다.
안녕하세요
예스스탁입니다.
input : N(10),추세선굵기(0),추세선색상(0);
var : DD(0),D1(0),T1(0),idx(0),TF(0),TL(0),TL11(0),hh(0),ll(0),box(0);
var : MM1(0),박스색상(0),HH1(0),LL1(0);
idx = Index;
TF = idx%N;
if TF < TF[1] Then
{
D1 = sDate;
T1 = sTime;
TL = TL_new(D1,T1,C,NextBarSdate,NextBarStime,C);
TL_SetColor(TL,추세선색상);
TL_SetSize(TL,추세선굵기);
hh = h;
ll = l;
HH1 = HH[1];
LL1 = LL[1];
MM1 = (HH1+LL1)/2;
box = Box_New(d1,t1,hh,NextBarSdate,NextBarStime,ll);
Box_SetFill(box,true);
}
Else
{
TL_SetBegin(TL,D1,T1,C);
TL_SetEnd(TL,sDate,sTime,C);
if h > hh Then
hh = h;
if l < ll Then
ll = l;
Box_SetBegin(box,d1,t1,hh);
Box_SetEnd(box,sDate,sTime,ll);
}
if C > MM1 Then
박스색상 = Magenta;#Magenta
Else
박스색상 = Blue;#LCyan
Box_SetColor(box,박스색상);
즐거운 하루되세요
> 크라켄 님이 쓴 글입니다.
> 제목 : 수정부탁드립니다
> #,안녕하세요
아래식을 일봉,주봉에 적용할수 있도록 도움 부탁드립니다.
input : N(0),추세선굵기(0),추세선색상(0);
var : DD(0),D1(0),T1(0),idx(0),TF(0),TL(0),TL11(0),hh(0),ll(0),box(0);
var : MM1(0),박스색상(0),HH1(0),LL1(0);
if Bdate != Bdate[1] Then
{
DD = sDate;
idx = 0;
}
Else
idx = idx+1;
if DD > 0 Then
{
TF = idx%N;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
D1 = sDate;
T1 = sTime;
TL = TL_new(D1,T1,C,NextBarSdate,NextBarStime,C);
TL_SetColor(TL,추세선색상);
TL_SetSize(TL,추세선굵기);
hh = h;
ll = l;
HH1 = HH[1];
LL1 = LL[1];
MM1 = (HH1+LL1)/2;
box = Box_New(d1,t1,hh,NextBarSdate,NextBarStime,ll);
Box_SetFill(box,true);
}
Else
{
TL_SetBegin(TL,D1,T1,C);
TL_SetEnd(TL,sDate,sTime,C);
if h > hh Then
hh = h;
if l < ll Then
ll = l;
Box_SetBegin(box,d1,t1,hh);
Box_SetEnd(box,sDate,sTime,ll);
}
}
if C > MM1 Then
박스색상 = Magenta;#Magenta
Else
박스색상 = Blue;#LCyan
Box_SetColor(box,박스색상);