plotmess:	macro			;uses DOS to display mess on CON
					;A0 = message
	move.l a0,d2
	move.l conbase(a5),d1
	moveq.l #0,d3
.loop	addq.l #1,d3
	tst.b (a0)+
	bne .loop
	move.l dosbase(a5),a6
	jsr -48(a6)
	endm