Title Suck IMS command line utility program (1_Mar_84)
;
;	Copyright 1984
;	Morrow Designs, Inc
;	San Leandro, Ca.
;	Originally written by H. Fullmer Mar_84

	.z80
	aseg
	org	0100h

conin	equ	1
sys	equ	5
wboot	equ	0
CR	equ	0dh

Main:	ld	c,conin		;get char.
	call	sys
	cp	CR		;see if carriage return
	jr	nz,main		;loop if not

	jp	wboot		;warm boot

	end