<html>
<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
Even >I< didn't expect me to look, but I did (and
surprisingly, I remember PDP-11 opcodes):<br>
<br>
044050 000176 000000 ? 20027 ; cmp r0,#124
<br>
044050 000200 000000 ? 126
<br>
<br>
Er, either the comment or the patch is wrong. 124 /= 126, even in
octal :-)<br>
<br>
<br>
<div class="moz-cite-prefix">On 20-Mar-17 18:00, Brett Bump wrote:<br>
</div>
<blockquote
cite="mid:alpine.LNX.2.00.1703201532150.18982@mail.rsts.org"
type="cite">
<br>
Ten (10) years later. ;-) Sorry, too much VAX 8200 posting,
thought I
<br>
would put up a new (old) topic. Bob, I used Thord's patch on
three (3)
<br>
PreBuilt kits that I hung on Rsts.org. Anyone interested in a
PreBuilt
<br>
RSTS Kit can go grab a zip file, start simh and be up and running
in a
<br>
few seconds. I also merged some of my V4A paper tape distro with
some
<br>
of the DecTape distro on BitSavers and got a valid sysgen of V4A
going.
<br>
<br>
<a class="moz-txt-link-freetext" href="http://www.rsts.org/autoindex.php?dir=distros/Rsts_kits/">http://www.rsts.org/autoindex.php?dir=distros/Rsts_kits/</a>
<br>
<br>
RSTS V7.0 (Thord Date Patch, Paul FIG-Forth RTS, My Custom,Notes
RTS).
<br>
RSTS V7.2 (Thord Date Patch, Paul FIG-Forth RTS, My Custom,Notes
RTS).
<br>
RSTS V8.0 (Thord Date Patch, Paul FIG-Forth RTS, My Custom,Notes
RTS).
<br>
<br>
Minimum installs (Just enough to be comfy, but full distro via
tape).
<br>
Guess I like to run RSTS in QRP mode. ;-)
<br>
<br>
Anyone wanting to just drive through history without pulling down
a kit
<br>
can telnet to running copies of the same kits that are running
here:
<br>
<br>
Telnet <a class="moz-txt-link-abbreviated" href="http://www.Rsts.org">www.Rsts.org</a> Port 81 Rsts V4A
<br>
Telnet <a class="moz-txt-link-abbreviated" href="http://www.Rsts.org">www.Rsts.org</a> Port 82 Rsts V4B
<br>
Telnet <a class="moz-txt-link-abbreviated" href="http://www.Rsts.org">www.Rsts.org</a> Port 83 Rsts V7.0
<br>
Telnet <a class="moz-txt-link-abbreviated" href="http://www.Rsts.org">www.Rsts.org</a> Port 84 Rsts V7.2
<br>
Telnet <a class="moz-txt-link-abbreviated" href="http://www.Rsts.org">www.Rsts.org</a> Port 85 Rsts V8.0
<br>
<br>
All systems have the same accounts, User: 100,100 Password: DEMO
<br>
is open to the public.
<br>
<br>
When I get some time next month, I will try to put up some V9+
kits.
<br>
<br>
73s,
<br>
<br>
Brett
<br>
<br>
On Tue, 11 Mar 2008, Robert G. Schaffrath wrote:
<br>
<br>
<blockquote type="cite">Just as an FYI for those running RSTS/E
V9.6 or planning to, I created a
<br>
patch several years ago to support Y2K+ dates based on Thord
Nilson's
<br>
V9.2 patch. I am posting it here and it can also be found by
doing a
<br>
groups.google.com search for "date96.cmd".
<br>
<br>
Robert
<br>
<br>
-- Begin --
<br>
<br>
! DATE96.CMD - INIT.SYS patch for Y2K. Valid for INIT.SYS
<br>
! distributed with RSTS/E V9.6-11
<br>
!
<br>
! First part is to be able to accept dates after
31-DEC-99,
<br>
! Second part is to be able to print these dates.
<br>
!
<br>
! Robert G. Schaffrath 26-MAR-04
<br>
! Based on DATE92.CMD by Thord Nilson 22-MAY-00
<br>
!
<br>
File to patch? [0,1]init.sys
<br>
Base address? ckdate
<br>
Offset address? 160
<br>
Base Offset Old New?
<br>
021764 000160 020027 ? 4737 ; jsr pc, @#patch+176
<br>
021764 000162 000126 ? patch+176
<br>
021764 000164 103667 ? nop
<br>
021764 000166 162700 ? ^Z
<br>
Offset address? ^Z
<br>
Base address? patch
<br>
Offset address? 176
<br>
Base Offset Old New?
<br>
044050 000176 000000 ? 20027 ; cmp r0,#124
<br>
044050 000200 000000 ? 126
<br>
044050 000202 000000 ? 103002 ; bhis ok
<br>
044050 000204 000000 ? 62700 ; add #100.,r0
<br>
044050 000206 000000 ? 144
<br>
044050 000210 000000 ? 207 ; ok: rts pc
<br>
044050 000212 000000 ? ^Z
<br>
Offset address? ^Z
<br>
Base address? datini
<br>
Offset address? 556
<br>
Base Offset Old New?
<br>
020762 000556 020027 ? 4737 ; jsr pc, @#patch+162
<br>
020762 000560 000035 ? patch+162
<br>
020762 000562 101027 ? nop
<br>
020762 000564 062700 ? ^Z
<br>
Offset address? ^Z
<br>
Base address? patch
<br>
Offset address? 162
<br>
Base Offset Old New?
<br>
044050 000162 000000 ? 20027 ; cmp r0,#35
<br>
044050 000164 000000 ? 35
<br>
044050 000166 000000 ? 101402 ; blos ok
<br>
044050 000170 000000 ? 162700 ; sub #100.,r0
<br>
044050 000172 000000 ? 144
<br>
044050 000174 000000 ? 207 ; ok: rts pc
<br>
044050 000176 020027 ? ^Z
<br>
Offset address? ^Z
<br>
Base address? ^Z
<br>
File to patch? ^C
<br>
<br>
</blockquote>
</blockquote>
<br>
</body>
</html>