74138.asm

来自「我实验板带的实验程序」· 汇编 代码 · 共 36 行

org 00h
mov scon,#00000000b
start:mov dptr,#table
loop:clr a
movc a,@a+dptr
cjne a,#03,a1
jmp start
a1: cpl a
mov 30h,a
mov sbuf,30h
loop1:jbc ti,loop2
jmp loop1
loop2: call delay
inc dptr
jmp loop
 DELAY: ; 延时程序

D1:MOV R6,#2
D2: DJNZ R6,D2
DJNZ R7,D1
RET


table : db 01h,02h,04h,08h
db 10h, 20h,40h,80h
 db 01h,02h,04h,08h
db 10h, 20h,40h,80h
 db 80h,40h,20h,10h
db 08h, 04h,02h,01h

 db 80h,40h,20h,10h
db 08h, 04h,02h,01h
db 00h,0ffh,00h,0ffh
db 03h
END