LDOS and LS-DOS: 2012 and Beyond - The Patch Files

written by Matthew Reed

I used TRSTools to apply my 2012 date extension patches because I wanted to make the update process as easy as possible for people using an emulated TRS-80 with virtual disks. But for those of us with a “real” physical TRS-80, or who just want to update their disks the old-fashioned way, here are the free patch files for my 2012 date extension update.

There are three different sets of patches for three different operating systems: Model 4 LS-DOS 6.3.1, Model III LDOS 5.3.1, and Model I LDOS 5.3.1. Each set consists 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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
. Date extension patches for Model 4 LS-DOS 6.3.1 Level 1H
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. Updated 07/29/2013
. 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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
. 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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
. 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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
. 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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
. 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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
. 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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
. 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

INSTALL3/JCL

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
. Date extension patches for Model III LDOS 5.3.1
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. These patches extend LDOS 5.3.1 dating to 2079
PATCH SYS3/SYS.RS0LT0FF LD3PAT1
PATCH SYS0/SYS.RS0LT0FF LD3PAT2
PATCH SYS7/SYS.RS0LT0FF LD3PAT3
PATCH SYS6/SYS.RS0LT0FF LD3PAT4
PATCH BACKUP/CMD.UTILITY LD3PAT5
PATCH SYS7/SYS.RS0LT0FF LD3PAT6
. Reboot your Model III to enable the patches.

LD3PAT1/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #1 of 6 patch files
. Store extended date in directory (Model III)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS3/SYS.RS0LT0FF LD3PAT1
D00,C7=3A 5D 47 0F 10 FD 38 04 C1 F1 18 32 ED 4B 18 42
F00,C7=3E 3F C6 08 10 FC 32 9D 4E 3A 5D 47 CB 47 20 04
D00,D7=EB 69 29 29 60 29 29 29 EB C1 F1 B7 28 19 FE 50
F00,D7=C1 F1 18 2A 7D C6 11 6F ED 5B 18 42 7A 53 1E 00
D00,E7=30 02 C6 64 D6 50 F5 E6 1F B3 5F F1 07 07 07 E6
F00,E7=06 03 CB 3A CB 1B 10 FA 07 07 07 B2 57 C1 F1 FE
D00,F7=07 23 AE EE 04 77 2B 7D C6 11 6F
F00,F7=0C 30 02 C6 64 D6 50 E6 1F B3 5F
. EOP

LD3PAT2/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #2 of 6 patch files
. Extend startup date and fix day of week (Model III)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS0/SYS.RS0LT0FF LD3PAT2
D0D,B9=50
F0D,B9=0C
D0D,C5=64
F0D,C5=20
D0E,3C=3F
F0E,3C=0F
D0E,80=50
F0E,80=0C
. EOP

LD3PAT3/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #3 of 6 patch files
. Extend DATE and fix day of week calculation (Model III)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS7/SYS.RS0LT0FF LD3PAT3
D02,5E=50
F02,5E=0C
D02,66=64
F02,66=20
D03,6B=50
F03,6B=0C
D03,78=3F
F03,78=0F
D03,CA=50
F03,CA=0C
. EOP

LD3PAT4/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #4 of 6 patch files
. Extend DIR date filters and display (Model III)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS6/SYS.RS0LT0FF LD3PAT4
D09,A5=CD F4 57 E3 CB B5 38 02 CB F5 E3 0E 37 FE 14 38
F09,A5=20 05 7E E6 07 18 16 7D C6 11 6F 7E E6 1F FE 14
D09,B5=04 D6 14 0E 2F D6 0A 0C 30 FB C6 0A 00
F09,B5=38 04 D6 14 0E 30 FE 0A 38 03 0C D6 0A
D0A,DA=47 23 7E 0F 0F 0F E6 1F 4F C5 CD F4 57
F0A,DA=1E 00 CB 3F CB 1B 57 23 7E E6 F8 0F B3
D0A,E7=C1 CD 76 5B 50 59 C9 7E E6 07 47 3A AC 56 B7 28
F0A,E7=5F 3A AC 56 B7 20 09 7E E6 07 07 07 07 B2 57 C9
D0A,F7=46 7D C6
F0A,F7=7D C6 11
D0A,FE=11 6F 18 28
F0A,FE=6F 7E E6 1F
D0B,0D=13 1A 3D FE 1F 30 05
F0B,0D=1A FE 0C 30 03 C6 64
D0B,14=4F 0C 13 1A 3D D2 2D 5A 47 04 1B 1B 1A D6 50 30
F0B,14=12 EB E6 03 21 77 5B 20 01 34 3A EB 5B 3D FE 0C
D0B,24=02 C6 64 C3 76 5B 7E E6 1F 4F 78 A9 E6 07 28 19
F0B,24=30 0B 2B 85 6F 30 01 24 3A EA 5B 3D BE D2 2D 5A
D0B,34=F5 3E 96 BE 20 0B 23 3E 42 BE 2B 20 04 F1 78 B7
F0B,34=21 EB 5B 46 0E 00 CB 38 CB 19 2B 7E 2B 07 07 B1
D0B,44=C9 F1 0F 0F 0F B1 FE 64 D8 79 37 C9
F0B,44=4F 7E D6 50 FE 70 38 01 AF 07 07 07
D0D,30=8A
F0D,30=82
D0E,80=E5 6F 29 29 29 29 78 B5 6F 29 29 29 29 29 79 B5
F0E,80=1F 1C 1F 1E 1F 1E 1F 1F 1E 1F 1E 1F 49 6E 73 75
D0E,90=4F 44 E1 C9 49 6E 73 75 66 66 69 63 69 65 6E 74
F0E,90=66 66 69 63 69 65 6E 74 20 6D 65 6D 6F 72 79 20
D0E,A0=20 6D 65 6D 6F 72 79 20 74 6F 20 73 6F 72 74
F0E,A0=66 6F 72 20 53 4F 52 54 20 62 75 66 66 65 72
. EOP

LD3PAT5/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #5 of 6 patch files
. Extend BACKUP date filters and display (Model III)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH BACKUP/CMD.UTILITY LD3PAT5
D06,B7=13 1A 3D FE 1F 30 05 4F
F06,B7=1A FE 0C 30 03 C6 64 12
D06,BF=0C 13 1A 3D 30 38 47 04 1B 1B 1A D6 50 C3 08 6A
F06,BF=EB E6 03 21 07 70 20 01 34 3A 5F 52 3D FE 0C 30
D0D,C6=1A B7 28 4E EB
F0D,C6=EB 7E B7 28 5F
D0D,FD=CD 61 5F 0E 37 FE 14 38 04 D6 14 0E 2F D6 0A 0C
F0D,FD=0E 38 3A 5D 47 CB 47 20 05 7E E6 07 18 16 7D C6
D0E,0D=30 FB C6 0A EB 71 23 C6 30 77 23 36 03 18 11 F1
F0E,0D=11 6F 7E E6 1F FE 14 38 04 D6 14 0E 30 FE 0A 38
D0E,1D=0F 0F 0F B1 FE 64 D8 79 37 C9 3E C9 32 98 69 C9
F0E,1D=03 0C D6 0A 47 79 12 13 78 C6 30 12 13 3E 03 12
D10,BB=47 23 7E 0F 0F 0F E6 1F 4F C5 CD 61 5F
F10,BB=1E 00 CB 3F CB 1B 57 23 7E E6 F8 0F B3
D10,C8=C1 CD 0C 61 50 59 C9 7E E6 07 47 3E 01 CB 77 CA
F10,C8=5F 3A 5D 47 CB 47 20 09 7E E6 07 07 07 07 B2 57
D10,D8=6F 61 7D C6 11 6F 7E C3 56 61
F10,D8=C9 7D C6 11 6F 7E E6 1F 18 F1
D12,7E=30 02 C6 64 E5 6F 29 29 29 29 18 34
F12,7E=1F 1C 1F 1E 1F 1E 1F 1F 1E 1F 1E 1F
D05,E0=EE
F05,E0=02
D06,CF=01 2C 48 6A
F06,CF=2D 2B 85 6F
D06,D3=78 B5 6F 29 29 29 29 29 79 B5 4F 44 E1 C9 E6 1F
F06,D3=30 01 24 3A 5E 52 3D BE 30 20 21 5F 52 46 0E 00
D06,E3=4F 78 A9 E6 07 CA C2 5C F5 3E 96 BE 20 05 23 3E
F06,E3=01 54 00 5D CB 38 CB 19 2B 7E 2B 07 07 B1 4F 7E
D06,F3=42 BE 2B C2 BA 5C F1 78 B7 C9
F06,F3=D6 50 FE 70 38 01 AF 07 07 07
D06,FD=01 3A 1A 5D
F06,FD=B0 47 EB C9
D13,E4=CD 95 69
F13,E4=32 25 6D
D11,F2=2D 20 62 61 63 6B 75 70 20 69 73 20 62 79 70 61
F11,F2=63 61 70 61 63 69 74 79 20 2D 20 62 61 63 6B 75
D12,02=73 73 65 64 0D 32 25 6D 32 66 68 C3 C5 65
F12,02=70 20 69 73 20 62 79 70 61 73 73 65 64 0D
. EOP

LD3PAT6/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #6 of 6 patch files
. Extend PURGE date filters and display (Model III)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS7/SYS.RS0LT0FF LD3PAT6
D23,69=96 55 00 00 00
F23,69=8C 55 32 23 54
D25,46=CD 8E 55 0E 37 FE 14 38 04 D6 14 0E 2F D6 0A 0C
F25,46=0E 38 3A 5D 47 CB 47 20 05 7E E6 07 18 16 7D C6
D25,56=30 FB C6 0A EB 71 23 C6 30 77 23 36 03 EB 18 10
F25,56=11 6F 7E E6 1F FE 14 38 04 D6 14 0E 30 FE 0A 38
D25,66=29 29 29 29 29 79 B5 4F 44 E1 C9
F25,66=03 0C D6 0A 47 79 12 13 78 C6 30
D26,A7=47 23 7E 0F 0F 0F E6 1F 4F C5 CD 8E 55
F26,A7=1E 00 CB 3F CB 1B 57 23 7E E6 F8 0F B3
D26,B4=C1 CD A8 56 50 59 C9 7E E6 07 47 3A 5D 47 CB 47
F26,B4=5F 3A 5D 47 CB 47 20 09 7E E6 07 07 07 07 B2 57
D26,C4=CA 30 56 7D C6 11 6F 18 78
F26,C4=C9 7D C6 11 6F 7E E6 1F 18
D27,29=13 1A 3D FE
F27,29=1A FE 0C 30
D27,31=1F 30 05 4F
F27,31=03 C6 64 12
D27,35=0C 13 1A 3D 30 DE 47 04 1B 1B 1A D6 50 30 02 C6
F27,35=EB E6 03 21 A9 56 20 01 34 3A 17 57 3D FE 0C 30
D27,45=64 C3 A8 56 7E E6 1F 4F 78 A9 E6 07 28 19 F5 3E
F27,45=D3 2B 85 6F 30 01 24 3A 16 57 3D BE 30 C6 21 17
D27,55=96 BE 20 0B 23 3E 42 BE 2B 20 04 F1 78 B7 C9 F1
F27,55=57 46 0E 00 CB 38 CB 19 2B 7E 2B 07 07 B1 4F 7E
D27,65=0F 0F 0F B1 FE 64 D8 79 37 C9
F27,65=D6 50 FE 70 38 01 AF 07 07 07
D27,D9=E5 6F 29 29 29 29 78 B5 6F C3 3D 54
F27,D9=1F 1C 1F 1E 1F 1E 1F 1F 1E 1F 1E 1F
. EOP

INSTALL1/JCL

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
. Date extension patches for Model I LDOS 5.3.1
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. These patches extend LDOS 5.3.1 dating to 2079
PATCH SYS3/SYS.RS0LT0FF LD1PAT1
PATCH SYS0/SYS.RS0LT0FF LD1PAT2
PATCH SYS7/SYS.RS0LT0FF LD1PAT3
PATCH SYS6/SYS.RS0LT0FF LD1PAT4
PATCH BACKUP/CMD.UTILITY LD1PAT5
PATCH SYS7/SYS.RS0LT0FF LD1PAT6
. Reboot your Model I to enable the patches.

LD1PAT1/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #1 of 6 patch files
. Store extended date in directory (Model I)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS3/SYS.RS0LT0FF LD1PAT1
D00,C7=3A 5D 47 0F 10 FD 38 04 C1 F1 18 32 ED 4B 42 40
F00,C7=3E 3F C6 08 10 FC 32 9D 4E 3A 5D 47 CB 47 20 04
D00,D7=EB 69 29 29 60 29 29 29 EB C1 F1 B7 28 19 FE 50
F00,D7=C1 F1 18 2A 7D C6 11 6F ED 5B 42 40 7A 53 1E 00
D00,E7=30 02 C6 64 D6 50 F5 E6 1F B3 5F F1 07 07 07 E6
F00,E7=06 03 CB 3A CB 1B 10 FA 07 07 07 B2 57 C1 F1 FE
D00,F7=07 23 AE EE 04 77 2B 7D C6 11 6F
F00,F7=0C 30 02 C6 64 D6 50 E6 1F B3 5F
. EOP

LD1PAT2/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #2 of 6 patch files
. Extend startup date and fix day of week (Model I)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS0/SYS.RS0LT0FF LD1PAT2
D0D,9B=50
F0D,9B=0C
D0D,A3=64
F0D,A3=20
D0E,1E=3F
F0E,1E=0F
D0E,62=50
F0E,62=0C
. EOP

LD1PAT3/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #3 of 6 patch files
. Extend DATE and fix day of week calculation (Model I)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS7/SYS.RS0LT0FF LD1PAT3
D03,70=50
F03,70=0C
D03,7D=3F
F03,7D=0F
D02,5E=50
F02,5E=0C
D02,66=64
F02,66=20
D03,CF=50
F03,CF=0C
. EOP

LD1PAT4/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #4 of 6 patch files
. Extend DIR date filters and display (Model I)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS6/SYS.RS0LT0FF LD1PAT4
D09,A5=CD F4 57 E3 CB B5 38 02 CB F5 E3 0E 37 FE 14 38
F09,A5=20 05 7E E6 07 18 16 7D C6 11 6F 7E E6 1F FE 14
D09,B5=04 D6 14 0E 2F D6 0A 0C 30 FB C6 0A 00
F09,B5=38 04 D6 14 0E 30 FE 0A 38 03 0C D6 0A
D0A,DA=47 23 7E 0F 0F 0F E6 1F 4F C5 CD F4 57
F0A,DA=1E 00 CB 3F CB 1B 57 23 7E E6 F8 0F B3
D0A,E7=C1 CD 76 5B 50 59 C9 7E E6 07 47 3A AC 56 B7 28
F0A,E7=5F 3A AC 56 B7 20 09 7E E6 07 07 07 07 B2 57 C9
D0A,F7=46 7D C6
F0A,F7=7D C6 11
D0A,FE=11 6F 18 28
F0A,FE=6F 7E E6 1F
D0B,0D=13 1A 3D FE 1F 30 05
F0B,0D=1A FE 0C 30 03 C6 64
D0B,14=4F 0C 13 1A 3D D2 2D 5A 47 04 1B 1B 1A D6 50 30
F0B,14=12 EB E6 03 21 77 5B 20 01 34 3A EB 5B 3D FE 0C
D0B,24=02 C6 64 C3 76 5B 7E E6 1F 4F 78 A9 E6 07 28 19
F0B,24=30 0B 2B 85 6F 30 01 24 3A EA 5B 3D BE D2 2D 5A
D0B,34=F5 3E 96 BE 20 0B 23 3E 42 BE 2B 20 04 F1 78 B7
F0B,34=21 EB 5B 46 0E 00 CB 38 CB 19 2B 7E 2B 07 07 B1
D0B,44=C9 F1 0F 0F 0F B1 FE 64 D8 79 37 C9
F0B,44=4F 7E D6 50 FE 70 38 01 AF 07 07 07
D0D,30=8A
F0D,30=82
D0E,80=E5 6F 29 29 29 29 78 B5 6F 29 29 29 29 29 79 B5
F0E,80=1F 1C 1F 1E 1F 1E 1F 1F 1E 1F 1E 1F 49 6E 73 75
D0E,90=4F 44 E1 C9 49 6E 73 75 66 66 69 63 69 65 6E 74
F0E,90=66 66 69 63 69 65 6E 74 20 6D 65 6D 6F 72 79 20
D0E,A0=20 6D 65 6D 6F 72 79 20 74 6F 20 73 6F 72 74
F0E,A0=66 6F 72 20 53 4F 52 54 20 62 75 66 66 65 72
. EOP

LD1PAT5/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #5 of 6 patch files
. Extend BACKUP date filters and display (Model I)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH BACKUP/CMD.UTILITY LD1PAT5
D06,B7=13 1A 3D FE 1F 30 05 4F
F06,B7=1A FE 0C 30 03 C6 64 12
D06,BF=0C 13 1A 3D 30 38 47 04 1B 1B 1A D6 50 C3 08 6A
F06,BF=EB E6 03 21 07 70 20 01 34 3A 5F 52 3D FE 0C 30
D0D,C6=1A B7 28 4E EB
F0D,C6=EB 7E B7 28 5F
D0D,FD=CD 61 5F 0E 37 FE 14 38 04 D6 14 0E 2F D6 0A 0C
F0D,FD=0E 38 3A 5D 47 CB 47 20 05 7E E6 07 18 16 7D C6
D0E,0D=30 FB C6 0A EB 71 23 C6 30 77 23 36 03 18 11 F1
F0E,0D=11 6F 7E E6 1F FE 14 38 04 D6 14 0E 30 FE 0A 38
D0E,1D=0F 0F 0F B1 FE 64 D8 79 37 C9 3E C9 32 98 69 C9
F0E,1D=03 0C D6 0A 47 79 12 13 78 C6 30 12 13 3E 03 12
D10,BB=47 23 7E 0F 0F 0F E6 1F 4F C5 CD 61 5F
F10,BB=1E 00 CB 3F CB 1B 57 23 7E E6 F8 0F B3
D10,C8=C1 CD 0C 61 50 59 C9 7E E6 07 47 3E 01 CB 77 CA
F10,C8=5F 3A 5D 47 CB 47 20 09 7E E6 07 07 07 07 B2 57
D10,D8=6F 61 7D C6 11 6F 7E C3 56 61
F10,D8=C9 7D C6 11 6F 7E E6 1F 18 F1
D12,7E=30 02 C6 64 E5 6F 29 29 29 29 18 34
F12,7E=1F 1C 1F 1E 1F 1E 1F 1F 1E 1F 1E 1F
D05,E0=EE
F05,E0=02
D06,CF=01 2C 48 6A
F06,CF=2D 2B 85 6F
D06,D3=78 B5 6F 29 29 29 29 29 79 B5 4F 44 E1 C9 E6 1F
F06,D3=30 01 24 3A 5E 52 3D BE 30 20 21 5F 52 46 0E 00
D06,E3=4F 78 A9 E6 07 CA C2 5C F5 3E 96 BE 20 05 23 3E
F06,E3=01 54 00 5D CB 38 CB 19 2B 7E 2B 07 07 B1 4F 7E
D06,F3=42 BE 2B C2 BA 5C F1 78 B7 C9
F06,F3=D6 50 FE 70 38 01 AF 07 07 07
D06,FD=01 3A 1A 5D
F06,FD=B0 47 EB C9
D13,E4=CD 95 69
F13,E4=32 25 6D
D11,F2=2D 20 62 61 63 6B 75 70 20 69 73 20 62 79 70 61
F11,F2=63 61 70 61 63 69 74 79 20 2D 20 62 61 63 6B 75
D12,02=73 73 65 64 0D 32 25 6D 32 66 68 C3 C5 65
F12,02=70 20 69 73 20 62 79 70 61 73 73 65 64 0D
. EOP

LD1PAT6/FIX

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
. Patches to extend LDOS 5.3.1 dating to 2079
. This is #6 of 6 patch files
. Extend PURGE date filters and display (Model I)
. Created by Matthew Reed - www.trs-80.org - 05/24/2011
. PATCH SYS7/SYS.RS0LT0FF LD1PAT6
D24,F9=96 55 00 00 00
F24,F9=8C 55 32 23 54
D26,D6=CD 8E 55 0E 37 FE 14 38 04 D6 14 0E 2F D6 0A 0C
F26,D6=0E 38 3A 5D 47 CB 47 20 05 7E E6 07 18 16 7D C6
D26,E6=30 FB C6 0A EB 71 23 C6 30 77 23 36 03 EB 18 10
F26,E6=11 6F 7E E6 1F FE 14 38 04 D6 14 0E 30 FE 0A 38
D26,F6=29 29 29 29 29 79 B5 4F 44 E1 C9
F26,F6=03 0C D6 0A 47 79 12 13 78 C6 30
D28,37=47 23 7E 0F 0F 0F E6 1F 4F C5 CD 8E 55
F28,37=1E 00 CB 3F CB 1B 57 23 7E E6 F8 0F B3
D28,44=C1 CD A8 56 50 59 C9 7E E6 07 47 3A 5D 47 CB 47
F28,44=5F 3A 5D 47 CB 47 20 09 7E E6 07 07 07 07 B2 57
D28,54=CA 30 56 7D C6 11 6F 18 78
F28,54=C9 7D C6 11 6F 7E E6 1F 18
D28,B9=13 1A 3D FE
F28,B9=1A FE 0C 30
D28,C1=1F 30 05 4F
F28,C1=03 C6 64 12
D28,C5=0C 13 1A 3D 30 DE 47 04 1B 1B 1A D6 50 30 02 C6
F28,C5=EB E6 03 21 A9 56 20 01 34 3A 17 57 3D FE 0C 30
D28,D5=64 C3 A8 56 7E E6 1F 4F 78 A9 E6 07 28 19 F5 3E
F28,D5=D3 2B 85 6F 30 01 24 3A 16 57 3D BE 30 C6 21 17
D28,E5=96 BE 20 0B 23 3E 42 BE 2B 20 04 F1 78 B7 C9 F1
F28,E5=57 46 0E 00 CB 38 CB 19 2B 7E 2B 07 07 B1 4F 7E
D28,F5=0F 0F 0F B1 FE 64 D8 79 37 C9
F28,F5=D6 50 FE 70 38 01 AF 07 07 07
D29,69=E5 6F 29 29 29 29 78 B5 6F C3 3D 54
F29,69=1F 1C 1F 1E 1F 1E 1F 1F 1E 1F 1E 1F
. EOP

Next post in this series: Updated Patch Files

Categories: General

Comments

James B says:

this patch marks the disk – Level 1K – my disk of 631 is Level 1H. Are there patches for levels 1I or 1J or were those levels just skipped (… Hmm is that an I or a one ? )

Matthew Reed (TRS80.org) says:

Level 1H was the final official version of LS-DOS. But there were unofficial patch sets that used 1I and 1J. I thought it was better to jump to 1K to avoid confusion.

Ronald Garbin says:

So far the 2012+ date extension patches work perfectly on our real Model 4ps, and the resulting LS-DOS631k has no trouble supporting a heavily-patched version of the old ProSoft word processor Allwrite. About the (registered) Emulator does occur a question.

To laser print documents with the maximum of formatting space, my patched Allwrite loads into the real 4p’s resident bank(s) character width tables each of only 2 bytes. Those bytes are really pointers to the various fonts' full-sized width tables, 283 of them, in the computer’s bank 3. Might the Emulator on a non-TRS-80 allow something similar?