start:
MOVE.B #(MyArray_End-MyArray)/4   ;evaluates to 2
RTS

Apple:
DC.B "apple",0
even
Orange:
DC.B "orange",0
even

MyArray:
DC.L Apple
DC.L Orange
MyArray_End: