hi guys can any one help me with assembly code for dimming an led using the pic16f88.i have read the datasheet and and i have come up with code but it doesnt work.

can anyone please tell me whats wrong with with this code.

list p=16f88
INCLUDE "p16f88.inc"


_;****Set up the Constants****

STATUS equ 03h
TRISA equ 85h
TRISB equ 86h
PORTA equ 05h
PORTB equ 06h
COUNT2 equ 21h
COUNT1 equ 20h
ANSEL equ 9Bh
OSCCON equ 8Fh
CCP1CON equ 17h
T2CON equ 12h
TMR2 equ 11h
CCPR1L equ 15h
PR2 equ 92h
PIR1 equ 0Ch
PIE1 equ 8Ch


movlw B'00000000' ; 8Mhz 4Mhz = B'01100000'31.25khz
bsf STATUS, 5
movwf OSCCON
nop
nop
nop
bcf STATUS, 5
movlw b'00111100'
movwf CCP1CON

bsf 03h,5
movlw 00h
movwf TRISA

movlw 00h
movwf TRISB

movlw 00h
movwf ANSEL

movlw b'11111111'
movwf PR2

bcf 03h,5
movlw b'00001111'
movwf TMR2



Start
movlw b'00001111'
movwf CCPR1L
Loop1
decfsz CCPR1L
goto Loop1
goto Start
end