;入口條件：字節數在R7中，操作數在[R0]中。
;出口信息：結果仍在[R0]中，移出的十進制最高位在R3中。
;影響資源：PSW、A、R2、R3    堆棧需求：  ２字節

BRLN:	MOV	A,R7	;取字節數至R2中
   	MOV	R2,A
	ADD	A,R0	;初始化數據指針
	MOV	R0,A
	MOV	R3,#0	;工作單元初始化
BRL1:	DEC	R0	;調整數據指針
	MOV	A,@R0	;取一字節
	SWAP	A	;交換十進制高低位
	MOV	@R0,A	;存回
	MOV	A,R3	;取低字節移出的十進制高位
	XCHD	A,@R0	;換出本字節的十進制高位
	MOV	R3,A	;保存本字節的十進制高位
	DJNZ	R2,BRL1	;處理完所有字節
	RET