.TITLE  LOCF
        .IDENT  .12MAY.
        .PSECT  $CODE1
LOCF::
        MOV     2(R5),R0
        RTS     PC
        .END