andrelievable

zad 5.0

Nov 29th, 2020
125
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.39 KB | None | 0 0
  1. CSEG AT 0
  2. AJMP reset
  3. CSEG AT 0Bh
  4. AJMP interrupt
  5. CSEG AT 30h
  6.  
  7. reset:
  8. ;jedna sek to ok. 14 cykli
  9. SETB ET0
  10. SETB EA
  11. MOV TMOD, #1 ;TIMER 16-BITOWY
  12. MOV TH0, #0
  13. MOV TL0, #1
  14. MOV R0, #0
  15. MOV R2, #0
  16. SETB TR0
  17.  
  18. loop:
  19. CJNE R0, #14, $
  20. INC R2
  21. MOV A, #0FFh
  22. MOV P2,A
  23. MOV R0,#0
  24. SJMP loop
  25.  
  26. interrupt:
  27. MOV R1, A
  28. MOV A, R0
  29. INC A
  30. MOV R0, A
  31. MOV A, R1
  32. RETI
  33. END
Advertisement
Add Comment
Please, Sign In to add comment