i var byte
x var byte
TRISB=0
i=0
begin
For i=0 to 7
Lookup i,[1,2,4,8,16,32,64,128],x
PORTB=x
Pause 200
next i
i=0
goto begin
end
Well in this little sample there is For next so check it out!
And don't use those High and Low if it is possible better use =0, =1 - it will save your code space![]()
Bookmarks