DEFINE OSC 4
TRISB =%00000000
Index var byte
MAIN:
for index=0 to 8
lookup INDEX, [96, 218, 242, 102, 182, 190, 224, 254, 246], PORTB
pause 500
next Index
goto main
文章標籤
全站熱搜
- 10月 06 週四 200505:49
7 Segament code
DEFINE OSC 4
TRISB =%00000000
Index var byte
MAIN:
for index=0 to 8
lookup INDEX, [96, 218, 242, 102, 182, 190, 224, 254, 246], PORTB
pause 500
next Index
goto main