Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- sendd:
- bcf INTCON, INTF ; clear flag
- movf cnt_byte, f
- btfsc status,z
- retfie
- movf cnt_byte, w
- movwf TXREG
- bank1
- btfss TXSTA, TRMT
- goto $-1
- bank0
- ; movf cnt_h, w
- ; movwf TXREG
- ; bank1
- ; btfss TXSTA, TRMT
- ; goto $-1
- ; bank0
- ; temp simply counter
- ; clrf cnt
- ; clrf cnt_h
- ; retfie
- movlw ptr
- movwf fsr
- loop2:
- movf INDF, w
- movwf TXREG
- bank1
- btfss TXSTA, TRMT
- goto $-1
- bank0
- INCF FSR, f
- ; additional address
- MOVF FSR, W
- XORLW 0x80
- BTFSS STATUS, Z
- GOTO NORMAL_OPERATION1
- MOVLW 0xA0
- MOVWF FSR
- NORMAL_OPERATION1:
- ;
- decfsz cnt_byte, f
- goto loop2
- movlw ptr
- movwf fsr
- clrf cnt
- clrf cnt_h
- bcf flag, 0
- retfie
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement