;led ein über taster 
;led an vccc gegen pb0
;taster an pb4 gegen gnd

.nolist
.include "tn13def.inc"
.list

;PortB0 auf ausgang für led

sbi ddrb,portb0			;set bit ddrb,bit 0
;cbi $17,0				;clear bit reg 0x17 = ddrb, bit 0


sbi ddrb,portb4			;nur zum pruefen im simulator
cbi ddrb,portb4			;portb4 als eingang

;pullup an port pb4 auf 1

sbi portb,pb4			;portb sind die 4 pullup widerstaende



loop:
;abfrage taster an portb4
; ------- sbic portb,pb	; achtung sbic gilt fuer i/o register "PINB  bzw 0x16"
sbic pinb,4				;überspringe naechste anweisung, falls pegel an pb4 0

;led aus
sbi	 pinb,0				;schreibe eine eins, damit led aus, da ja led an vcc gegen 1 ist aus

;led an
cbi pinb,0				;schreibe ein null an portb0 das led brennt, mit null da gegen vcc

rjmp loop