Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site lanl-a.UUCP
Path: utzoo!watmath!clyde!akgua!sdcsvax!sdcrdcf!hplabs!hao!seismo!cmcl2!lanl-a!dlc
From: dlc@lanl-a.UUCP
Newsgroups: net.sources
Subject: 7 bit, even parity for MacTEP
Message-ID: <8017@lanl-a.UUCP>
Date: Sat, 26-May-84 21:39:45 EDT
Article-I.D.: lanl-a.8017
Posted: Sat May 26 21:39:45 1984
Date-Received: Fri, 1-Jun-84 02:17:02 EDT
Organization: Los Alamos National Laboratory
Lines: 14

George Brett from North Carolina put a faster and more capable version of
MacTEP on net.sources than the earlier ar.info-mac version.  I posted
changes for 7 bit, even parity to info-mac for the earlier version, and
this is similar for the net.sources (Fri May 25 06:26:39 MDT ??) version,
although it was much easier to do with this version.
	Dale Carstensen, (505)667-0849, dlc@lanl-a, lanl-a!dlc, denelcor!dcarst

2205 PARDB = PARNONE + DB8
5061 PRINT "Hit <space bar> for 7E, <return> for 8N."
5062 C$ = INKEY$: IF C$ = "" THEN GOTO 5062
5063 IF (C$ <> " ") AND (C$ <> CHR$(13)) THEN GOTO 5062
5064 IF C$ = " " THEN PARDB = PAREVEN + DB7
5110 PARAMLIST(28\2)=SB1+PARDB+TC
5170 PARAMLIST(28\2)=SB1+PARDB+TC