.segment "CUNLSN"
cunlsn	jsr unlsn
	clc
	rts