uControl
Mayo 30, 2017, 04:26:42 *
Bienvenido(a), Visitante. Por favor, ingresa o regístrate.
¿Perdiste tu email de activación?

Ingresar con nombre de usuario, contraseña y duración de la sesión
 
   Inicio   Ayuda Buscar Ingresar Registrarse  
Páginas: [1]   Ir Abajo
  Imprimir  
Autor Tema: Interrupciones (Timer) Pic 18F4550 (MpLab)  (Leído 352 veces)
0 Usuarios y 1 Visitante están viendo este tema.
Fernando18
PIC10F
*
Desconectado Desconectado

Mensajes: 2


« : Febrero 26, 2017, 11:27:37 »

Hola amigos, soy nuevo en el mundo de programar mictrocontroladores. Verán estoy usando el programa MPLAB para programar un micro 18f4550 y me gustaría pedir su ayuda, resulta que tengo que hacer prender un led durante 3 segundos y  apagarlo durante 5, y así sucesivamente, pero para empezar no sé que tan bien tenga mi código, y lo siguiente es que como puedo meter dos interrupciones a la par. AGRADECERÍA MUCHISIMO SU AYUDA POR FAVOR,
Mi código que llevo hasta ahorita es este...


   list p=18f4550
   #INCLUDE <P18F4550.INC>

;CONFIG FOSC = INTOSC_XT
CONFIG BOR  = OFF
CONFIG PWRT = ON
CONFIG WDT  = OFF
CONFIG MCLRE=OFF
CONFIG PBADEN=OFF
CONFIG LVP  = OFF

CBLOCK 0X000
flags
ENDC

ORG 0X0000
      bra INICIO
      org 0x08
      bra RST0
      org 0x0020
      bra RST1
      org 0x0030
#DEFINE LED1    PORTB, 0
#DEFINE LED2    PORTB, 1
#DEFINE LED3    PORTB, 2
#DEFINE LED4    PORTB, 3
#DEFINE LED5    PORTB, 4
#DEFINE LED6    PORTB, 5
#DEFINE LED7    PORTB, 6
#DEFINE LED8    PORTB, 7
INICIO   bsf OSCCON,IRCF2,0
      bsf OSCCON,IRCF1,0
      bcf OSCCON,IRCF0,0
      movlw 0x0F
      movwf ADCON1,0
      clrf PORTB,0
      clrf TRISB,0
      movlw 0x96
AGAIN   movwf T0CON,0
      movlw 0xA0
      movwf INTCON,0
      movlw 0xA4
      movwf TMR0H,0
      movlw 0x72
      movwf TMR0L,0         ;Valor de precarga para 3 segundos a 4MHz
Led      bsf LED1
ESPERA
      btfss flags,0,0
      bra ESPERA
      bcf flags,0,0

      movlw 0x67
      movwf TMR0H,0
      movlw 0x69
      movwf TMR0L,0         ;Valor de precarga para 5 segundos a 4MHz
LedA bcf LED1
ESPERA2
      btfss flags,0,0
      bra ESPERA2
      bcf flags,0,0

RST0   bcf INTCON, TMR0IF,0
      movlw 0xA4
      movwf TMR0H,0
      movlw 0x72
      movwf TMR0L,0
      bsf flags,0,0
      retfie

RST1   bcf INTCON, TMR0IF,0
      movlw 0x67
      movwf TMR0H,0
      movlw 0x69
      movwf TMR0L,0
      bsf flags,0,0
      retfie
      goto AGAIN

      END
En línea
Fernando18
PIC10F
*
Desconectado Desconectado

Mensajes: 2


« Respuesta #1 : Febrero 26, 2017, 11:36:36 »

Perdonen, este es el código...  Idiota

   list p=18f4550
   #INCLUDE <P18F4550.INC>

;CONFIG FOSC = INTOSC_XT
CONFIG BOR  = OFF
CONFIG PWRT = ON
CONFIG WDT  = OFF
CONFIG MCLRE=OFF
CONFIG PBADEN=OFF
CONFIG LVP  = OFF

CBLOCK 0X000
flags
ENDC

ORG 0X0000
      bra INICIO
      org 0x08
      bra RST0

#DEFINE LED1    PORTB, 0
#DEFINE LED2    PORTB, 1
#DEFINE LED3    PORTB, 2
#DEFINE LED4    PORTB, 3
#DEFINE LED5    PORTB, 4
#DEFINE LED6    PORTB, 5
#DEFINE LED7    PORTB, 6
#DEFINE LED8    PORTB, 7
INICIO   bsf OSCCON,IRCF2,0
      bsf OSCCON,IRCF1,0
      bcf OSCCON,IRCF0,0
      movlw 0x0F
      movwf ADCON1,0
      clrf PORTB,0
      clrf TRISB,0
      movlw 0x96
AGAIN   movwf T0CON,0
      movlw 0xA0
      movwf INTCON,0
      movlw 0xA4
      movwf TMR0H,0
      movlw 0x72
      movwf TMR0L,0         ;Valor de precarga para 3 segundos a 4MHz
Led      bsf LED1
ESPERA
      btfss flags,0,0
      bra ESPERA
      bcf flags,0,0

      movlw 0x67
      movwf TMR0H,0
      movlw 0x69
      movwf TMR0L,0         ;Valor de precarga para 5 segundos a 4MHz
LedA bcf LED1
ESPERA2
      btfss flags,0,0
      bra ESPERA2
      bcf flags,0,0

RST0   bcf INTCON, TMR0IF,0
      movlw 0xA4
      movwf TMR0H,0
      movlw 0x72
      movwf TMR0L,0
      bsf flags,0,0
      retfie

RST1   bcf INTCON, TMR0IF,0 ;Este Timer no sé como habilitarlo.
      movlw 0x67
      movwf TMR0H,0
      movlw 0x69
      movwf TMR0L,0
      bsf flags,0,0
      retfie
      goto AGAIN

      END
En línea
Páginas: [1]   Ir Arriba
  Imprimir  
 
Ir a:  

Impulsado por MySQL Impulsado por PHP Powered by SMF 1.1.21 | SMF © 2011, Simple Machines
SMFAds for Free Forums
XHTML 1.0 válido! CSS válido!
Página creada en 0.066 segundos con 25 consultas. (Pretty URLs adds 0.005s, 2q)
loggkey