;------------------------------------------------------------
; Código assembler generado por Niple V5.4.0
; Proyecto: prueba 16F716
; Autor: ---
; Fecha: 28/7/2009
; PIC: 16F627
; Velocidad de reloj: 4 Mhz
; Descripcion: pruebas de programacion para compilar como 716
;------------------------------------------------------------


 LIST    P=PIC16F716
INCLUDE <P16F716.INC>

__CONFIG _XT_OSC & _WDT_OFF &  _PWRTE_ON 

PUERTOA  equ  0x022        
             
;------------------------------------------------------------
;               Declaración de Registros EEPROM
;------------------------------------------------------------


;------------------------------------------------------------
;                        Inicio
;------------------------------------------------------------

   org 0
   goto paso2

   org 5


;------------------------------------------------------------
;                      programa principal
;------------------------------------------------------------
paso2
   bcf STATUS,RP0                   ;cambiar a banco 0
   bcf STATUS,RP1
   clrf PUERTOA
   clrf PORTA
   movlw b'00011111'                ;configurar el puerto a como xxxeeeee
   bsf STATUS,RP0                   ;cambiar a banco 1
   movwf TRISA
   movlw b'00000111'                ;puerto a = e/s digital
   bcf STATUS,RP0                   ;cambiar a banco 0
   clrf PORTB
   movlw b'00000000'                ;configurar el puerto b como ssssssss
   bsf STATUS,RP0                   ;cambiar a banco 1
   movwf TRISB
paso4
   nop
   ;leer un dato del puerto a
   bcf STATUS,RP0                   ;cambiar a banco 0
   bcf STATUS,RP1
   movf PORTA,W
   movwf PUERTOA                    ;escribir en el puerto b
   movf PUERTOA,W
   movwf PORTB
   nop
   goto paso4                       ;cierra el ciclo

;------------------------------------------------------------
;                  DATOS EN MEMORIA EEPROM
;------------------------------------------------------------

 End