예스스탁
예스스탁 답변
2022-04-15 13:21:54
안녕하세요
예스스탁입니다.
input : R1(255),G1(0),B1(0);
input : R2(255),G2(0),B2(0);
input : R3(255),G3(0),B3(0);
input : R4(255),G4(0),B4(0);
input : 굵기1(5),굵기2(2),굵기3(2),굵기4(1);
var : tl1(0),tl2(0),tl3(0),tl4(0);
var : tx1(0),tx2(0),tx3(0),tx4(0);
var : hh(0),ll(0),mm(0),d1(0),t1(0);
if Bdate != Bdate[1] Then
{
d1 = sDate[1];
t1 = TimeToMinutes(sTime);
hh = h;
ll = l;
mm = (hh+ll)/2;
tl1 = TL_New(d1,153000,DayOpen,sDate,sTime,DayOpen);
tl2 = TL_New(d1,153000,hh,sDate,sTime,hh);
tl3 = TL_New(d1,153000,ll,sDate,sTime,ll);
tl4 = TL_New(d1,153000,mm,sDate,sTime,mm);
TL_SetColor(tl1,RGB(R1,G1,B1));
TL_SetColor(tl2,RGB(R2,G2,B2));
TL_SetColor(tl3,RGB(R3,G3,B3));
TL_SetColor(tl4,RGB(R4,G4,B4));
TL_SetSize(tl1,굵기1);
TL_SetSize(tl2,굵기1);
TL_SetSize(tl3,굵기1);
TL_SetSize(tl4,굵기3);
TX1 = Text_New(sDate,sTime,DayOpen,"시가");
TX2 = Text_New(sDate,sTime,hh,"고가");
TX3 = Text_New(sDate,sTime,ll,"저가");
TX4 = Text_New(sDate,sTime,mm,"중가");
Text_SetStyle(TX1,0,1);
Text_SetStyle(TX2,0,1);
Text_SetStyle(TX3,0,1);
Text_SetStyle(TX4,0,1);
}
Else
{
if TimeToMinutes(sTime) < T1+3 Then
{
if h > hh Then
hh = h;
if l < ll Then
ll = l;
mm = (hh+ll)/2;
}
if sTime < 91500 Then
{
TL_setend(tl1,sDate,sTime,DayOpen);
TL_SetBegin(tl2,d1,153000,hh);
TL_setend(tl2,sDate,sTime,hh);
TL_SetBegin(tl3,d1,153000,ll);
TL_setend(tl3,sDate,sTime,ll);
TL_SetBegin(tl4,d1,154000,mm);
TL_setend(tl4,sDate,sTime,mm);
Text_SetLocation(TX1,sDate,sTime,DayOpen);
Text_SetLocation(TX2,sDate,sTime,hh);
Text_SetLocation(TX3,sDate,sTime,ll);
Text_SetLocation(TX4,sDate,sTime,mm);
}
}
즐거운 하루되세요
> 포보스 님이 쓴 글입니다.
> 제목 : Re : 선긋기 부탁드립니다.
> 안녕하세요?
아래 지표만들어주신것 정말 감사드립니다.
한번 더 수정을 요청합니다.
추세선앞에 시가, 고가, 저가, 중가 텍스트좀 넣어주시고요
추세선을 RGB 값으로 할 수 있도록 부탁드립니다.
매번 부탁만 드려 죄송합니다.
혼자 해볼려니 잘 안되네요. ㅜㅜ
오늘도 좋은 하루 보내시고 즐거운 주말 되세요.
=================
input : 색1(lgreen),색2(Red),색3(Blue),색4(Cyan);
input : 굵기1(5),굵기2(2),굵기3(2),굵기4(1);
var : tl1(0),tl2(0),tl3(0),tl4(0);
var : hh(0),ll(0),mm(0),d1(0),t1(0);
if Bdate != Bdate[1] Then
{
d1 = sDate[1];
t1 = TimeToMinutes(sTime);
hh = h;
ll = l;
mm = (hh+ll)/2;
tl1 = TL_New(d1,153000,DayOpen,sDate,sTime,DayOpen);
tl2 = TL_New(d1,153000,hh,sDate,sTime,hh);
tl3 = TL_New(d1,153000,ll,sDate,sTime,ll);
tl4 = TL_New(d1,153000,mm,sDate,sTime,mm);
TL_SetColor(tl1,색1);
TL_SetColor(tl2,색2);
TL_SetColor(tl3,색3);
TL_SetColor(tl4,색4);
TL_SetSize(tl1,굵기1);
TL_SetSize(tl2,굵기1);
TL_SetSize(tl3,굵기1);
TL_SetSize(tl4,굵기3);
}
Else
{
if TimeToMinutes(sTime) < T1+3 Then
{
if h > hh Then
hh = h;
if l < ll Then
ll = l;
mm = (hh+ll)/2;
}
if sTime < 91500 Then
{
TL_setend(tl1,sDate,sTime,DayOpen);
TL_SetBegin(tl2,d1,153000,hh);
TL_setend(tl2,sDate,sTime,hh);
TL_SetBegin(tl3,d1,153000,ll);
TL_setend(tl3,sDate,sTime,ll);
TL_SetBegin(tl4,d1,154000,mm);
TL_setend(tl4,sDate,sTime,mm);
}
}