.nolist
.include "m32def.inc"
.list
.listmac
.cseg
.org 0
rjmp    ResetProcessor ;


ResetProcessor :
CLI
LDI R16, LOW(RAMEND)
OUT SPL, R16
LDI R16, 0x00
OUT DDRA,r16 ; port A - wejście
LDI R16, 0xFF
OUT PORTA, R16   ; wejścia na stanie wysokim
LDI R16, 0xFF
OUT PORTB, R16   ; B - wyjście
OUT DDRB, R16   ; wyjścia na stanie wysokim

Main    : ;
IN R16, PINA ;  wczytanie PINA do R16
ANDI  R16, 0x03  ;sprawdzenie stanu pinu PA0
CPI R16, 0x02
BREQ Wcisniete ;  tak: skok do etykiety (jeśli Z=1)
RJMP  Main  ;  nie: powrót do pętli Main
Wcisniete : ;
CBI PORTB, 0 ;  Zmiana stanu diody
RJMP  Main ;
.exit