⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 main.a74.bak

📁 使用三菱芯片开发的空调程序,具有低压保护功能
💻 BAK
📖 第 1 页 / 共 3 页
字号:
        EOR     m_TxdStatue3
        STA     M_TxdCheckSum
        RTS
IntVect_Txd:
         pha
         txa
         pha
	 A = X
         pha

         CLI
         CLD
         CLT

         CLB    Txd_request
        ; if [m_TxdCount] == 00H
               ;  [TB_RB] = 08H
                ; inc    m_TxdCount

                 ;BRA     Txd_End
         ;endif
         if [m_TxdCount] >= 01H && [m_TxdCount] <= 11
                 LDX     m_TxdCount
                 DEX

                 LDA     TxdDatapage,x

                 if [b_TxdHighe] == 0
                        AND     #0F0H
                        STA     M_TxdData
                        RRF     M_TxdData
                        SEB     b_TxdHighe
                 ELSE
                        AND     #0FH
                        STA     M_TxdData
                        CLB     b_TxdHighe
                        inc    m_TxdCount

                 ENDIF
                 [TB_RB] = [M_TxdData] + 30h


                 BRA     Txd_End
         ENDIF
         if [m_TxdCount] >= 12
                 [TB_RB] = 0FH
                 ldm     #00h,m_TxdCount
                 LDM     #00H,M_TxdEndMsec

                 ;SEB     b_TxdEndFlag
                 [ICON2]   =   CommRxdCON2      ;20041205
                 LDM     #00H,m_TxdCount        ;20041205
         ENDIF
Txd_End:
         pla
         X = A
         pla
         tax
         pla
         RTI

















;**********************Add 99.11.29****************
; read_Control Data From  receivework  ( 5 BYTE)
;
;
;**************************************************
Vect_Timer1:
         pha
         txa
         pha
	 A = X
         pha

         clb    t1_request      ;t1_request
         JSR     FUN_DispDriver
         if [b_Bezzon]==1
                 ;JSR    Fun_Buzzer7
                 if     [soundtime] <= 80
                    INC    soundtime
                    ;clB     Start_timerX   ;20050220
                 else
                     ;if  [b_Buzzer0] == 0           ;20050820
                           seb     Start_timerX
                           clb     b_Bezzon
                           [Txymode] = [Txymode] & 11111100b
                     ;endif
                 endif
         else

                 ldm     #00H,soundtime
                 SEB     Start_timerX       ;TimerX Stop

                 clb     b_Buzzer0          ;20050820

         endif
         if [ADconend_flag] == 1
                inc     mSwingmsec
                IF [mSwingmsec] >= 5    ; LINSHI

                       if [bStartClose] == 0
                               [mSwingmsec] = 00h
                               JSR     Fun35StartClose
                       endif
                ENDIF
                IF [mSwingmsec] >= 9      ;LINSHI
                        [mSwingmsec] = 00h
                        if [bStartClose] == 1
                               JSR     FunSwingStepper
                        endif
                endif
        endif


         if [b_TxdEndFlag] == 1
                INC     M_TxdEndMsec
         endif
         IF  [TxdCheck] == 1
                [TxdCheck10MS] =  [TxdCheck10MS] + 1
         ENDIF
         pla
         X = A
	 pla
         tax
         pla
         RTI

Vect_Timerx:
         pha
         txa
         pha
	 A = X
         pha
	 clb    tx_request
	 pla
         X = A
	 pla
         tax
         pla
         RTI

Vect_Timer2:            ; System Timer  per 10ms
        cld
        pha
        txa
        pha
        clb    t2_request
        INC     mClock20mSec
        if [mClock20mSec] >= 100
                JSR     FUN_ClockRun
        endif
        inc    m_100mscount         ;dispspeed
        ;if   [m_100mscount] >= 10
                ;jsr  Dispspeed
        ;endif
        inc    m_20mscount
        if [m_20mscount] >= 20
                ldm    #00h,m_20mscount
                seb    b_flag200ms
        endif




	pla
        tax
        pla
        RTI

Fun_IntPro:
        cld
        pha
        txa
        pha
	nop
        [IREQ1] =  InitICON1
	[IREQ2] =  InitICON2
        [ICON1] =  InitICON1
        [ICON2] =  InitICON2
        pla
        tax
        pla
        RTI

;***************************************************************
;
;
;***************************************************************
        .include        defrost.inc
				.include        Swing.inc
        .INCLUDE        ACTion1.INC
        .INCLUDE        ADCON1.INC
        .INCLUDE        e2prom.inc
        .INCLUDE        remote.inc
        .include        Display.inc
        ;.include        bezzer.inc

;******************************************************************
;
;******************************************************************
                .org 0FE00H
TempAD_Tab:
        .BYTE   3bH,3dH,40H,42H,45H,47H,4aH,4dH,4fH,52H,55H
        .BYTE   57H,5aH,5dH,60H,63H,65H,68H,6bH,6eH,71H
        .BYTE   74H,77H,79H,7cH,7fH,82H,85H,87H,8aH,8dH
        .BYTE   8fH,92H,95H,97H,9aH,9cH,9fH,0a1H,0a4H,0a6H
        .BYTE   0a8H,0abH,0adH,0afH,0b1H,0b3H,0b5H,0b7H,0b9H,0bbH
        .BYTE   0bdH,0bfH,0c1H,0c2H,0c4H,0c6H,0c7H,0c9H,0caH,0ccH
        .BYTE   0cdH,0cfH,0d0H,0d1H,0d3H,0d4H,0d5H,0d6H,0d8H,0d9H
        .BYTE   0daH,0dbH,0dcH,0ddH,0deH,0dfH,0e0H,0e1H,0e1H,0e2H
        .BYTE   0e3H,0e4H,0e5H,0e5H,0e6H,0e7H,0e7H,0e8H,0e9H,0e9H
        .BYTE   0eaH,0eaH,0ebH,0ecH,0ecH,0edH,0edH,0eeH,0eeH,0efh

PipeAD_Tab:
        .BYTE   3CH,3EH,40H,43H,45H,48H,4BH,4DH,50H,52H              ;0C  -> 9C
        .BYTE   55H,58H,5BH,5DH,60H,63H,66H,69H,6CH,6EH              ;10C -> 19C
        .BYTE   71H,74H,77H,7AH,7DH,80H,82H,85H,88H,8BH              ;20C -> 29C
        .BYTE   8DH,90H,93H,95H,98H,9AH,9DH,9FH,0A2H,0A4H            ;30C -> 39C
        .BYTE   0A7H,0A9H,0ABH,0ADH,0B0H,0B2H,0B4H,0B6H,0B8H,0BAH    ;40C -> 49C
        .BYTE   0BCH,0BEH,0BFH,0C1H,0C3H,0C5H,0C6H,0C8H,0C9H,0CBH    ;50C -> 59C
        .BYTE   0CCH,0CEH,0CFH,0D1H,0D2H,0D3H,0D5H,0D6H,0D7H,0D8H    ;60C -> 69C
        .BYTE   0D9H,0DAH,0DBH,0DCH,0DDH,0DEH,0DFH,0E0H,0E1H,0E2H    ;70C -> 79C
        .BYTE   0E3H,0E4H,0E4H,0E5H,0E6H,0E7H,0E7H,0E8H,0E9H,0E9H    ;80C -> 89C
        .BYTE   0EAH,0EAH,0EBH,0EBH,0ECH,0EDH,0EDH,0eeH,0efH,0efH    ;90C -> 99C

        Tpot0:     .BYTE        3BH      ; add 2000.1.17
        Tpot14:    .BYTE        60h
        Tpot15:    .BYTE        63h
        Tpot16:    .BYTE        65h
        Tpot18:    .BYTE        6bh
        Tpot20:    .BYTE        71h
        Tpot23:    .BYTE        79h
        Tpot26:    .BYTE        82h
        Tpot40:    .BYTE        0a6h
        Tpot70:    .BYTE        0d9h
        ;*************************************888
        n_hdmax:     .BYTE    28h
        n_hdmin:     .BYTE    20h
        n_sepmax:     .BYTE    16h
        n_sepmin:     .BYTE    0eh;12    ;20051017
        n_sepmax2:     .BYTE    16h
        n_sepmin2:     .BYTE   0Eh

        n_hdmax_U:     .BYTE    1ah       ;20051017
        n_hdmin_U:     .BYTE   17h
        n_sepmax_U:     .BYTE    0eh;0eh
        n_sepmin_U:     .BYTE    0ah
;*****************************************************
; InRoomPipe ADVal:
;
;****************************************************
        m_MaxCurrAD:    .BYTE        68H
        TPipepot0:          .BYTE        3CH
        TPipepot10:         .BYTE        55h
        TPipepot50:         .BYTE        0BCH
        TPipepot54:         .BYTE        0C2H
        TPipepot41:         .BYTE        0A9H
        TPipepot56:         .BYTE        0C9H;0C6H  xian zai gai wei 58
        TPipepot53:         .BYTE        0BFH;0C1H  xian zai gai wei 52
        TPipepot_Neg4:      .BYTE        33H

;Ptr5060:        ; 50,60 program for Pipe_Temp
;        Tpot35:    .BYTE        9aH
;        Tpot49:    .BYTE        0b9H
;        Tpot57:    .BYTE        0c7H
;        Tpot_Neg2: .BYTE        37h
;        Tpot10:    .BYTE        55h
;        Tpot62:    .BYTE        0cfh
;        Tpot54:    .BYTE        0c2h
;        Tpot60:    .BYTE        0cch
;        Tpot51:    .BYTE        0bdh

; 9ah,b9h,c7h,37H,55H,cfH,c2H,ccH,bdH,

Ptr3H:          ;3Hp-10Hp program for Pipe_Temp
;        Tpot30:     .BYTE       8dH       ; T1
;        Tpot44:     .BYTE       0AfH       ;
;        Tpot52:     .BYTE       0BfH
;        Tpot_Neg5:  .BYTE       30H
;        Tpot6:      .BYTE       4aH
;        Tpot56:     .BYTE       0c6H
;       Tpot49:     .BYTE       0b9H
;       Tpot54:     .BYTE       0c2H
;        Tpot46:     .BYTE       0b3H       ; T9
;
; 8dH,afH,bfH,30H,4aH,c6H,b9H,c2H,b3H,
;************************************************************
HexToDEC_Tab:                                        ;chen
	 .BYTE  00h,16h,32h,48h,64h,80h,96h

;******************************************************************
;Comp Current Over = 5.1/(5.1+10)*12= 4.053V   D0H
;                  = 3.6/(3.6+10)*12= 3.176V   A3H
;******************************************************************

		.ORG            0FFDCH          ;BRK INSTRUCTION
                .WORD           Fun_IntPro

		.ORG            0FFDEH          ;A/D Converter INTERRUPT
                .WORD           Fun_IntPro      ;or TxD3

                .ORG            0FFE0H          ;CNTR1 INTERRUPT
                .WORD           Fun_IntPro

                .ORG            0FFE2H          ;CNTR0 INTERRUPT
                .WORD           Fun_IntPro

               .ORG            0FFE4H          ;Txd INTERRUPT
                .WORD           IntVect_Txd

                .ORG            0FFE6H          ;RXD underflow INTERRUPT
                .WORD           IntVect_Rxd      ;

                .ORG            0FFE8H          ;TIMER2 INTERRUPT
                .WORD           Vect_Timer2     ;2000.5.10 or timer2

                .ORG            0FFEAH          ;TIMER1 INTERRUPT
                .WORD           Vect_Timer1

                .ORG            0FFECH          ;TIMERY INTERRUPT
                .WORD           Vect_TimerY

                .ORG            0FFEEH          ;TIMERX INTERRUPT
                .WORD           Vect_Timerx     ;2000.5.10 or timerxint

                .ORG            0FFF0H          ;IIC TXD INTERRUPT
                .WORD           Fun_IntPro      ;

                .ORG            0FFF2H          ;INT3 INTERRUPT
                .WORD           Fun_IntPro

                .ORG            0FFF4H          ;INT2 INTERRUPT
                .WORD           Fun_IntPro

                .ORG            0FFF6H          ;INT1 INTERRUPT
                .WORD           Fun_IntPro

                .ORG            0FFF8H          ;scl sdaINTERRUPT
		.WORD           Fun_IntPro

                .ORG            0FFFAH          ;INT0 INTERRUPT
                .WORD           Fun_IntPro      ;2000.5.10  int1int

                .ORG            0FFFCH  ;RESET
                .WORD           main

                    .END


⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -