#ô > PDP11.ProgTips.Date.DofWeek : DayOfWeek=&8000 (È "DofW",DayOfWeek 2: <ã C%=2000-1900 ¸ 255 Fã B%=1 ¸ 12 Pã A%=1 ¸ 31 ZD%=º DayOfWeek d(ñ A%;"/";B%;"/";1900+C%;" ";~D%;" "; n3ñ Á"SunMonTueWedThuFriSatSun",(D% € &FF)*3+1,3) x7ç A%=28:ç B%=2:ç (C% ƒ 4) „ ((C%+1900) ƒ 400):A%=32 ‚ç A%=29:ç B%=2:A%=32 Œ.ç A%=30:ç B%=4 „ B%=6 „ B%=9 „ B%=11:A%=32 –í A% í B% ªí C% ÿ