org 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
    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