)) > )> >> >) CT) > > )> > 32>>> > <1 .TS .CHR> >> 0 <- 6 >>) (T 32> 63>>> > 6> )>> .NEW> .NEW)>> ) "AUX" RTM) #DECL ((TM) (RTM) FIX) >>) (>)> > )> > FIX> .STIME>>> 0> )>>> >)> T> (NAME?) ) > "AUX" CT ES (NS:STRING ,I$NAMSTR)) ,/FHSLF> >>>> > > >) CT ES) #DECL ((ES NS NAME) STRING (ERR) ) > ) (NM2 ) (DEV ) (SNM ) FNL) #DECL ((JFN) (NM1 NM2 DEV SNM) ) > FIX> .DEV .SNM .NM1 .NM2 0 0 0>> > >)>>)> > (JFN ERR) ) FIX> .NAME>>) (T FIX> .NAME>>)> .MODE>>> .JFN) (T .ERR)>)>> > > FIX> 5 '(RETURN 5)> ,FB-BSZ> -24>> )> .OBC) (T <* > 1>> .FC> >)>> > .MODE>>>> > *777*>)>> >> >> >> > "MUD"> [,/DVDSK % ,/DVMTA % ,/DVLPT % ,/DVCDR % ,/DVFE % ,/DVTTY [% T T] ,/DVPTY [% T T] ,/DVNUL [% <> <>] ,/DVNET [% T T]]> > <> % X$DEF-NAME % X$DEF-NM1 % X$DEF-NM2 % X$DEF-DEV % X$DEF-SNM % X$DEF-SHORT-NAME % X$DEF-FLUSH % X$DEF-HACK-DATE % X$DEF-HACK-DATE % X$DEF-GET-MODE % X$DEF-GET-BYTE-SIZE> % % X$DISK-FILE-HANDLE % X$DISK-QUERY % X$DISK-OPEN % X$DISK-CLOSE % X$DISK-FLUSH % X$DISK-READ-BYTE % X$DISK-WRITE-BYTE % X$DISK-READ-BUFFER % X$DISK-WRITE-BUFFER % X$DISK-ACCESS % X$DISK-BUFOUT % X$DISK-FILE-LENGTH % X$DISK-PRINT-DATA> % X$UP-WRITE-BUF % X$UP-WRITE-BYTE % X$UP-READ-BYTE>> <> T 0 <>] T$CHANNEL>>> <> T "" <>] T$CHANNEL>>> CHANNEL-OPERATION.MBIN">> CHANNEL-OPERATION.MBIN">) (CHANNEL-OPERATION.MSUBR">)> TWAY.MBIN">> TWAY.MBIN">) (TWAY.MSUBR">)> TTY.MBIN">> TTY.MBIN">) (TTY.MSUBR">)>> ) (NM2 ) (DEV ) (SNM ) (FOLD <>) (FNEW <>) VAL FNL (NS >)) #DECL ((OLD NEW) STRING (NM1 NM2 DEV SNM) (FOLD FNEW) (FNL) FIX (NS) STRING) > >>> > > > )>)> )> )> ) (.VAL)>> ) (NM2 ) (DEV ) (SNM ) "AUX" FID VAL) #DECL ((NM) STRING (NM1 NM2 DEV SNM) (FID) ) > )>> )> ) (.NM)>> ) (NM2 )(DEV ) (SNM ) "AUX" FID) #DECL ((NAME) STRING (NM1 NM2 DEV SNM) (FID) ) > T) ()>> ) > FIX> .DEV ; "Default device" .SNM ; "Default directory" .NM1 ; "Default first name" .NM2 ; "Default second name" 0 ; "Protection" 0 ; "Account" 0 ; "JFN to use">> ) "AUX" (NEW? <>) JFN DEVTYP VEC (DEV ) (SNM ) (NM1 ) (NM2 ) (NS >) NNS FNL VAL) #DECL ((NNS NS NAME MODE BSZ) STRING (JFN) (FNL DEVTYP) FIX (DEV SNM NM1 NM2) (DEVNAM) ) )> .NAME .DEV .SNM .NM1 .NM2>> > > > > >) (>)>)> ) ( .NNS .MODE .BSZ !>)>>> ) (.VAL)>) ()>> ) ..ATM) ( ,.ATM)>> > 0) (.TS)>> > > > > > > >> > > > ) .ST>> >>) ()>>