Your code has some issues


Code:
INCLUDE "h:\AllDigital.pbp"    why ?
 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                        why ?
 CM1CON0.7 = 0                   why ?
 CM2CON0.7 = 0                   why ?           
 portb = 0                            why ?
 latb  = 0                              why ?
 trisb = 0                     is this really what you want ?
 '------------------------------------------
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         this is not a legitimate use of HIGH  
 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              this is not a legitimate use of LOW  
 for i = 0 to 50     'loop to maintain the led off
    FOR M = 0 TO 10
        pause 1
    NEXT
 NEXT
 return
 '-------------------------------------------
end
I can't verify your config settings as I no longer use that ancient old complier [you could at least update to 2.6c]

assuming your config and osc settings are workable then this code is tested an works for me ,
1k r in series with led, vdd 5v 4.7k pullup on mclr

Code:
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 
ANSELH = 0 
 

trisb=%11111110
  
pause 2000
   

 '------------------------------------------
 i var byte
 m var byte
 main_program: 
 gosub blink 'call subroutine to blink a led
 GOTO main_program 
 '============================================== 
 blink:
 LATB.0=1 ; light the led  on portb.0 for a certain amount of time
 for i = 0 to 100 'loop to maintain the led on
 FOR M = 0 TO 10
 pause 1
 NEXT
 NEXT
 
 LATB.0=0  'turn 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