Config 18F25K22

i'm try configure 18F25K22 for work 16MHz internal Osc

code show hserout text wrong and led not blink

Code:

asm __CONFIG _CONFIG1H, _FOSC_INTIO67_1H & _FCMEN_OFF_1H & _IESO_OFF_1H __CONFIG _CONFIG2H, _WDTEN_OFF_2H & _WDTPS_512_2H __CONFIG _CONFIG3H, _MCLRE_INTMCLR_3H & _PBADEN_OFF_3H __CONFIG _CONFIG4L, _LVP_OFF_4L & _XINST_OFF_4L __CONFIG _CONFIG5L, _CP0_ON_5L & _CP1_ON_5L & _CP2_ON_5L & _CP3_ON_5L __CONFIG _CONFIG5H, _CPB_ON_5H endasm @ errorlevel -202 '---[ Serial 1 ]---------------------------------------------------------------- DEFINE HSER_RCSTA 90h DEFINE HSER_TXSTA 20h DEFINE HSER_BAUD 9600 DEFINE HSER_CLROERR 1 '---[ Portas ]------------------------------------------------------------------ Led var PORTA.0 '---[ Váriaveis ]--------------------------------------------------------------- I Var WORD L Var WORD J Var BYTE K Var BYTE Sim Con 1 Nao Con 0 '------------------------------------------------------------------------------- OSCCON = %01110000; ' 16mHz OSCTUNE = %00000000; ' 16 MHz PLL Off bit 6=0, 64MHz PLL On bit 6=1 CM1CON0.7 = 0 ' Comparadores ADCON1 = 15 ' Portas A e B Digital INTCON2.7 = 0 ' Ativa Pull-Ups ANSELC = 0 ' Serial 1 '------------------------------------------------------------------------------- PORTA = 0 PORTB = 0 PORTC = 0 LATA = 0 LATB = 0 LATC = 0 TRISA = %00000000 TRISB = %10000000 TRISC = %10000000 '------------------------------------------------------------------------------- Led = 1 pause 3000 HSEROUT ["> START", 13] pause 1 Led = 0 '---[ Programa ]---------------------------------------------------------------- Inicio: Led = 0 pause 3000 Led = 1 goto Inicio '------------------------------------------------------------------------------- End