Reply to topic  [ 2 posts ] 
Display the DS18B20 unique rom ID on a LCD & the temperature 
Author Message

Joined: Fri Aug 01, 2014 9:17 am
Posts: 20
Post Display the DS18B20 unique rom ID on a LCD & the temperature
This code display the DS18B20 unique rom code on the LCD and also the current temperature.

Enjoy

Code:
'  FILE:    PIC_GCB_16F877A_READ_ROM_DS18B20_and_Temp_with_LCD_Example.gcb
'  DATE:    26/09/14
'  VERSION: 0.1a
'  AUTHOR:  Anobium
'
'This program was written using the Great Cow Basic IDE for use with the PIC
'16F8777A development board (HCDVBD0003) and a 1602 parallel LCD module
'(HCMODU0013 or HCMODU0038) to display the unique 64-BIT LASERED ROM CODE of a DS18B20 sensor.


'Chip Settings. Assumes the development board with with a 16F877A
#chip 16F877A,20
#include <DS18B20.h>

 'Use LCD in 4 pin mode and define LCD pins
 #define LCD_IO 4
 #define LCD_RW PORTE.1
 #define LCD_RS PORTE.0
 #define LCD_Enable PORTE.2
 #define LCD_DB4 PORTD.4
 #define LCD_DB5 PORTD.5
 #define LCD_DB6 PORTD.6
 #define LCD_DB7 PORTD.7

  ' DS18B20 port settings - this is required
  #define DQ PortC.3


 ' READ ROM [33h]
 ' This command can only be used when there is one slave on the bus.
 ' It allows the bus master to read the slave’s 64-bit ROM code without using the Search ROM procedure.
 ' If this command is used when there is more than one slave present on the bus, a data collision will occur when all the slaves attempt to respond at the same time.

 ' 64-BIT LASERED ROM CODE
 ' Each DS18B20 contains a unique 64–bit code (see Figure 6) stored in ROM.
 ' The least significant 8 bits of the ROM code contain the DS18B20’s 1-Wire family code: 28h.
 ' The next 48 bits contain a unique serial number.
 ' The most significant 8 bits contain a cyclic redundancy check (CRC) byte that is calculated from the first 56 bits of the ROM code. A detailed explanation of the CRC bits is provided in the CRC Generation section. The 64-bit ROM code and associated ROM function control logic allow the DS18B20 to operate as a 1-Wire device using the protocol detailed in the 1-Wire Bus System section.
 ' 64-Bit Lasered ROM Code
 '
 ' 8-BIT CRC      48-BIT SERIAL NUMBER          8-BIT FAMILY CODE (28h)
 ' MSB  LSB       MSB              LSB          MSB                 LSB

  cls
  print "Great Cow Basic "
  locate 1 , 0
  print "DS18B20   @2014 "
  wait 3 s
  cls
  print "SHOW 64BIT LASERED"
  locate 1 , 0
  print "ROM CODE ON LCD"
  wait 3 s
  cls
  ypos = 0        ' Ypos on the LCD

  ' show 64-BIT LASERED ROM CODE on both rows of the LCD
     wait 100 ms
     MasterRST      ' Reset ds18b20
     PPulse         ' Request a presence pulse
     wait 100 us
     OWout ReadRom  ' Send 64-BIT LASERED ROM CODE read code
     wait 100 us
     OWinRom        ' Process and display the 64-BIT LASERED ROM CODE


  oldDSdata = 255
  do forever
   ' The function readtemp returns the integer value of the sensor
   DSdata = readtemp

   if oldDSdata <> DSdata then
       ' Display the integer value of the sensor on the LCD
       locate 1,0
       print "Currently "
       print DSdata
       print chr(223)+"C "
       oldDSdata = DSdata
   end if
loop





end

Sub OWinRom
 xpos = 14       ' XPos on the LCD
 For EightBytes = 1 to 8
  For Clocks = 1 to 8
   Rotate RxData Right 'The DS18s20 wants data LSB first
   Dir DQ Out
   Set DQ Off  'Read time slot
   wait 4 us
   Dir DQ In   'Release bus for one wire transmission
   wait 7 us
   If DQ On  Then Set RxData.7 1
   If DQ Off Then Set RxData.7 0
   wait 50 us
  Next
   locate ypos , xpos
   Print hex(RxData)
   xpos = xpos - 2

 Next
 end sub


Fri Sep 26, 2014 5:11 pm
Profile

Joined: Wed Aug 21, 2013 7:38 am
Posts: 24
Post Re: Display the DS18B20 unique rom ID on a LCD & the tempera
Hi, I changed the clock to the actual 4Mhz from 20, the temperature displayed is 60 to 100 deg to high.
Could I ask for a text copy of a working :? <DS18B20.h> being posted?
Many thanks,
barewires


Sat Sep 27, 2014 1:32 pm
Profile
Display posts from previous:  Sort by  
Reply to topic   [ 2 posts ] 

Who is online

Users browsing this forum: Bing [Bot] and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Thank you to phpBB.com & phpBB.ro.
Design created by Florea Cosmin Ionut.
© 2011 All contents of this site are © Hobby Components LTD