커뮤니티
부탁 드립니다.
2018-07-08 21:33:11
197
글번호 120354
도움 주심에 감사 드립니다.
그림과 같이 선을 그을수 있도록 부탁 드립니다.
미리 감사 드립니다.
답변 1
예스스탁 예스스탁 답변
2018-07-09 11:44:14
안녕하세요
예스스탁입니다.
var : T(0),cnt1(0),d1(0),t1(0),h1(0),l1(0);
var : cnt2(0),d2(0),t2(0),h2(0),l2(0);
var : tl11(0),tl12(0),tl13(0),tl14(0);
var : tl21(0),tl22(0),tl23(0),tl24(0);
if C > O Then
T = 1;
if C < O Then
T = -1;
if T == 1 and T[1] != 1 Then
{
cnt1 = 0;
d1 = sdate;
t1 = stime;
h1 = H;
l1 = L;
}
if T == 1 Then
{
cnt1 = cnt1+1;
if h > h1 Then
h1 = h;
if l < l1 Then
l1 = l;
}
if T == -1 and T[1] != -1 Then
{
cnt2 = 0;
d2 = sdate;
t2 = stime;
h2 = H;
l2 = L;
}
if T == -1 Then
{
cnt2 = cnt2+1;
if h > h2 Then
h2 = h;
if l < l2 Then
l2 = l;
}
if T != 1 and T[1] == 1 and cnt1[1] >= 3 and C[1] > O[1] Then
{
var1 = h1;
TL_SetEnd(tl11[1],sdate[cnt1+1],stime[cnt1+1],var1[1]);
tl11 = TL_New(d1,t1,h1,sdate[1],stime[1],h1);
tl12 = TL_New(d1,t1,l1,sdate[1],stime[1],l1);
tl13 = TL_New(d1,t1,h1,d1,t1,l1);
tl14 = TL_New(sdate[1],stime[1],h1,sdate[1],stime[1],l1);
TL_SetColor(Tl11,RED);
TL_SetColor(Tl12,RED);
TL_SetColor(Tl13,RED);
TL_SetColor(Tl14,RED);
}
Else
TL_SetEnd(tl11,sdate,stime,var1);
if T != -1 and T[1] == -1 and cnt2[1] >= 3 and C[1] < O[1] then
{
var2 = l2;
TL_SetEnd(tl22[1],sdate[cnt2+1],stime[cnt2+1],var2[1]);
tl21 = TL_New(d2,t2,h2,sdate[1],stime[1],h2);
tl22 = TL_New(d2,t2,l2,sdate[1],stime[1],l2);
tl23 = TL_New(d2,t2,h2,d2,t2,l2);
tl24 = TL_New(sdate[1],stime[1],h2,sdate[1],stime[1],l2);
TL_SetColor(Tl21,BLUE);
TL_SetColor(Tl22,BLUE);
TL_SetColor(Tl23,BLUE);
TL_SetColor(Tl24,BLUE);
}
Else
TL_SetEnd(tl22,sdate,stime,var2);
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 도움 주심에 감사 드립니다.
그림과 같이 선을 그을수 있도록 부탁 드립니다.
미리 감사 드립니다.
다음글
이전글