I had my code working on a pic16F, then I tried to merge to a more powerful 18f. The problem is that my P.W.M part isn't working now. My code is running because I added some lines to flash an LED and it did work, but once it comes to the P.W.M it does nothing. I've read the datasheet over and over, but I can't spot the mistake. Perhaps someone here can help me.

I'm using the following:
Pic18f2520
10 Mhz Crystal

My code is:

asm
__CONFIG _CONFIG1H, _OSC_HS_1H & _FCMEN_OFF_1H & _IESO_OFF_1H
__CONFIG _CONFIG2L, _BOREN_OFF_2L & _PWRT_ON_2L
__CONFIG _CONFIG2H, _WDT_ON_2H
__CONFIG _CONFIG3H, _MCLRE_OFF_3H & _CCP2MX_PORTBE_3H
__CONFIG _CONFIG4L, _LVP_OFF_4L & _DEBUG_OFF_4L
__CONFIG _CONFIG5L, _CP0_OFF_5L & _CP1_OFF_5L & _CP2_OFF_5L & _CP3_OFF_5L
__CONFIG _CONFIG5H, _CPB_OFF_5H & _CPD_OFF_5H
__CONFIG _CONFIG6L, _WRT0_OFF_6L & _WRT1_OFF_6L & _WRT2_OFF_6L & _WRT3_OFF_6L
__CONFIG _CONFIG6H, _WRTC_OFF_6H & _WRTB_OFF_6H & _WRTD_OFF_6H
__CONFIG _CONFIG7L, _EBTR0_OFF_7L & _EBTR1_OFF_7L & _EBTR2_OFF_7L & _EBTR3_OFF_7L
__CONFIG _CONFIG7H, _EBTRB_OFF_7H
endasm
'************************************************* **********************




Define OSC 10
cmcon = 7


'
'P.W.M
'
ccp1con = %1100
pr2 = 155 '1Khz
t2con = %110 ' T2 On Prescaler 1:16
'************************************************* **********************

'
'I/O
'
Trisb = 0
Trisa = %11
portb = 0
button var porta.1
'-----------------------------------------------------------------------------------

'
'Vars
'
duty var word
duty = 0

'-----------------------------------------------------------------------------------





Main:



if button = 0 then
pause 33

if duty = 625 then duty = 0

duty = duty + 5
CCPR1L=DUTY>>2
CCP1CON.5=DUTY.1
CCP1CON.4=DUTY.0
CCP1CON = %1100
endif
pause 1
goto main