kuaile.asm

关于单片机的一系列的设计程序

org 000h
jmp start
org 00bh
jmp tim0
org 100h
start: mov tmod,#00000001b
     mov ie,#10000010b
start0:mov 30h,#00h
 next:mov a,30h
 mov dptr,#table
     movc a,@a+dptr
mov r2,a
jz  end0
     anl a,#0fh
     mov r5,a
     mov a,r2
     swap a
     anl a,#0fh
     jnz sing
     clr tr0
     jmp d1
 sing: dec a
     mov 22h,a
     rl a
     mov dptr,#table1
     movc a,@a+dptr
     mov th0,a
     mov 21h,a
     mov a,22h
     rl a
     inc a
     movc a,@a+dptr
     mov tl0,a
     mov 20h,a
     setb tr0
   d1:lcall delay
     inc 30h
     jmp next
 end0:clr tr0
jmp start0

 tim0:push acc           ;中断0服务子程序
     push psw
     mov tl0,20h
     mov th0,21h
     cpl p0.7
     pop psw
     pop acc
     reti

delay: mov r7,#02h           ;延时子程序 187ms
   d2: mov r4,#187
   d3: mov r3,#248
      djnz r3,$
      djnz r4,d3
      djnz r7,d2
      djnz r5,delay
      ret
 table1:
       dw  64260,64400,64524,64580
       dw  64684,64777,64820,64898
       dw  64968,65030,65058,65110
       dw  65157,65178,65217
  table: db 82h,01h,81h,94h,84h
        db 0b4h,0a4h,04h
        db 82h,01h,81h,94h,84h
        db 0c4h,0b4h,04h

        db 82h,01h,81h,0f4h,0d4h
        db 0b4h,0a4h,94h
        db 0e2h,01h,0e1h,0d4h,0b4h
        db 0c4h,0b4h,04h

        db 82h,01h,81h,94h,84h
        db 0b4h,0a4h,04h
        db 82h,01h,81h,94h,84h
        db 0c4h,0b4h,04h

        db 82h,01h,81h,0f4h,0d4h
        db 0b4h,0a4h,94h
        db 0e2h,01h,0e1h,0d4h,0b4h
        db 0c4h,0b4h,04h
        db 00
        end