CLR    TXR
?WHILE6:
  JB     TXA,?WHILE6
  MOV    A,Tx_data
  ORL    A,#0F0H
  ANL    P2,A
  SETB   TXR
?WHILE7:
  JNB    TXA,?WHILE7
  ORL    P2,#00FH
  CLR    TXR
?WHILE8:
  JB     TXA,?WHILE8
  MOV    A,Tx_data
  SWAP   A
  ANL    A,#00FH
  ORL    A,#0F0H
  ANL    P2,A
  SETB   TXR
?WHILE9:
  JNB    TXA,?WHILE9