home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 September / PCWK996.iso / demo / wgelectr / emul51 / examples / test.src < prev    next >
Text File  |  1986-08-24  |  375b  |  34 lines
  1.  
  2.  
  3.     ORG    0
  4.  
  5.     LJMP    START
  6.  
  7.     ORG    13H
  8.  
  9.     LJMP    EXTINT1
  10.  
  11.     ORG    100H
  12.  
  13. START:    MOV    TCON,#0
  14.     MOV    IE,#84H        ;ENABLE EXTERNAL INTERRUPT 1
  15.     CLR    P3.3        ;PULL EXT INT1 LOW. GENERATE INTERRUPT
  16.     CLR    A
  17. ST1:    MOV    DPTR,#4000H
  18. ST2:    MOVX    @DPTR,A
  19.     INC    DPTR
  20.     DJNZ    R0,ST2
  21.     LJMP    ST1
  22.  
  23.  
  24.     ORG    200H
  25.  
  26. EXTINT1:
  27.     INC    R1
  28.     CLR    P3.4        ;PUT OUT LOW PULSE ON P3.4
  29.     SETB    P3.4
  30.     RETI
  31.  
  32.  
  33.     END
  34.