iwjpictest/syncwrite.asm

   1 ;======================================================================
   2
   3         include         /usr/share/gputils/header/p18f458.inc
   4         radix           dec
   5         include         ../iwjpictest/insn-aliases.inc
   6
   7  code
   8 ;----------------------------------------
   9 serial_write_char
  10 ; W             character       undefined
  11 serial_write_char_loop
  12         bt_f_if0        PIR1, TXIF
  13         bra             serial_write_char_loop
  14         mov_wf          TXREG
  15         return
  16
  17 ;======================================================================
  18  include ../iwjpictest/syncwrite.inc
  19  end