jk2-3.asm

微机原理课程 所有讲义PPT 课程全实验（包括代码程序设计实验报告） 习题及答案

org 0000h
ljmp dstart
org 0003h
ljmp int0k
nop
org 000bh
ljmp t0intk
nop
org 0013h
ljmp int1k
org 001bh
ljmp t1intk
org 01a0h
dstart:   mov sp,#5fh
          mov 2ah,#00h
          mov 2bh,#00h
          mov 2ch,#00h
          mov 2dh,#15h
          mov 2eh,#00h
          mov 2fh,#00h
          mov dptr,#0e100h
          mov a,#03h
          movx @dptr,a
          mov tcon,#05h
          mov tmod,#91h
          mov th0,#3ch
          mov tl0,#0b0h
          mov th1,#9eh
          mov tl1,#58h
          setb tr0
          setb tr1
          mov ie,#83h
 mlp0:    lcall display
          sjmp mlp0        
 display: mov r0,#2ah
          mov r7,#00h
 dispn:   mov dptr,#0e102h
          mov a,#00h
          movx @dptr,a
          mov dptr,#dispd
          mov a,@r0
          movc a,@a+dptr
          mov dptr,#0e101h
          movx @dptr,a
          mov dptr,#dispw
          mov a,r7
          movc a,@a+dptr
          mov dptr,#0e102h
          movx @dptr,a     
          lcall dims
          inc r0
          inc r7
          cjne r7,#06h,dispn
          ret
dims:     push 30h
          mov 30h,#0f8h 
dlp:      nop
          nop
          djnz 30h,dlp
          pop 30h
          ret
dispd:db  3fh,06h,5bh,4fh,66h,6dh,7dh,07h
      db  7fh,6fh,77h,7ch,39h,5eh,79h,71h
      db 79h,50h,5ch,54h,40h,02h
dispw:db 01h,02h,04h,10h,08h,20h
int0k:clr ie1
      mov a,#08h
      mov ip,a
      inc 2fh
      inc 2fh
      mov ie,#8fh
      reti      
t0intk:  clr tf1
         push acc
         MOV		TH0,#3CH
		 MOV		TL0,#0B0H
         inc 2ah
         mov a,#0ah
         cjne a,2ah,t0lp
         mov 2ah,#00h
         inc 2bh
         mov a,#0ah
         cjne a,2bh,t0lp
         mov 2bh,#00h
         inc 2ch
         mov a,#06h
         cjne a,2ch,t0lp
         mov 2ch,#00h
         inc 2eh
         mov a,#0ah
         cjne a,2eh,t0lp
         mov 2eh,#00h
         inc 2fh
         mov a,#06h
         cjne a,2fh,t0lp
         mov 2fh,#00h
         mov a,#00h
         mov ip,a
 t0lp:   pop acc
    reti
int1k:   mov 2ah,#12h
         mov 2bh,#12h
         mov 2ch,#12h 
         mov 2dh,#12h
         mov 2eh,#12h                                      
         mov 2fh,#12h 
         mov ie,#00h
         reti     
t1intk:  INC			2EH
         MOV     	A,2EH
         CJNE   		 A,#0AH,WWW
         MOV 		2EH,#00H
WWW:     NOP
		 RETI        
		 END