Connecting to MPLAB ICD 2
...Connected
Setting Vdd source to MPLAB ICD 2
Target Device PIC16F877A found, revision = b4
...Reading ICD Product ID
Running ICD Self Test
...Passed
MPLAB ICD 2 Ready
Resetting Target
Resetting Target
MPLAB ICD 2 Ready
MPLAB ICD 2 Ready
Programming Target...
...Validating configuration fields
...Erasing Part
...Programming Program Memory (0x0 - 0x6F)
...Loading DebugExecutive
...Programming DebugExecutive
...Programming Debug Vector
Verifying...
...Program Memory
...Debug Executive
...Debug Vector
...Verify Succeeded
Programming Configuration Bits
.. Config Memory
Verifying configuration memory...
...Verify Succeeded
Connecting to debug executive
ICD0083: Debug:  Unable to enter debug mode.  Please double click this message for more information.
MPLAB ICD 2 Ready

program adconthe877A;
var temp_res : word;

begin
  ADCON1 := $80;                    // Configure analog inputs and Vref
  TRISA  := $FF;                    // PORTA is input
  TRISB  := $3F;                    // Pins RB7 and RB6 are output
  TRISD  := $0;                     // PORTD is output
  while TRUE do
  begin
    temp_res := Adc_Read(0);
    PORTD := temp_res;              // Send lower 8 bits to PORTD
    PORTB := word(temp_res shr 2);  // Send 2 most significant bits to PORTB
  end;
end.