git.gag.com Git - debian/cc1111/blob - device/lib/pic16/libio/usart/uputc.c

   1
   2 /*
   3  * uputc - write a character to USART
   4  *
   5  * written by Vangelis Rokas, 2004 <vrokas AT otenet.gr>
   6  *
   7  * Devices implemented:
   8  *      PIC18F[24][45][28]
   9  *
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU Library General Public License
  13  * as published by the Free Software Foundation; either version 2
  14  * of the License, or (at your option) any later version.
  15  *
  16  * This library is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  24  *
  25  *
  26  * $Id: uputc.c 3714 2005-04-02 13:13:53Z vrokas $
  27  */
  28
  29
  30 #include <pic18fregs.h>
  31
  32 #include <usart.h>
  33
  34 extern union USART USART_Status;
  35
  36 void usart_putc(unsigned char dat) __wparam __naked
  37 {
  38 #if 0
  39   if(TXSTAbits.TX9) {
  40     TXSTAbits.TX9D = 0;
  41     if(USART_Status.TX_NINE)TXSTAbits.TX9D = 1;
  42   }
  43
  44   TXREG = dat;      // Write the data byte to the USART
  45 #else
  46   dat;
  47   __asm
  48     btfss       _TXSTAbits, 6
  49     bra         _01_
  50
  51     bcf         _TXSTAbits, 0
  52     banksel     _USART_Status
  53     btfsc       _USART_Status, 1, b
  54     bsf         _TXSTAbits, 0
  55
  56 _01_:
  57     movwf       _TXREG
  58     return
  59   __endasm;
  60 #endif
  61 }