Hello

Need once your help one please.
Who can help me at the two following would cut off there I not point as I can write the one pic Basic.
To Thanks onto all of them in advance.

------------------------------------------------------------------------------------
Btfss R_DATEN,0 ; immediately edition of the
bsf PORTB,B_OUT ; .. bits #0 of
btfsc R_DATEN,0 ; .. R daten at
bcf PORTB,B_OUT ; .. DATA_OUT

------------------------------------------------------------------------------------

btfss PORTB,B_IN ; Bit at the entry
bsf STATUS,C ; .. DATA-IN to the
btfsc PORTB,B_IN ; .. To
bcf STATUS,C ; .. shift register into C
rrf R_DATEN,F ;To daten () negates
-----------------------------------------------------------------------------------