Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <12F629.h>
- //-----------------------------------------------------------------------------
- // Configurações DO uC
- //-----------------------------------------------------------------------------
- //Proteções
- #FUSES NOWDT //No Watch Dog Timer
- #FUSES INTRC_IO //Resistor/Capacitor Osc with CLKOUT
- #FUSES NOCPD //No EE protection
- #FUSES NOPROTECT //Code not protected from reading
- #FUSES NOMCLR //Master Clear pin disabled
- #FUSES NOPUT //No Power Up Timer
- #FUSES BROWNOUT //Reset when brownout detected
- #use delay(clock=4000000)
- //-----------------------------------------------------------------------------
- // ROTINA PRINCIPAL DO PROGRAMA
- //-----------------------------------------------------------------------------
- void main() //inicio
- {
- INT sobe; // DECLARA VARIÁVEL "SOBE"
- sobe=0; // ADOTA-SE VALOR DE VARIÁVEL ==0;
- while(true){ //QUANDO A CONDIÇÃO FOR VERDADEIRA
- if(sobe==0){ //SE O VALOR DE SOBE FOR IGUAL A 0; ESTADO INICIAL
- if(input(pin_a0)){ // SE EU APERTAR PIN AO (BOTÃO);
- output_high(pin_a5); //LIGA A SAÍDA DE BUZZER
- delay_ms(1000); //ESPERA 1000 MILI SEGUNDOS PARA CONTINUAR
- output_low(pin_a5); //DESLIGA A SAÍDA DE BUZZER
- delay_ms(100); //ESPERA 100 MILISEGUNDOS
- output_high(pin_a2); //LIGA A SAÍDA DE ABERTURA
- }
- if(input(pin_a3)){ //SE PRESSIONAR O FCA (PIN_A3);
- output_low(pin_a2); //DELIGA A SAÍDA DE ABERTURA
- sobe=1; //SETA 1 NA VARIÁVEL SOBE
- }
- }
- if(sobe==1) { //SE A VARIÁVEL SOBE FOR IGUAL A 1.
- if(input(pin_a0)){ //SE PRESSIONAR O BOTÃO DE MANOBRA
- output_high(pin_a5); //LIGA A SAÍDA DE BUZZER
- delay_ms(1000); //ESPERA 1000 MILISEGUNDOS LIGADA
- output_low(pin_a5); //DESLIGA A SAÍDA DE BUZZER
- delay_ms(100); //ESPERA 100 MILISEGUNDOS
- output_high(pin_a4); // LIGA A SAÍDA DE FECHAMENTO
- }
- if(input(pin_a1)){ //SE PRESSIONAR O FCF (PIN_A1);
- output_low(pin_a4); //DESLIGA A SAÍDA DE FECHAMENTO
- Sobe=0; //SETA "0" NA VARIÁVEL
- }
- }
- }
- } // FIM DA ROTINA
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement