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