'******************************************************** '* * '* LCD 16x2 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 lcdbaslib.bas file to connect the PIC877A to the 16x2 lcd. 'The PORTB is being used here to connect to the lcd. ' ' ' Sub main() call lcd_init() 'Initialize the LCD to appropriate format call lcd_clear() 'clears the lcd call lcd_putch(84) 'Prints ASCII char T call lcd_putch(69) 'Prints ASCII char E call lcd_putch(83) 'Prints ASCII char S call lcd_putch(84) 'Prints ASCII char T call lcd_putch(32) 'Prints ASCII char call lcd_putch(76) 'Prints ASCII char L call lcd_putch(67) 'Prints ASCII char C call lcd_putch(68) 'Prints ASCII char D call lcd_line2() 'Put Currsor at begining of line 2 of lcd call lcd_putch(76) 'Prints ASCII char L call lcd_putch(73) 'Prints ASCII char I call lcd_putch(78) 'Prints ASCII char N call lcd_putch(69) 'Prints ASCII char E Do while 1 Loop End Sub
Copyright © 2006 SourceBoost Technologies