Source Code File:"ComBas.bas"

'************************************************************************
'*                                                                      *
'*      SOFTWARE USART AT 2400 BAUD PROJECT FOR USE WITH BOOST BASIC    *
'*                                                                      *
'*             WRITTEN BY       :  PUNERJOT SINGH MANGAT                *
'*             COUNTRY          :  INDIA                                *
'*             CITY             :  PATIALA                              *
'*             WEB PAGE         :  www.rackeys.com/punerjot             *
'*             EMAIL            :  punerjot@rackeys.com                 *
'*             SOURCEBOOST ID   :  c58_4311                             *
'*             RELEASE DATE     :  March 03, 2006                       *
'*             REVISED DATE     :  May 24, 2006                         *
'*                                                                      *
'************************************************************************
'
'
'
'This project file demonstrates the use of the combaslib.bas file for making a software Rs232 port.
'The Pin 0 of PORTB is being used as Rx and Pin 1 of PORTB is used as Tx pin
'Note that use of Max232 is must as the signals are inverted
'
'


Sub main()

    call lcd_init()         'Initialize the LCD to appropriate format   
    call rs232_init()       'Initialize software rs232

    call lcd_clear()        'clears the lcd
    call lcd_putch(65)      'display char A on lcd
    call rs232_putch(65)    'send char A to rs232 terminal
    call rs232_putch(66)    'send char B to rs232 terminal
    call rs232_putch(67)    'send char C to rs232 terminal
    
    
    Do while 1 
       call lcd_putch(call rs232_getch())     'get a char from rs232 terminal and display on lcd
    Loop

End Sub
http://www.sourceboost.com