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.




Reply via email to