📄 p762.lst
字号:
A51 MACRO ASSEMBLER P762 30/11/00 21:46:04 PAGE 1
DOS MACRO ASSEMBLER A51 X4.86
OBJECT MODULE PLACED IN C:\MEDWIN\762\P762.OBJ
ASSEMBLER INVOKED BY: C:\MEDWIN\762\A51.EXE C:\MEDWIN\762\P762.ASM DB
LOC OBJ LINE SOURCE
1 ;***********************************************************************
2 ;医院寻呼，OEM。无线发射部分
3 ; TELEPHOES TO POCSAG PROGRAM
4 ;
5 ; 1999.11 COPYRIGHT TENSUN LTD
6 ;
7 ;***********************************************************************
8 ; I/O PORT PIN DEFINED
9
0087 10 SEND_PTT BIT P0.7
0086 11 POC_MOD BIT P0.6
12
0080 13 VCO_LE BIT P0.0
0085 14 VCO_SK BIT P0.5
0094 15 VCO_DATA BIT P1.4
16
0084 17 CS_93C BIT P0.4
0083 18 SK_93C BIT P0.3
0082 19 DI_93C BIT P0.2
0081 20 DO_93C BIT P0.1
21
0097 22 KEYS1 BIT P1.7 ; KEYBORD DEFINE
0096 23 KEYS2 BIT P1.6
24
0090 25 JM_DATA BIT P1.0
0091 26 JM_XIAOYIN BIT P1.1
0093 27 JM_TONGBU BIT P1.3
28
29 ;=================== PHILIPS PLC SFR DEFINED BEGAIN =======================
00A6 30 WDRST EQU 0A6H
00A7 31 WDCON EQU 0A7H
00B9 32 SADEN EQU 0B9H
00A9 33 SADDR EQU 0A9H
00F6 34 PT0AD EQU 0F6H
00A5 35 P2M2 EQU 0A5H
00A4 36 P2M1 EQU 0A4H
0092 37 P1M2 EQU 092H
0091 38 P1M1 EQU 091H
0085 39 P0M2 EQU 085H
0084 40 P0M1 EQU 084H
0086 41 KBI EQU 086H
00F7 42 IP1H EQU 0F7H
00F8 43 IP1 EQU 0F8H
00B7 44 IP0H EQU 0B7H
00B8 45 IP0 EQU 0B8H
00E8 46 IEN1 EQU 0E8H
00A8 47 IEN0 EQU 0A8H
00D9 48 I2DAT EQU 0D9H
00D8 49 I2CON EQU 0D8H
00C8 50 I2CFG EQU 0C8H
0095 51 DIVM EQU 095H
00AD 52 CMP2 EQU 0ADH
00AC 53 CMP1 EQU 0ACH
00A2 54 AUXR1 EQU 0A2H
55 ;=================== PHILIPS PLC SFR DEFINED END =============================
56
57 ;***********************************************************************
58 ; SYSTEM DATA RESIGTER DEFINED
A51 MACRO ASSEMBLER P762 30/11/00 21:46:04 PAGE 2
59
0020 60 SYS_STATUS EQU 20H
61 ; .0 POCSAG SENDING
62 ; .1 HAVE DATA DON'T SENDED
63
64 ; .6 KEY1 ON
65 ; .7 KEY2 ON
66
0021 67 DATA_NUM EQU 21H
68
0025 69 SENDING_DATA EQU 25H
0026 70 ZHENG_HAO EQU 26H
71
0027 72 SEND_BYTE EQU 27H
0028 73 SEND_BIT_NUM EQU 28H
0029 74 SEND_BYTE_NUM EQU 29H
002A 75 SEND_BYTE_NUM2 EQU 2AH
002B 76 Next_Step EQU 2BH
77
002C 78 SYS_DELAY1 EQU 2CH
002D 79 SYS_DELAY EQU 2DH ; TIMER WDT
002E 80 OLD_DELAY EQU 2EH
81
0030 82 FREQ_NH EQU 30H
0031 83 FREQ_NL EQU 31H
0032 84 FREQ_A EQU 32H
85
0033 86 ADD_93C_L EQU 33H
0034 87 BYTE1_93C EQU 34H
0035 88 BYTE2_93C EQU 35H
89
0008 90 OLD_BUFFER EQU 08H ; 08H -- 17H 16 BYTES
0040 91 HAO_BUFFER EQU 40H ; 40H -- 4FH 16 BYTES
92
0050 93 POCSAG_BUFFER EQU 50H ; 50H -- 57H 8 BYTES
94
005F 95 SP_START EQU 5FH
96
97 ;***********************************************************************
0000 98 ORG 0000H
0000 0166 99 AJMP SYS_START
100
0003 101 ORG 0003H ; INT0
0003 C2A8 102 CLR EX0
0005 A14E 103 AJMP DATAIN_INT0
0007 00 104 NOP
0008 00 105 NOP
106
107
000B 108 ORG 000BH ; TIME0 OUT
000B C2A9 109 CLR ET0
000D 2159 110 AJMP POCSAG_SEND
000F 00 111 NOP
0010 00 112 NOP
113
0013 114 ORG 0013H ; INT1
0013 C2AA 115 CLR EX1
0015 32 116 RETI
0016 00 117 NOP
0017 00 118 NOP
119
001B 120 ORG 001BH ; TIME1 OUT
001B C2AB 121 CLR ET1
001D 81DF 122 AJMP TIMER_OUT
001F 00 123 NOP
0020 00 124 NOP
A51 MACRO ASSEMBLER P762 30/11/00 21:46:04 PAGE 3
0021 00 125 NOP
126
0023 127 ORG 0023H ; COM I/O
0023 C2AC 128 CLR ES
0025 32 129 RETI
0026 00 130 NOP
0027 00 131 NOP
132
002B 133 ORG 002BH ;TIME2 OUT
134
002B 32 135 RETI
002C 00 136 NOP
002D 00 137 NOP
138
0033 139 ORG 0033H
0033 C2E8 140 CLR IEN1.0
0035 32 141 RETI
0036 00 142 NOP
0037 00 143 NOP
144
003B 145 ORG 003BH
003B C2E9 146 CLR IEN1.1
003D 32 147 RETI
003E 00 148 NOP
003F 00 149 NOP
150
0043 151 ORG 0043H
0043 C2EA 152 CLR IEN1.2
0045 32 153 RETI
0046 00 154 NOP
0047 00 155 NOP
156
0053 157 ORG 0053H ; WDT TIMER OUT
0053 C2AE 158 CLR IEN0.6
0055 75A61E 159 MOV WDRST,#01EH ; CLR WDT
0058 75A6E1 160 MOV WDRST,#0E1H
005B 75A715 161 MOV WDCON,#015H ; WDT ENABLE 330 ~ 719 MS RESET
005E 01D0 162 AJMP SYS_AGAIN
0060 00 163 NOP
0061 00 164 NOP
165
0063 166 ORG 0063H
0063 C2ED 167 CLR IEN1.5
0065 32 168 RETI
169
170 ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
0066 171 SYS_START:
0066 00 172 NOP
0067 00 173 NOP
0068 75A61E 174 MOV WDRST,#01EH ; i CLR WDT
006B 00 175 NOP
006C 75A6E1 176 MOV WDRST,#0E1H
006F 00 177 NOP
0070 00 178 NOP
0071 75A715 179 MOV WDCON,#015H ; WDT ENABLE 330 ~ 719 MS RESET
180
0074 758500 181 MOV P0M2,#00H ; P0 PORT OUTPUT
0077 758400 182 MOV P0M1,#00H
183
007A 759200 184 MOV P1M2,#00H
007D 759100 185 MOV P1M1,#00H
186
0080 75801E 187 MOV P0,#01EH
0083 759000 188 MOV P1,#00H
0086 00 189 NOP
0087 00 190 NOP
A51 MACRO ASSEMBLER P762 30/11/00 21:46:04 PAGE 4
0088 F132 191 ACALL DELAY
008A 00 192 NOP
008B 00 193 NOP
008C 7F00 194 MOV R7,#00H
008E 30840E 195 JNB CS_93C,EXTENAL_PROGRAM
0091 00 196 NOP
0092 00 197 NOP
0093 308209 198 JNB DI_93C,EXTENAL_PROGRAM
0096 00 199 NOP
0097 00 200 NOP
0098 308304 201 JNB SK_93C,EXTENAL_PROGRAM
009B 00 202 NOP
009C 00 203 NOP
009D 01A9 204 AJMP SYS_START2
205
009F 206 EXTENAL_PROGRAM:
009F 00 207 NOP
00A0 00 208 NOP
00A1 F132 209 ACALL DELAY
00A3 00 210 NOP
00A4 00 211 NOP
00A5 DFF8 212 DJNZ R7,EXTENAL_PROGRAM
00A7 00 213 NOP
00A8 00 214 NOP
215
00A9 216 SYS_START2:
217
00A9 7585FD 218 MOV P0M2,#0FDH ; P0 PORT OUTPUT
00AC 758400 219 MOV P0M1,#00H
220
00AF 759210 221 MOV P1M2,#10H
00B2 759100 222 MOV P1M1,#00H
223
00B5 758002 224 MOV P0,#02H
00B8 7590EF 225 MOV P1,#0EFH
00BB 00 226 NOP
00BC 00 227 NOP
00BD 752000 228 MOV SYS_STATUS,#00H
00C0 752100 229 MOV DATA_NUM,#00H
230
00C3 C2AF 231 CLR EA
00C5 75815F 232 MOV SP,#SP_START
00C8 00 233 NOP
00C9 00 234 NOP
00CA F132 235 ACALL DELAY
00CC 00 236 NOP
00CD 00 237 NOP
00CE C289 238 CLR IE0
239
240 ; TEST PROGRAM
241
00D0 242 SYS_AGAIN:
00D0 00 243 NOP
00D1 00 244 NOP
00D2 75A61E 245 MOV WDRST,#01EH ; CLR WDT
00D5 00 246 NOP
00D6 75A6E1 247 MOV WDRST,#0E1H
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -