Hola:
Un ejemplo sencillo de como hacerlo en PROTON seria como sigue, un detalle importante es que el programa a continuación no tiene "antirrebotes" asi que tendrás que implementarlo por Hardware o simplemente usar el comando BUTTON de protón que elimina los rebotes del pulsador.-
Codigo:
"****************************************************************
"* Name : encendido / apagado *
"* Author : Doppel - Ejemplo para el foro TODOPIC *
"* : All Rights Reserved *
"* Date : 19/03/2006 *
"* Version : 1.0 *
"* Notes : se presiona el pulsador para encender el led y *
"* : si se vuelve a presionar lo apaga *
"****************************************************************
device 16f84 " declaro pic a usar
xtal 4 " declaro frecuencia del cristal
symbol pulsador = porta.0 " le doy el nombre de pulsador al PORTA.0
symbol LED = portb.0 " le doy el nombre de LED al PORTB.0
trisa = %0001 " declaro porta.0 como entrada
trisb = %00000000 " declaro PORTB todas salidas
portb = 0 " apago el PORTB
inicio:
If pulsador = 1 and led = 0 then " si presiono el pulsador y el LED está apagado entonces
high led " enciendo el LED
else if pulsador = 1 and led = 1 then " sino si presiono el pulsador y el LED esta encendido
low led " apago el LED
endif " fin del "IF"
goto inicio " vuelvo a inicio
end
espero que te sirva.-
saludos 