Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!lll-lcc!styx!ames!ucbcad!ucbvax!DJUKFA11.BITNET!KPH017
From: KPH017@DJUKFA11.BITNET
Newsgroups: comp.sys.atari.st
Subject: (none)
Message-ID: <8705071312.AA16337@ucbvax.Berkeley.EDU>
Date: Thu, 7-May-87 09:11:56 EDT
Article-I.D.: ucbvax.8705071312.AA16337
Posted: Thu May  7 09:11:56 1987
Date-Received: Sat, 9-May-87 03:55:28 EDT
Sender: daemon@ucbvax.BERKELEY.EDU
Distribution: world
Organization: The ARPA Internet
Lines: 29

Received: by DJUKFA11 (Mailer X1.23b) id 9205; Thu, 07 May 87 15:10:17 MEZ
Date:         Thu, 07 May 87 15:10:11 MEZ
From:         Christian Bode <KPH017@DJUKFA11>
To:           INFO-ATARI16@SCORE.STANFORD.EDU

$ infile=p1
$ if f$locate(".",infile).eqs.f$length(infile) then infile=infile+".uue"
$ outfile = f$logical("SYS$OUTPUT")
$ open/write file uudecode.in
$ write file infile
$ wr :== write sys$output
$ if p2.nes."(" then goto normal
$ if p3.nes."ATARI".and.p3.nes."VAX".and.p3.nes."VAXBIN" then goto wrong_opt
$ write file p3
$ goto close
$ normal:
$ write file "ATARI"
$ close:
$ close file
$ setdec
$! setdec have to be changed into a special feature to set
$! your terminal into vt100-kompatibilitymode
$ set term/notab
$ run/nodebug/output='outfile'/input=uudecode.in uudecode
$ goto all_done
$ wrong_opt:
$ wr " Wrong Options specified; must be ATARI, VAX or VAXBIN"
$ all_done:
$ exit