/*
>>:yamsys.h 7-23-82
 *
 * global equates for specific installation and modem ports
 * Other modem specific stuff is in yam5.c
 *
 */

#define ANSWERBACK "\r\n312-968-6927 H. Schulz Lisle,Il. \r\n"
/* files have single letter ext so pip yam?????.? gets all source but no crl */
#define HELPFILE "A:YAMHELP.T"
#define PHONES "A:PHONES.T"
#define LOGUSER 0
#define USQ
#define DEFBAUD 300
#define PORTSELAD
#define LOOPBACKNONO "\020\003\021\023\033"
#define CPM
#define BDSC
#define FLAVOR "NNC/H19/Smodem YAM"
#define CLKMHZ 4
#define MOMCAL 400*CLKMHZ
#define SCREAMER 9600
#define SECPBLK 16	/* 2k blocks on CDR DD controller 5/8" disk */
/* ********* following string must be in UPPER case ********* */
#define DISKS "AB"	/* legal disks for default selection */
#define MAXUSER 15	/* maximum user number */

/* defines for Heath/Zenith Z/H19 terminal */
#define STATLINE	/* do special status line information */
#define Z19			/* terminal type */
	/* 25th line off, wrap at end of line*/
#define TERMRESET	"\033y1\033x9\033v"
#define TERMINIT	"\033z"
	/* mode for replot -clear screen, no 25th, no wrap. Added Home'n'Clear. */
#define TERMREPLOT	"\033E\033y1\033w"

/* Modem I/O ports for Serial i/o port 2 on the NNC */
#define NNC
#define DPORT 0x0a
#define SPORT 0x0b

char inp();				/* for fastest 8080 code */
#define MIREADYERROR		/* rx data ready and error bits in same reg */
#define MIERRORMASK 0x30		/* rx error condition */
#define MI_ERROR_RESET outp(Sport, 0x37); /* how to reset MI error condition */

#define CDO (!(inp(Sport)&0x80))	/* Set up carrier detect */

#define MIREADY (inp(Sport)&MIMASK)	/* value != 0 if char available */
#define MIREADYMASK MIMASK		/* rx character available */
#define MICHAR (inp(Dport))		/* get char assuming miready */

#define MOREADY (inp(Sport)&MOMASK)	/* modem ready to load next char */
#define MOEMPTY (inp(Sport)&0x04)	/* modem shift reg EMPTY */
#define MODOUT(x) (outp(Dport, x))
#define MODATA Dport 		/* modem data output port */

#define SMODEM
/* Smartmodem strings */
#ifdef SMODEM
/*
** Switches on Smartmodem 1200 should be set for Not Verbose (S2 down),
** Send Result Codes to Screen (S3 down), No Echo of Commands (S4 down)
** and Don't Auto-Answer (S5 down). All other switches as from the
** factory. Sorry, not for XYAM usage as it stands. If your system allows
** communication even if DSR is low you can also set switch 6 to allow you
** to detect loss of carrier.
*/
int nbaud;
#define SMATTN	"+++"	/* get to command mode if not already there */
#define SMHUP	"ATH\r"	/* onhook command - loss of DTR or long break works too */
#define SMDIAL	"ATDT "	/* prefix to sending the number - touchtone mode */
#define FLIP
#define SMTOORG "ATD\r" /* offhook and wait for carrier in originate mode */
#define SMTOANS "ATA\r"	/* offhook and turn on carrier in answer mode */
#define NRING	3	/* Number of rings before offhook in auto-ans mode */
#endif

char bios();
#ifdef NNC
#define POREADY !bios(15,0)	/* at least on my system (sigh...) */
#else
#define POREADY bios(15,0)
#endif

#define LPOUT(x) bios(5,x)

#define CIREADY (inp(CSTAT)&CIMASK)
#define CICHAR (inp(CDATA))

#define COREADY (inp(CSTAT)&COMASK)

/* STDIO file included here to simplify cross-compiles of cyams */

#include "bdscio.h"

#define TTYOUT(x) outp(CDATA, x)