커뮤니티
부탁 드립니다.
2016-02-19 05:12:24
123
글번호 95527
노고에 감사드립니다.
해선 장 시간(08:00~익일07:00) 동안
8시간 간격의 수평선 부탁 드립니다.
(가능하다면 480분 간격,색상:red yellow,blue)
미리 감사 드립니다.
답변 1
예스스탁 예스스탁 답변
2016-02-19 10:48:18
안녕하세요
예스스탁입니다.
수평으로 그릴값이 불분명해서
1값으로 출력하게 했습니다.
Input: N(480);
var : S1(0),S2(0),T(0),TM(0),TF(0),TL(0),cnt(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF = TM%N;
if Bdate != Bdate[1] Then
cnt = 0;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then{
cnt = cnt+1;
}
if cnt == 1 Then
plot1(1,"수평",RED);
if cnt == 2 Then
plot1(1,"수평",YELLOW);
if cnt == 3 Then
plot1(1,"수평",blue);
만약 문의하신 내용이 해당 시점에
수직선을 긋는 내용이시면 아래식 이용하시면 됩니다.
Input: N(480);
var : S1(0),S2(0),T(0),TM(0),TF(0),TL(0),cnt(0);
if Bdate != Bdate[1] Then{
S1 = TimeToMinutes(stime);//8시에 해당하는 TimeToMinutes
T = 1;
}
if date != date[1] and Bdate == Bdate[1] Then{
S2 = 1440-S1;
T = 2;
}
if T == 1 then
TM = TimeToMinutes(stime)-S1;
if T == 2 Then
TM = TimeToMinutes(stime)+S2;
TF = TM%N;
if Bdate != Bdate[1] Then
cnt = 0;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then{
cnt = cnt+1;
TL = TL_new(sdate,stime,999999999,sdate,stime,0);
if cnt == 1 Then
TL_setColor(TL,red);
if cnt == 2 Then
TL_setColor(TL,YELLOW);
if cnt == 3 Then
TL_setColor(TL,blue);
}
plot1(TF);
즐거운 하루되세요
> yes 님이 쓴 글입니다.
> 제목 : 부탁 드립니다.
> 노고에 감사드립니다.
해선 장 시간(08:00~익일07:00) 동안
8시간 간격의 수평선 부탁 드립니다.
(가능하다면 480분 간격,색상:red yellow,blue)
미리 감사 드립니다.