LDOS v6.3.1 Model 4

Page Contents:


Allow Model 4 LDOS v6.3.1 To Accept Dates after 2012 – Matthew Reed

This patch takes the form of an installer JCL file and six patch files.

These files can either be typed in on a TRS-80 or transferred to a TRS-80 using a null modem cable or other means. If you do type them in, remember that the files are rather long and every byte must be correct for them to work. If you use a null-modem transfer, be aware that the LDOS and LS-DOS patch utilities are quite picky about file contents. They will refuse to install any patch files that had extraneous data added to the end by the transfer process.

After all the files are transferred, installing the patches is as simple as invoking the JCL file. For example, typing DO INSTALL4 will install the Model 4 patches on drive 0. Rebooting will be necessary to enable the patches after installation.

Note: as with any patch, install on a copy of your operating system disk, never on the original.


INSTALL4/JCL

. Date extension patches for Model 4 LS-DOS 6.3.1 Level 1H
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. These patches extend LS-DOS 6.3.1 dating to 2079
PATCH BOOT/SYS.SYSTEM6 (D02,1F=4C:F02,1F=48)
PATCH SYS3/SYS.SYSTEM6 LD4PAT1
PATCH SYS0/SYS.SYSTEM6 LD4PAT2
PATCH SYS7/SYS.SYSTEM6 LD4PAT3
PATCH SYS6/SYS.SYSTEM6 LD4PAT4
PATCH BACKUP/CMD.UTILITY LD4PAT5
PATCH SYS7/SYS.SYSTEM6 LD4PAT6
. Reboot your Model 4 to enable the patches.

LD4PAT1/FIX

. Patches to extend LS-DOS 6.3.1 dating to 2079
. This is #1 of 6 patch files
. Store extended date in directory (Model 4)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS3/SYS.SYSTEM6 LD4PAT1
D01,02=3A 82 00 0F 10 FD 38 04 C1 F1 18 2D ED 4B 2E 00
F01,02=3E 3F C6 08 10 FC 32 EA 1E 3A 82 00 CB 47 20 04
D01,12=EB 69 29 29 60 29 29 29 EB C1 F1 B7 28 11 D6 50
F01,12=C1 F1 18 25 7D C6 11 6F ED 5B 2E 00 7A 53 1E 00
D01,22=F5 E6 1F
F01,22=06 03 CB
D01,29=B3 5F F1 07 07 07 E6 07 23 AE 77 2B 7D C6 11 6F
F01,29=3A CB 1B 10 FA 07 07 07 B2 57 C1 F1 B7 28 04 D6
D01,39=00 00 00
F01,39=50 B3 5F
. EOP

LD4PAT2/FIX

. Patches to extend LS-DOS 6.3.1 dating to 2079
. This is #2 of 6 patch files
. Extend startup date and fix day of week (Model 4)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS0/SYS.SYSTEM6 LD4PAT2
D0D,5F=50
F0D,5F=0C
D0D,69=64
F0D,69=20
D0D,D0=3F
F0D,D0=0F
. EOP

LD4PAT3/FIX

. Patches to extend LS-DOS 6.3.1 dating to 2079
. This is #3 of 6 patch files
. Extend DATE and fix day of week calculation (Model 4)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS7/SYS.SYSTEM6 LD4PAT3
D04,ED=50
F04,ED=0C
D04,F9=64
F04,F9=20
D05,60=3F
F05,60=0F
. EOP

LD4PAT4/FIX

. Patches to extend LS-DOS 6.3.1 dating to 2079
. This is #4 of 6 patch files
. Extend DIR date filters and display (Model 4)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. Updated 07/22/2013
. PATCH SYS6/SYS.SYSTEM6 LD4PAT4
D06,80=63
F06,80=53
D06,84=74 2F
F06,84=66 2D
D06,B3=8F
F06,B3=85
D0B,7C=CD 87 2A E3 CB B5
F0B,7C=20 05 7E E6 07 18
D0B,86=38 02 CB F5 E3 18 01
F0B,86=07 7D C6 11 6F 7E E6
D0C,EC=5B
F0C,EC=4B
D0C,FD=47 23 7E 0F 0F 0F E6 1F 4F C5 CD 87 2A C1 CD 85
F0C,FD=1E 00 57 CB 3A CB 1B 23 7E E6 F8 0F B3 5F 3A 00
D0D,0D=2D 50 59 C9 7E E6 07 47 3A 00 00 CB 47 CA 53 2D
F0D,0D=00 CB 47 20 09 7E E6 07 07 07 07 B2 57 C9 7D C6
D0D,1D=7D C6 11 6F C3 3F 2D
F0D,1D=11 6F 7E E6 1F 18 F1
D0F,D5=7E E6
F0F,D5=1F 1C
D0F,D8=4F 78 A9 E6 07 28 07 0F 0F 0F B1 FE 64 D8 79
F0F,D8=1E 1F 1E 1F 1F 1E 1F 1E 1F 30 30 32 35 35 30
D0F,E8=C9 78 B7 C9 00 00 00 00 00 30 30 32 35 35 30 37
F0F,E8=35 4E 6F 20 6D 65 6D 6F 72 79 20 66 6F 72 20 53
D0F,F8=35 4E 6F 20 6D 65 6D 6F 72 79 20 66 6F 72 20 53
F0F,F8=4F 52 54 0D 42 61 64 20 64 61 74 65 20 66 6F 72
D10,08=4F 52 54
F10,08=6D 61 74
D10,1B=E5 6F 29 29 29 29 78 B5 6F 29 29 29 29 29 79 B5
F10,1B=4A 75 6E 4A 75 6C 41 75 67 53 65 70 4F 63 74 4E
D10,2B=4F 44 E1 C9
F10,2B=6F 76 44 65
D10,4B=8C
F10,4B=82
D11,F3=13 1A 3D FE 1F 30 07 4F 0C 13 1A 3D FE 0C D2 11
F11,F3=1A FE 0C 30 03 C6 64 12 EB E6 03 21 40 2D 20 01
D12,03=24 47 04 1B 1B 1A D6 50 30 02 C6 64 C3 85 2D 42
F12,03=34 3A A6 2D 3D FE 0C D2 11 24 2B 85 6F 30 01 24
D12,13=61 64 20 64 61 74 65 20 66 6F 72 6D 61 74 0D
F12,13=3A A5 2D 3D BE D2 11 24 21 A6 2D 46 0E 00 CB
. EOP

LD4PAT5/FIX

. Patches to extend LS-DOS 6.3.1 dating to 2079
. Patches to extend LS-DOS 6.3.1 dating to 2079
. This is #5 of 6 patch files
. Extend BACKUP date filters and display (Model 4)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH BACKUP/CMD.UTILITY LD4PAT5
D10,D0=DC 04
F10,D0=C5 35
D10,E1=CD FF 33 0E 38 FE 0A 38 16 D6 0A 0C 47 79 FE 3A
F10,E1=20 05 7E E6 07 18 18 7D C6 11 6F 7E E6 1F FE 0A
D10,F1=78 20 F2 0E 30 18 EE
F10,F1=38 0D 0C D6 0A FE 0A
D08,18=13 1A 3D FE 1F 30 07 4F 0C 13 1A 3D FE 0C 30 35
F08,18=EB 7E FE 0C 30 03 C6 64 77 E6 03 21 08 46 20 01
D08,28=47 04 1B 1B 1A D6 50 30 02 C6 64 C3 C5 3F
F08,28=34 3A 5A 26 3D FE 0C 30 2C 2B 85 6F 7C CE
D13,B3=47 23 7E 0F 0F 0F E6 1F 4F C5 CD FF 33 C1 CD C5
F13,B3=1E 00 57 CB 3A CB 1B 23 7E E6 F8 0F B3 5F 3A DA
D13,C3=35 50 59 C9 7E
F13,C3=2A B7 20 09 7E
D13,CE=47 3A DA 2A B7 CA 11 36 7D
F13,CE=07 07 07 B2 57 C9 7D C6 11
D13,D7=C6 11 6F C3 F9 35
F13,D7=6F 7E E6 1F 18 F1
D15,95=E5 6F 29 29 29 29 78 B5 6F 29 29 29 29 29 79 B5
F15,95=4A 61 6E 46 65 62 4D 61 72 41 70 72 4D 61 79 4A
D15,A5=4F 44 E1 C9
F15,A5=75 6E 4A 75
D15,C9=7E E6 1F 4F 78 A9 E6
F15,C9=00 00 00 00 00 00 00
D15,D4=07 28 19 F5 3E 96 BE 20 0B
F15,D4=00 00 00 00 00 00 00 00 00
D15,DD=23 3E 42 BE 2B 20 04 F1 78 B7 C9 F1 0F 0F 0F B1
F15,DD=00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
D15,ED=FE 64 D8 79 37 C9
F15,ED=00 00 00 00 00 00
. EOP

LD4PAT6/FIX

. Patches to extend LS-DOS 6.3.1 dating to 2079
. Patches to extend LS-DOS 6.3.1 dating to 2079
. This is #6 of 6 patch files
.Extend PURGE date filters and display (Model 4)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS7/SYS.SYSTEM6 LD4PAT6
D0D,C1=C0 27
F0D,C1=B6 27
D0E,09=C3 27
F0E,09=B9 27
D0F,DF=DC 04
F0F,DF=15 29
D0F,F2=CD BB 27 0E 38 FE 0A 38 16 D6 0A 0C 47 79 FE 3A
F0F,F2=20 05 7E E6 07 18 18 7D C6 11 6F 7E E6 1F FE 0A
D10,02=78 20 F2 0E 30 18 EE
F10,02=38 0D 0C D6 0A FE 0A
D11,5B=47 23 7E 0F 0F 0F E6 1F 4F C5 CD BB 27 C1 CD 15
F11,5B=1E 00 CB 3F CB 1B 57 23 7E E6 F8 0F B3 5F 3A 00
D11,6B=29 50 59 C9 7E E6 07 47 3A 00 00 CB 47 28 46 7D
F11,6B=00 CB 47 20 09 7E E6 07 07 07 07 B2 57 C9 7D C6
D11,7B=C6 11 6F 18 28
F11,7B=11 6F 7E E6 1F
D11,8A=13 1A 3D FE 1F 30 07 4F 0C 13 1A 3D FE 0C 30 36
F11,8A=EB 7E FE 0C 30 03 C6 64 77 E6 03 21 DD 28 20 01
D11,9A=47 04 1B 1B 1A D6 50 30 02 C6 64 C3 15 29 7E E6
F11,9A=34 3A 4B 29 3D FE 0C 30 2D 2B 85 6F 7C CE 00 67
D11,AA=1F 4F 78 A9 E6 07 28 19 F5 3E
F11,AA=3A 4A 29 3D BE 30 1F 21 4B 29
D11,B8=96 BE 20 0B 23 3E
F11,B8=46 0E 00 CB 38 CB
D11,BE=42 BE 2B 20 04 F1 78 B7 C9 F1 0F 0F 0F B1 FE 64
F11,BE=19 2B 7E 07 07 B1 4F 2B 7E D6 50 30 01 AF 07 07
D11,CE=D8 79 37 C9
F11,CE=07 B0 47 EB
D12,D1=E5 6F 29 29 29 29 78 B5 6F 29 29 29 29 29 79 B5
F12,D1=4A 61 6E 46 65 62 4D 61 72 41 70 72 4D 61 79 4A
D12,E1=4F 44 E1 AF C9
F12,E1=75 6E 4A 75 6C
.EOP

Leave a Reply

Your email address will not be published. Required fields are marked *