[portb2]

ORG $2000
Array DC.B 5,8,9,25
result DS.B 1
count DC.B 4
ORG $8000
LDS #$4000
LDAA #4
LDX #Array
JSR Division
STAA result
back BRA back

Division CLRA
LDD #Array
LDX #$5
IDIV
CMPD #0
BEQ result
BRA notmult
INC result
notmult INX
DEC count
BNE Division

*** Edit ***
Changed topic title. Please use a descriptive topic title and put your question in the post.

This post has been edited by GunnerInc: 17 June 2012 - 07:37 AM
Reason for edit:: Added code tags and moved to Assembly

[GunnerInc]

So what exactly is your problem? What errors are you getting? What output are you expecting and what are you receiving?

Your on the right track:
Load number from array (Not sure if you are doing it correctly)
divide that number by 5
check the remainder and if 0 then it is a multiple of 5, otherwise it is not.

Does LDD increment the array pointer every time you use it? If not, then you need to increment your array pointer each loop iteration until the end of array.

[turboscrew]

Better late than never?

This looks a lot like old Motorola assembly (680x-series) or
6502.

I think

Quote

LDD #Array

means: load to register (D) immediate the value of symbol "Array".

[turboscrew]

Aha, 68HC11?

Why would someone jump to the data address (BEQ result)?
Also, the subroutine doesn't seem to return (no RTS).