16f876 PortA - problemino

[angelole]

Salve, dopo parecchi mesi sto tentanto di programmare un 16f876.
Il mio porblema è che non riesco ad inviare un segnale su piedino RA0 del 16f876.

Ecco il codice

                PROCESSOR       16F876
                RADIX           DEC
                INCLUDE         "P16F876.INC"
                ERRORLEVEL      -302
                __CONFIG        0x3F31


                ORG     0x20
untmp        RES     1
                
                ORG     0x00
START
                BCF     STATUS,RP0
                BCF     STATUS,RP1      ;banco 0
                CLRF    PORTA
              
                BSF     STATUS,RP0      ;seleziono il banco 1
                MOVLW   0x06            
                MOVWF   ADCON1          
               
                MOVLW   0xCE
                MOVWF   TRISA           ; 11001110  0=output   1=input

                BCF     STATUS,RP0      

           
;------------------------------------------------------------------------          
routine             
                BSF     PORTA,0          ;sale   
                CALL    ritardo 
                BCF     PORTA,0          ;scende
                CALL    ritardo 
                GOTO    routine
                
                
;------------------------------------------------------------------------
ritardo                    ;0.104 ms

                MOVLW   33
                MOVWF   untmp

loop
                DECFSZ  untmp
                GOTO    loop
                RETURN

                END

Qualcuno può indicarmi dove sbaglio.

Grazie