API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Oct 31st, 2017
82
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
6502 Kick Assembler 0.48 KB | None | 0 0
raw download clone embed print report
  1. .equ delayCnt = 9
  2.  
  3. .def tmp = r16
  4.  
  5. .cseg
  6.     rjmp reset
  7.  
  8.  
  9. reset:
  10.    
  11.     ldi tmp, high(RAMEND)
  12.     out SPH, tmp
  13.     ldi tmp, low(RAMEND)
  14.     out SPL, tmp
  15.  
  16.  
  17.     ldi tmp, 0xff
  18.     out DDRA, tmp
  19.     out PORTA, tmp
  20.  
  21.     clc
  22.  
  23. main:
  24.     rcall aktivnost
  25.     rcall delay
  26. rjmp main
  27.  
  28. aktivnost:
  29.  
  30.     in tmp, PORTA
  31.    
  32.    
  33.  
  34.     out PORTA, tmp
  35. ret
  36.  
  37. delay:
  38.     clr r17
  39.     clr r18
  40.     ldi r19, delayCnt
  41.  
  42.     delay_loop:
  43.         dec r17
  44.         brne delay_loop
  45.             dec r18
  46.             brne delay_loop
  47.                 dec r19
  48.                     brne delay_loop
  49. ret
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!