videochargen/main.S

90 lines
1.1 KiB
ArmAsm

#include <avr/io.h>
#include "macro.h"
.data
status:
.byte 0x0
.text
.global main_s
main_s:
ldi r16, 0x30
sts DDRB, r16
ldi r16, (1 << IVCE) ; set vector at address 0x0
ldi r17, 0
out IO(MCUCR), r16
out IO(MCUCR), r17
ldi r16, 0x3 ; enable falling edge interrupt 0
sts EICRA, r16
ldi r16, 0x1 ; external interrupt mask enable
sts EIMSK, r16
sei
again:
sbi IO(PORTB), 5
ldi r16, 0x1
sts status, r16
wait1:
ldi r16, 0xff
ldi r17, 0xff
ldi r18, 0xff
1:
dec r16
brne 1b
dec r17
brne 1b
dec r18
brne 1b
cbi IO(PORTB), 5
ldi r16, 0x0
sts status, r16
wait2:
ldi r16, 0xff
ldi r17, 0xff
ldi r18, 0xff
1:
dec r16
brne 1b
dec r17
brne 1b
dec r18
brne 1b
jmp again
.global int0_handler
int0_handler:
ldi r31, 80
loop:
dec r31
brne loop
lds r31, status
cpi r31, 1
brne 1f
sbi IO(PORTB), 4
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
cbi IO(PORTB), 4
1:
ret