
/*
 * romhelp.s -- AIS/3200 RAMless-Monitor help
 * copyright(c) American Information Systems Corporation
 *  Dock Williams
 *  June, 1984		updated for System 5.2 July, 1984
 *
 * print a synopsis of each ROM-monitor command
 * in a manner similar to the RAM-monitor
 */

	.globl _cmdc
	.globl _cmdcsyn
	.globl _cmdd
	.globl _cmddsyn
	.globl _cmdf
	.globl _cmdfsyn
	.globl _cmdg
	.globl _cmdgsyn
	.globl _cmdh
	.globl _cmdhsyn
	.globl _cmdi
	.globl _cmdisyn
	.globl _cmdm
	.globl _cmdmsyn
	.globl _cmdo
	.globl _cmdosyn
	.globl _cmdz
	.globl _cmdzsyn
	.globl _cmdr
	.globl _cmdrsyn

msgarray:	
	.double _cmdh
	.double _cmdhsyn
	.double _cmdc
	.double _cmdcsyn
	.double _cmdd
	.double _cmddsyn
	.double _cmdf
	.double _cmdfsyn
	.double _cmdg
	.double _cmdgsyn
	.double _cmdi
	.double _cmdisyn
	.double _cmdm
	.double _cmdmsyn
	.double _cmdo
	.double _cmdosyn
	.double _cmdz
	.double _cmdzsyn
	.double _cmdr
	.double _cmdrsyn
	.double 0,0
dashstr:
	.byte	0x20,0x2d,0x20,0	/* the string: " - " */

rmlhelp:
	addr	msgarray,r0
sprloop:
	movd	0(r0),r5		/* print commmand name */
	addr	sprdash,r7
	br	printm
sprdash:
	addr	dashstr,r5		/* print space, dash, space */
	addr	sprsyn,r7
	br	printm
sprsyn:	
	addqd	$4,r0			/* print synopsis */
	movd	0(r0),r5
	addr	sprret,r7
	br	printm
sprret:
	addr	sprchk,r7		/* print carriage return, line feed */
	br	crlf
sprchk:
	addqd	$4,r0
	cmpqd	$0,0(r0)			/* finished yet? */
	bne	sprloop			/* keep on printing till done */
	br	getinpl			/* finished. On to next command */

