📄 gaixian.lst
字号:
0115 F7 191 MOV @R1,A
0116 09 192 INC R1
0117 18 193 DEC R0
0118 DAFA 194 DJNZ R2,M_SV_ADV
011A 893F 195 MOV ADVAVRA,R1
011C 300423 196 JNB ADOK,M_SV_NEXT
011F 12050B 197 LCALL CALC_H
198
199 ;AD Value save in 2eh 2dl,max=0xffff
200
201 ;
0122 AA2E 202 MOV R2,2EH
0124 AB2D 203 MOV R3,2DH
204 ;LCALL READC
205 ;MOV R2,ADVADDRT
206 ;MOV R3,ADVADDRT+1
207
208
0126 120645 209 LCALL HEX2BCD
0129 7930 210 MOV R1,#DSPBUF
211
012B 120665 212 LCALL BCDEXPD
012E 30080E 213 JNB NH,M_SV_SHOW
0131 75301F 214 MOV DSPBUF,#31
0134 D293 215 SETB DMPOS
0136 A293 216 MOV C,DMPOS
0138 9205 217 MOV DPPOS,C
013A 4003 218 JC M_SV_SHOW
013C 753020 219 MOV DSPBUF,#32
013F 12054A 220 M_SV_SHOW:LCALL DISPLAY
0142 053D 221 M_SV_NEXT:INC ADVAVRN
0144 E53D 222 MOV A,ADVAVRN
0146 B53E00 223 CJNE A,ADVAVRM,M_SV_OK?
0149 409E 224 M_SV_OK?:JC M_LOOP
014B D204 225 SETB ADOK
014D 753D00 226 MOV ADVAVRN,#0
0150 753F50 227 MOV ADVAVRA,#ADV_SV_B
0153 8094 228 SJMP M_LOOP
0155 22 229 RET
230 ;UNIVERSAL IIC CONTROL FUNCTION---BEGIN
0156 D290 231 IICSTA: SETB SDA
0158 D291 232 SETB SCL
015A 00 233 NOP
015B 00 234 NOP
015C 00 235 NOP
015D 00 236 NOP
015E 00 237 NOP
015F 00 238 NOP
0160 C290 239 CLR SDA
0162 00 240 NOP
0163 00 241 NOP
0164 00 242 NOP
0165 00 243 NOP
0166 00 244 NOP
0167 00 245 NOP
0168 C291 246 CLR SCL
016A 00 247 NOP
016B 00 248 NOP
016C 22 249 RET
016D C290 250 IICSTOP: CLR SDA
016F D291 251 SETB SCL
0171 00 252 NOP
0172 00 253 NOP
0173 00 254 NOP
0174 00 255 NOP
0175 00 256 NOP
A51 MACRO ASSEMBLER GAIXIAN 10/26/2006 13:09:06 PAGE 5
0176 00 257 NOP
0177 D290 258 SETB SDA
0179 00 259 NOP
017A 00 260 NOP
017B 00 261 NOP
017C 00 262 NOP
017D 00 263 NOP
017E 00 264 NOP
017F C291 265 CLR SCL
0181 00 266 NOP
0182 00 267 NOP
0183 22 268 RET
0184 C290 269 IICACK_O:CLR SDA
0186 D291 270 SETB SCL
0188 00 271 NOP
0189 00 272 NOP
018A 00 273 NOP
018B 00 274 NOP
018C 00 275 NOP
018D 00 276 NOP
018E 00 277 NOP
018F C291 278 CLR SCL
0191 00 279 NOP
0192 00 280 NOP
0193 22 281 RET
0194 D290 282 IICACK_I:SETB SDA
0196 D291 283 SETB SCL
0198 00 284 NOP
0199 00 285 NOP
019A 00 286 NOP
019B A290 287 MOV C,SDA
019D 92D5 288 MOV FO,C
019F C291 289 CLR SCL
01A1 00 290 NOP
01A2 00 291 NOP
01A3 22 292 RET
293 ;WRITE OUT ACC,ONE BYTE
01A4 7F08 294 IICWRB: MOV R7,#8
01A6 33 295 IICWLP: RLC A
01A7 4018 296 JC IICWR1
01A9 C290 297 CLR SDA
01AB 00 298 NOP
01AC 00 299 NOP
01AD 00 300 NOP
01AE 00 301 NOP
01AF 00 302 NOP
01B0 00 303 NOP
01B1 D291 304 SETB SCL
01B3 00 305 NOP
01B4 00 306 NOP
01B5 00 307 NOP
01B6 00 308 NOP
01B7 00 309 NOP
01B8 00 310 NOP
01B9 C291 311 CLR SCL
01BB 00 312 NOP
01BC 00 313 NOP
01BD 00 314 NOP
01BE DFE6 315 DJNZ R7,IICWLP
01C0 22 316 RET
01C1 D290 317 IICWR1: SETB SDA
01C3 00 318 NOP
01C4 00 319 NOP
01C5 00 320 NOP
01C6 00 321 NOP
01C7 00 322 NOP
A51 MACRO ASSEMBLER GAIXIAN 10/26/2006 13:09:06 PAGE 6
01C8 00 323 NOP
01C9 D291 324 SETB SCL
01CB 00 325 NOP
01CC 00 326 NOP
01CD 00 327 NOP
01CE 00 328 NOP
01CF 00 329 NOP
01D0 00 330 NOP
01D1 C291 331 CLR SCL
01D3 00 332 NOP
01D4 00 333 NOP
01D5 00 334 NOP
01D6 DFCE 335 DJNZ R7,IICWLP
01D8 22 336 RET
337 ;READ IN ACC ONE BYTE
01D9 7F08 338 IICRDB: MOV R7,#8
01DB D290 339 IICRLP: SETB SDA
01DD 00 340 NOP
01DE 00 341 NOP
01DF 00 342 NOP
01E0 00 343 NOP
01E1 00 344 NOP
01E2 00 345 NOP
01E3 D291 346 SETB SCL
01E5 00 347 NOP
01E6 00 348 NOP
01E7 00 349 NOP
01E8 00 350 NOP
01E9 00 351 NOP
01EA 00 352 NOP
01EB A290 353 MOV C,SDA
01ED 33 354 RLC A
01EE C291 355 CLR SCL
01F0 00 356 NOP
01F1 00 357 NOP
01F2 00 358 NOP
01F3 DFE6 359 DJNZ R7,IICRLP
01F5 22 360 RET
361 ;UNIVERSAL IIC CONTROL FUNCTION---BEGIN
01F6 D2B2 362 IICSTA1: SETB SDA1
01F8 D2B3 363 SETB SCL1
01FA 00 364 NOP
01FB 00 365 NOP
01FC 00 366 NOP
01FD 00 367 NOP
01FE 00 368 NOP
01FF 00 369 NOP
0200 C2B2 370 CLR SDA1
0202 00 371 NOP
0203 00 372 NOP
0204 00 373 NOP
0205 00 374 NOP
0206 00 375 NOP
0207 00 376 NOP
0208 C2B3 377 CLR SCL1
020A 00 378 NOP
020B 00 379 NOP
020C 22 380 RET
020D C2B2 381 IICSTOP1: CLR SDA1
020F D2B3 382 SETB SCL1
0211 00 383 NOP
0212 00 384 NOP
0213 00 385 NOP
0214 00 386 NOP
0215 00 387 NOP
0216 00 388 NOP
A51 MACRO ASSEMBLER GAIXIAN 10/26/2006 13:09:06 PAGE 7
0217 D2B2 389 SETB SDA1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -