.TITLE OVL2D .MCALL .PRINT,.TTYOUT .GLOBL OVL2B,OVFL2E ; ; The following programs are used in the RT-11 User and RT-11 ; Programmer self paced instruction courses for RT-11 V4.They are also ; similar to programs used in the Programming with RT-11 series for ; RT-11 V5.0 or later. The name of the files are as specified in the ; self paced course. ; ; The code is supplied as a service as Digital does not supply these ; on diskette. ; Any copyright is the property of Digital Equipment Corporartion ; ; ;BLKW 50. ;SPACE WASTER TO SHOW OFF OVERLAYS MES2D: .ASCIZ /SUBROUTINE OVL2D/ ; .EVEN OVL2D:: TST R1 ;FIRST TIME? BNE 1$ ;NO MOV R3,R2 ;DUPLICATE INDENT COOUNT 2$: .TTYOUT #40 ;TYPE BLANK DEC R2 ;THE RIGHT NUMBER OF TIMES BNE 2$ .PRINT #MES2D ;INDENTIFYING MESSAGE 1$: ADD #4,R3 ;INCREASE INDENT COUNT FOR ;NEXT SUBROUTINE LEVEL CALL OVL2B CALL OVL2E SUB #4,R3 ;RETUNE TO PREVIOUS INDENT LEVEL RETURN .END