📄 cpu427.asm
字号:
MOVWF R3
BSF STATUS, 5
CALL PUTDATAFILE2
BSF REN_FLAG, USER0SAM1
CALL ICCCOMMAND
MOVLW 38H
MOVWF FSR
; CALL FU18H
CALL ICCRECEDATA
BCF STATUS, 5
MOVF 18H, W
SUBWF 1AH, W
SKPZ
GOTO SET_FEIXITONGKA
BSF REN_FLAG, FBUJIMINGKA
BSF STATUS, 6
GOTO BUJIMINGKA1
BUJIMINGKA2:
GOTO BUJIMINGKA3
BUJIMINGKA4:
MOVLW 018H ;03H ;DU KA QIAN BAO WEN JIAN
MOVWF R1
BSF STATUS, 5
CALL PUTDATAFILE7
BCF REN_FLAG, USER0SAM1
CALL ICCCOMMAND
; CALL FU18H
MOVLW 1BH
MOVWF FSR
CLRF 1BH ;7.6
CLRF 1CH ;7.6
CLRF 1DH ;7.6
; CALL FUFSR10H
CALL ICCRECEDATA
; MOVF 19H, W
; MOVWF R3
; MOVF 1AH, W
; MOVWF R4
; CALL B2_BCD
; MOVF R0, W
; MOVWF 1BH
; MOVF R1, W
; MOVWF 1CH
; MOVF R2, W
; MOVWF 1DH
BCF STATUS, 5
BSF STATUS, 6
GOTO BUJIMINGKA5
ORG 200H
FU18H:
MOVLW 18H
MOVWF FSR
RETLW 0
FUFSR10H:
MOVLW 10H
MOVWF FSR
RETLW 0
FUFSR30H:
MOVLW 30H
MOVWF FSR
RETLW 0
MIE: ;WEI 0 DE WEI XIAN SHI MIE
MOVLW 07BH
MOVWF FSR
MOVLW 3
MOVWF R0
MIE_1:
MOVF SIA, 1
SKPZ
GOTO MIE_END
MOVLW 0DH ;0FH 7.19
MOVWF SIA
DECF FSR, 1
DECFSZ R0, 1
GOTO MIE_1
MIE_END:
RETLW 0
; MOVLW 70H
; MOVWF FSR
; MOVF DISBUFFER4, 1
; SKPZ
; GOTO MIE_END
; MOVLW 0FH
; MOVWF DISBUFFER4
; MOVF DISBUFFER3, 1
; SKPZ
; GOTO MIE_END
;; MOVLW 0FH
; MOVWF DISBUFFER3
; MOVF DISBUFFER2, 1
; SKPZ
; GOTO MIE_END
;; MOVLW 0FH
; MOVWF DISBUFFER2
;MIE_END:
; RETLW 0
; GOTO USERPOWERON_ZHUAN
;*****************************************
;2 WEI BIN TO 5 WEI BCD
;QI ZHONG R3(H), R4(L) WEI BIN
;R0(H), R1, R2 WEI BCD
;**************************************
;
; include "p16c5x.inc"
;
;B2_BCD bcf STATUS,0 ; clear the carry bit
; movlw .16
; movwf R5
; clrf R0
; clrf R1
; clrf R2
;loop16 rlf R4, F
; rlf R3, F
; rlf R2, F
; rlf R1, F
; rlf R0, F
;;
; decfsz R5, F
; goto adjDEC
; RETLW 0
;;
;adjDEC movlw R2
; movwf FSR
; call adjBCD
;;
; movlw R1
; movwf FSR
; call adjBCD
;;
; movlw R0
; movwf FSR
; call adjBCD
;;
; goto loop16
;
;adjBCD movlw 3
; addwf 0,W
; movwf R6
; btfsc R6,3 ; test if result > 7
; movwf 0
; movlw 30
; addwf 0,W
; movwf R6
; btfsc R6,7 ; test if result > 7
; movwf 0 ; save as MSD
; RETLW 0
;*********************************
;RTA FANG ZAI R1 KAI SHI DE DAN YUAN
;**************************************
USERPOWERON:
; IC KA SHANG DIAN
; ; MOVLW B'00000000'
; ; TRIS PORTB
; MOVLW B'00000101'
; TRIS PORTA
; CLRF PORTB
; ; BCF PORTB, CICVCC
; ; BCF PORTA, RSTSAM
; BCF REN_FLAG, USER0SAM1
; BSF PORTA, RSTUSER
; MOVLW 5 ;ART QIAN 6 BYTE BU CHU LI
; MOVWF R2
;READUSERATR:
; CALL RECECHAR
; SKPNC
; GOTO POWERRET
; DECFSZ R2, 1
; GOTO READUSERATR
USERPOWERON_ZHUAN:
SAMPOWERON_ZHUAN:
MOVLW 13H
MOVWF FSR
MOVLW .13 ;ART HOU 8 BYTE
MOVWF R2 ;KA XU LIE HAO
; MOVF R1, W
; MOVWF FSR
READUSERATR_1:
CALL RECECHAR
SKPNC
GOTO POWERRET
MOVF R3, W
MOVWF SIA
INCF FSR, 1
DECFSZ R2, 1
GOTO READUSERATR_1
POWERRET:
RETLW 0
;**************************************
;QU SUI JI SHU
;*********************************
PUTDATA1:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
CLRF 10H
CLRF 12H
CLRF 13H
MOVLW 084H
MOVWF 11H
MOVLW 08H
MOVWF 14H
RETLW 0
;**************************************
;XIANG SAM FA SHENG CHENG GONG ZUO MI YAO
;R1 FANG MI YAO BIAO SHI
;************************************
PUTDATA2:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
MOVLW 80H
MOVWF 10H
MOVLW 0FAH
MOVWF 11H
CLRF 12H
MOVF R1, W
MOVWF 13H
MOVLW 08H
MOVWF 14H
RETLW 0
;************************************
;XIANG SAN SONG DES JIA MI ZHI LING
;**********************************
PUTDATA3:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
MOVLW 80H
MOVWF 10H
MOVLW 0FAH
MOVWF 11H
CLRF 12H
; MOVLW 02H
; MOVWF 13H
CLRF 13H
MOVLW 08H
MOVWF 14H
BSF REN_FLAG, FCHONGSHOU
RETLW 0
;*******************************
;XIANG DIAN KA SONG WAI BU REN ZHENG ZHI LING
;R1 FANG MI YAO BIAO SHI FU
;*********************************
PUTDATA4:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
CLRF 10H
MOVLW 82H
MOVWF 11H
CLRF 12H
MOVF R1, W
MOVWF 13H
MOVLW 08H
MOVWF 14H
RETLW 0
;**********************************
;XIANG DIAN KA SONG DES JIA MI ZHI LING
;R1 FANG MI YAO BIAO SHI FU
;***********************************
PUTDATA5:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
CLRF 10H
MOVLW 088H
MOVWF 11H
CLRF 12H
MOVF R1, W
MOVWF 13H
MOVLW 08H
MOVWF 14H
BSF REN_FLAG, FCHONGSHOU
RETLW 0
;***************************
;XIU GAI SAM MOU KUAI MI YAO ZHI LING
;R1 FANG MI YAO LEI XING
;R2 FANG MI YAO BIAO SHI FU
;***************************
PUTDATA6:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
MOVLW 084H
MOVWF 10H
MOVLW 0D4H
MOVWF 11H
; MOVF R1, W
; MOVWF 12H
; CLRF 12H
MOVF R2, W
MOVWF 13H
MOVLW .16
MOVWF 14H
RETLW 0
;***************************
;XUAN ZE WEN JIAN ZHI LING
;**************************
PUTDATAFILE1:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
CLRF 10H
MOVLW 0A4H
MOVWF 11H
CLRF 12H
CLRF 13H
MOVLW 02H
MOVWF 14H
RETLW 0
;**************************
;DU 2 JIN ZHI WEN JIAN
;R1 FANG WEN JIAN BIAO SHI
;R2 PIAN YI LING
;R3 SHOU JU CHANG DU
;***************************
PUTDATAFILE2:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
CLRF 10H
MOVLW 0B0H
MOVWF 11H
MOVLW 080H
IORWF R1, W
MOVWF 12H
MOVF R2, W
MOVWF 13H
MOVF R3, W
MOVWF 14H
RETLW 0
;**************************
;XIE 2 JIN ZHI WEN JIAN
;R1 FANG WEN JIAN BIAO SHI
;R2 PIAN YI LING
;R3 SHOU JU CHANG DU
;***************************
PUTDATAFILE3:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
CLRF 10H
MOVLW 0D6H
MOVWF 11H
MOVLW 080H
IORWF R1, W
MOVWF 12H
MOVF R2, W
MOVWF 13H
MOVF R3, W
MOVWF 14H
RETLW 0
;**************************
;XIE XUN HUAN WEN JIAN
;R1 FANG WEN JIAN BIAO SHI
;R2 FANG SHOU JU CHANG DU
;**************************
;PUTDATAFILE4:
;; MOVLW 10H
;; MOVWF FSR
; CALL FUFSR10H
; CLRF 10H
; MOVLW 0DCH
; MOVWF 11H
; MOVLW 01H
; MOVWF 12H
; MOVLW 02H
; IORWF R1, W
; MOVWF 13H
; MOVF R2, W
; MOVWF 14H
; RETLW 0
;****************************
;XIANG SAM JIAN SHAO SHENG YU DIAN LIANG
;**************************
;PUTDATAFILE5:
;; MOVLW 10H
;; MOVWF FSR
; CALL FUFSR10H
; MOVLW 080H
; MOVWF 10H
; MOVLW 030H
; MOVWF 11H
; CLRF 12H
; MOVLW 0CH
; MOVWF 13H
; MOVLW 03H
; MOVWF 14H
; BSF REN_FLAG, FCHONGSHOU
; RETLW 0
;****************************
;XIANG SAM ZENG JIA DIAN LIANG
;******************************
PUTDATAFILE6:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
MOVLW 080H
MOVWF 10H
MOVLW 032H
MOVWF 11H
CLRF 12H
MOVLW 0CH
MOVWF 13H
MOVLW 03H
MOVWF 14H
BSF REN_FLAG, FCHONGSHOU
RETLW 0
;*******************************
;XIANG SAM DU SHENG YU DIAN LIANG ZHI LING
;R1 FANG WEN JIAN BIAO SHI FU
;***************************
PUTDATAFILE7:
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
CLRF 10H
MOVLW 0B2H
MOVWF 11H
MOVLW 01H
MOVWF 12H
MOVLW 04H
IORWF R1, W
MOVWF 13H
MOVLW 03H
MOVWF 14H
RETLW 0
SENDCHAR:
GOTO SENDCHAR_ZHUAN
;RECECHAR:
; GOTO RECECHAR_ZHUAN
;************************************
;XIANG IC KA FA MINGLING BING CENG IC KA JIE CHOU XIANG YING SHOU JU
;SHOU JU HUAN CUN QU 10H RAM
;RUO ZHI XIMG CHENG GONG C=0, JIE SHOU DAO DE SHOU JU JI CHANG DU ZAI 10H RAM
;***************************************
ICCCOMMAND:
; MOVLW .27
; MOVWF R1
;ICCCOMMAND_WAIT:
; DECFSZ R1, 1
; GOTO ICCCOMMAND_WAIT
BSF STATUS, 6
CALL WAIT5MS
BCF STATUS, 6
; MOVLW 10H
; MOVWF FSR
CALL FUFSR10H
MOVLW 5
MOVWF R1
ICCCOMMANDHEAD:
; MOVLW .3
; MOVWF R6
MOVF SIA, W
MOVWF R3
CALL SENDCHAR
SKPNC
GOTO ICCCOMMRET1
INCF FSR, 1
DECFSZ R1, 1
GOTO ICCCOMMANDHEAD
MOVF 14H, W
MOVWF R1
; MOVLW .3
; MOVWF R6
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -