.TITLE DUM .MCALL .EXIT START: MOV #12345.,R4 CALL TYPWRD .EXIT .END START