UNIVERSIDAD POLITECNICA INFORME

download UNIVERSIDAD POLITECNICA INFORME

of 12

Transcript of UNIVERSIDAD POLITECNICA INFORME

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    1/12

    UNIVERSIDAD POLITECNICA SALESIANA

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    2/12

    TEMA: LA UTILIZACION DECLARACIONES CON EL MICROCONTROLADOR PIC16F877A.

    OBJETIVO: Utilizar Las declaraciones if, select case, do, for, while con el microcontroladorPIC y dsPIC 16F877A.

    DESARROLLOLa utilizacin de la placa programadora PICTrainer de PIC y el software Microbasic dellaboratorio.

    PROCEDIMIENTO

    EJERCICIO 1

    PROBLEMA

    Si se presiona el botn el foco se enciende por 3 segundos, luego se apaga 1 segundo y sevuelve a encender el foco por 3 segundos. Caso contrario el foco permanece prendido.

    ALGORITMO

    Entrada: Por medio del pulsador ingresamos el valor FFh por el Puerto C.Proceso: Si presionamos el pulsador el foco se encender por 3 segundos, despus se apaga por 1segundo y se vuelve a encender el foco por 3 segundos ms. Si no presionamos el pulsador el focopermanecer prendido.

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    3/12

    Salida: Visualizamos si el encendido y apagado del foco funciona correctamente por la salidadel puerto B.

    CDIGO

    program practica21trisc=$fftrisb=$0main:if portc.0=1 thenportb.0=1delay_ms(3000)portb.0=0delay_ms(1000)portb.0=1delay_ms(3000)portb.0=0else

    portb.0=1end ifgoto mainend.DIAGRAMA DE FLUJOS

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    4/12

    ESQUEMTICO:

    GRAFICO ANEXO

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    5/12

    EJERCICIO 2PROBLEMA

    Utilizando la sentencia For-nex, elaborar un contador ascendente de 0 a 9, que sea repetitivo.

    ALGORITMO

    Entrada: No hay.Proceso: Contador del 0 al 9 que sea repetitivo.Salida: Por el Puerto B mandamos la seal al display de 7 segmentos.

    CDIGO

    program practica2_2main:dim i,a as bytetrisb=0i=1

    a=0for i=1 to 10portb=aa=a+1delay_ms(500)next iif a=10 thena=0elseend ifdelay_ms(500)goto main

    end.

    DIAGRAMA DE FLUJOS

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    6/12

    ESQUEMTICO:

    GRAFICO ANEXO :

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    7/12

    EJERCICIO 3PROBLEMA

    Mediante la secuencia For-nex, elaborar un contador descendente entre 0 y 9.ALGORITMO

    Entrada: No hay.Proceso: Contador del 9 al 0 que sea repetitivo.

    Salida: Por el Puerto B mandamos la seal al display de 7 segmentos.

    CDIGO

    program practica2_3main:dim i,a as bytetrisb=0i=1

    a=9for i=0 to 9portb=aa=a-1delay_ms(500)next iif a=0 thena=9elseend ifdelay_ms(500)goto main

    end.

    DIAGRAMA DE FLUJOS

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    8/12

    ESQUEMTICO:

    GRAFICO ANEXO :

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    9/12

    EJERCICIO 4PROBLEMA

    Utilizar la secuencia While-wend, para elaborar un contador ascendente de dos dgitos.ALGORITMO

    Entrada: No hay.Proceso: Realizamos un contador ascendente utilizando la secuencia While-wend.Salida: Por el Puerto B y el Puerto F mandamos la seales a los 2 display de 7 segmentosrespectivamente.CDIGO

    program practica2_4main:Dim A,B As Bytedim I As wordA=0B=0

    I=0TRISB=0TRISF=0while trueportf=1portb=Adelay_us(1)portf=2portb=Bdelay_us(1)inc(I)if I=2000 then

    Inc(B)if B=10 thenB=0Inc(A)elseif A=10 thenA=0End ifEnd ifI=0elseend if

    wendend. 10

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    10/12

    DIAGRAMA DE FLUJOS

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    11/12

    ESQUEMTICO:

    GRAFICO ANEXO :

  • 8/8/2019 UNIVERSIDAD POLITECNICA INFORME

    12/12

    CONCLUCIONES- La utilizacin del pic tambin nos sirve para manejar instrumentos de potencia como el

    foco a 110v .

    - For-nex y While-wend nos sirvi de mucha ayuda ya que pudimos realizar dichoscontadores con mucho xito y adems el uso de estas sentencias hicieron que la

    programacin sea corta.

    Bibliografa- Hojas de prcticas para Laboratorio Sistemas Microprocesados I.

    - http://ww1.microchip.com/downloads/en/devicedoc/70138c.pdf

    - http://www.mikroe.com/en/books/dspicbook/mikropascal/ch9/images/fig9-13a.gif