编写将一个十六进制数转换为十进制数的子程序。

> 0000  78FE      2  MOV R0，#FEH
0002  7930      3  MOV R1，#30H
0004  E8        4 HEXBCD:// MOV A，R0
0005  75F064    5  MOV B，#100
0008  84        6  DIV AB
0009  F7        7  MOV @R1，A
000A  740A      8  MOV A，#10   
000C  C5F0      9  XCH A，B   
000E  84        10  DIV AB   
000F  09        11  INC R1   
0010  F7        12  MOV @R1，A  
0011  09        13  INC R1   
0012  A7F0      14  MOV @R1，B           
15  RET

略