📄 electronic organ.lst
字号:
A51 MACRO ASSEMBLER ELECTRONIC_ORGAN 08/18/2007 22:19:10 PAGE 1
MACRO ASSEMBLER A51 V8.00
OBJECT MODULE PLACED IN electronic organ.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE electronic organ.asm SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
0030 1 KEYBUF EQU 30H
0031 2 STH0 EQU 31H
0032 3 STL0 EQU 32H
0033 4 TEMP EQU 33H
0000 5 ORG 00H
0000 02000E 6 LJMP START
000B 7 ORG 0BH
000B 0201D9 8 LJMP INT_T0
000E 758901 9 START: MOV TMOD,#01H
0011 D2A9 10 SETB ET0
0013 D2AF 11 SETB EA
0015 12 WAIT:
0015 75B0FF 13 MOV P3,#0FFH
0018 C2B4 14 CLR P3.4
001A E5B0 15 MOV A,P3
001C 540F 16 ANL A,#0FH
001E 640F 17 XRL A,#0FH
0020 6061 18 JZ NOKEY1
0022 1201D0 19 LCALL DELY10MS
0025 E5B0 20 MOV A,P3
0027 540F 21 ANL A,#0FH
0029 640F 22 XRL A,#0FH
002B 6056 23 JZ NOKEY1
002D E5B0 24 MOV A,P3
002F 540F 25 ANL A,#0FH
0031 B40E06 26 CJNE A,#0EH,NK1
0034 753003 27 MOV KEYBUF,#3
0037 020056 28 LJMP DK1
003A B40D06 29 NK1: CJNE A,#0DH,NK2
003D 753002 30 MOV KEYBUF,#2
0040 020056 31 LJMP DK1
0043 B40B06 32 NK2: CJNE A,#0BH,NK3
0046 753001 33 MOV KEYBUF,#1
0049 020056 34 LJMP DK1
004C B40706 35 NK3: CJNE A,#07H,NK4
004F 753000 36 MOV KEYBUF,#0
0052 020056 37 LJMP DK1
0055 00 38 NK4: NOP
0056 39 DK1:
0056 E530 40 MOV A,KEYBUF
0058 9001E2 41 MOV DPTR,#TABLE
005B 93 42 MOVC A,@A+DPTR
005C F580 43 MOV P0,A
005E E530 44 MOV A,KEYBUF
0060 75F002 45 MOV B,#2
0063 A4 46 MUL AB
0064 F533 47 MOV TEMP,A
0066 9001F2 48 MOV DPTR,#TABLE1
0069 93 49 MOVC A,@A+DPTR
006A F531 50 MOV STH0,A
006C F58C 51 MOV TH0,A
006E 0533 52 INC TEMP
0070 E533 53 MOV A,TEMP
0072 93 54 MOVC A,@A+DPTR
0073 F532 55 MOV STL0,A
0075 F58A 56 MOV TL0,A
0077 D28C 57 SETB TR0
58
A51 MACRO ASSEMBLER ELECTRONIC_ORGAN 08/18/2007 22:19:10 PAGE 2
0079 E5B0 59 DK1A: MOV A,P3
007B 540F 60 ANL A,#0FH
007D 640F 61 XRL A,#0FH
007F 70F8 62 JNZ DK1A
0081 C28C 63 CLR TR0
0083 64 NOKEY1:
0083 75B0FF 65 MOV P3,#0FFH
0086 C2B5 66 CLR P3.5
0088 E5B0 67 MOV A,P3
008A 540F 68 ANL A,#0FH
008C 640F 69 XRL A,#0FH
008E 6061 70 JZ NOKEY2
0090 1201D0 71 LCALL DELY10MS
0093 E5B0 72 MOV A,P3
0095 540F 73 ANL A,#0FH
0097 640F 74 XRL A,#0FH
0099 6056 75 JZ NOKEY2
009B E5B0 76 MOV A,P3
009D 540F 77 ANL A,#0FH
009F B40E06 78 CJNE A,#0EH,NK5
00A2 753007 79 MOV KEYBUF,#7
00A5 0200C4 80 LJMP DK2
00A8 B40D06 81 NK5: CJNE A,#0DH,NK6
00AB 753006 82 MOV KEYBUF,#6
00AE 0200C4 83 LJMP DK2
00B1 B40B06 84 NK6: CJNE A,#0BH,NK7
00B4 753005 85 MOV KEYBUF,#5
00B7 0200C4 86 LJMP DK2
00BA B40706 87 NK7: CJNE A,#07H,NK8
00BD 753004 88 MOV KEYBUF,#4
00C0 0200C4 89 LJMP DK2
00C3 00 90 NK8: NOP
00C4 91 DK2:
00C4 E530 92 MOV A,KEYBUF
00C6 9001E2 93 MOV DPTR,#TABLE
00C9 93 94 MOVC A,@A+DPTR
00CA F580 95 MOV P0,A
00CC E530 96 MOV A,KEYBUF
00CE 75F002 97 MOV B,#2
00D1 A4 98 MUL AB
00D2 F533 99 MOV TEMP,A
00D4 9001F2 100 MOV DPTR,#TABLE1
00D7 93 101 MOVC A,@A+DPTR
00D8 F531 102 MOV STH0,A
00DA F58C 103 MOV TH0,A
00DC 0533 104 INC TEMP
00DE E533 105 MOV A,TEMP
00E0 93 106 MOVC A,@A+DPTR
00E1 F532 107 MOV STL0,A
00E3 F58A 108 MOV TL0,A
00E5 D28C 109 SETB TR0
110
111
00E7 E5B0 112 DK2A: MOV A,P3
00E9 540F 113 ANL A,#0FH
00EB 640F 114 XRL A,#0FH
00ED 70F8 115 JNZ DK2A
00EF C28C 116 CLR TR0
00F1 117 NOKEY2:
00F1 75B0FF 118 MOV P3,#0FFH
00F4 C2B6 119 CLR P3.6
00F6 E5B0 120 MOV A,P3
00F8 540F 121 ANL A,#0FH
00FA 640F 122 XRL A,#0FH
00FC 6061 123 JZ NOKEY3
00FE 1201D0 124 LCALL DELY10MS
A51 MACRO ASSEMBLER ELECTRONIC_ORGAN 08/18/2007 22:19:10 PAGE 3
0101 E5B0 125 MOV A,P3
0103 540F 126 ANL A,#0FH
0105 640F 127 XRL A,#0FH
0107 6056 128 JZ NOKEY3
0109 E5B0 129 MOV A,P3
010B 540F 130 ANL A,#0FH
010D B40E06 131 CJNE A,#0EH,NK9
0110 75300B 132 MOV KEYBUF,#11
0113 020132 133 LJMP DK3
0116 B40D06 134 NK9: CJNE A,#0DH,NK10
0119 75300A 135 MOV KEYBUF,#10
011C 020132 136 LJMP DK3
011F B40B06 137 NK10: CJNE A,#0BH,NK11
0122 753009 138 MOV KEYBUF,#9
0125 020132 139 LJMP DK3
0128 B40706 140 NK11: CJNE A,#07H,NK12
012B 753008 141 MOV KEYBUF,#8
012E 020132 142 LJMP DK3
0131 00 143 NK12: NOP
0132 144 DK3:
0132 E530 145 MOV A,KEYBUF
0134 9001E2 146 MOV DPTR,#TABLE
0137 93 147 MOVC A,@A+DPTR
0138 F580 148 MOV P0,A
013A E530 149 MOV A,KEYBUF
013C 75F002 150 MOV B,#2
013F A4 151 MUL AB
0140 F533 152 MOV TEMP,A
0142 9001F2 153 MOV DPTR,#TABLE1
0145 93 154 MOVC A,@A+DPTR
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -