ti_eeprom.asm

;Use AVR's EEprom as text storage

.include "../includes/1200def.inc"

.DEVICE AT90S1200

.def eeprom_address = r16

;.include "TI_PROT.ASM"

.org 0x0000

reset:

  ldi eeprom_address,0x00

  rcall send_string

loop:  

  rjmp loop;

;Sends a FF terminated stringfrom eeprom

; to the calc

send_string:

  out EEAR,eeprom_address

  sbi EECR,EERE    ;initiate transfer

  in ti_reg,EEDR  ;get transferred byte

  cpi ti_reg,0xFF  ;test if byte is zerobyte

  breq zero_byte  ;if so, jump

  rcall ti_put    ;transfer byte to calc

  inc eeprom_address

  rjmp send_string  ;enter recursion

  zero_byte:

    ret;

.include "TI_PROT.ASM"

.org FLASHEND+1 ;EEPROM!

; NOTE: .db lines must contain even number of bytes 

; (i.e. whole words)

  .db 'H','i','!',13

  .db 'T','h','i','s',32,'T','e','x','t',32

  .db 'c','o','m','e','s',32

  .db 'f','r','o','m',32,'E','E','P','R','O','M',13,0xFF,0xFF