커뮤니티
부탁드립니다
2024-01-30 21:47:40
555
글번호 176237
1.전주 최고가와 최저가를 각각 우측 추세선으로 계속하여 8주 동안 나타날 수 있도록 구현해 주세요
2.전일 최고가와 최저가를 각각 우측 추세선으로 계속하여 30일 동안 나타날 수 있도록 구현해 주세요
3. 전 시간대 최고가와 최저가를 각각 우측 추세선으로 계속하여 24시간 동안 나타날 수 있도록 구현해 주세요
고맙습니다.
답변 1
예스스탁 예스스탁 답변
2024-01-31 11:18:02
안녕하세요
예스스탁입니다.
1
var : hh(0),ll(0),hh1(0),ll1(0),cnt(0);
Array : TL1[50](0),TL2[50](0);
if DayOfWeek(Bdate) < dayofweek(Bdate[1]) Then
{
hh = h;
ll = l;
hh1 = hh[1];
ll1 = ll[1];
if hh1 > 0 and ll1 > 0 Then
{
For cnt = 49 DownTo 1
{
TL1[cnt] = TL1[cnt-1];
TL2[cnt] = TL2[cnt-1];
}
TL1[0] = TL_new(sDate,sTime,hh1,NextBarSdate,NextBarStime,hh1);
TL2[0] = TL_new(sDate,sTime,ll1,NextBarSdate,NextBarStime,ll1);
TL_SetColor(TL1[0],Red);
TL_SetColor(TL2[0],Blue);
TL_SetExtRight(TL1[0],true);
TL_SetExtRight(TL2[0],true);
TL_Delete(TL1[8]);
TL_Delete(TL2[8]);
}
}
Else
{
if hh > 0 and h > hh Then
hh = h;
if ll > 0 and l < ll Then
ll = l;
}
2
var : hh(0),ll(0),hh1(0),ll1(0),cnt(0);
Array : TL1[50](0),TL2[50](0);
if Bdate != Bdate[1] Then
{
hh1 = DayHigh(1);
ll1 = DayLow(1);
if hh1 > 0 and ll1 > 0 Then
{
For cnt = 49 DownTo 1
{
TL1[cnt] = TL1[cnt-1];
TL2[cnt] = TL2[cnt-1];
}
TL1[0] = TL_new(sDate,sTime,hh1,NextBarSdate,NextBarStime,hh1);
TL2[0] = TL_new(sDate,sTime,ll1,NextBarSdate,NextBarStime,ll1);
TL_SetColor(TL1[0],Red);
TL_SetColor(TL2[0],Blue);
TL_SetExtRight(TL1[0],true);
TL_SetExtRight(TL2[0],true);
TL_Delete(TL1[30]);
TL_Delete(TL2[30]);
}
}
Else
{
if hh > 0 and h > hh Then
hh = h;
if ll > 0 and l < ll Then
ll = l;
}
3
input : ntime1(60);
var : S1(0),D1(0),TM(0),TF(0);
var : hh(0),ll(0),hh1(0),ll1(0),cnt(0),ii(0);
Array : TL1[50](0),TL2[50](0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
For cnt = 49 DownTo 0
{
TL_Delete(TL1[cnt]);
TL_Delete(TL2[cnt]);
}
}
if D1 > 0 then
{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%ntime1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and ntime1 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and ntime1 > 1 and TM >= TM[1]+ntime1) or
(Bdate == Bdate[1] and ntime1 == 1 and TM > TM[1]) Then
{
ii = ii +1;
hh1 = hh[1];
ll1 = ll[1];
hh = h;
ll = l;
if hh1 > 0 and ll1 > 0 and Bdate == Bdate[1] Then
{
TL1[ii] = TL_new(sDate,sTime,hh1,NextBarSdate,NextBarStime,hh1);
TL2[ii] = TL_new(sDate,sTime,ll1,NextBarSdate,NextBarStime,ll1);
TL_SetColor(TL1[ii],Red);
TL_SetColor(TL2[ii],Blue);
TL_SetExtRight(TL1[ii],true);
TL_SetExtRight(TL2[ii],true);
}
}
if HH > 0 and H > HH Then
HH = H;
if LL > 0 and L < LL Then
LL = L;
}
Else
{
if hh > 0 and h > hh Then
hh = h;
if ll > 0 and l < ll Then
ll = l;
}
즐거운 하루되세요
> 서태공 님이 쓴 글입니다.
> 제목 : 부탁드립니다
> 1.전주 최고가와 최저가를 각각 우측 추세선으로 계속하여 8주 동안 나타날 수 있도록 구현해 주세요
2.전일 최고가와 최저가를 각각 우측 추세선으로 계속하여 30일 동안 나타날 수 있도록 구현해 주세요
3. 전 시간대 최고가와 최저가를 각각 우측 추세선으로 계속하여 24시간 동안 나타날 수 있도록 구현해 주세요
고맙습니다.
이전글