📄 subproc.lst
字号:
A51 MACRO ASSEMBLER SUBPROC 03/24/2008 22:05:20 PAGE 1
MACRO ASSEMBLER A51 V7.07
OBJECT MODULE PLACED IN SubProc.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE SubProc.asm SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
1 ;基于串口通讯的子程序调试软件
2 ;大强制作
3 ;nie_zq@163.net
4
0010 5 RX0 EQU 10H
0011 6 RX1 EQU 11H
0012 7 RX2 EQU 12H
0013 8 RX3 EQU 13H
0014 9 RX4 EQU 14H
0015 10 TX0 EQU 15H
0016 11 TX1 EQU 16H
0017 12 TX2 EQU 17H
0018 13 TX3 EQU 18H
0019 14 TX4 EQU 19H
0011 15 PARAM0 EQU 11H
0012 16 PARAM1 EQU 12H
0013 17 PARAM2 EQU 13H
0014 18 PARAM3 EQU 14H
0016 19 RET0 EQU 16H
0017 20 RET1 EQU 17H
0018 21 RET2 EQU 18H
0019 22 RET3 EQU 19H
23
24
25 ;---------------------------------------------------
0000 26 ORG 0000H
0000 802E 27 SJMP INIT_COM
0023 28 ORG 0023H
0023 01E0 29 AJMP COM_INT
0030 30 ORG 0030H
0030 D2B0 31 INIT_COM: SETB P3.0
0032 D2B1 32 SETB P3.1
0034 75B800 33 MOV IP,#00H
34 ;SCON: SM0|SM1|SM2|REN|TB8|RB8|TI|RI
0037 7598D0 35 MOV SCON,#11010000B ; 1 1 0 1 0 0 0 0
003A 7587FF 36 MOV PCON,#11111111B
003D 758800 37 MOV TCON,#00H
0040 75A800 38 MOV IE,#00H
0043 758DFF 39 MOV TH1,#0FFH;波特率28800*TMOD
0046 758BFF 40 MOV TL1,#0FFH
41 ;TMOD: GATE|C/!T|M1|M0|GATE|C/!T|M1|M0
0049 758920 42 MOV TMOD,#00100000B; 0 0 1 0 0 0 0 1
004C D28E 43 SETB TR1
004E D2AC 44 SETB ES
0050 D2AF 45 SETB EA
0052 758150 46 MOV SP,#50H
47 ;------------------------------------------------
0055 C2B3 48 CLR P3.3;Vpp=5V
0057 C2B4 49 CLR P3.4
0059 80FE 50 SJMP $
51
52 ;------------------------------------------------
53 ; 在下面添加被调试的子程序入
54 ;------------------------------------------------
005B C2B3 55 PROCESS_1: CLR P3.3;Vpp=0v
005D D2B4 56 SETB P3.4
005F 751600 57 MOV TX1,#0;显示0v
0062 22 58 RET
A51 MACRO ASSEMBLER SUBPROC 03/24/2008 22:05:20 PAGE 2
59
0063 C2B3 60 PROCESS_2: CLR P3.3;Vpp=5V
0065 C2B4 61 CLR P3.4
0067 751605 62 MOV TX1,#5;显示5v
006A 22 63 RET
64
006B C2B4 65 PROCESS_3: CLR P3.4;Vpp=12v
006D D2B3 66 SETB P3.3
006F 75160C 67 MOV TX1,#12;显示12v
0072 22 68 RET
69
0073 70 PROCESS_4:
0073 22 71 RET
72
0074 73 PROCESS_5:
0074 22 74 RET
75
0075 76 PROCESS_6:
0075 22 77 RET
78
79 ;--------------------------------------------------------------------------
80 ;
81 ;--------------------------------------------------------------------------
82
0076 7E05 83 DELAY: MOV R6,#5
0078 7D05 84 MOV R5,#5
007A DEFE 85 DJNZ R6,$
007C DDFE 86 DJNZ R5,$
007E DFF6 87 DJNZ R7,DELAY
0080 22 88 RET
89
0081 C2AC 90 TX_PC: CLR ES ;发送5个字节
0083 C299 91 CLR TI
0085 851599 92 MOV SBUF,TX0
0088 3099FD 93 JNB TI,$
008B C299 94 CLR TI
008D 851699 95 MOV SBUF,TX1
0090 3099FD 96 JNB TI,$
0093 C299 97 CLR TI
0095 851799 98 MOV SBUF,TX2
0098 3099FD 99 JNB TI,$
009B C299 100 CLR TI
009D 851899 101 MOV SBUF,TX3
00A0 3099FD 102 JNB TI,$
00A3 C299 103 CLR TI
00A5 851999 104 MOV SBUF,TX4
00A8 3099FD 105 JNB TI,$
00AB C299 106 CLR TI
00AD D2AC 107 SETB ES
00AF 22 108 RET
109
00B0 C2AC 110 RX_PC: CLR ES ;接收5个字节
00B2 3098FD 111 JNB RI,$
00B5 859910 112 MOV RX0,SBUF
00B8 851015 113 MOV TX0,RX0
00BB C298 114 CLR RI
00BD 3098FD 115 JNB RI,$
00C0 859911 116 MOV RX1,SBUF
00C3 C298 117 CLR RI
00C5 3098FD 118 JNB RI,$
00C8 859912 119 MOV RX2,SBUF
00CB C298 120 CLR RI
00CD 3098FD 121 JNB RI,$
00D0 859913 122 MOV RX3,SBUF
00D3 C298 123 CLR RI
00D5 3098FD 124 JNB RI,$
A51 MACRO ASSEMBLER SUBPROC 03/24/2008 22:05:20 PAGE 3
00D8 859914 125 MOV RX4,SBUF
00DB C298 126 CLR RI
00DD D2AC 127 SETB ES
00DF 32 128 RETI
129
00E0 130 COM_INT: ;PUSH A;串口中断服务
00E0 C000 131 PUSH 00H
00E2 309903 132 JNB TI,RX_INT
00E5 D000 133 POP 00H
134 ;POP A
00E7 32 135 RETI
136
00E8 1200B0 137 RX_INT: LCALL RX_PC
00EB E510 138 MOV A,RX0 ;接收缓冲中的第一个字节是命令,后4个是参数
139
00ED B40005 140 CJNE A,#00H,IS_WAIT;00表示设置引脚电平
00F0 120168 141 LCALL UPDATE_PINS
00F3 804C 142 SJMP TX_RETS
143
00F5 B4FF11 144 IS_WAIT: CJNE A,#0FFH,AA ;FF表示暂停，显示程序指针
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -