📄 txsend.asm
字号:
SUBLW 0x18
BTFSC STATUS,C
GOTO Label_00BE
MOVF 0x5B,0
SUBLW 0x02
BTFSC STATUS,C
GOTO Label_00BF
MOVF 0x69,0
SUBLW 0x20
BTFSC STATUS,C
GOTO Label_00BF
Label_00BE INCF 0x69,1
Label_00C0 BTFSC INTCON,INTF
CALL Label_0083
BTFSC 0x1F,2
GOTO Label_00C0
MOVF 0x1E,0
MOVWF 0x3E
SUBWF 0x68,0
BTFSS STATUS,C
GOTO Label_00BF
GOTO Label_00C1
Label_00BF BCF INTCON,T0IF
MOVF 0x17,W
IORLW 0x0F
MOVWF 0x17
Label_00BB BTFSC 0x38,3
GOTO Label_00C2
Label_00B6 INCF 0x3C,1
BTFSC STATUS,Z
BSF 0x36,1
MOVF 0x63,1
BTFSS STATUS,Z
GOTO Label_00C3
MOVF 0x61,0
MOVWF 0x62
Label_00C3 MOVF 0x63,0
MOVWF 0x64
CLRF 0x61
CLRF 0x63
BCF 0x39,5
INCF 0x4E,1
MOVLW 0x0C
SUBWF 0x4E,0
BTFSS STATUS,C
GOTO Label_00C4
CLRF 0x4E
MOVLW 0x08
SUBWF 0x4D,0
BTFSS STATUS,C
GOTO Label_00C5
CLRF 0x4D
BTFSS 0x39,6
GOTO Label_00C6
BCF 0x39,6
GOTO Label_00C4
Label_00C6 BSF 0x39,6
GOTO Label_00C4
Label_00C5 CLRF 0x4D
Label_00C4 BTFSC INTCON,INTF
CALL Label_0083
BTFSC 0x39,6
GOTO Label_00C7
Label_00C2 BTFSC 0x37,7
GOTO Label_00C8
MOVLW 0x10
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_006F
MOVLW 0x30
SUBWF 0x35,W
BTFSC STATUS,Z
GOTO Label_0070
MOVLW 0x20
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0071
MOVLW 0x60
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0072
MOVLW 0x40
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0073
GOTO Label_006E
Label_00C8 MOVLW 0x30
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_006F
MOVLW 0x10
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0070
MOVLW 0x00
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0071
MOVLW 0x40
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0072
MOVLW 0x60
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0073
GOTO Label_006E
Label_00C7 BTFSC 0x37,7
GOTO Label_00C9
MOVLW 0x10
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0073
MOVLW 0x30
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_006E
MOVLW 0x20
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_006F
MOVLW 0x60
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0070
MOVLW 0x40
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0071
GOTO Label_0072
Label_00C9 MOVLW 0x30
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0073
MOVLW 0x10
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_006E
MOVLW 0x00
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_006F
MOVLW 0x40
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0070
MOVLW 0x60
SUBWF 0x35,0
BTFSC STATUS,Z
GOTO Label_0071
GOTO Label_0072
;-------初始化--------------------------
Label_0003 BSF STATUS,RP0
MOVLW 0x3F
MOVWF PR2
CLRF PIR1
MOVLW 0xFF
MOVWF TRISA
MOVLW 0X00;;;
MOVWF ADCON1;;;;;
MOVLW 0x03
MOVWF TRISB
MOVLW 0x80
MOVWF OPTION_REG
BCF STATUS,RP0
MOVLW 0x03
MOVWF PORTB
CLRF PORTC
BSF STATUS,RP0
MOVLW 0xF9;0x78
MOVWF TRISC
BCF STATUS,RP0
CLRF PORTC
BCF PORTC,1
CLRF 0x10
CLRF 0x14
CLRF 0x15
MOVLW 0x05
MOVWF T2CON;；；；；；；；；FOSC/4
CLRF TMR0
CLRF TMR2
MOVLW 0x5C
MOVWF 0x22
MOVLW 0x23
MOVWF FSR
Label_00CA CLRF INDF
INCF FSR,1
DECFSZ 0x22,1
GOTO Label_00CA
BCF STATUS,RP0
MOVLW 0x48
MOVWF ADCON0;；；；；；；；FOSC/8 RA1
MOVLW 0x30
MOVWF INTCON
MOVLW 0x08
MOVWF 0x51
MOVLW 0x5B
MOVWF 0x54
MOVLW 0x0F
MOVWF 0x53
MOVLW 0X02
MOVWF 0X79
BSF 0X39,1
RETURN
Label_0011 BCF 0x36,4
MOVLW 0x10
INCF 0x2D,1
SUBWF 0x2D,0
BTFSS STATUS,C
GOTO Label_00CB
CLRF 0x2D
INCF 0x4F,1
INCF 0x50,1
INCF 0x2E,1
CALL Label_00CC
BTFSS 0x36,3
GOTO Label_00CD
BCF 0x36,3
RETURN
Label_00CD BSF 0x36,3
Label_00CB RETURN
;-----------------------延时---------------------
Label_0004 MOVLW 0X7F
MOVWF 0x23
MOVWF 0x24
MOVLW 0x03
MOVWF 0x27
Label_00CE NOP
NOP
DECFSZ 0x23,1
GOTO Label_00CE
CLRWDT
DECFSZ 0x24,1
GOTO Label_00CE
DECFSZ 0x27,1
GOTO Label_00CE
CLRF 0x24
CLRF 0x23
CLRF 0x27
;BCF PORTC,7
RETURN
;-----------------------------------------
Label_0009 MOVLW 0x88;；；；FOSC/32，AN1
MOVWF ADCON0
CLRF 0x3A
CALL Label_0023;；AD 8次测量
MOVF 0x28,0
MOVWF 0x66;；；；；；；电池电压寄存器66H
RETURN
Label_000A MOVLW 0xA0;；；；；FOSC/32 AN4
MOVWF ADCON0
CLRF 0x3A
CALL Label_0023;；；；；；；AD 8次测量
MOVF 0x28,0
MOVWF 0x65;；；；；；；；；；刹车寄存器65H
RETURN
;；；；；；；；；；AD测量8次求平均
Label_0023 MOVLW 0x08
MOVWF 0x2A
CLRF 0x28
CLRF 0x29
Label_00D1 BSF ADCON0,ADON
MOVLW 0x10
MOVWF 0x22
Label_00CF DECFSZ 0x22,1
GOTO Label_00CF
BSF ADCON0,GO
Label_00D0 BTFSC ADCON0,GO
GOTO Label_00D0
MOVF ADRES,0
ADDWF 0x28,1
BTFSC STATUS,C
INCF 0x29,1
DECF 0x2A,1
BTFSS STATUS,Z
GOTO Label_00D1
RRF 0x29,1
RRF 0x28,1
RRF 0x29,1
RRF 0x28,1
RRF 0x29,1
RRF 0x28,0
MOVWF 0x28
BCF ADCON0,ADON;；;；关闭AD
RETURN
;；；；；；；；；；；；；；；；；；；；；；；；；；；；
Label_0066 BSF ADCON0,ADON
MOVLW 0x18
MOVWF 0x22
Label_00D2 DECFSZ 0x22,1
GOTO Label_00D2
BSF ADCON0,GO
MOVF PORTB,0
ANDLW 0x03
MOVWF PORTB
BSF STATUS,RP0
BSF TRISB,1
BCF STATUS,RP0
BSF 0x38,6
Label_00D3 BTFSC ADCON0,GO
GOTO Label_00D3
MOVF ADRES,0
BCF ADCON0,ADON
RETURN
MOVLW 0x20
MOVWF 0x3D
Label_00D4 DECFSZ 0x3D,1
GOTO Label_00D4
BSF 0x1F,2
RETURN
Label_00BD MOVLW 0x05
MOVWF 0x3D
Label_00D5 BTFSC INTCON,INTF
CALL Label_0083
DECFSZ 0x3D,1
GOTO Label_00D5
BSF 0x1F,2
RETURN
Label_0075 BSF STATUS,RP0
BSF TRISB,1
BCF STATUS,RP0
CLRF 0x17
BCF PORTC,2
RETURN
;；；；；；；；；；；；；关闭上下桥；；；；；；；；；；
Label_0005 MOVF PORTB,0
IORLW 0xE0
MOVWF PORTB
MOVLW 0x20
MOVWF 0x24
Label_00D6 DECFSZ 0x24,1
GOTO Label_00D6
MOVF PORTB,0
ANDLW 0x03
MOVWF PORTB
MOVLW 0x20
MOVWF 0x24
Label_00D7 DECFSZ 0x24,1
GOTO Label_00D7
RETURN
;------------防盗检测---------------------------
JCBJ BCF 0X3A,4
MOVLW 0x12
MOVWF 0x23
CLRF 0x24
BJJC1 BTFSS PORTC,0
INCF 0x24,1
DECFSZ 0x23,1
GOTO BJJC1
MOVLW 0x10
SUBWF 0x24,0
BTFSC STATUS, C
BSF 0X3A,4
RETURN
;-------------------电磁刹车---------------
EABS CLRF 0X6D
CLRF 0X6E
MOVLW 0X03
MOVWF 0X76
CLRF 0X74
CLRWDT
MOVLW 0X03
MOVWF 0X6D
MBB2 INCF 0X6E,1
MOVLW 0x69;;;;;;;;0X25
SUBWF 0X6E,0
BTFSS STATUS,C
GOTO WDJS
CLRF 0X6E
INCF 0X6D,1
MOVLW 0X65
SUBWF 0X6D,0
BTFSS STATUS,C
GOTO WDJS
INCF 0X74,1
BTFSS STATUS,Z
GOTO JJWD
DECFSZ 0X76,1
GOTO JJWD
GOTO TC
JJWD MOVLW 0X65
MOVWF 0X6D
WDJS MOVLW 0XE0
MOVWF PORTB
MOVF 0X6D,0
MOVWF 0X6F
MB1 DECFSZ 0X6F,1
GOTO MB1
CLRWDT
;-------
MOVF 0X6D,0
SUBLW 0X67
MOVWF 0X6F
MOVLW 0X10
SUBWF 0X6F,1
BTFSS STATUS,C
CLRF 0X6F
INCF 0X6F,1
MOVF PORTC,0
ANDLW 0X70
MOVWF 0X43
SWAPF 0X43,1
MOVF 0X43,0
CALL TAB
MOVWF PORTB
CLRWDT
MB2X DECFSZ 0X6F,1
GOTO MB2X
;-------
;*****************************
;FF3 CLRWDT
; MOVF PORTC,0
; ANDLW 0X70
; MOVWF 0X24
; SUBWF 0X23,0
; BTFSC STATUS,Z
; GOTO PP1
; ;BSF PORTC,1
; MOVF 0X24,0
; MOVWF 0X23
; CLRF 0X7A
; GOTO PP2
;PP1 INCF 0X7A,1
; MOVLW 0XF5
; SUBWF 0X7A,0
; BTFSS STATUS,0
; GOTO PP2
; CLRF 0X7A
; ; BCF PORTC,1
PP2
BTFSS 0X3A,4
BTFSC PORTA,5
GO⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -