年:=YEAR=2011; 月:= MONTH=6;
日0624:=年 AND 月 AND DAY=24;
日0629 :=年 AND 月 AND DAY=29 ;
当值: DRAWLINE(日0624,C,日0629,O,1),COLORYELLOW;{灯塔线};
日0627:=年 AND 月 AND DAY=27;
日0628:=年 AND 月 AND DAY=28;
A: DRAWLINE(日0624,C,日0628,O,1),COLORMAGENTA;{灯塔线};
B: DRAWLINE(日0624,C,日0627,L,1),COLORGREEN;{灯塔线};