Warnung beim erstellen

.include"m64def.inc"

;______________________________________________________________________________________________________________

.def temp      =   r16

.def adress_low    =  r30

.def adress_high  =  r31

.def data      =  r19

.equ CLOCK = 12000000

.equ BAUD = 9600

.equ UBRRVAL = CLOCK/(BAUD*16)-1

#define le_latch     PORTe,2

#define oe_latch      PORTe,3

#define ce_memory      PORTe,4

#define we_memory      PORTe,5

#define oe_memory      PORTe,6

;____________________________________________________________________________________________________________________

ldi temp, HIGH(RAMEND)           ;HIGH-Byte der obersten RAM-Adresse

out SPH, temp

ldi temp, LOW(RAMEND)            ;LOW-Byte der obersten RAM-Adresse

out SPL, temp

ldi temp,0xff            ;Laden des Wertes 255 in Register R16  

out ddrd,r16

ldi temp,0b1111110            ;um das Daten Richtungsregister auf Ausgang zu stellen

out ddre,temp

ldi temp,0xff

sts ddrf,temp

;||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

;Hauptprogramm

haupt:

cbi oe_latch

sbi we_memory

sbi ce_memory

sbi oe_memory

ldi data,0x00;

ldi adress_low,0b00000000

ldi adress_high,0b00000000

weiter:

out portd,adress_low

sbi le_latch

cbi le_latch

out portd,adress_high

cbi we_memory

sts portf,data

cbi ce_memory

nop

nop

nop

sbi ce_memory

sbi we_memory

adiw    ZH:ZL, 1

inc data

; Baudrate einstellen

  ldi temp, LOW(UBRRVAL)

  out UBRR0L, temp

  ldi temp, HIGH(UBRRVAL)

  sts UBRR0H, temp

  ; Frame-Format: 8 Bit

  ldi temp, (0<<USBS0)|(3<<UCSZ00)

  sts UCSR0C, temp

  sbi UCSR0B,TXEN0 ; TX aktivieren

  loop: ldi temp, 'T'

  rcall serout ; Unterprogramm aufrufen

  ldi temp, 'e'

  rcall serout ; Unterprogramm aufrufen

  ldi temp, 's'

  rcall serout ; ...

  ldi temp, 't'

  rcall serout

  ldi temp, ' '

  rcall serout

  ldi temp, 'O'

  rcall serout

  ldi temp, 'K'

  rcall serout

  ldi temp, 10

  rcall serout

  ldi temp, 13

  rcall serout

  ldi temp, 10

  rcall serout

  ldi temp, 13

  rcall serout

rjmp weiter

;Hauptprogramm ende

;|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

;_______________________________________________________________________________________

  serout:

  sbis UCSR0A,UDRE0 ; Warten bis UDR für das nächste

  ; Byte bereit ist

  rjmp serout

  out UDR0, temp

  ret ; zurück zum Hauptprogramm