Microchip Language Jal Doc E0004.JAL

--  a temperature display using 
-- an LM75 and a HD44780 LCD controller

include 16c84_10
include jlib
include lm75
include hd447804

const lm75_address = 0

hd44780_clear

forever loop

   var byte t, d
   var bit f

   lm75_read_fdt( lm75_address, f, d, t )

   hd44780_line1
   if f then
      hd44780 = "-"
   else 
      hd44780 = "+"
   end if
   print_decimal_2( hd44780, d, " " )
   hd44780 = "."
   print_decimal_1( hd44780, t, "0" )

   delay_200mS

end loop

  .