5 !'#6#'$#!
2 9!^	
1 1'^]
1 .1+]%
1 $1!'^5
2  Q!Q^Q
1 Y"!^X
2 1"(^]
2 )"*^^
1 Q"+^Y
1 9"1^	
0 7*W7,'^U
7 )"51
0 '/'/'/=^UO0^U
7 1"601
0 '1-.^7,OA^U'/
7 1"836
0 '3
7 Q":CONVER
0 '4<^U
7 )"@2
0 '5'/
7 $A"AMAXIMUN OUTPUT FILE NAME IS FIVE CHARACTERS.
0 '6<^U
7 )#-3
0 '7'/
7 %!#.THE PROGRAM ADDS A $ TO FRONT OF SPECIFIED NAME.
0 '8<^U
7 )#^4
0 '9'/
7 $I$PRESS <CAR RET> WHEN THERE ARE NO MORE NAMES.
0 ':<7-A^U'+?^U'+
7 )$L5
0 '<!'/
7 "A$MWHAT IS THE NAME FOR FILE # 
0 '=<^U'/'57)'+4^U
7 )%)0
0 '>'>'/'57)<^U'>'>
7 9%* ? 
0 '?<^K')(^U'*')>^U'*
7 1%-13
0 '@% GA^U'+'<!'/'5=^U'>'>
7 )%/7
0 'B=^U'+'+'/9^UG;7/M^U'/'/7)
7 )%0 
0 'C%GD^U'+'<!
7 1%144
0 'E
7 "9%3WHAT IS THE LOGICAL UNIT ? 
0 'F<^U'*'->^U'*'@% GG^U'+'<!'E'5=^U'>'>'B=^UGA70]^U'+/''/'<7)3^U'+/('/'57-5^U'+'B$@G;71E^U'/'/'/=^U'>'>
7 #I%NPROCESSING OCCURING . . . PLEASE WAIT
0 'H<^U
7 1&315
0 'I'/'>=^U'+)727^U'+?72K^U'/'/7,
7 )&5$
0 'L3^U'5
7 )&66
0 'M7,'+/'3^U
7 1&702
0 'N','+/(;-?733^U'1'".GP^U' 
7 A&94096
0 'Q
7 1&=64
0 'R'7/!& #'9/!&#'5 673Q^U'N'7' '5!7$.G^UGO74/^U'11^U'N1^U'+'<!'/
7 !)&?TRANSFER OF FILE 
0 'T<^U'>'>',<^U'>'>
7  9&P COMPLETED!
0 'U<^U'>'>'B=755^UOW^U'1-.^^UAGJ75]^U'/'/'5=^U'>'>
7 "9&[NO INPUT FILES IN RUN LINE!
0 'X<^U'>'>'B=^U,76O^U'+'B!'/
7 ")'6FILE TRANSFER COMPLETEED!
0 'Y<78=^U,
3 [/
26 !)'.A).1+.A).1+&1!%Q!'1!QY"!1"()"*Q"+9"1(#9)"5('S1"6(#F1"8Q":)"@$A"A)#-%!#.)#^$I$(#])$L"A$M)%)9%*1%-($Z)%/)%0(%V1%1"9%3(%A#I%N1&3(&*(&/)&5)&61&7(&F('*A&91&=(&]!)&? 9&P('H((&"9&[")'6((/
3370 ZE  TRICK INPUT INLINEOUTPUTOUTLINNAMES NAME  NUMBERALPHA TCHAR LOOP  NAMEO UNITINOP