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

Syntax

ATRANSFORM( aKeys, acPictures, aProducts )

Purpose

Fill an array with transformed values using pictures.

Arguments

     aKeys -- array to transform

     acPictures -- array of pictures used to format the expressions, or
                       a single picture to apply to all elements of
                       aKeys;

     aProducts -- transformed array

Setup

All three arrays should exist and have equal lengths. The first is filled
with data expressions, the second with appropriate picture strings. If
acPictures is not an array, then it must be a single picture string to be
applied to all elements of aKeys.

Example

     LOCAL _vals := { "You've got to ", "pray ", ;
                      "just to make it ", "today!" }, ;
           _pics := { "", "@!", "", "@!" }, ;
           _products[ 4 ]

     ATRANSFORM( _vals, _pics, _products )
     AEVAL( _products, { |x| QOUT( x ) } )
     ATRANSFORM( _vals, _pics, _products )
     AEVAL( _products, { |x| QOUT( x ) } )

Returns

.T.

Side Effects

The third array is filled with values derived by transforming the elements
in the first array, using the pictures contained in the second array.

Artful Calls

None.

Source File

AA_ATRNS.PRG