📄 dg_2_51.lst
字号:
A51 MACRO ASSEMBLER DG_2_51 03/17/2009 12:03:53 PAGE 1
MACRO ASSEMBLER A51 V6.02
OBJECT MODULE PLACED IN C:\cai01\PROTEL\南邮张老师\ASM程序\DG_2_51.OBJ
ASSEMBLER INVOKED BY: C:\Manley\COMP51V6\A51.EXE C:\cai01\PROTEL\南邮张老师\ASM程序\DG_2_51.asm DB
LOC OBJ LINE SOURCE
1 ;--南邮电工实验箱实验仪--按键电平及1HZ信号发生器 (AT8951)----2008/08/24----------
2 ; 使用扫描键盘,及BEEP,OSC=12MHz,增加脉冲输出电平指示
3 ;--------------------- 2004/11/04 ---------------------------------------------------------
-----
4
0090 5 KEY1 BIT P1.0
0091 6 KEY2 BIT P1.1
0092 7 KEY3 BIT P1.2
0093 8 KEY4 BIT P1.3
0094 9 KEY5 BIT P1.4
0095 10 KEY6 BIT P1.5
0096 11 KEY7 BIT P1.6
0097 12 KEY8 BIT P1.7
0080 13 LED1 BIT P0.0
0081 14 LED2 BIT P0.1
0082 15 LED3 BIT P0.2
0083 16 LED4 BIT P0.3
0084 17 LED5 BIT P0.4
0085 18 LED6 BIT P0.5
0086 19 LED7 BIT P0.6
0087 20 LED8 BIT P0.7
00A0 21 SOUT1 BIT P2.0
00A1 22 SOUT2 BIT P2.1
00A2 23 SOUT3 BIT P2.2
00A3 24 SOUT4 BIT P2.3
00A4 25 SOUT5 BIT P2.4
00A5 26 SOUT6 BIT P2.5
00A6 27 SOUT7 BIT P2.6
00A7 28 SOUT8 BIT P2.7
0080 29 LED_PORT EQU P0
0090 30 KEY_PORT EQU P1
00A0 31 SOUT_PORT EQU P2
00B3 32 KEY_PLS BIT P3.3
00B7 33 SOUT_PLS BIT P3.7
00B6 34 SOUT_NPLS BIT P3.6
00B1 35 SOUT_1HZ BIT P3.1
00B4 36 LED_P BIT P3.4
00B5 37 LED_NP BIT P3.5
38
0024 39 BUFF_T0 EQU 24H ; FOR TIME0
0025 40 SCAN_LP EQU 25H ; FOR LAMP
0026 41 BUFF_SPEED EQU 26H
0027 42 BUFF_KEY EQU 27H
0028 43 BUFF_FKEY EQU 28H
0029 44 BUFF_SOUT EQU 29H
002A 45 BUFF_DEL EQU 2AH
00DC 46 TH0_NUM EQU 220 ;T0=5MS
0000 47 TL0_NUM EQU 00
48
0000 49 ORG 000H
0000 803E 50 JMP MSTART
0003 51 ORG 003H
0003 80FB 52 JMP 000H
000B 53 ORG 00BH
000B 216D 54 JMP TIMER0 ;产生1HZ信号
0013 55 ORG 013H
0013 80EB 56 JMP 000H
001B 57 ORG 01BH
A51 MACRO ASSEMBLER DG_2_51 03/17/2009 12:03:53 PAGE 2
001B 80E3 58 JMP 000H
0023 59 ORG 023H
0023 80DB 60 JMP 000H
002B 61 ORG 02BH
002B 80D3 62 JMP 000H
0040 63 ORG 040H
0040 75A800 64 MSTART: MOV IE,#00H
0043 7590FF 65 MOV P1,#0FFH
0046 75B0FF 66 MOV P3,#0FFH
0049 758000 67 MOV P0,#00H
004C 75D000 68 MOV PSW,#00H
004F 758140 69 MOV SP,#40H
0052 7400 70 MOV A,#00H
0054 787F 71 MOV R0,#7FH
0056 F6 72 CLR_RAM: MOV @R0,A ;清20-7FH
0057 D8FD 73 DJNZ R0,CLR_RAM
0059 758911 74 MOV TMOD,#11H
005C 758CB1 75 MOV TH0,#HIGH(65536-20000) ;TH0_NUM
005F 758AE0 76 MOV TL0,#LOW(65536-20000) ;TL0_NUM
0062 752AC8 77 MOV BUFF_DEL,#200
0065 120147 78 LCALL DEL1MS
0068 7590FF 79 MOV KEY_PORT,#0FFH
006B 75A000 80 MOV SOUT_PORT,#00H
006E C2B7 81 CLR SOUT_PLS
0070 D2B4 82 SETB LED_P
0072 D2B6 83 SETB SOUT_NPLS
0074 C2B5 84 CLR LED_NP
0076 7580FF 85 MOV LED_PORT,#0FFH
0079 D28C 86 SETB TR0
007B D2A9 87 SETB ET0
007D D2AF 88 SETB EA
007F 752A32 89 MAIN_LP: MOV BUFF_DEL,#50
0082 120147 90 LCALL DEL1MS
0085 30B314 91 JNB KEY_PLS,PROC_KPLS
0088 E590 92 MOV A,KEY_PORT
008A F527 93 MOV BUFF_KEY,A
008C 752A32 94 MOV BUFF_DEL,#50
008F 120147 95 LCALL DEL1MS
0092 E590 96 MOV A,KEY_PORT
0094 B527E8 97 CJNE A,BUFF_KEY,MAIN_LP
0097 B4FF1D 98 CJNE A,#0FFH,JUD_KEYS
009A 80E3 99 JMP MAIN_LP
009C B2B7 100 PROC_KPLS:CPL SOUT_PLS ;产生单脉冲信号!
009E B2B6 101 CPL SOUT_NPLS
00A0 B2B4 102 CPL LED_P
00A2 B2B5 103 CPL LED_NP
00A4 752A32 104 MOV BUFF_DEL,#50
00A7 120147 105 LCALL DEL1MS
00AA B2B7 106 CPL SOUT_PLS ;产生单脉冲信号!
00AC B2B6 107 CPL SOUT_NPLS
00AE B2B4 108 CPL LED_P
00B0 B2B5 109 CPL LED_NP
00B2 30B3FD 110 JNB KEY_PLS,$
00B5 80C8 111 JMP MAIN_LP
00B7 309015 112 JUD_KEYS: JNB KEY1,PROC_K1
00BA 309121 113 JNB KEY2,PROC_K2
00BD 30922D 114 JNB KEY3,PROC_K3
00C0 309339 115 JNB KEY4,PROC_K4
00C3 309445 116 JNB KEY5,PROC_K5
00C6 309551 117 JNB KEY6,PROC_K6
00C9 30965D 118 JNB KEY7,PROC_K7
00CC 309769 119 JNB KEY8,PROC_K8
00CF B280 120 PROC_K1: CPL LED1
00D1 B2A0 121 CPL SOUT1
00D3 3090FD 122 JNB KEY1,$
00D6 752A64 123 MOV BUFF_DEL,#100
A51 MACRO ASSEMBLER DG_2_51 03/17/2009 12:03:53 PAGE 3
00D9 120147 124 LCALL DEL1MS
00DC 80A1 125 JMP MAIN_LP
00DE B281 126 PROC_K2: CPL LED2
00E0 B2A1 127 CPL SOUT2
00E2 3091FD 128 JNB KEY2,$
00E5 752A64 129 MOV BUFF_DEL,#100
00E8 120147 130 LCALL DEL1MS
00EB 8092 131 JMP MAIN_LP
00ED B282 132 PROC_K3: CPL LED3
00EF B2A2 133 CPL SOUT3
00F1 3092FD 134 JNB KEY3,$
00F4 752A64 135 MOV BUFF_DEL,#100
00F7 120147 136 LCALL DEL1MS
00FA 8083 137 JMP MAIN_LP
00FC B283 138 PROC_K4: CPL LED4
00FE B2A3 139 CPL SOUT4
0100 3093FD 140 JNB KEY4,$
0103 752A64 141 MOV BUFF_DEL,#100
0106 120147 142 LCALL DEL1MS
0109 017F 143 JMP MAIN_LP
010B B284 144 PROC_K5: CPL LED5
010D B2A4 145 CPL SOUT5
010F 3094FD 146 JNB KEY5,$
0112 752A64 147 MOV BUFF_DEL,#100
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -