These vectors set an ASCII string for date (CN_DATE/CV_ILDAT) and day (CN_DAY/CV_DAY).
Call Parameters | Return Parameters | ||
---|---|---|---|
D0.L | Unused | D0.L | Corrupted?. |
D1.L | Date (internal value). | D1.L | Preserved. |
A1.L | Pointer to maths stack. | A1.L | Updated. |
No errors are returned by this vector call.
The example below shows the use of these vectors to set the date followed by the day. We suppose that A6.L points to the data space. The example uses the trap #1 routine MT_RCLCK.
mst equ 30+6 ; Space for date and day. Get_dte moveq #MT_RCLCK,d0 ; To read the clock. trap #1 ; D1.L contains the date. lea mst,a1 ; End of stack. movea.w CN_DAY,a2 ; CN_DAY vector address. jsr (a2) ; ASCII day at (A1,A6.L) movea.w CN_DATE,a2 ; CN_DATE vector address. jsr (a2) ; ASCII date at (A1,A6.L) lea (a1,a6.l),a4 ; Set the address of "date" to A4