API tools faq
paste
Advertisement
Erzkoy

AS 7segment przycisk

Erzkoy
Jan 22nd, 2020
385
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ASM (NASM) 0.83 KB | None | 0 0
raw download clone embed print report
  1.     .org 0x00
  2.     .nolist
  3.     .include "m16def.inc"
  4.     .list
  5.  
  6.     ldi R20,0xFF
  7.     out DDRB, R20
  8.     out PORTB,R20
  9.  
  10.     clr R20
  11.     out DDRA,R20
  12.     ldi R20,0xFF
  13.     out PORTA,R20
  14.  
  15.     ldi R20,high(RAMEND)
  16.     out SPH,R20
  17.     ldi R20,low(RAMEND)
  18.     out SPL,R20
  19.  
  20.     ldi R17,0b11111100
  21.  
  22. EK1:
  23.     out PORTB,R17
  24.     in R16, PINA
  25.     cpi R16,0b11111111
  26.     breq EK1
  27.     cpi R16,0b11111110
  28.     breq L1
  29.     cpi R16,0b11111101
  30.     breq L2
  31.     cpi R16,0b11111011
  32.     breq L3
  33.     cpi R16,0b11110111
  34.     breq L4
  35.     cpi R16,0b11101111
  36.     breq L5
  37.     cpi R16,0b11011111
  38.     breq L6
  39.     cpi R16,0b10111111
  40.     breq L7
  41.     cpi R16,0b01111111
  42.     breq L8
  43.  
  44. L1: ldi R17,0b01100000
  45.     jmp EK1
  46. L2: ldi R17,0b11011010
  47.     jmp EK1
  48. L3: ldi R17,0b11110010
  49.     jmp EK1
  50. L4: ldi R17,0b01100110
  51.     jmp EK1
  52. L5: ldi R17,0b10110110
  53.     jmp EK1
  54. L6: ldi R17,0b10111110
  55.     jmp EK1
  56. L7: ldi R17,0b11100000
  57.     jmp EK1
  58. L8: ldi R17,0b11111110
  59.     jmp EK1
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!