Show Switch State - PIC Development Board + PIC16F877A

Post Reply
Anobium
Posts: 20
Joined: Fri Aug 01, 2014 9:17 am

Show Switch State - PIC Development Board + PIC16F877A

Post by Anobium » Thu Aug 14, 2014 1:22 pm

This demonstration uses the PIC - PIC Development Board + PIC16F877A (HCDVBD0003) and a 16*2 LCD display to show the state of the switches.

Ensure the LED (j3 /LED - EN) link is NOT in place.

Notes
This code can be easily be adapted for other 40 pin Microchip devices, simply change the #chip type
This code uses the external resonator, however, the #config can be removed to use the internal oscillator

Code: Select all

'  FILE:    PIC_GCB_16F877A_Switch_Demo_with_LCD_Example.gcb
'  DATE:    07/08/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 status of the PortB switches.


'Chip Settings. Assumes the development board with with a 16F877A
#chip 16F877A,4

'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

'Define ports
 dir portb.0 in
 dir portb.1 in
 dir portb.2 in
 dir portb.4 in

 ' Enable enable weak pull-up function on portB.  This IS required.
 OPTION_REG.NOT_RBPU = 0


 CLS
 Print "Reset"
 wait 500 ms
 CLS

do forever

   locate 0,0
   print "PortB"

   locate 0,6
   print "0"

   locate 1,6
   if portb.0 = 0 then
      print on
   else
      print off
   end if

   locate 0,9
   print "1"
   locate 1,9
   if portb.1 = 0 then
      print on
   else
      print off
   end if

   locate 0,12
   print "2"
   locate 1,12
   if portb.2 = 0 then
      print on
   else
      print off
   end if

   locate 0,15
   print "3"
   locate 1,15
   if portb.3 = 0 then
      print on
   else
      print off
   end if


loop

You do not have the required permissions to view the files attached to this post.

Post Reply