1*48679Sbostic$! UUCP Login File 2*48679Sbostic$ set nocontrol 3*48679Sbostic$ if "''F$Mode()'" .NES. "INTERACTIVE" THEN $ GOTO BATCH 4*48679Sbostic$ nettest:='f$logical("SYS$NET") 5*48679Sbostic$ if nettest .nes. "" then goto batch ! Network task 6*48679Sbostic$ deass sys$input 7*48679Sbostic$ uucico := $e$disk:[eunice.usr.lib.uucp]uucico uucico 8*48679Sbostic$! drain:= $e$disk:[eunice.usr.lib.uucp]drain drain 9*48679Sbostic$ uucico 10*48679Sbostic$! drain 11*48679Sbostic$ assi nl: sys$output 12*48679Sbostic$ assi nl: sys$error 13*48679Sbostic$ logout/brief 14*48679Sbostic$ stop/id=0 15*48679Sbostic$ ! 16*48679Sbostic$ BATCH: 17*48679Sbostic$ exit 18