NEW
PREFIX
AUTO 4,1
				.LIST OFF	
*--------------------------------------
* SSC/ACIA 6551 I/O
*--------------------------------------
SSC.DIPSW1		.EQ $C081				R
SSC.DIPSW2		.EQ $C082				R
SSC.DATA		.EQ $C088				R,W
SSC.RESET		.EQ $C089				W
SSC.STATUS		.EQ $C089				R
SSC.STATUS.IRQ		.EQ %10000000
SSC.STATUS.nDSR		.EQ %01000000
SSC.STATUS.nDCD		.EQ %00100000
SSC.STATUS.TDRE		.EQ %00010000
SSC.STATUS.RDRF		.EQ %00001000
SSC.STATUS.OE		.EQ %00000100
SSC.STATUS.FE		.EQ %00000010
SSC.STATUS.PE		.EQ %00000001
SSC.CMD			.EQ $C08A				W
SSC.CMD.NOP			.EQ %00000000
SSC.CMD.ODDP		.EQ %00100000
SSC.CMD.EVENP		.EQ %01100000
SSC.CMD.MARKP		.EQ %10100000
SSC.CMD.SPACEP		.EQ %11100000
SSC.CMD.ECHO		.EQ %00010000
SSC.CMD.TBRK		.EQ %00001100
SSC.CMD.TE			.EQ %00001000
SSC.CMD.TEIRQ		.EQ %00000100
SSC.CMD.RIRQDIS		.EQ %00000010
SSC.CMD.DTR			.EQ %00000001
SSC.CTL			.EQ $C08B				W
SSC.CTL.1S			.EQ %00000000
SSC.CTL.2S			.EQ %10000000
SSC.CTL.8D			.EQ %00000000
SSC.CTL.7D			.EQ %00100000
SSC.CTL.6D			.EQ %01000000
SSC.CTL.5D			.EQ %01100000
SSC.CTL.CLKINT		.EQ %00010000
SSC.CTL.B16EXT		.EQ %00000000
SSC.CTL.B115200		.EQ %00000000
SSC.CTL.B50			.EQ %00000001
SSC.CTL.B75			.EQ %00000010
SSC.CTL.B110		.EQ %00000011
SSC.CTL.B135		.EQ %00000100
SSC.CTL.B150		.EQ %00000101
SSC.CTL.B300		.EQ %00000110
SSC.CTL.B600		.EQ %00000111
SSC.CTL.B1200		.EQ %00001000
SSC.CTL.B1800		.EQ %00001001
SSC.CTL.B2400		.EQ %00001010
SSC.CTL.B3600		.EQ %00001011
SSC.CTL.B4800		.EQ %00001100
SSC.CTL.B7200		.EQ %00001101
SSC.CTL.B9600		.EQ %00001110
SSC.CTL.B19200		.EQ %00001111
*--------------------------------------
MAN
SAVE INC/COM.6551.I