********************************************************************************
*2345678911234567892123456789312345678941234567895123456789612345678971234567898
********************************************************************************
*Name:          Lorraine D'Ortona
*File:          add5values.asm
*Due Date:      1/1/2012
*Description:   (what it does and how - algorithm description)
*               Adds the elements in an array of length 5. Demonstates: Looping,
*               ORG, EQU, DB, Index Addressing Mode, Arrays, Formatting and
*               Readability of Code, Comments,
*Input:         (Input format and error checking)
*               5 element array of hex values
*               No error checking of input
*Output         (What will be output, in what form, and where)
*               Sum is stored in vaiable sum
*Errors         (what are they)(How do you detect them)(How do you handle them)
*               No error checking in this program
********************************************************************************


********** Constants ***********************

FIVE    EQU     $05             ;FIVE is a symbol for $05
ZERO    EQU     $00             ;ZERO is a symbol for $00

********** Variable Declarations ***********

        ORG     $2000

array   DB      $01,$02,$03,$04,$05     ;Array is the address of first value($2000)
sum     DB      $00

********** Main ****************************

        ORG     $3000
        ldab    #ZERO           ;Initialize sum (acc b) to $00. Same as ldab $2005
        ldaa    #ZERO           ;Initialize counter (acc a) to zero (A)
        ldx     #array          ;Point to the first value. Same as ldx #2000
        jsr     ADD
        SWI

********************************************************************************
*2345678911234567892123456789312345678941234567895123456789612345678971234567898
********************************************************************************
* Subroutine Name:      ADD
*
* This subroutine will add the five elements.
* Traverses the array using a pointer
* Acc a is the counter and acc b will be the sum
********************************************************************************

ADD     cmpa    #FIVE           ;added all 5 scores? Counter acc a =5? Branch
        beq     DONE            ;Subtract acc a from 5. Result is 0 if they are =.
                                ;If result = 0  CCR Z bit-1

        addb    $0,X            ;No branch. Add the number pointed to to sum
        inx                     ;point to the next value
        inca                    ;increment the counter
        bra     ADD             ;start the loop again. Branch always

DONE    stab    sum             ;save the result
        rts                     ;back to the main