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: <8705071412.AA17028@ucbvax.Berkeley.EDU>
Date: Thu, 7-May-87 09:17:24 EDT
Article-I.D.: ucbvax.8705071412.AA17028
Posted: Thu May  7 09:17:24 1987
Date-Received: Sat, 9-May-87 04:21:12 EDT
Sender: daemon@ucbvax.BERKELEY.EDU
Distribution: world
Organization: The ARPA Internet
Lines: 28

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

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