tapi8 .. muchas gracias ya pude solucionar los problemas con la copilacion ....
sander lo que pasa es que quiero encerder los led con 0.. estoy utilizando lógica inversa pagarlos con un 1 y encenderlos con 0.. me dijeron que es la mejor forma de encerder los
led...
ahora tengo otro problemita .. acomode algo al programa con la subrutina de retardo y al copilar no me da ningún error.. pero estoy intentando simular y me aparece esto:
error ;denle click para ver la captura
tengo entendido que para colocar una fuente de 5v selecciono power en terminales..
asi quedo mi codigo.. no se si tenga detalles
INCLUDE <P16F877A.INC>
LIST P=16F877A
__CONFIG _XT_OSC & _WDT_OFF & _PWRTE_ON & _CP_OFF & _BOREN_ON & _LVP_OFF
;REDIFINICION DE NOMBRE
#DEFINE PUERTO_A PORTA
#DEFINE PUERTO_B PORTB
#DEFINE PUERTO_C PORTC
CBLOCK H'20' ;BLOQUE DE VARIABLES O REGISTROS
CONT1
CONT2
CONT3
ENDC
ORG H'00'
GOTO COMIENZO
ORG H'100'
COMIENZO CALL PUERTO ; LLAMDA A PUERTO.
BCF STATUS,C
CICLO RRF PORTC,F
CALL RETARDO
GOTO CICLO
;***************************************************************************************************
; BLOQUE DE RUTINAS BLOQUE DE RUTINAS
;******************************************************************************************************
PUERTO BSF STATUS,RP0
BCF STATUS,RP1
MOVLW B'111111'
MOVWF TRISA
MOVLW B'11111111'
MOVWF TRISB
MOVLW B'11111111'
MOVWF TRISC
MOVLW B'11111111'
MOVWF TRISD
MOVLW B'111'
MOVWF TRISE
CLRF OPTION_REG
NOP
MOVLW B'00000110'
MOVWF ADCON1
BCF PIE1,ADIE ; DESABILITADA LA CONVERSION
BCF STATUS,RP0
MOVLW B'111111'
MOVWF PORTA
MOVLW B'1111111'
MOVWF PORTB
MOVLW B'11111111'
MOVWF PORTC
MOVLW B'11111111'
MOVWF PORTD
MOVLW B'111'
MOVWF PORTE
MOVLW B'00000000'
MOVWF INTCON
RETURN
RETARDO MOVLW .191
MOVWF CONT1
MOVlW .191
MOVWF CONT2
MOVLW .10
MOVWF CONT3
CICLO1 DECFSZ CONT1,F
GOTO CICLO1
DECFSZ CONT2,F
GOTO CICLO1
DECFSZ CONT3,F
GOTO CICLO1
RETURN
;******************************************************************************************************
END
les agradezco la ayuda de antemano.