umwandeln.asm


1
;**Wandelt ein Hex Zahl ins BCD format um**
2
3
Hexdec:
4
5
  MOV b,#64h
6
  DIV ab
7
  MOV A,b
8
  MOV b,#0ah
9
  DIV ab
10
  SWAP A
11
  ADD A,b
12
  RET
13
;**
14
15
;++ wandelt eine Dez zahl in eine hex um**
16
dezhex:
17
  MOV R0,A
18
  ANL A,#f0h
19
  SWAP A
20
  MOV b,#0ah
21
  MUL ab
22
  MOV b,R0
23
  ANL b,#0fh
24
  ADD A,b
25
  RET