-- DN008 : hello world on a 2x16 lcd 
-- hardware: DB016 + 2x16 lcd on BUS_B (DB015)

include DB016_18F252_PLL_40

const LCD_lines = 2
include lcd_on_b
LCD_Init

forever loop
   LCD_Clear
   delay_200ms
   
   LCD_Line_1
   LCD_Write( "H" )   
   LCD_Write( "e" )   
   LCD_Write( "l" )   
   LCD_Write( "l" )   
   LCD_Write( "o" )   
   LCD_Write( " " )   
   LCD_Write( "w" )   
   LCD_Write( "o" )   
   LCD_Write( "r" )   
   LCD_Write( "l" )   
   LCD_Write( "d" )  
   
   LCD_Line_2 
   LCD_Write( "D" )  
   LCD_Write( "N" )   
   LCD_Write( "0" )  
   LCD_Write( "0" )   
   LCD_Write( "3" )  
   LCD_Write( " " )   
   LCD_Write( "o" )  
   LCD_Write( "n" )   
   LCD_Write( " " )  
   LCD_Write( "D" )   
   LCD_Write( "B" )  
   LCD_Write( "0" )   
   LCD_Write( "1" )  
   LCD_Write( "6" )   
   
   delay_1s
end loop