!
!       DAT707.CMD - INIT.SYS patch for Y2K. Valid for INIT.SYS
!                    distributed with RSTS/E V7.0-07
!
!       First part is to be able to accept dates after 31-DEC-99,
!       second part is to be able to print these dates.
!       Adapted from Thord Nilson's method.
! 
!       /Mark Abene 18-DEC-07
! 
File to patch? [0,1]INIT.SYS
Base address? CKDATE
Offset address? 130
 Base   Offset  Old     New?
040276  000130  020027  ? 4737
040276  000132  000114  ? PATCH+176
040276  000134  103720  ? NOP
040276  000136  162700  ? ^Z
Offset address? ^Z
Base address? PATCH
Offset address? 176
 Base   Offset  Old     New?
054334  000176  000000  ? 20027
054334  000200  000000  ? 124
054334  000202  000000  ? 103002
054334  000204  000000  ? 62700
054334  000206  000000  ? 144
054334  000210  000000  ? 207
054334  000212  000000  ? ^Z
Offset address? ^Z
Base address? PRTDAT
Offset address? 20
 Base   Offset  Old     New?
041112  000020  020027  ? 4737
041112  000022  000035  ? PATCH+162
041112  000024  101132  ? NOP
041112  000026  062700  ? ^Z
Offset address? ^Z
Base address? PATCH
Offset address? 162
 Base   Offset  Old     New?
054334  000162  000000  ? 20027
054334  000164  000000  ? 35
054334  000166  000000  ? 101402
054334  000170  000000  ? 162700
054334  000172  000000  ? 144
054334  000174  000000  ? 207
054334  000176  020027  ? ^Z
Offset address? ^Z
Base address? ^Z
File to patch? ^C