Add AVR-CP/M system (cpxac.asm) and a Makefile

[kermit-80.git] / cpxswt.asm

IF NOT lasm\r
.printx * CPXSWT.ASM *\r
ENDIF	; NOT lasm\r
;       KERMIT - (Celtic for "FREE")\r
;\r
;       This is the CP/M-80 implementation of the Columbia University\r
;       KERMIT file transfer protocol.\r
;\r
;       Version 4.0\r
;\r
;       Copyright June 1981,1982,1983,1984,1985\r
;       Columbia University\r
;\r
; Originally written by Bill Catchings of the Columbia University Center for\r
; Computing Activities, 612 W. 115th St., New York, NY 10025.\r
;\r
; Contributions by Frank da Cruz, Daphne Tzoar, Bernie Eiben,\r
; Bruce Tanner, Nick Bush, Greg Small, Kimmo Laaksonen, Jeff Damens, and many\r
; others.\r
;\r
;	This file is a simple family or system file switcher, selecting\r
;	one of several family files, or selectin CPXSYS.ASM (now modified)\r
;	if a family file does not exist.\r
;\r
;\r
; revision history:\r
;\r
;edit 10, 7-Jan-1991 by MF. Added code by Jay S. Rouman to support the\r
;	Ampro Little Board (see CPXBBI.ASM) and PRINTX for the HP-125.\r
; edit 9, 1st September 1990 by Russell Lang, rjl@monu1.cc.monash.edu.au.\r
;	Added Microbee support.\r
; edit 8, 2 December by OBSchou.  Added Z80MU "system" to allow kermit-80\r
;	debugging on a PC!\r
;\r
; edit 7, 27 October, 1987 by OBSchou.  Added bits for Sanyo, Compupro, \r
;	Genie and TRS-80 M4.\r
;\r
; edit 6, 16 July, 1987 for Will Rose, who has submitted code for\r
;	Micromint SB180 (6 and 9 Mhz) and a BT Merlin (alias RAIR)\r
;\r
; edit 5, 15 July, 1987 by OBSchou for David Moore, who has submitted\r
;	code for a Teletek SYSTEMASTER and for ADM22 terminals.\r
;\r
; edit 4, 14 July 1987 by OBSchou for JA Shearwood of Birmingham University,\r
;	Chris Miles of Manchester University.  Added a Cifer family file\r
;	for John, and added a BigBoard-Kaypro-Xerox family file for Chris\r
;	Finally, added in new family file for Heath, telcon, z100 and scntpr\r
;	systems for Martin Carter of Nottingham University.\r
;\r
; edit 3, 6 April, 1986 by OBSchou.\r
;	Added in switching for NCR Desision Mate V and Amstrad CPC 664/6128\r
;	systems.\r
;\r
; edit 2, March 16, 1987 by OBSchou.\r
;       added in support for m80 macro assembler.\r
;\r
; edit 1 28 January, 1987 by OBSchou.\r
;	Take out the series of printx etx and selection of systems and\r
;	leave this with only the system dep. code for systems without\r
;	a family file.  Hopefully, this file will go alltogether in time.\r
;\r
; Keep module name, edit number, and last revision date in memory.\r
swtver:	db	'CPXSWT.ASM (10)  7-Jan-1991 $'\r
;\f\r
; Assembly time message to let me know I'm building the right version.\r
; LASM generates an 'S' error along with the message, which is messy, but\r
; better than trying to put everything inside a IF m80 OR mac80 conditional,\r
; because LASM doesn't like nested IF's, either.\r
\r
\r
IF (torfam AND lasm)\r
;Link to the module with the code for Superbrains, Torch, Cifer and pci2651\r
LINK CPXTOR.ASM		; also NCR DMV systems\r
ENDIF;(torfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (ciffam AND LASM)\r
; Link to the Cifer family file.  (Cifer code previously on CPXTOR.ASM)\r
LINK CPXCIF.ASM		; Cifer family file\r
ENDIF	;(ciffam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (appfam AND lasm) ;[33] apple frogs as a separate family..\r
; Link to the APPLE family...\r
LINK CPXAPP.ASM\r
ENDIF ;(appfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (norfam AND lasm); Link to the Northstar family (and Comart)\r
; Link to the NorthStar family file\r
LINK CPXNOR.ASM\r
ENDIF; (norfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (pcwfam AND lasm) ;[35] Amstrad PCW 8256/8512  or CPC systems\r
; Link to the Amstrad PCW family\r
LINK CPXPCW.ASM\r
ENDIF ;(cpwfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (bbifam AND lasm) ;Bigboard, Kaypro and Xerox 820 file\r
; Link to the Bigboard family\r
.printx * Linking to the BigBoard family *\r
LINK CPXBBI.ASM\r
ENDIF ;(bbifam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (heafam AND lasm)	; heath, z100, telcon, and scntpr systems\r
; Link to the Heath-telcon-screentyper family\r
.printx * Linking to the Heath-telcon-screentyper family *\r
LINK CPXHEA.ASM\r
ENDIF	;(heafam) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (sbfam AND lasm)\r
; Link to the SB180 Family file\r
,printx * Linking to the SB180 Family file *\r
LINK CPXSB.ASM\r
ENDIF	; (sbfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (m2215 AND lasm)\r
; Link to the RAIR/ BT Merlin code\r
.printx * Linking to the Merlin/Rair code *\r
LINK CPXMRL.ASM\r
ENDIF	; (m2215 AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (sanfam AND lasm)\r
; Link to the Sanyo code\r
.printx * linking to the sanyo code *\r
LINK CPXSYO.ASM\r
ENDIF	; (sanfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (comfam AND lasm)\r
; Link to the compupro code\r
.printx * linking to the Compupro code *\r
LINK CPXPRO.ASM\r
ENDIF	; (comfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (genfam AND lasm)\r
; Link to the Genie family code\r
.printx * linking to the Genie code *\r
LINK CPXGNI.ASM\r
ENDIF	; (genfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (trsfam AND lasm)\r
; Link to the TRS-80 family file\r
.printx * linking to the TRS family file*\r
LINK CPXTM4.ASM\r
ENDIF	; (trsfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (z80fam AND lasm)\r
; Link to the Z80MU family file\r
.printx * linking to the Z80MU family file*\r
LINK CPXZ80.ASM\r
ENDIF	; (z80fam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
IF (beefam AND lasm)\r
; Link to the Microbee family file\r
.printx * linking to the Microbee family file *\r
LINK CPXBEE.ASM\r
ENDIF	; (beefam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
\r
IF (acfam AND lasm)\r
; Link to the AVR-CP/M family file\r
.printx * linking to the AVRCPM family file*\r
LINK CPXAC.ASM\r
ENDIF	; (acfam AND lasm) - m80 use: INCLUDE from CPXTYP.ASM\r
\r
; If we have come here, we are assembling the CPXSYS.ASM file\r
\r
IF robin\r
.printx	* Assembling KERMIT-80 for the DEC VT180 *\r
ENDIF\r
\r
IF vector\r
.printx	* Assembling KERMIT-80 for the Vector Graphics *\r
ENDIF\r
\r
IF osi\r
.printx	* Assembling KERMIT-80 for the Ohio Scientific *\r
ENDIF\r
\r
IF heath\r
.printx	* Assembling KERMIT-80 for the Heath/Zenith 89 *\r
ENDIF\r
\r
IF z100\r
.printx	* Assembling KERMIT-80 for the Heath/Zenith Z100 *\r
ENDIF\r
\r
IF trs80\r
.printx	* Assembling KERMIT-80 for the TRS-80 II *\r
ENDIF\r
\r
IF osbrn1\r
.printx	* Assembling KERMIT-80 for the Osborne 1 *\r
ENDIF\r
\r
IF telcon\r
.printx	* Assembling KERMIT-80 for the Telcon Zorba *\r
ENDIF\r
\r
IF dmII\r
.printx	* Assembling KERMIT-80 for the DECmate II *\r
ENDIF\r
\r
IF gener\r
.printx	* Assembling Generic KERMIT-80 *\r
ENDIF\r
\r
IF cpm3\r
.printx	* Assembling Generic KERMIT-80 for CP/M	3.0 *\r
ENDIF\r
\r
IF hp125\r
.printx * Assembling Kermit-80 for the HP-125 Series 100 *\r
ENDIF ;hp125\r
\r
IF kpii\r
.printx	* Assembling Kaypro II KERMIT-80 *\r
ENDIF\r
\r
IF xer820			;[pcc001]\r
.printx	* Assembling Xerox 820 KERMIT-80 *\r
ENDIF				;[pcc001]\r
\r
IF bbII\r
.printx	* Assembling BigBoard II KERMIT-80 *\r
ENDIF\r
\r
IF ampro\r
.printx	* Assembling Ampro Little Board KERMIT-80 *\r
ENDIF\r
\r
IF mdI\r
.printx	* Assembling for Morrow	Decision I *\r
ENDIF	;mdI  [Toad Hall]\r
\r
IF mmdI\r
.printx	* Assembling for Morrow	Micro Decision I *\r
ENDIF	;mmdI\r
\r
IF mikko\r
.printx	* Assembling MikroMikko	Kermit-80 *\r
ENDIF\r
\r
IF delphi	;[7]\r
.printx	* Assembling Digicomp Delphi 100 Kermit-80 *\r
ENDIF		;[7]\r
\r
IF cpt85xx\r
.printx	* Assembling CPT-85xx (under CompuPak CP/M) Kermit-80 *\r
ENDIF\r
\r
IF cmemco	;[25]\r
.printx	* Assembling KERMIT-80 for the Cromemco	(TU-ART) *\r
ENDIF;cmemco\r
\r
IF bbc	;[22]\r
.printx	* Assembling Kermit-80 for BBC with Z80	co-processor *\r
ENDIF	;[22]\r
\r
IF rm380z	;[22]\r
.printx	* Assembling Kermit-80 for Research Machines 380Z *\r
ENDIF	;[22]\r
\r
IF px8		;[29]\r
.printx	* Assembling Kermit-80 for Epson PX-8 *\r
ENDIF	;px8 [29]\r
\r
IF mmate	;[29]\r
.printx	* Assembling KERMIT-80 for the PMC MicroMate *\r
ENDIF	;mmate [29]\r
\r
IF disc	;[29]\r
.printx	* Assembling KERMIT-80 for the A. C. E.	Discovery *\r
ENDIF	;disc [29]\r
\r
IF s1008	;[29]\r
.printx	* Assembling KERMIT-80 for the MicroSales s1008	*\r
ENDIF	;s1008 [29]\r
\r
IF access	;[29]\r
.printx	* Assembling Kermit-80 for the ACCESS-MATRIX computer *\r
ENDIF	;access [29]\r
\r
IF lobo		;[hh]\r
.printx	* Assembling Kermit-80 for the Lobo MAX-80 *\r
ENDIF;lobo [hh]\r
\r
IF teletek\r
.printx * Assembling Kermit-80 for the Teletek *\r
ENDIF	;teletek\r
\r
;\r
;\r
; If here, we have not linked to a family, so link to CPXSYS.ASM\r
IF lasm\r
	LINK	CPXSYS.ASM\r
ENDIF	;lasm\r
;\r
; If we are using m80, then the CPXSYS.ASM file will be INCLUDED from CPXTYP\r
;\r
\r
\r
\r