|66 5 ; THIS ROUTINE ALLOWS ONE TO CHANGE THE ATTRIBUTES KIND, 6 ; MAXRECSIZE, CURRENTRECNO, MYUSE, AND MAXRECNO. ONLY 7 ; CURRENTRECNO MAY BE CHANGED FOR AN OPEN FILE. 8 ; 9 ; 1ST WORD (TOS) - WHAT TO CHANGE (0-KIND,1-MAXRECSIZE, 10 ; 2-CURRENTRECNO,3-MYUSE,4-MAXRECNO) 11 ; 2ND WORD - STORAGE TYPE (0-STON,1-STOD) 12 ; 3RD WORD - VALUE TO GET STORED 13 ; 4TH WORD - ADDRESS OF FILE DESCRIPTOR  MM$%mMM< 5$%m<4MM Mm*$ʀ+h?C %W %k_ %@@@@@@TT LP DISK  ;1:]/(16]C!C %01 ]CC %C!(C %LE9U *E\/^XPATCH V02 XFILE NAME - X Fa]k1M %k%@S81b]C!C %.ALGXFILE NOT FOUNDXC!(k % Ck %H+ CC %C!(C %(   H+Ek P F G1>]C!C % ? XYu H Yu+ Yuπ  Q W  h :-\/ +1\ 5ph E5U 5hC k % 99Q 5xGP1b]C!(C % SEGMENT NOT IN FILE.XCk %X"9<< A(p=AQG1]C!`C % RELATIVE PC EXCEEDS DISK ALLOCATION FOR SEGMENT.X0~ a  L]C1:]L] :P/  +1\[ 1V]SJ]~ a\ P PAaL]o aa a6]C0C %C!0C %0   ~5 5h  X~Yu 5h (~  a ~)`~ ` a ~) U0"  U0"0"0"H+0"0"`0"DLVdlv(+E#G1]C!\C % UPPER BOUND MUST BE GREATER THAN LOWER BOUND. X9@$H$<< =AQ$pE 5U(( L]1]L]~Ep&o 1r]%O1F]8'P':P Y PL] 9p&C!C % L]1]L] E*I*;12])):P PL]@* 1](C!C %E((x  Y5+C k %C k %C(k %%|P &2 $%m& $%m