Advertisement
Guest User

Untitled

a guest
Jun 18th, 2019
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.79 KB | None | 0 0
  1. LEDS EQU P1
  2. TIME EQU 50
  3. LOAD EQU (65536-1000*TIME)
  4.  
  5. CNT EQU 30h
  6. SEC EQU 31h
  7.  
  8. ORG 0
  9. LJMP MAIN
  10.  
  11. ORG 0BH
  12. JMP timer_interrupt
  13.  
  14. ORG 00B0H
  15. main:
  16. MOV CNT, #20
  17. MOV SEC, #0
  18. MOV LEDS, #255
  19. LCALL delay
  20.  
  21. m_loop:
  22. MOV A, SEC
  23. CPL A
  24. MOV P1, A
  25. SJMP m_loop
  26.  
  27. ;--------------------------------------------------
  28. ; Function that delays TIME miliseconds
  29. ;--------------------------------------------------
  30. delay:
  31. CLR TR0
  32. MOV TL0, #LOW(LOAD)
  33. MOV TH0, #HIGH(LOAD)
  34. ANL TMOD, #11110000B
  35. ORL TMOD, #00000001B
  36. CLR TF0
  37. SETB ET0
  38. SETB EA
  39. SETB TR0
  40. RET
  41.  
  42. timer_interrupt:
  43. MOV TL0, #LOW(LOAD)
  44. MOV TH0, #HIGH(LOAD)
  45. DJNZ CNT, return
  46. MOV CNT, #20
  47. INC SEC
  48.  
  49. return:
  50. RETI
  51. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement