中斷練習
;p1口輸出 

       org   00h
       ljmp  main
       org   0bh
       ljmp  time0
       org   30h
main:  mov   tmod,#01h   ;定時器0，方式1
       mov   th0,#0d8h      ;定時初值為10ms     
       mov   tl0,#0f0h
       setb  tr0         ;啟動定時器
       mov   ie,#82h     ;定時器中斷允許
       mov   r5,#100     ;中斷100次為1s
       ljmp  $
time0: push  acc
       push  psw
       mov   th0,#0d8h
       mov   tl0,#0f0h
       djnz  r5,loop               ;中斷100次到否
       mov   r5,#100
       mov   a,p1                    ; 實現左移
       rl    a
       mov   p1,a
loop:  pop   psw                   ;中斷返回
       pop   acc
       reti                      

       end