?? hwfsf508.asm
字號(hào):
;ERRORLEVEL -302
; ERRORLEVEL -305
INCLUDE P12F508.INC
__CONFIG _CP_ON & _WDT_OFF & _IntRC_OSC&_MCLRE_OFF
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
flag equ 09h
dly1 equ 0ah
dly2 equ 0bh
FSN equ 0ch
FSBUFL equ 0dh
FSBUFH equ 0eh
dly3 equ 0fh
dly4 equ 10h
keyn equ 11h
key_cnt1 equ 12h
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
key equ 1Eh
key_cnt equ 1fh
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#define txf flag,0
#define TXW flag,1
#define FSOUT GPIO,0
#define H1 GPIO,1
#define H2 GPIO,3
#define V1 GPIO,2
#define V2 GPIO,4
#define V3 GPIO,5
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;***復(fù)位矢量入口（單片機(jī)復(fù)位時(shí)，PC指針指向程序存儲(chǔ)器0X0000單元）***
ORG 0X0000
GOTO main ;復(fù)位后程序進(jìn)入主程序
;==================================
org 058h
;==========================
main
MOVWF OSCCAL
MOVLW 0X00
; goto key1 ;調(diào)試語(yǔ)句
OPTION
MOVLW 0X0A
TRIS GPIO
CLRF STATUS
MOVLW .30
MOVWF dly3
DECFSZ dly3,f
GOTO $-1
main1
clrf key
CLRF GPIO
CLRF GPIO
clrf key_cnt
clrf key_cnt1
btfsc H1
goto MAIN2
bsf V1
NOP
NOP
ys1 btfss H1
goto MA1
incf key_cnt,f
btfsc STATUS,Z
incf key_cnt1,f
btfss key_cnt1,4
goto ys1
goto key1
MA1 bsf V2
NOP
clrf key_cnt
clrf key_cnt1
ys2 btfss H1
goto MA2
incf key_cnt,f
btfsc STATUS,Z
incf key_cnt1,f
btfss key_cnt1,4
goto ys2
goto key2
MA2 bsf V3
NOP
clrf key_cnt
clrf key_cnt1
ys3 btfss H1
goto MAIN3
incf key_cnt,f
btfsc STATUS,Z
incf key_cnt1,f
btfss key_cnt1,4
goto ys3
goto key3
;==========================
MAIN2 btfsc H2
goto MAIN3
bsf V1
NOP
clrf key_cnt
clrf key_cnt1
ys4
btfss H2
goto MA3
incf key_cnt,f
btfsc STATUS,Z
incf key_cnt1,f
btfss key_cnt1,4
goto ys4
goto key4
MA3 bsf V2
clrf key_cnt
clrf key_cnt1
ys5
btfss H2
GOTO MA4
incf key_cnt,f
btfsc STATUS,Z
incf key_cnt1,f
btfss key_cnt1,4
goto ys5
goto key5
MA4 bsf V3
NOP
CLRF key_cnt
CLRF key_cnt1
ys6
btfss H2
goto MAIN3
incf key_cnt,f
btfsc STATUS,Z
incf key_cnt1,f
btfss key_cnt1,4
goto ys6
goto key6
;=============================
key1 movlw .2
goto keyc1
;;;;;;;;;;;;;;;;;
key2 movlw .1
goto keyc1
;;;;;;;;;;;;;;;;;;
key3 movlw .3
goto keyc1
;;;;;;;;;;;;;;;;;;;
key4 movlw .5
goto keyc1
;;;;;;;;;;;;;;;;;;
key5 movlw .4
goto keyc1
;;;;;;;;;;;;;;;;;
key6 movlw .6
;=========================
keyc1
MOVWF key
;==============================
FS1 movlw .4
movwf dly3
FASHE0 movf key,w
movwf FSBUFH
MOVLW 0Xff ;地址碼
MOVWF FSBUFL
movlw .12
movwf FSN
BCF TXW
;=====================================
FASHE RRF FSBUFH,F
RRF FSBUFL,F
BTFSC STATUS,C
GOTO FSH0
;==================================0
FSL0 BSF FSOUT
MOVLW .2
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
BCF FSOUT
BCF FSOUT
MOVLW .1
MOVWF dly1
MOVLW .4
MOVWF dly2
decfsz dly2,f
goto $-1
; NOP
FSL1 BSF FSOUT
MOVLW .2
MOVWF dly2
decfsz dly2,f
goto $-1
BCF FSOUT
BCF FSOUT
MOVLW .4
MOVWF dly2
decfsz dly2,f
goto $-1
DECFSZ dly1,F
GOTO FSL1
BTFSC TXW
GOTO FSL2
MOVLW .110
MOVWF dly2
decfsz dly2,f
goto $-1
BSF TXW
NOP
GOTO FSL0
FSL2 BCF TXW
MOVLW .111
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
NOP
GOTO FSB
;================================ 1
FSH0 BSF FSOUT
MOVLW .2
MOVWF dly2
decfsz dly2,f
goto $-1
;NOP
BCF FSOUT
BCF FSOUT
MOVLW .2
MOVWF dly1
MOVLW .4
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
FSH1 BSF FSOUT
MOVLW .2
MOVWF dly2
decfsz dly2,f
goto $-1
; NOP
BCF FSOUT
BCF FSOUT
MOVLW .4
MOVWF dly2
decfsz dly2,f
goto $-1
DECFSZ dly1,F
GOTO FSH1
BCF FSOUT
BTFSC TXW
GOTO FSH2
MOVLW .40
MOVWF dly2
decfsz dly2,f
goto $-1
BSF TXW
NOP
GOTO FSH0
FSH2 BCF TXW
MOVLW .41
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
FSB DECFSZ FSN,F
GOTO FASHE
BSF FSOUT
MOVLW .2
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
BCF FSOUT
MOVLW .3
MOVWF dly1
MOVLW .4
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
NOP
FSEND1 BSF FSOUT
MOVLW .2
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
BCF FSOUT
MOVLW .4
MOVWF dly2
decfsz dly2,f
goto $-1
NOP
DECFSZ dly1,F
GOTO FSEND1
BCF FSOUT
MOVLW .16
MOVWF dly4
FSEND2 MOVLW .80
MOVWF dly2
decfsz dly2,f
goto $-1
decfsz dly4,f
goto FSEND2
BCF TXW ;756
DECFSZ dly3,F
GOTO FASHE0
;=========================
MAIN3 CLRF GPIO
clrf key_cnt
clrf key_cnt1
MAIN4 BTFSC H1
BTFSS H2
GOTO MAIN3
incf key_cnt,f
btfsc STATUS,Z
INCF key_cnt1,f
btfss key_cnt1,4
goto MAIN4
MOVF GPIO,F
SLEEP
GOTO main1
GOTO main1
;======================
END
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -