z	IS	$0
test	IS	$1
	LOC	Data_Segment
	GREG	@
String	BYTE	0,#A,0 Zur Ausgabe der Hexziffer
	
	LOC	#100
Main	SETL	z,12	Zahl f"ur hexadez. Ausgabe
	CMP	test,z,10	Test, ob gr"o"ser... 
	BNN	test,Buchst   ...oder kleiner $10$
	ADD	z,z,'0'	also kleiner
	JMP	Speichern
Buchst	SUB	z,z,10	also {\tt z} $\geq 10$
	ADD	z,z,'A'   
Speichern	STB	z,String
	LDA	$255,String	Ausgabe
	TRAP	0,Fputs,StdOut
	TRAP 0,Halt,0