您当前的位置:五五电子网电子知识单片机-工控设备PIC单片机hcs301滚动码源程序 正文
hcs301滚动码源程序

hcs301滚动码源程序

点击数:7913 次   录入时间:03-04 11:59:32   整理:http://www.55dianzi.com   PIC单片机
Z       EQU       2        ; ZERO
PD      EQU       3        ; POWER DOWN
TO      EQU       4        ; TIMEOUT
PA0     EQU       5        ; NOT USED
PA1     EQU       6        ; NOT USED 

;------------------------------------------------------------------------------
; PAGE 0: 
;------------------------------------------------------------------------------
    ORG 00H

;------------------------------------------------------------------------------
;
; FUNCTION     : RESET ()                      
;
; DESCRIPTION  : PROGRAM RESET ROUTINE
;
;------------------------------------------------------------------------------

RESET    
     MOV LW    000111B            ; SETUP RTCC PRESCALER
    OPTION

    CLRF    PORTA            ; RESET PORTA
    CLRF    PORTB            ; RESET PORTB

     MOV LW    TRISA            ; SETUP PORTA
    TRIS    PORTA
     MOV LW    WRCFG            ; SETUP PORTB
    TRIS     PORTB

    CLRF    FLAGS            ; RESET FLAGS

    GOTO    M_LOOP            ; GOTO MAIN PROGRAM LOOP

;------------------------------------------------------------------------------
;
; FUNCTION         : ROT_SHIFT()                      
;
; DESCRIPTION      : RIGHT ROTATE 64 BIT RECEIVE SHIFT REGISTER
;
; NOTE        : THIS ROUTINE MUST BE IN THE LOWER HALF OF THE PAGE
;
;------------------------------------------------------------------------------

ROT_SHIFT
        RRF     CSR7,F
        RRF     CSR6,F
        RRF     CSR5,F                     
        RRF     CSR4,F                     
        RRF     CSR3,F                     
        RRF     CSR2,F                     
        RRF     CSR1,F                    
        RRF     CSR0,F                    
    RETLW    0

;------------------------------------------------------------------------------
;
; FUNCTION         : TX_LOOKUP ()                      
;
; DESCRIPTION      : TRANSMITTER ADDRESS CALCULATION
;
; NOTE        : THIS ROUTINE MUST BE IN THE LOWER HALF OF THE PAGE
;
;------------------------------------------------------------------------------

TX_LOOKUP
     MOV F    TXNUM,W            ; USE TRANSMITTER NUMBER TO CALCULATE 
     MOV WF    ADDRESS            ; ADDRESS OF TRANSMITER BLOCK
    CLRC                ; MULTIPLY BY 4 
    RLF    ADDRESS,F
    RLF    ADDRESS,F
     MOV LW    04H            ; AND ADD 4
    ADDWF    ADDRESS,F
    RETLW    0            ; RETURN

;------------------------------------------------------------------------------
;
; FUNCTION         : TST_RTCC ()                      
;
; DESCRIPTION      : UPDATE RTCC COUNTER 
;
; NOTE        : THIS ROUTINE MUST BE IN THE LOWER HALF OF THE PAGE
;
;------------------------------------------------------------------------------
TST_RTCC
    CLRWDT                ; RESET WATCHDOG TIMER
     MOV LW    TRISA            ; UPDATE TRI-STATE REGISTER FOR PORTA

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15]  下一页


本文关键字:源程序  PIC单片机单片机-工控设备 - PIC单片机