커뮤니티
중가선 좀 부탁 드립니다.
2022-02-11 08:24:59
991
글번호 156200
* 좋은 주말 되십시요.
* 아래 수식에 대하여 중간선 좀 부탁 드립니다.
현 상태에서 최고가와 최저가 중간선 수평선좀 부탁 드립니다.
## 아래 수식
input : n(100);
var : hh(0),ll(0),idx(0),tf(0);
var : TL1(0),TL2(0),d1(0),t1(0);
if Bdate != Bdate[1] Then
idx = 0;
Else
idx = idx+1;
TF = idx%n;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
hh = h;
ll = l;
d1 = sDate;
t1 = sTime;
#TL_Delete(TL1);
TL1 = TL_new(d1,t1,hh,NextBarSdate,NextBarStime,hh);
#TL_Delete(TL2);
TL2 = TL_new(d1,t1,ll,NextBarSdate,NextBarStime,ll);
}
if h > hh Then
{
hh = h;
TL_SetBegin(TL1,d1,t1,hh);
}
if l < ll Then
{
ll = l;
TL_SetBegin(TL2,d1,t1,ll);
}
TL_SetEnd(TL1,NextBarSdate,NextBarStime,hh);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,ll);
* 고맙습니다. 좋은 주말되십시요.
답변 1
예스스탁 예스스탁 답변
2022-02-14 10:35:15
안녕하세요
예스스탁입니다.
input : n(100);
var : hh(0),ll(0),idx(0),tf(0);
var : TL1(0),TL2(0),d1(0),t1(0),TL3(0);
if Bdate != Bdate[1] Then
idx = 0;
Else
idx = idx+1;
TF = idx%n;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
hh = h;
ll = l;
d1 = sDate;
t1 = sTime;
#TL_Delete(TL1);
TL1 = TL_new(d1,t1,hh,NextBarSdate,NextBarStime,hh);
#TL_Delete(TL2);
TL2 = TL_new(d1,t1,ll,NextBarSdate,NextBarStime,ll);
#TL_Delete(TL3);
TL3 = TL_new(d1,t1,(hh+ll)/2,NextBarSdate,NextBarStime,(hh+ll)/2);
}
if h > hh Then
{
hh = h;
TL_SetBegin(TL1,d1,t1,hh);
TL_SetBegin(TL3,d1,t1,(hh+ll)/2);
}
if l < ll Then
{
ll = l;
TL_SetBegin(TL2,d1,t1,ll);
TL_SetBegin(TL3,d1,t1,(hh+ll)/2);
}
TL_SetEnd(TL1,NextBarSdate,NextBarStime,hh);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,ll);
TL_SetEnd(TL3,NextBarSdate,NextBarStime,(hh+ll)/2);
즐거운 하루되세요
> 요타 님이 쓴 글입니다.
> 제목 : 중가선 좀 부탁 드립니다.
> * 좋은 주말 되십시요.
* 아래 수식에 대하여 중간선 좀 부탁 드립니다.
현 상태에서 최고가와 최저가 중간선 수평선좀 부탁 드립니다.
## 아래 수식
input : n(100);
var : hh(0),ll(0),idx(0),tf(0);
var : TL1(0),TL2(0),d1(0),t1(0);
if Bdate != Bdate[1] Then
idx = 0;
Else
idx = idx+1;
TF = idx%n;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
hh = h;
ll = l;
d1 = sDate;
t1 = sTime;
#TL_Delete(TL1);
TL1 = TL_new(d1,t1,hh,NextBarSdate,NextBarStime,hh);
#TL_Delete(TL2);
TL2 = TL_new(d1,t1,ll,NextBarSdate,NextBarStime,ll);
}
if h > hh Then
{
hh = h;
TL_SetBegin(TL1,d1,t1,hh);
}
if l < ll Then
{
ll = l;
TL_SetBegin(TL2,d1,t1,ll);
}
TL_SetEnd(TL1,NextBarSdate,NextBarStime,hh);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,ll);
* 고맙습니다. 좋은 주말되십시요.
다음글
이전글