sangna.asm

用HOLTEK单片机做的一个实际项目

MOV RH,A
MOV A,00h
MOV T4,A
MOV A,01eh
CALL MULL
MOV __Rtemperature[1],A
MOV A,T6
MOV __Rtemperature,A
#line 406 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,04eh
SUB A,__Rtemperature[1]
SNZ [0ah].0
JMP L104
SNZ [0ah].2
JMP L90
MOV A,020h
SUB A,__Rtemperature
SZ [0ah].0
JMP L90
L104:
#pragma debug scope 43 41 ; 408 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 408 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,0ffh
MOV __CurrentTemperature,A
CLR __CurrentTemperature[1]
#line 409 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 41 1 ; 409 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L87
L90:
#line 410 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,__Rtemperature[1]
SUB A,00h
SNZ [0ah].0
JMP L105
SNZ [0ah].2
JMP L92
MOV A,__Rtemperature
SUB A,014h
SZ [0ah].0
JMP L92
L105:
#pragma debug scope 44 41 ; 412 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 412 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,0f0h
MOV __CurrentTemperature,A
CLR __CurrentTemperature[1]
#line 413 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 41 1 ; 413 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L87
L92:
#pragma debug scope 45 41 ; 416 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 416 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,045h
MOV CR13,A
#line 417 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR CR14
L94:
#pragma debug scope 46 45 ; 421 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 421 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR13
ADD A,CR14
MOV b0_2,A
CLR [0AH].0
RRC b0_2
CLR [0AH].0
RLC b0_2
MOV A,1
ADD A,b0_2
ADD A,OFFSET l__TempTbl
MOV RH,A
CALL l__TempTbl
MOV CR12,A
INCA RH
CALL l__TempTbl
MOV CR12[1],A
#line 423 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,__Rtemperature[1]
SUB A,CR12[1]
SNZ [0ah].0
JMP L106
SNZ [0ah].2
JMP L98
MOV A,__Rtemperature
SUB A,CR12
SZ [0ah].0
JMP L98
L106:
#pragma debug scope 47 46 ; 425 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 425 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
DECA CR13
MOV b0_2,A
MOV A,CR14
SUB A,b0_2
SZ [0ah].0
JMP L96
#pragma debug scope 48 47 ; 427 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 427 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR13
ADD A,CR14
MOV b0_2,A
CLR [0AH].0
RRCA b0_2
MOV CR14,A
#line 428 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L94
L98:
#pragma debug scope 49 47 ; 438 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 50 46 ; 438 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 438 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
DECA CR13
MOV b0_2,A
MOV A,CR14
SUB A,b0_2
SZ [0ah].0
JMP L96
#pragma debug scope 51 50 ; 440 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 440 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR13
ADD A,CR14
MOV b0_2,A
CLR [0AH].0
RRCA b0_2
MOV CR13,A
#pragma debug scope 52 50 ; 419 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 419 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 45 41 ; 419 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L94
L96:
#line 449 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR13
ADD A,CR14
MOV b0_2,A
CLR [0AH].0
RRC b0_2
MOV A,b0_2
MOV __CurrentTemperature,A
CLR __CurrentTemperature[1]
L87:
MOV A,VT1
MOV RH,A
MOV A,VT2
MOV T2,A
MOV A,VT3
MOV T3,A
MOV A,VT4
MOV T4,A
MOV A,VT5
MOV T5,A
MOV A,VT6
MOV T6,A
MOV A,VT7
MOV T7,A
MOV A,VT8
MOV T8,A
MOV A,VS
MOV [0AH],A
MOV A,VA
RETI
__ADISR ENDP
@_ADISR .SECTION 'DATA'
b0_2 DB 2 DUP(?)
b1_2 DB ?
#line 392 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CR12 DB 2 DUP (?) ; temp
#pragma debug variable 41 CR12 temp
#line 390 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CR13 DB ? ; i
#pragma debug variable 41 CR13 i
#line 390 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CR14 DB ? ; j
#pragma debug variable 41 CR14 j
#line 458 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@@_ExternISR .SECTION AT 04H 'CODE'
JMP __ExternISR
@_ExternISR .SECTION 'CODE'
__ExternISR PROC
MOV VA,A
MOV A,[0AH]
MOV VS,A
L107:
#pragma debug scope 53 1 ; 459 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,VS
MOV [0AH],A
MOV A,VA
RETI
__ExternISR ENDP
@_ExternISR .SECTION 'DATA'
#line 465 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@safeguard_init .SECTION 'CODE'
PUBLIC _safeguard_init
_safeguard_init PROC
#pragma debug scope 54 1 ; 466 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 466 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,0dh
MOV __intc0,A
#line 468 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,086h
MOV __tmrc,A
#line 469 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,04h
MOV __tmr,A
#line 471 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,08h
MOV __adcr,A
#line 473 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,020h
MOV __pac,A
#line 474 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __pa
#line 476 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,01h
MOV __pbc,A
#line 477 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __pb
#line 479 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __pcc
#line 480 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __pc
#line 482 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __pdc
#line 483 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR __pd
L108:
RET
_safeguard_init ENDP
#line 488 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@Start_I2C .SECTION 'CODE'
PUBLIC _Start_I2C
_Start_I2C PROC
#pragma debug scope 55 1 ; 489 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 489 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].3
#line 490 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 491 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 492 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 493 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].2
#line 494 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 495 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 496 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 497 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 498 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 499 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 500 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 501 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 502 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 503 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].3
#line 504 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 505 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 506 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 507 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 508 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 509 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 510 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 511 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 512 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 513 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].2
#line 514 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 515 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 516 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 517 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
L109:
RET
_Start_I2C ENDP
#line 521 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@Stop_I2C .SECTION 'CODE'
PUBLIC _Stop_I2C
_Stop_I2C PROC
#pragma debug scope 56 1 ; 522 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 522 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].3
#line 523 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 524 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 525 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 526 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 527 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 528 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].2
#line 529 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 530 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 531 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 532 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 533 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 534 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 535 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 536 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 537 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 538 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].3
#line 539 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 540 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 541 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 542 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 543 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
L110:
RET
_Stop_I2C ENDP
#line 549 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@SendByte .SECTION 'CODE'
PUBLIC _SendByte
_SendByte PROC
#pragma debug scope 57 1
#line 548 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
PUBLIC SendByte0
LOCAL SendByte0 DB ? ; c
#pragma debug variable 57 SendByte0 c
#pragma debug scope 57 1 ; 551 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 551 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR CR15
#line 551 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L115
L112:
#pragma debug scope 58 57 ; 553 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 553 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,SendByte0
MOV b0_7,A
SZA CR15
JMP sha118
JMP shb118
sha118:
CLR [0AH].0
RLC b0_7
SDZ [05H]
JMP sha118
shb118:
SNZ b0_7.7
JMP L116
#line 554 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].3
#line 554 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L117
L116:
#line 556 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].3
L117:
#line 557 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 558 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].2
#line 559 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 560 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 561 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 562 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 563 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 564 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 565 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 566 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 567 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].2
L113:
#line 551 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#pragma debug scope 57 1 ; 551 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
INC CR15
L115:
#line 551 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
MOV A,CR15
SUB A,08h
SNZ [0ah].0
JMP L112
#line 569 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 570 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 571 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 572 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 574 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].3
#line 575 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 576 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 577 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 578 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 580 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].2
#line 581 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 582 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 583 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 584 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 585 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 586 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 587 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 590 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].2
#line 591 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 592 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 593 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 594 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
L111:
RET
LOCAL b0_7 DB ?
#line 550 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
LOCAL CR15 DB ? ; counter
#pragma debug variable 57 CR15 counter
_SendByte ENDP
#line 598 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
@RcvByte .SECTION 'CODE'
PUBLIC _RcvByte
_RcvByte PROC
#pragma debug scope 59 1 ; 601 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 601 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR CR17
#line 602 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET [014H].3
#line 604 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
SET __pbc.3
#line 606 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR CR16
#line 606 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
JMP L123
L120:
#pragma debug scope 60 59 ; 608 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
#line 608 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 609 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 610 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 611 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
CLR [014H].2
#line 612 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 613 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"
NOP
#line 614 "E:\龚树强\桑拿温度控制\SRC\SANGNA.C"