;================================================ ; Send data to LCD PIC ;================================================ ;osc = 4MHz IntRC pic2pic movlw 0x20 ;start address of RAM movwf fsr d_loop movlw 0x08 ;bit counter movwf temp0 movfw indf ;get RAM byte movwf temp1 call send_d ;send it incfsz fsr goto d_loop ;loop until FSR = 0 return ;exit send_d bsf bbclk ;bit-bang byte out btfss temp1,7 goto bclr bsf bbdata nop nop nop goto rot_d bclr bcf bbdata nop nop nop rot_d clrc bcf bbclk nop nop nop nop rlf temp1 decfsz temp0 goto send_d return