Button/switch debouncing

[izyan]

Hi everyone..

I'm new in this forum and I hope u guys can help me to solve my problem. I'm try to do a coding for button by using PICF4620 but there is an error.I also not sure whether my program is right or not because this is the first time i'm using Pbasic.

Here the program:

define osc 25

define INIT_ADCON2=0
define INIT_TRISA.2=0

DEFINE INIT_ADCON0=1
DEFINE INIT_TRISB.0=1

DEFINE INIT_ADCON1=1
DEFINE INIT_TRISB.1=1

LED VAR porta.2

BUTTON0 VAR portb.0
BUTTON1 var portb.1

main:

high BUTTON0=1
high LED ;led is ON
pause 600

low LED ;led is OFF
pause 600

high BUTTON1=1
high LED ;led is ON
pause 600

low LED ;led is OFF
pause 600


goto main

[Melanie]

This is INCORRECT...

high BUTTON0=1

You've aliased BUTTON0 as a pin on your pic... now are you using it as an INPUT in which case you need an IF statement, or are you using it as an OUTPUT in which case you can use the HIGH statement...

Let's assume you're using it as an INPUT and checking is it has been pressed... Buttons are usually pulled LOW when pressed because they are connected between the PIC pin and 0v. There is usually a pull-up Resistor on the pin, but since you are using PORTB then you will find you can probably enable internal pull-up's to do that job... so in this case your statement would be...

If BUTTON0=0 then
HIGH LED
Pause 600
endif

Also, your DEFINE statements look awfully strange to me if you are using MeLabs PICBasic (which this forum is intended for)... if you are using anyone elses BASIC product, you might not get much help here...

[xnihilo]

Melanie, Darrel and Rob, thank you for your answers.
It helps.

Regards.

[izyan]

I forgot to mention that i use the button for INPUT..anyway thank you Melanie.
It helps.