%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