tou can make it that way:
Code:
TRISB = 0
INTCON = 0
X VAR BYTE
FOR X = 0 TO 7
PORTB.0[X] = 1
PAUSE 500
PORTB.0[X] = 0
PAUSE 500
NEXT X
END
tou can make it that way:
Code:
TRISB = 0
INTCON = 0
X VAR BYTE
FOR X = 0 TO 7
PORTB.0[X] = 1
PAUSE 500
PORTB.0[X] = 0
PAUSE 500
NEXT X
END
Last edited by crematory; - 2nd September 2005 at 17:35.
Bookmarks