|(8D0201" INTAPE01`S? l01.20 > A CG ? $I VMSRTL_001$1M VMSRTL_002$~ VMSRTL_003 "TAPE" is the logical inputTAPE$STOP, SKIP, or Filename.typ ? User requested STOP$ SKIP how many files ? END OF TAPE TAPECOPY PARAMETERS****$80 Char. card images (Y/N) ? $ Logical record size ? RECORD SIZE TOO LARGE 80 CHAR RECORD ASSUMED$ EBCDIC or BCD (E/B) ? Delete Column 73 thru 80, and$strip trailing blanks (Y/N) ? INPUT RECORD TOO LARGE ******************************** LOGICAL NAME "TAPE" NOT ASSIGNED *********************************** "TAPE" MUST BE MOUNTED/FOREIGN ) Translate input to ASCII$ from EBCDIC or BCD (Y/N) ?  END OF FILE # :  RECORDS WRITTEN REC HAS BYTES...IGNORE IT RECORD: )+ ****************************************** SYSTEM CALL RETURN CODE =  HEX+ ******************************************STOPSKIP  $!@S !} r} >P$] !}$!s!$ YNPԫԫ ԫ$0  \\}P,n PL$PP} L \LpTPkP1pO f =ˈ0zp߫ ߫u֫ 1$2PP$z2?@1%2₫$(Ы($ЫЫ(Ы$ZZ!ZZ(\\(P,PL ZZ 1֫Ы\Y3E\P@˘ː\P@˘ː\PP,Y(Ы\G\,,P@  \,byG\\,PP˜Lˠ˜>zP{dPPPP y߫: PPP($1k Qˤˬˤk$Qo˴uT˼Z9˴?-xkO P@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@@@@@@@@@.<(+|&@@@@@@@@@!$*);@-/@@@@@@@@@,%_>?@@@@@@@@@@:#@'="@abcdefghi@@@@@@@jklmnopqr@@@@@@@@stuvwxyz@@@@@@@@@@@@@@@@@@@@@@@ABCDEFGHI@@@@@@!JKLMNOPQR@@@@@@@@STUVWXYZ@@@@@@0123456789@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@@@@@@@@?.)]&-/@@@@@@@@@,("#%@@@@@@@@@@_=@^'\@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ABCDEFGHI@@@@@@@JKLMNOPQR@@@@@@;@STUVWXYZ@@@@@@0123456789@@@@@@.@.@j INTAPE$MAIN INTAPE$MAIN  TRANSLATE . BLANK ." OTS$LINKAGE OTS$LINKAGE* . BLANK .OTS$CODE