.define .nop
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text

.nop:	push b
	lhld hol0+4
	mov d,h
	mov e,l
	call prstring
	lxi d,lin
	call prstring
	lhld hol0
	call prdec
	lxi d,stpr
	call prstring
	lxi h,0
	dad sp
	call prdec
	lxi d,newline
	call prstring
	pop b
	ret


lin:	.asciz "   lin:"
stpr:	.asciz "   sp:"
newline:.asciz "\n"
