-
-
-
mengxiangjun | 当前状态：离线
总积分：60 2025年可用积分：0
注册时间： 2008-01-23
最后登录时间： 2008-02-01
-
-
无线通讯技术
mengxiangjun 发表于 2008/5/12 9:38:15 1498 查看 1 回复 [上一主题] [下一主题]
手机阅读
ajmp main
org 0030h
main:setb p1.0
mov scon,#0
mov 30h,#0
acall dir
bb: jnb p1.0,bb
mov a,30h
inc a
mov 30h,a
lcall dir
cc: jb p1.0,cc
ajmp bb
dir: mov a,30h
mov b,#10
div ab
mov 31h,b
mov 32h,a
mov a,#0
mov 33h,a
mov 34h,a
mov 35h,a
mov 36h,a
mov r7,#6
mov r0,#31h
loop:mov dptr,#dbb
mov a,@r0
movc a,@a+dptr
mov sbuf,a
jnb ti,$
clr ti
inc r0
djnz r7,loop
ret
dbB:DB 0C0H,0F9H,0A4H
DB 0B0H,99H,92H
DB 82H,0F8H,80H
DB 90H,88H,83H,0C6H,0A1H,86H,8EH,0FFH
endorg 0000h
ajmp main
org 0030h
main:setb p1.0
mov scon,#0
mov 30h,#0
acall dir
bb: jnb p1.0,bb
mov a,30h
inc a
mov 30h,a
lcall dir
cc: jb p1.0,cc
ajmp bb
dir: mov a,30h
mov b,#10
div ab
mov 31h,b
mov 32h,a
mov a,#0
mov 33h,a
mov 34h,a
mov 35h,a
mov 36h,a
mov r7,#6
mov r0,#31h
loop:mov dptr,#dbb
mov a,@r0
movc a,@a+dptr
mov sbuf,a
jnb ti,$
clr ti
inc r0
djnz r7,loop
ret
dbB:DB 0C0H,0F9H,0A4H
DB 0B0H,99H,92H
DB 82H,0F8H,80H
DB 90H,88H,83H,0C6H,0A1H,86H,8EH,0FFH
end