Hi,
I just use a timer.
Code:
Time VAR WORD
 
TMR1L = 0
TMR1H = 0
 
T1CON.0 = 1  'Start TMR1
'code here
'code here
T1CON.0 = 0  'Stop TMR1
 
Time.HighByte = TMR1H
Time.LowByte = TMR1L
HSEROUT ["Execution time in cycles: ", DEC Time,13]
Something like that though I'm sure I've missed a bracket somewhere.... :-)

/Henrik.