search jobdat, uuosym, macten

cls:	jfcl
	reset
	outstr[ byte (7) 33, "[", "H", 33, "[", "J", 0]
	monrt.
	jrst	cls

end	cls