home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s225 / 1.ddi / TIMER.BAK < prev    next >
Encoding:
Text File  |  1987-12-01  |  1.2 KB  |  90 lines
  1.     ORG    0000H
  2.     AJMP    MAIN
  3.     ORG    000BH
  4.     AJMP    INT0P
  5.     ORG    0100H
  6. MAIN    MOV    R2,#1
  7.     MOV    SP,#60H
  8.     MOV    TMOD,#01H
  9.     MOV    TH0,#0FEH
  10.     MOV    TL0,#0F0H
  11.     SETB    TR0
  12.     SETB    ET0
  13.     SETB    EA
  14. LOOP    SJMP    LOOP
  15. INT0P    DEC    R2
  16.     JC    AAA
  17.     SJMP    BEG
  18. AAA    LJMP    DONE
  19. BEG    MOV    R2,#1
  20.     MOV    TH0,#0FEH
  21.     MOV    TL0,#0F0H
  22.     MOV    R7,22H
  23.     MOV    R6,21H
  24.     MOV    R5,20H
  25.     INC    R7;SECTION SECOND
  26.     MOV    A,R7
  27.     JB    0E0H.3,N1
  28.     MOV    22H,R7
  29.     LJMP    DONE
  30. N1    JB    0E0H.1,N2
  31.     MOV    22H,R7
  32.     LJMP    DONE
  33. N2    ANL    A,#0F0H
  34.     ADD    A,#10H
  35.     JB    0E0H.6,N3
  36.     MOV    R7,A
  37.     MOV    22H,R7
  38.     LJMP    DONE
  39. N3    JB    0E0H.5,N4
  40.     MOV    R7,A
  41.     MOV    22H,R7
  42.     LJMP    DONE
  43. N4    CLR    A
  44.     MOV    R7,A
  45.     MOV    22H,R7
  46.     INC    R6;SECTION MINUTE
  47.     MOV    A,R6
  48.     JB    0E0H.3,M1
  49.     MOV    21H,R6
  50.     LJMP    DONE
  51. M1    JB    0E0H.1,M2
  52.     MOV    21H,R6
  53.     LJMP    DONE
  54. M2    ANL    A,#0F0H
  55.     ADD    A,#10H
  56.     JB    0E0H.6,M3
  57.     MOV    R6,A
  58.     MOV    21H,R6
  59.     LJMP    DONE
  60. M3    JB    0E0H.5,M4
  61.     MOV    R6,A
  62.     MOV    21H,R6
  63.     LJMP    DONE
  64. M4    CLR    A
  65.     MOV    R6,A
  66.     MOV    21H,R6
  67.     INC    R5;SECTION HOUR
  68.     MOV    A,R5
  69.     JB    ACC.3,H1
  70.     MOV    20H,R5
  71.     LJMP    DONE
  72. H1    JB    ACC.1,H2
  73.     MOV    20H,R5
  74.     LJMP    DONE
  75. H2    ANL    A,#0F0H
  76.     ADD    A,#10H
  77.     JB    ACC.5,H3
  78.     MOV    R5,A
  79.     MOV    20H,R5
  80.     LJMP    DONE
  81. H3    JB    ACC.2,H4
  82.     MOV    R5,A
  83.     MOV    20H,R5
  84.     LJMP    DONE
  85. H4    CLR    A
  86.     MOV    R5,A
  87.     MOV    20H,R5
  88. DONE    RETI
  89.     END
  90.