Điều khiển led đơn

[minhb]

a có thể cho e ví dụ với khoảng 3 phím bấm ko? sau đó e tìm hiểu tiếp, nếu ko ok thì e sẽ nhờ các a? cám ơn a.

[hoangnam555]

có cách nào viết lại cho nó gọn hơn ko mấy a? vì e cần tới 16 phím bấm và 16 led lận?

đầu chương trình nhảy tới nhãn main để dò phím,muốn gọn thì dùng lệnh mov.

[minhb]

có cách nào viết lại cho nó gọn hơn ko mấy a? vì e cần tới 16 phím bấm và 16 led lận?

[minhb]

làm như a nam ko được giờ phải làm sao đây mấy a?
đoạn code đây:
$mod51
main:
jnb p0.0,sw1
jnb p0.1,sw2
jnb p0.2,sw3
jnb p0.3,sw4
jnb p0.4,sw5
jnb p0.5,sw6
jnb p0.6,sw7
jnb p0.7,sw8
jmp main

sw1:
jnb p0.0,$
clr p2.0
setb p2.1
setb p2.2
setb p2.3
setb p2.4
setb p2.5
setb p2.6
setb p2.7
ret
sw2:
jnb p0.1,$
clr p2.1
setb p2.0
setb p2.2
setb p2.3
setb p2.4
setb p2.5
setb p2.6
setb p2.7
ret
sw3:
jnb p0.2,$
clr p2.2
setb p2.0
setb p2.1
setb p2.3
setb p2.4
setb p2.5
setb p2.6
setb p2.7
ret
sw4:
jnb p0.3,$
clr p2.3
setb p2.0
setb p2.1
setb p2.2
setb p2.4
setb p2.5
setb p2.6
setb p2.7
ret

sw5:
jnb p0.4,$
clr p2.4
setb p2.0
setb p2.1
setb p2.2
setb p2.3
setb p2.5
setb p2.6
setb p2.7
ret
sw6:
jnb p0.5,$
clr p2.5
setb p2.0
setb p2.1
setb p2.2
setb p2.3
setb p2.4
setb p2.6
setb p2.7
ret
sw7:
jnb p0.6,$
clr p2.6
setb p2.0
setb p2.1
setb p2.2
setb p2.3
setb p2.4
setb p2.5
setb p2.7
ret
sw8:
jnb p0.7,$
clr p2.7
setb p2.0
setb p2.1
setb p2.2
setb p2.3
setb p2.4
setb p2.5
setb p2.6
ret
end

[hoangnam555]

à có thể nó nhảy ko tới,bạn đưa ct main vào giữa ngay ct con sw4 và sw5.

[chung1608]

lỗi do lệnh JB nhảy ko đc xa thế thôi

[hoangnam555]

up code ko up up cái này sao hiểu?

[minhb]

cứ cho nó kiểu tra lần lượt từng nút. Nếu kiểm tra nguyên cả port thì lỡ 2 thằng bấm cùng lúc thì biết tính sao, ko lẽ cho bấm lại

E đã thử với 7 phím bấm thì ok, nhưng khi qua phím thứ 8 thì chương trình cứ báo lỗi ngay tại chỗ khai báo phím bấm số 8, sao lại kỳ vậy được các a?

1 $mod51
0000 2 main:
0000 308017 3 jnb p0.0,sw1
0003 308128 4 jnb p0.1,sw2
0006 308239 5 jnb p0.2,sw3
0009 30834A 6 jnb p0.3,sw4
000C 30845B 7 jnb p0.4,sw5
000F 30856C 8 jnb p0.5,sw6
0012 30867D 9 jnb p0.6,sw7
0015 308700 10 jnb p0.7,sw8
****----------------------------------^
****ERROR #18: Target address exceeds relative address range
0018 80E6 11 jmp main
001A 12 sw1:
001A 3080FD 13 jnb p0.0,$
001D C2A0 14 clr p2.0
001F D2A1 15 setb p2.1
0021 D2A2 16 setb p2.2
0023 D2A3 17 setb p2.3
0025 D2A4 18 setb p2.4
0027 D2A5 19 setb p2.5
0029 D2A6 20 setb p2.6
002B D2A7 21 setb p2.7
002D 22 22 ret
002E 23 sw2:
002E 3081FD 24 jnb p0.1,$
0031 C2A1 25 clr p2.1
0033 D2A0 26 setb p2.0
0035 D2A2 27 setb p2.2
0037 D2A3 28 setb p2.3
0039 D2A4 29 setb p2.4
003B D2A5 30 setb p2.5
003D D2A6 31 setb p2.6
003F D2A7 32 setb p2.7
0041 22 33 ret
0042 34 sw3:
0042 3082FD 35 jnb p0.2,$
0045 C2A2 36 clr p2.2
0047 D2A0 37 setb p2.0
0049 D2A1 38 setb p2.1
004B D2A3 39 setb p2.3
004D D2A4 40 setb p2.4
004F D2A5 41 setb p2.5
0051 D2A6 42 setb p2.6
0053 D2A7 43 setb p2.7
0055 22 44 ret
0056 45 sw4:
0056 3083FD 46 jnb p0.3,$
0059 C2A3 47 clr p2.3
005B D2A0 48 setb p2.0
005D D2A1 49 setb p2.1
005F D2A2 50 setb p2.2
0061 D2A4 51 setb p2.4
0063 D2A5 52 setb p2.5
0065 D2A6 53 setb p2.6
0067 D2A7 54 setb p2.7
0069 22 55 ret
006A 56 sw5:
MACHTE^1 PAGE 2

006A 3084FD 57 jnb p0.4,$
006D C2A4 58 clr p2.4
006F D2A0 59 setb p2.0
0071 D2A1 60 setb p2.1
0073 D2A2 61 setb p2.2
0075 D2A3 62 setb p2.3
0077 D2A5 63 setb p2.5
0079 D2A6 64 setb p2.6
007B D2A7 65 setb p2.7
007D 22 66 ret
007E 67 sw6:
007E 3085FD 68 jnb p0.5,$
0081 C2A5 69 clr p2.5
0083 D2A0 70 setb p2.0
0085 D2A1 71 setb p2.1
0087 D2A2 72 setb p2.2
0089 D2A3 73 setb p2.3
008B D2A4 74 setb p2.4
008D D2A6 75 setb p2.6
008F D2A7 76 setb p2.7
0091 22 77 ret
0092 78 sw7:
0092 3086FD 79 jnb p0.6,$
0095 C2A6 80 clr p2.6
0097 D2A0 81 setb p2.0
0099 D2A1 82 setb p2.1
009B D2A2 83 setb p2.2
009D D2A3 84 setb p2.3
009F D2A4 85 setb p2.4
00A1 D2A5 86 setb p2.5
00A3 D2A7 87 setb p2.7
00A5 22 88 ret
00A6 89 sw8:
00A6 3087FD 90 jnb p0.7,$
00A9 C2A7 91 clr p2.7
00AB D2A0 92 setb p2.0
00AD D2A1 93 setb p2.1
00AF D2A2 94 setb p2.2
00B1 D2A3 95 setb p2.3
00B3 D2A4 96 setb p2.4
00B5 D2A5 97 setb p2.5
00B7 D2A6 98 setb p2.6
00B9 22 99 ret
100 end

VERSION 1.2h ASSEMBLY COMPLETE, 1 ERRORS FOUND

ERROR SUMMARY:
Line #10, ERROR #18: Target address exceeds relative address range
MACHTE^1 PAGE 3

MAIN . . . . . . . . . . . . . . C ADDR 0000H
P0 . . . . . . . . . . . . . . . D ADDR 0080H PREDEFINED
P2 . . . . . . . . . . . . . . . D ADDR 00A0H PREDEFINED
SW1. . . . . . . . . . . . . . . C ADDR 001AH
SW2. . . . . . . . . . . . . . . C ADDR 002EH
SW3. . . . . . . . . . . . . . . C ADDR 0042H
SW4. . . . . . . . . . . . . . . C ADDR 0056H
SW5. . . . . . . . . . . . . . . C ADDR 006AH
SW6. . . . . . . . . . . . . . . C ADDR 007EH
SW7. . . . . . . . . . . . . . . C ADDR 0092H
SW8. . . . . . . . . . . . . . . C ADDR 00A6H

[chung1608]

[ATTACH=CONFIG]64496[/ATTACH]
mạch của e đây, e mới thử với 4 phím bấm thôi, các a xem giúp e với.

cứ cho nó kiểu tra lần lượt từng nút. Nếu kiểm tra nguyên cả port thì lỡ 2 thằng bấm cùng lúc thì biết tính sao, ko lẽ cho bấm lại

[hoangnam555]

[ATTACH=CONFIG]64496[/ATTACH]
mạch của e đây, e mới thử với 4 phím bấm thôi, các a xem giúp e với.

nếu nối phím với port thì phải có trở treo,để P0 out led hay hơn.
Như vậy trong chương trình để bật led thì dùng lệnh CLR và tắt led thì dùng lệnh SETB.

[minhb]

mạch thì up ảnh lên,khỏi mất công down về,file hỗ trợ là zip chứ ko hỗ trợ rar,ảnh thì có jpg,png...chi tiết trong mục đính kèm.

mạch của e đây, e mới thử với 4 phím bấm thôi, các a xem giúp e với.

[hoangnam555]

diễn đàn có up được file .rar ko a?

mạch thì up ảnh lên,khỏi mất công down về,file hỗ trợ là zip chứ ko hỗ trợ rar,ảnh thì có jpg,png...chi tiết trong mục đính kèm.

[minhb]

diễn đàn có up được file .rar ko a?

[hoangnam555]

Cám ơn a Nam, có nghĩa là những câu lệnh vẫn để nguyên, chỉ đổi những chỗ setb thành clr và những chỗ clr thành setb thôi phải ko? thanks all

phần cứng của bạn đâu,up lên mọi người xem thử.

[minhb]

Cám ơn a Nam, có nghĩa là những câu lệnh vẫn để nguyên, chỉ đổi những chỗ setb thành clr và những chỗ clr thành setb thôi phải ko? thanks all