.TITLE OVL2F .MCALL .PRINT,.TTYOUT .GLOBL OFL2B,OVL2C ; ; 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 MES2F: .ASCIZ /SUBROUTINE OVL2F/ ; .EVEN OVL2F:: 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 #MES2F ;IDENTIFYING MESSAGE 1$: ADD #4,R3 ;INCREASE INDENT COUNT FOR ;NEXT LEVEL ROUTINE CALL OVL2B CALL OVL2C SUB #4,R3 ;RETURN TO PREVIOUS INDENT LEVEL RETURN .END