		Org	*
*********** ASCII TO HEXA ***************
ASCII_HEX          
	Push	A			;Simpan Acc A di Stack Pointer
	Mov	A,B			;Konversikan Acc B ke Hexa
	Acall	ASCII_Hex1		;
	Mov	B,A			;Simpan hasil di B
	Pop	A			;Konversikan Acc A ke Hexa
	Acall	ASCII_Hex1		;
	Swap	A			;Pindahkan hasil konversi ke nibble
	Add	A,B			;atas dan jumlahkan dengan B
	Ret	

ASCII_Hex1:
	Cjne	A,#03AH,*+3
	Jnc	Karakter
	Clr	C
	Subb	A,#30H
	Ret

Karakter:
	Clr	C
	Subb	A,#37H
	Ret	

