.include "D:\avr\avrasm\APPNOTES\2313DEF.INC" 

               .def          Temp=R16
               .def          Temp1=R17
               .def          Temp2=R18
               .def          Temp3=R19
 
             ldi Temp,RamEnd     
             out SPL,Temp           

rjmp RESET

RESET:
                ldi Temp,$ff
                out DDRB,Temp
                ldi Temp,0b1111011
                out DDRD,Temp
                ldi Temp,0b0000100
                out portd,Temp

               ldi r28,0
               out mcucr,r28
               ldi r28,0b01000000
               out gimsk,r28
              sei

Parth1:       ldi Temp,0b00000101
Parth4:      out PortB,Temp
                  rcall Delay
                  cpi Temp,0
                  breq Parth2
                  lsl Temp
                  rjmp Parth4
Parth2:     ldi Temp,0b1010000
Parth3:     out PortD,Temp
                  rcall Delay
                 cpi Temp,0
                 breq Parth1
                 lsr Temp
                 rjmp Parth3
         
INT_0:
             ldi r28,$ff
LED:    out portB,r28
             rjmp LED
             reti

Delay:      cpi Temp,0
                  breq Vozvrat
                 ldi Temp1,0
                 ldi Temp2,0
                 ldi Temp3,5

Loop:       dec Temp1
                 brne Loop

               dec Temp2
               brne Loop

               dec Temp3
               brne Loop

Vozvrat:               ret