Click above to get retro games delivered to your door ever month!

ACOPY()


Syntax:     ACOPY(<array1>, <array2> [,<expN1> [,<expN2>
            [,<expN3>]]])

Purpose:    To copy elements from one array to another.

Arguments:  <array1> is the source array.

            <array2> is the target array.

            <expN1> is the starting element position in the source
            array.

            <expN2> is the number of elements to copy from the
            source array beginning with <expN1>.

            <expN3> is the starting element position in the target
            array.

Returns:    There is no return value.

Library:    EXTEND.LIB


----------------------------------- Example --------------------------------

   DECLARE one[5], two[5]
   ADIR("*.*", one)
   ADIR("*.prg", two)
   ACOPY(one, two, 1, 2)
   FOR i = 1 to 5
      ? one[i], two[i]
   NEXT