[General] Delay and subroutine

[Baraah]

Hello i need to modyfiy this code

PORTB EQU 06; Port B Data Register
TRISBEQU86; Port B Direction Register
CNT EQU 20; GPR used as delay counter
CountOuter0equD'25'
CountInner0equD'20'

cblock0x20

CountOuter
CountInner
endc

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

; Initialise Port B (Port A defaults to inputs).............

BANKSELTRISB; Select bank 1
MOVLW b'00000000' ; Port B Direction Code
MOVWFTRISB ; Load the DDR code into F86
BANKSELPORTB; Select bank 0
GOTOreset; Jump to main loop


; 'delay' subroutine ........................................


delay
movlwCountOuter0
movwfCountOuter
DecO
movlwCountInner0
movwfCountInner
DecI
nop
decfszCountInner, F
gotoDecI
decfszCountOuter, F
gotoDecO
return


; Start main loop ...........................................

reset CLRF PORTB ; Clear Port B Data

start
INCF PORTB ; Increment output at Port B
MOVLW 0FF ; Delay count literal
CALLdelay; Jump to subroutine 'delay'
GOTO start ; Repeat main loop always

END ; Terminate source code

Such that the output PORTB
Look this
00000001,00000010,00000100,00001000,00010000

 

[danadakk]

Basically you want a variable that starts out as 0x01 and you left
shift it, with carry in if you want it to repeat after 8 shifts, before
each write to port.

Regards, Dana.