커뮤니티
수고하십니다
2026-01-26 21:02:51
34
글번호 230099
항상 좋은 일만 있으시기 바랍니다
전일과 당일 이틀을 기준으로
최고가 최저가 세로줄 2줄과
최고가 최저가를 기준 추세선으로
4등선을 요청 합니다
답변 1
예스스탁 예스스탁 답변
2026-01-27 17:14:30
안녕하세요
예스스탁입니다.
var : cnt(0);
Array : d1[20](0),t1[20](0);
Array : hh[20](0),hd[20](0),ht[20](0);
Array : ll[20](0),ld[20](0),lt[20](0);
var : htl(0),ltl(0);
var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0);
if Bdate != Bdate[1] Then
{
For cnt = 19 DownTo 1
{
d1[cnt] = d1[cnt-1];
t1[cnt] = t1[cnt-1];
hh[cnt] = hh[cnt-1];
hd[cnt] = hd[cnt-1];
ht[cnt] = ht[cnt-1];
ll[cnt] = ll[cnt-1];
ld[cnt] = ld[cnt-1];
lt[cnt] = lt[cnt-1];
}
d1[0] = sDate;
t1[0] = sTime;
hd[0] = sDate;
ht[0] = sTime;
hh[0] = h;
ld[0] = sDate;
lt[0] = sTime;
ll[0] = l;
if d1[1] > 0 Then
{
TL_Delete(htl);
htl = TL_New(hd[1],ht[1],0,hd[1],ht[1],99999999);
TL_SetColor(htl,Red);
TL_Delete(ltl);
ltl = TL_New(ld[1],lt[1],0,ld[1],lt[1],99999999);
TL_SetColor(ltl,Blue);
var1 = max(hh[0],hh[1]);
var2 = Min(ll[0],ll[1]);
var3 = var1-Var2;
value1 = var1-var3*0.00;
value2 = var1-var3*0.25;
value3 = var1-var3*0.50;
value4 = var1-var3*0.75;
value5 = var1-var3*1.00;
TL_Delete(tl1);
TL_Delete(tl2);
TL_Delete(tl3);
TL_Delete(tl4);
TL_Delete(tl5);
tl1 = TL_New(d1[1],t1[1],value1,sDate,sTime,value1);
tl2 = TL_New(d1[1],t1[1],value2,sDate,sTime,value2);
tl3 = TL_New(d1[1],t1[1],value3,sDate,sTime,value3);
tl4 = TL_New(d1[1],t1[1],value4,sDate,sTime,value4);
tl5 = TL_New(d1[1],t1[1],value5,sDate,sTime,value5);
TL_SetColor(tl1,Red);
TL_SetColor(tl2,Magenta);
TL_SetColor(tl3,Green);
TL_SetColor(tl4,Cyan);
TL_SetColor(tl5,Blue);
}
}
if hh[0] > 0 and h >= hh[0] Then
{
hh[0] = h;
hd[0] = sDate;
ht[0] = sTime;
}
if ll[0] > 0 and l <= ll[0] Then
{
ll[0] = l;
ld[0] = sDate;
lt[0] = sTime;
}
if d1[1] > 0 Then
{
if h == hh[0] and hh[0] > hh[1] Then
{
TL_SetBegin(htl,hd[0],ht[0],0);
TL_SetEnd(htl,hd[0],ht[0],99999999);
}
if l == ll[0] and ll[0] < ll[1] Then
{
TL_SetBegin(ltl,ld[0],lt[0],0);
TL_SetEnd(ltl,ld[0],lt[0],99999999);
}
var1 = max(hh[0],hh[1]);
var2 = Min(ll[0],ll[1]);
var3 = var1-Var2;
value1 = var1-var3*0.00;
value2 = var1-var3*0.25;
value3 = var1-var3*0.50;
value4 = var1-var3*0.75;
value5 = var1-var3*1.00;
TL_SetBegin(tl1,d1[1],t1[1],value1);
TL_SetBegin(tl2,d1[1],t1[1],value2);
TL_SetBegin(tl3,d1[1],t1[1],value3);
TL_SetBegin(tl4,d1[1],t1[1],value4);
TL_SetBegin(tl5,d1[1],t1[1],value5);
TL_SetEnd(tl1,NextBarSdate,NextBarStime,value1);
TL_SetEnd(tl2,NextBarSdate,NextBarStime,value2);
TL_SetEnd(tl3,NextBarSdate,NextBarStime,value3);
TL_SetEnd(tl4,NextBarSdate,NextBarStime,value4);
TL_SetEnd(tl5,NextBarSdate,NextBarStime,value5);
}
즐거운 하루되세요
다음글
이전글