beginners/test_int.asm

   1 ;
   2 ; portd 3-7 blinken lights ;)
   3 ;
   4 ; author: hackbard@hackdaworld.dyndns.org
   5 ;
   6
   7 .include "../include/2313def.inc"
   8
   9 ; RESET
  10 rjmp INIT
  11
  12 ; INT0
  13 reti
  14
  15 ; INT1
  16 reti
  17
  18 ; T1 CAPT1
  19 reti
  20
  21 ; T1 COMP1
  22 reti
  23
  24 ; T1 OVF1
  25 rjmp T1_OVF1
  26
  27 ; T0 OVF0
  28 reti
  29
  30 ; UART RX
  31 rjmp UART_RX
  32
  33 ; UART UDRE
  34 reti
  35
  36 ; UART TX
  37 reti
  38
  39 ; ANA_COMP
  40 reti
  41
  42 T1_OVF1:
  43 out DDRD, r17
  44 rol r17
  45 sbrs r17, 7
  46 reti
  47 ldi r17, 4
  48 reti
  49
  50 UART_RX:
  51 in r16, UDR
  52 andi r16, $7C
  53 out UDR, r16
  54 out DDRD, r16
  55 reti
  56
  57 INIT:
  58 ldi r16, Low(RAMEND)
  59 out SPL, r16
  60
  61 ; baudrate einstellen
  62 ldi r16, 11 ; "38400 bps wert" in r16
  63 out UBRR, r16 ; write to uart baudrate register
  64 sbi UCR, (RXEN|TXEN|RXCIE) ; enable tx at uart control register
  65
  66 ldi r16, 0x7C
  67 out DDRD, r16
  68
  69 ldi r17, 4
  70
  71 ldi r16, 5
  72 out TCCR1B, r16
  73
  74 ldi r16, (1<<TOIE1)
  75 out TIMSK, r16
  76
  77 sei
  78
  79 MAIN:
  80 rjmp MAIN