📄 a4_2.asm
字号:
;///////////////////////////////////////////
;本程序源代码由单片机培训网提供.
;单片机培训网,让更多人学习单片机更容易.
;第一网址----www.mcuedu.com
;第二网址----http://51_train.nease.net
;创办人------刘永忠
;热线电话----(0755)27529998
;email-------aa815@163.com
;用取表方式实现广告灯的移动和闪烁.
;P1口单一灯左移两次,右移两次,闪烁两次.
;程序难易等级--------稍难
;///////////////////////////////////////////
org 0000h
jmp start
org 0030h
start:
mov dptr,#table ;table表的地址存入数据指针
loop:
clr a ;清除ACC
movc a,@a+dptr ;到数据指针所指的地址取码
cjne a,#01,loop1 ;取出的码是否01H?不是则跳到LOOP1
jmp start
loop1:
mov p2,a ;将A输出至P1
mov r3,#20 ;延时0.2秒
call delay
inc dptr ;数据指针加一,取下一个码
jmp loop
delay:
mov r4,#20 ;10毫秒
d1:
mov r5,#248
djnz r5,$
djnz r4,d1
djnz r3,delay
ret
table:
db 0feh,0fdh,0fbh,0f7h ;左移
db 0efh,0dfh,0bfh,7fh
db 0feh,0fdh,0fbh,0f7h ;左移
db 0efh,0dfh,0bfh,7fh
db 7fh,0bfh,0dfh,0efh ;右移
db 0f7h,0fbh,0fdh,0feh
db 7fh,0bfh,0dfh,0efh ;右移
db 0f7h,0fbh,0fdh,0feh
db 00h,0ffh,00h,0ffh ;闪烁2次
db 01h ;结束码
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -