%SYSTEM-E-NOSUCHFILE
We apologize for the inconvenience. The resource you are attempting to reach is currently unavailable. Our technical team is actively working to resolve this matter.
If you believe this issue requires urgent attention, please do not hesitate to contact our support team [email protected]. We appreciate your understanding and patience.
; _.-.
; ,' + \
; ,--':-'
; || (____)
; || ||
; ||_____||
; '-.....-'
;
.TITLE NOSCHFIL
.DATA
FILE: .ASCIZ "NOTFND.TXT"
.TEXT
.GLOBL MAIN
MAIN:
PUSHL #FILE ; PUSH THE ADDRESS OF THE FILENAME
CALLS #1, OPENFIL ; CALL OPENFIL ROUTINE
TSTL R0 ; TEST RETURN STATUS
BEQL NOTFND ; BRANCH IF ZERO (FILE NOT FOUND)
BRB FOUND ; OTHERWISE, FILE FOUND
NOTFND:
.ASCIZ "ERROR: %SYSTEM-E-NOSUCHFILE - FILE NOT FOUND!"
HALT ; HALT PROGRAM
FOUND:
.ASCIZ "FILE SAFELY RETRIEVED."
HALT ; HALT PROGRAM
OPENFIL:
MOVL (SP)+, R0 ; SIMULATED FILE ACCESS
CLRL R0 ; JUST AN EXAMPLE, SET R0 TO ZERO
RET ; RETURN FROM ROUTINE