tks for all

now i know how to send by pdf, here is the attachment
pic18f26k20_porttest.PDF
i used pbp v 2.6

i used internal osc 64mhz or 4mhz
no external capacitors on the osc pins,
the same program that is programed into the chip ran before but now it does not ( on both pcb and breadboard)
i attach the program that is slighly changed the pause statement:

INCLUDE "h:\AllDigital.pbp"
ASM
__CONFIG _CONFIG1H, _FOSC_INTIO67_1H & _FCMEN_OFF_1H & _IESO_OFF_1H
__CONFIG _CONFIG2H, _WDTEN_ON_2H & _WDTPS_512_2H
__CONFIG _CONFIG3H, _CCP2MX_PORTC_3H & _PBADEN_OFF_3H & _LPT1OSC_OFF_3H & _HFOFST_ON_3H & _MCLRE_ON_3H
__CONFIG _CONFIG4L, _STVREN_ON_4L & _LVP_OFF_4L & _XINST_OFF_4L
ENDASM
OSCCON = $70 '$70 Internal oscillator is set to 16MHz $62 ' 8mhz--- '; Primary Clock is selected as system clock.
OSCTUNE = $40 'HFINTOSC selected; PLL enabled; Factory calibrated frequency
define OSC 64
ADCON0 = 0
CM1CON0.7 = 0
CM2CON0.7 = 0
portb = 0
latb = 0
trisb = 0
'------------------------------------------
i var byte
m var byte
main_program:
gosub blink 'call suroutin to blink a led
GOTO main_program
'==============================================
blink:
high portb '= $ff ' light the led for acertain amount of time
for i = 0 to 100 'loop to maintain the led on
FOR M = 0 TO 10
pause 1
NEXT
NEXT
low portb '= 0 'tuen off the led for certain amount of time
for i = 0 to 50 'loop to maintain the led off
FOR M = 0 TO 10
pause 1
NEXT
NEXT
return
'-------------------------------------------
end