/*
 * Table_Load_Example.asm
 *
 *  Modified: 1 Sept 2026
 *  Created: 3/7/2018 3:37:44 PM
 *  Author: Dr. Schwartz

This program will load TabSize values from a table in program memory
and sum them all together and store the result into the "Total" variable.

FOR WATCH: r16, r17, r18, Z, Y, r0, cnt_r17

*****/

; include the definitions file (even though it is automatically included)
.include "ATxmega128A1Udef.inc"

; Define a table size (TabSize)
.equ TabSize = 10

.cseg
; Start the program (skipping the early addresses)
.org 0
	rjmp MAIN

; Define the table in PROGRAM memory (non-volatile)
.org 0x100
Table: .db 1,2,3,4,5,6,7,8,9,10

; Define space for the Total (sum of the table values) in DATA memory
.dseg 
.org 0x2000
TOTAL: .byte 1

; Just for fun, copy the original table into DATA memory
Outs: .byte TabSize

; Write the rest of the program	(MAIN)
; First need to change back to PROGRAM memory

.cseg
.org 0x200
MAIN:
; Point to the Table in Program memory
	ldi ZL, low(Table<<1)
	ldi ZH, high(Table<<1)

; Create a counter and initialize it [use r16]
	ldi r16, TabSize

; Clear running sum [use r17]
	clr r17

; Point to a table in Data memory (for the copy) [use Y]
	ldi YL, low(Outs)
	ldi YH, high(Outs)

; Go through the table [use r18 for data from table]
LOOP:
; Load the value from the input table, then inc Z
	lpm r18, Z+

; Copy input value to output table	
	st Y+, r18

; Add to running sum (in r17)	
	add r17, r18

; Decrement loop counter 
	dec r16

; If counter not equal to zero, repeat (at LOOP)
	brne LOOP
; End of LOOP

; Save the Total
	sts Total, r17

; Dog chasing tail
DONE:
	rjmp DONE