??2CHPHP <THL (ADRELLAHEL (BS0EDEPCITVHLYDLEITDHL (CP$RHNTLI<T0PDELADE\ DRPIET NHAHLETTH TDVLIEOLUHHD!D$HOUDFHODGPO <SDMPEH8IG.TDHDNLK!LLTUD:$ HOUNTEDDP DO DRLESD D \SILTHDYTOD TDDM$M!$  DCDNP	 <DD XE;K?YK>YAK=Y1K<X)K;X+O:?H,+K9XRK8XUK7XTK6XS2J$RHK5XR%\%	
: 
3/2X\J!
1/02A0ZN&Z!R&N!8J8J8J"7N!"7R!	/.&*,C.<(.&K-=HK,K+$S	*.72AOB[KSBKN>(/B%%1/B0Y+P0^	)==><	I <2I%1%\Y%1+P%\.+&SO%\0%1/O*FH!KOB A? ?KY[^[]JINIOBYBZXE???>EIBN2SWH&$)\2$)]H%1$)]\%1%]3	?%1$U<H*S%]9%1*H\Z\H]Z]K>Z^2J$RA*OJ^XVJ]K=Z\2IN\2A
<O<?H*/%]?*G	;K:XJ2IK9\JK8\J: \J	7	6	5	4	3/22AKM>(+I%1%$<	1+KR?.?[N.???0Y/O0\K0> /O0!+V//0Y+"0\K.> +"0Z/YSY/YA%H>7/
HUUHVUHW=1>==IOH[WHV0VTLRJCDW?LSP?/:AWQ$VLHPA*?: ZY2IO?9K>>P*"
=K<ZXNX>(*ZK;JXZX*Q2AJXK:?H*%^M,+ZY2I;AO9> ."4^
%R%Z% %,	8.: 
7/62AN4R4<(.4Z<%%1*5%1%^9%1%
O	5<H/4ZY%
X%1.X!X LK<(+.XQHQK39K2>P+!H!> +.%\O%1/MH 9DX H 9D9DH X HQC1H P!+OH SM/MO?6=PH[IONKMR9$B\DPB(BAP: 
?%1% ?K>	=?<%!$2IO<	;	:	9%1%"Y%1K8	=>	:	7%12IO6>(/5O42AK3X L Z&%
0%%$H2IO2	;K1$S2IO0	;//K.$SK-$S.2.4*M%NO!!L!]VH&>(%BOR
"OR8A[$HV]WHV[4LM\NSS+L/Q=TF.W1+\K$
20!+X/[?/O0[S0O0["	4?	?99+,K"5K$[$S0+T2JBJBMPB%GB.%F\N%EP$GV&TLJ?PH%DWW%KN%$P	?	>%1W=	</;2AZ7;XZ:Z8J1Z9J0ZV<HZ79J7J2<XR8<X*S:J8>(*!J6Z:J8J:=$S:Z8RVR9*UJ:?.HJ6$S.HJ2?<0X>\?6??B0 $)$Y$)$&;$Z7K:Z8$VBH((;R8+C$)$7R7+A$)&R%1K9
8%1/;X"H"8J8J8J$SH"$S/UBNTM ?;<>EC?KZPBI$G]DB0?XL($/%ARD!>.J:?;WCI=SQT2?;H[WHKNRJ?2I
?2AK>	=?D%
%	<<H.: 2I
?2A%
0%1$)
5$)
=$) B$) G$) M$) V	;	:*P8!2I
92A% \	;	:*&2I
82A% 3	;	:*.2I
7
6
52A.0Y*:0^0!*=0&	4<?SN<>SM<=SL%1%%E*:R9R9%1.9T2/Q;SQSQ/QH\	3H]	3H
	3H
>(/WK2$SH
	3/WK=<(0Y/-,%22/23$%4%4%B.QUH!%I%H%G%F%EMMWQIOT%D$GXJNZKR2I\JRK*F2A.	?K>"?:$)!N% ?	=K<X K;XQLK<(*2I\ 2AP PQ*ZK:XK$U*M$)!+$)"E%!$	=	9*	2I
82A.LO7>(*=$)%3	6	5	4/3: 
7$)&C$)&G	6	5	4/2$)&C$)&V	6	5	4/1	0&C&	&8	K+K9/O%4IO+%4K;%H IL>(%<;&%-?[8
:%;<H+5S8+0: [8+2L4P;QNH[WHSQXIN%DMMG??<%WQ$>W$$K?	>>$)""$)"8$)L$) %"YK=[OK<[P*XK;"^K:"^	9LK<(*T"^*Y2I
POP2AK8>(*+SPSO.^%0K72I
P2A.W6<H.0K5	>?:2IO4
3: 
5: 
2O1O3
02A$V*HPA<B.0$V"H$F///H2A$TK.XK/Q2AX OWX!SW	-< $SP P!+]/W2IO,
+2A/$+6%J>6\G?SSPF$CPDPA$HPLYBZ=&WQBJBM&>T%?0Y*A0Z.X\X]X
X
K?X$: X%XLKK><(*OK=<HLKX"H"K<<(*9K;9K:>P*&K9H"9PK8>P*>HK7?*UH9HH$X H"C6<X*58F8F8FL \ P*UP%*>P$K5*NH> RE.E+F0!+D0&:K4[C/B+QK8>(/7;X*V%<P2+ HWX]%HPXLHQXMHRXNH]XO*IHW8!H]>(+W%")$*I^^.,]^$^5^5^	\Z2Z"[YZ8D??:?&<??6?>=RB = \K?$SXPK>XK0Y*FK=0\X\0Z]=+Z:=3Z)<A[I<C
E<B[E=%[E=6[*>ZF=1ZF==>E"1H\\KHKK<?H*F%1HKK;>(*A\K\K.PP*6K:$SXPH\$S.1K9$SH\K8$S%1S]O]> *C*AK7X\"1**HKK;>(+YK:PP$S: XPHKX L $S: HK*EPP*?K:*>O]S]<(/]H\>(+	S]+^O]X , %1\KK>XOLO<(+V$S+.=HB<B?+B$AC^C\8A68BG?B:2IL 2AJH< JI.=&BZ M G B
=
5NOT NEUMERIC INPUTPLEASE ANSWER YES OR NODO YOU WANT HELP?YESNOTHIS PROGRAM ESTABLISHES A PARAMETER BLOCKON OS/8 FAMILY FILE STRUCTURED DEVICESINPUT IS VIA THE REGULAR MONITOR LINE SCANNERDEVICE NAME?BAD INPUTDEVICE NOT FILE STRUCTUREDDIRECTORY OCCUPIES 
ARAMETER BLOCKDEVICE HAS PARAMETER BLOCKDO YOU WISH TO DUMP IT?HANDLER ERROR READING BLOCKS 1-6 (PARITY?)SHALL I CONTINUE?DIRECTORY WILL BE ZEROEDIS A SYSTEM PRESENT?SYSTEM ID  0=UNASSIGNED   1=PS/8   2=OS/8   3=OS/12   4=DECSYSTEM-8   5=OS/78 VERSION NUM
ER (ASSOCIATED WITH SYSTEM AREA)VERSION RELEASE NUMBERUSER ASSIGNED DEVICE NAME   THE USER ASSIGNED NAME IS 1 TO 4 CHARACTERS  VOLUME ID THE VOLUME ID IS AN EXTRA LABLE FOR IDENTIFICATIONPURPOSES ONLY. A DECIMAL NUMBER < 4096DESCRIPTIVE LABELTHE DESCRIPTI
E LABEL MAY BE ANY STRING OFUP TO 127 CHARACTERS ON MULTIPLE LINESIT MUST BE TERMINATED WITH A ^Z (CNT/Z)FOLLOWED BY A CARRIAGE RETURN.MORE THAN 128 CHARS INPUT - TERMINATION FORCED VERSION: MARK NO SYSTEM PRESENTMMMM!! THAT FEELS BETTER!SCRATCH A LITTLE 
O THE LEFT....MMMMMMM!!**CHANGE THIS**?PLEASE ANSWER A, B, OR C DO YOU WISH TO  A:REPLACE  B:SELECTIVELY DECIDE  C:PRINT IT?PLEASE WRITE ENABLE THE DEVICEOUCH!!YOU FORGOT SOMETHING.THANKS!CLUE: YOU NEED TO PRESS A SWITCHYOU DUMMY! I CAN	T DO EVERYTHINGTHE
DEVICE NEEDS TO BE WRITE ENABLEDNEXT TIME GET HELP!TRY AGAIN?>(+U: L\LK+X%K6\%K+8!H%K7.*QS[6K+Z*[7K<[+ICXI>*6G?Z?>=1B?PS[W?L=W

Note: Lines longer than 256 characters were wrapped