The sources to each release were usually included with the distribution
so that custom system settings could be sysgened. The sources are
uncommented, however.
You could implement this by finding the commented out source in the
sources and regenerating the system, with the code in the appropriate place.
Dave
On 12/28/17 4:28 PM, Fritz Mueller via cctalk wrote:
On Dec 27, 2017, at 8:23 AM, Paul Koning <paulkon...@comcast.net> wrote:
; "A SOURCE OF INNOCENT MERRIMENT!"
; - W.S. GILBERT, "MIKADO"
; "DID NOTHING IN PARTICULAR, AND DID IT VERY WELL"
; - W.S. GILBERT, "IOLANTHE"
; "TO BE IDLE IS THE ULTIMATE PURPOSE OF THE BUSY"
; - SAMUEL JOHNSON, "THE IDLER"
10$: DEC (PC)+ ;THE RT-11 LIGHTS ROUTINE!
20$: 1
BNE 14$ ;NOT TOO OFTEN
ADD #512.,20$ ;RESET COUNT, CLEAR CARRY
16$: ROL 13$ ;JUGGLE THE LIGHTS
BNE 11$ ;NOT CLEAR YET
COM 13$ ;TURN ON LIGHTS, SET CARRY
11$: BCC 12$ ;NOTHING FELL OFF, KEEP MOVING
ADD #100,16$ ;REVERSE DIRECTION
BIC #200,16$ ;ROL/ROR FLIP
12$: MOV (PC)+,@(PC)+ ;PUT IN LIGHTS
13$: .WORD 0,SR
14$: MOVB #MXJNUM/2+200,INTACT ;DO A COMPLETE SCAN
EXUSLK: BR EXUSER ;BACK INTO LOOKFOR LOOP
Very cool — thanks for the snippet, Paul!
I’ve seen mention in various RT-11 manuals that the sources were made available
by DEC at the time (perhaps only on fiche?)
I would love to read through the V4.00 sources, if anybody knows where I could
track them down?
cheers,
—FritzM.
