Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!think!husc6!husc4!nakada
From: nakada@husc4.harvard.edu (paul nakada)
Newsgroups: comp.sys.apple
Subject: Apple //c Modem control
Message-ID: <665@husc6.UUCP>
Date: Mon, 17-Nov-86 12:58:54 EST
Article-I.D.: husc6.665
Posted: Mon Nov 17 12:58:54 1986
Date-Received: Mon, 17-Nov-86 21:13:19 EST
Sender: news@husc6.UUCP
Reply-To: nakada@husc4.UUCP (paul nakada)
Distribution: net
Organization: Harvard Science Center
Lines: 27

This is just a sample of what can be done with a hayes modem and an Apple
//c.  This particular autodial program does not use interrupts...  I have
a full working BBS written in Basic with full interrupt capabilities..
if anyone wants it i can either post it to net.sources or mail it to you..
(actually there is a slight bit of ML code, but it is minimal <1k code...
it supports 2 floppy drives and 3 message bases.. grnted it's not a
glamorous bbs, but it's been up for over 3 months...  
-paul

 10  PRINT "IN#2": PRINT "<ctrl-A>8B"
 20  PRINT "IN#0": PRINT "PR#2"
 25  PRINT "ATS7=4"
 26  FOR L = 1 TO 800: NEXT 
 30  PRINT "ATDT3984983"
 40  FOR L = 1 TO 800: NEXT 
 45  PRINT "PR#0": PRINT "IN#2"
 50  IF  NOT T THEN  INPUT A$:T = 1
 55  INPUT B$: INPUT C$
 60  PRINT "IN#0"
 75  IF C$ = "NO CARRIER" THEN 10
 80  IF B$ = "NO CARRIER" THEN 10
 100  PRINT "IN#2": PRINT "<ctrl-A>T"
<ctrl-D> before all IN# and PR#

paul nakada
nakada@husc4.UUCP
nakada@harvsc4.BITNET