decoding PIC assembly -- need help

[uchiprox]

is there any chance somebody could help me figure out what this code does:

list p=18f458, f=inhx32
#include <p18f458.inc>

BankRam equ 'H20'
cblock BankRAM
     COUNT
     DVAR
     DVAR2
endc

org 00h
goto start

org 1C h 
Start
     movlw   0
     movwf   PORTB,0
     movwf   TRISB,0

IncCount
     incf        COUNT,1,0
     movf      COUNT,0,0
     movwf           PORTB,0
     call         Delay
     goto        IncCount

Delay 
      movlw   00FF
      movwf   DVAR2

D0
     movwf    DVAR

D1 
      decfsz     DVAR,1
      goto     D1
      decfsz     DVAR2,1
      goto     D0
      return
end

Many thanks!,
uChipRox

[Darrel Taylor]

is there any chance somebody could help me figure out what this code does:

Your guess is as good as mine. But...

In PicBasic Pro it would look like ....

COUNT  VAR BYTE

PORTB = 0
TRISB = 0

IncCount:
    COUNT = COUNT + 1
    PORTB = COUNT
    PAUSE  65 
GOTO IncCount

Assuming a 4mhz OSC.

@ 20mhz it would be PAUSE 13.
<br>