hola que tal apenas me acabo que unir a este foro que me gusto mucho y pues soy un principiante en este tema, tengo dudas de como poner los
comentarios ya que estudio en prepa y mi maestro no me explica del todo bien. he conseguido hacer que funcione mi trabajo pero la
cuestion es copie la subrutina de retardo y no se que ponerle en los comentarios faltantes espero y me ayuden y de paso si me pueden dar una
explicadita seria estupendo.
y disculpen por que lo puse en proyectos tambien es que no sabia donde ponerlo has que creo que se pone aqui soy nuevo lo siento
list p=P16F84A
#Include P16F84A.INC
__CONFIG _CP_OFF &_WDT_OFF & _PWRTE_ON & _XT_OSC
;::::::::::::::::::::::::::::::MAPA DE MEMORIA:::::::::::::::::::::::::::::::::::::::::::
STATUS EQU 0X03
TRISB EQU 0X86
PORTB EQU 0X06
F EQU 0X01
;:::::::::::::::::::::::::::REGISTRO DE RETARDO::::::::::::::::::::::::::::::::::::::
REG1 EQU 0X0C ;
REG2 EQU 0X0D ;
REG3 EQU 0X0E ;
;:::::::::::::::::::::::::::INICIO DE PROGRAMA:::::::::::::::::::::::::::::::::::::::::
ORG 0X00 ;aqui iniciare cada que ocurre un reset
GOTO INICIO ;ir a inicio
INICIO BSF STATUS, 5 ;cambio a 1 rp0 y paso al banco 1
CLRF TRISB ;cambia a 0 todos los puertos b
BCF STATUS, 5 ;cambio a 0 rp0 y paso al banco 0
;::::::::::::::::::::::::::PROGRAMA PRINCIPAL::::::::::::::::::::::::::::::::::::::::
CICLO MOVLW B'10000001 ;cargo w con 10000001
MOVWF PORTB ;descarga este valor(10000001) en el puerto b
CALL RETARDO ;llama al retardo
CLRF PORTB ;limpia el puerto b
MOVLW B'01000010 ;cargo w con 01000010
MOVWF PORTB ;descarga este valor(01000010) en el puerto b
CALL RETARDO ;llama al retardo
CLRF PORTB ;limpia el puerto b
MOVLW B'00100100 ;cargo w con 00100100
MOVWF PORTB ;descarga este valor(00100100) en el puerto b
CALL RETARDO ;llama al retardo
CLRF PORTB ;limpia el puerto b
MOVLW B'00011000 ;cargo w con 00011000
MOVWF PORTB ;descarga este valor(00011000) en el puerto b
CALL RETARDO ;llama al retardo
CLRF PORTB ;limpia el puerto b
MOVLW B'00100100 ;cargo w con 00100100
MOVWF PORTB ;descarga este valor(00100100) en el puerto b
CALL RETARDO ;llama al retardo
CLRF PORTB ;limpia el puerto b
MOVLW B'01000010 ;cargo w con 01000010
MOVWF PORTB ;descarga este valor(01000010) en el puerto b
CALL RETARDO ;llama al retardo
CLRF PORTB ;limpia el puerto b
MOVLW B'10000001 ;cargo w con 10000001
MOVWF PORTB ;descarga este valor(10000001) en el puerto b
CALL RETARDO ;llama al retardo
CLRF PORTB ;limpia el puerto b
GOTO CICLO ; ir a ciclo
;::::::::::::::::::::::::RUTINA DE RETARDO:::::::::::::::::::::::::::
RETARDO MOVLW 10 ;Carga el acumulador (w) con el valor 10
MOVWF REG1 ;Mueve el contenido del acumulador (w) al registro1
TRES MOVLW 20 ;Carga el acumulador (w) con el valor 20
MOVWF REG2 ;Mueve el contenido del acumulador (w) al registro2
DOS MOVLW 30 ;Carga el acumulador (w) con el valor 30
MOVWF REG3 ;Mueve el contenido del acumulador (w) al registro3
UNO DECFSZ REG3, F
GOTO UNO
DECFSZ REG2, F
GOTO DOS
DECFSZ REG1, F
GOTO TRES
RETURN ;retorna al programa principal
;::::::::::::::::::::::FIN DEL PROGRAMA::::::::::::::::::::::::::::::
END ;fin del programa
