📄 bcd.lst
字号:
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 1
MCS-51 Family Macro Assembler A S E M - 5 1 V 1.3
=====================================================
Source File: E:\MiCrOConTroller\Coba_M-IDE\BCD1\bcd.asm
Object File: E:\MiCrOConTroller\Coba_M-IDE\BCD1\bcd.hex
List File: E:\MiCrOConTroller\Coba_M-IDE\BCD1\bcd.lst
Line I Addr Code Source
1: $MOD51
2: ;Copy right Notice
3: ;This program created by Herlambang Aribowo D3 INSEL UNDIP..
4: ;Compiled use M-IDE for MCS-51
5: ;This routine is for 16 bit Hex to BCD conversion
6: ;Accepts a 16 bit binary number in (msb)R1,R2(lsb)and results 5 digit BCD in (msb)R7,R6,R5,R4,R3(lsb
)
7:
8: ;---------------------------------------------------------------------------------------------
9: 0000 Hex2BCD:
10: 0000 79 FF MOV R1,#0fFH ; MSByte
11: 0002 7A FF MOV R2,#0FFH ; LSByte
12: ;---------------------------------------------------------------------------------------------
13: 0004 7B 00 MOV R3,#00D
14: 0006 7C 00 MOV R4,#00D
15: 0008 7D 00 MOV R5,#00D
16: 000A 7E 00 MOV R6,#00D
17: 000C 7F 00 MOV R7,#00D
18: ;---------------------------------------------------------------------------------------------
19: ; ROUTINE UTNUK PERHITUNGAN LSB RATUSAN, PULUHAN, SATUAN (R5,R4,R3)
20: ;---------------------------------------------------------------------------------------------
21: 000E 75 F0 0A MOV B,#10d
22: 0011 EA MOV A,R2
23: 0012 84 DIV AB
24: 0013 AB F0 MOV R3,B
25: 0015 75 F0 0A MOV B,#10 ; R5,R4,R3
26: 0018 84 DIV AB
27: 0019 AC F0 MOV R4,B
28: 001B FD MOV R5,A
29: 001C B9 00 02 CJNE R1,#0H,RIBUAN ; MSB ADA ISINYA GA?
30: 001F 01 4D AJMP RAMPUNG ; KONVERSI RAMPUNG
31:
32: ;---------------------------------------------------------------------------------------------
33: ; ROUTINE UTNUK PERHITUNGAN MSB PULUHAN RIBU, RIBUAN (R7, R6)
34: ;---------------------------------------------------------------------------------------------
35: 0021 RIBUAN:
36: 0021 74 06 MOV A,#6
37: 0023 2B ADD A,R3
38: 0024 75 F0 0A MOV B,#10
39: 0027 84 DIV AB
40: 0028 AB F0 MOV R3,B
41: 002A 24 05 ADD A,#5
42: 002C 2C ADD A,R4
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 2
Line I Addr Code Source
43: 002D 75 F0 0A MOV B,#10
44: 0030 84 DIV AB
45: 0031 AC F0 MOV R4,B
46: 0033 24 02 ADD A,#2
47: 0035 2D ADD A,R5
48: 0036 75 F0 0A MOV B,#10
49: 0039 84 DIV AB
50: 003A AD F0 MOV R5,B
51: 003C BE 00 02 CJNE R6,#00D,ADD_IT
52: 003F 80 01 SJMP PULUHANRIBU
53: 0041 ADD_IT:
54: 0041 2E ADD A,R6
55:
56: 0042 PULUHANRIBU:
57: 0042 FE MOV R6,A
58: 0043 D9 DC DJNZ R1,RIBUAN
59: 0045 75 F0 0A MOV B, #10D
60: 0048 EE MOV A,R6
61: 0049 84 DIV AB
62: 004A AE F0 MOV R6,B
63: 004C FF MOV R7,A
64: 004D RAMPUNG:
65: 004D 80 FE SJMP $
66: ;---------------------------------------------------------------------------------------------
67: ; RAMPUNG
68: ;---------------------------------------------------------------------------------------------
69: END
register banks used: ---
no errors
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 3
L I S T O F S Y M B O L S
=============================
SYMBOL TYPE VALUE LINE
------------------------------------------------------------
??ASEM_51 NUMBER 8051
??VERSION NUMBER 0130
AC BIT D6
ACC DATA E0
ADD_IT CODE 0041 53
B DATA F0
CY BIT D7
DPH DATA 83
DPL DATA 82
EA BIT AF
ES BIT AC
ET0 BIT A9
ET1 BIT AB
EX0 BIT A8
EX1 BIT AA
EXTI0 CODE 0003
EXTI1 CODE 0013
F0 BIT D5
HEX2BCD CODE 0000 9
IE DATA A8
IE0 BIT 89
IE1 BIT 8B
INT0 BIT B2
INT1 BIT B3
IP DATA B8
IT0 BIT 88
IT1 BIT 8A
OV BIT D2
P BIT D0
P0 DATA 80
P1 DATA 90
P2 DATA A0
P3 DATA B0
PCON DATA 87
PS BIT BC
PSW DATA D0
PT0 BIT B9
PT1 BIT BB
PULUHANRIBU CODE 0042 56
PX0 BIT B8
PX1 BIT BA
RAMPUNG CODE 004D 64
RB8 BIT 9A
RD BIT B7
REN BIT 9C
RESET CODE 0000
RI BIT 98
RIBUAN CODE 0021 35
RS0 BIT D3
RS1 BIT D4
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 4
SYMBOL TYPE VALUE LINE
------------------------------------------------------------
RXD BIT B0
SBUF DATA 99
SCON DATA 98
SINT CODE 0023
SM0 BIT 9F
SM1 BIT 9E
SM2 BIT 9D
SP DATA 81
T0 BIT B4
T1 BIT B5
TB8 BIT 9B
TCON DATA 88
TF0 BIT 8D
TF1 BIT 8F
TH0 DATA 8C
TH1 DATA 8D
TI BIT 99
TIMER0 CODE 000B
TIMER1 CODE 001B
TL0 DATA 8A
TL1 DATA 8B
TMOD DATA 89
TR0 BIT 8C
TR1 BIT 8E
TXD BIT B1
WR BIT B6
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -