PIC16F84A. Не включить на выход RB4
Всем зрасте 
Подскажите пожалуйста! Имеется PIC16F84A. Не включить на выход RB4.
На всех выходах светодиодики. Программа прост их включает. Выход не паленый, 500 ом стоят, светодиод нормальный. Все светятся кроме того что на RB4.
Что делаю не так?
;*******************************************************************************
; PIC16F84A Кварц 4 мГц.
;===============================================================================
LIST p=16F84A ; Установка типа микроконтроллера.
__CONFIG 03FF1H ; Бит защиты выключен, WDT выключен,
; стандартный XT - генератор.
;===============================================================================
; Определение положения регистров специального назначения.
;===============================================================================
Status equ 03h ; выбор банка/Z/DC/C.
TrisA equ 05h ; выбор направления работы выводов порта A.
PortA equ 05h ; управление защелками порта A.
TrisB equ 06h ; выбор направления работы выводов порта В.
PortB equ 06h ; управление защелками порта В.
;===============================================================================================
; Определение места размещения результатов операций.
;===============================================================================================
F equ 1 ; Результат направить в регистр.
W equ 0 ; Результат направить в аккумулятор.
;===============================================================================================
;===============================================================================================
org 0 ; Начать выполнение программы с адреса 0 PC.
goto Start ; Переход в ПП Start.
;*******************************************************************************
; Текст рабочей части программы.
;*******************************************************************************
; Установка направления работы RB0 - на выход, RA0 - вход
;-------------------------------------------------------------------------------
Start bsf Status,5 ; Перейти в банк 1 (уст. в 1 5-й бит регистра Status).
movlw .0 ; Записать константу 0 в аккумулятор (W).
movwf TrisB ; Скопировать 0 из W в регистр TrisB.
movlw .0 ; Записать константу 0 в аккумулятор (W).
movwf TrisA ; Скопировать 0 из W в регистр TrisA.
bcf Status,5 ; Перейти в банк A (уст. в 1 5-й бит регистра Status).
movlw .255
Again movwf PortA ;
movwf PortB ; записать байт
goto Again ; Переход на новый полный цикл программы.
;*******************************************************************************
end ; Директива конца программы (всегда
; последняя снизу).