LiveCode Forums.

Code: Select all

Repeat with i from 1 to upperbounds(ary1)
 set the tbdata[i] of group table to ary1(i) & cr & ary2(i) & cr & ary3(i) & cr & ary(4)  & cr & ary(5) ... etc
end repeat

Code: Select all

...
# first we set up the entries in our SINGLE DIMENTION array
local tArray
put "Adams, Alexander" into tArray[1]
put "Beaumont, Benjamin" into tArray[2]
etc.
...

Code: Select all

function linearSearch @pArray pItem
    local tIndex
    local tResult

    # return 0 if we cannot find an item in the array
    put 0 into tResult

    # get the keys of the array

    get the keys of pArray    --         Where did these keys come from?  The were automatically created.  Or the get command creates them.
    -- NOTE: The get command is a shorthand way of writing the following statement:
             --   put expression into it   --  that clears some things up with the get comment and the it object

    split it by return

    # visit every array element indexed by a key
    
    repeat for each element tIndex in it         --  Each occurance of an array is called an Element

    # test if the current array element is a match with the item we are looking for
        
     if pArray[tIndex] = pItem then
            put tIndex into tResult
            exit repeat
        end if
    end repeat
    
    return tResult

end linearSearch

Code: Select all

put linearSearch (tArray, "Best, Tony") into tArrayKey

Code: Select all

local theArray
on mouseUp
  repeat for each key theKey in theArray
    convert theArray[theLine] from seconds to system date and system time
    put theArray[theKey] & return after theList
  end repeat
  put theList into field 1
end mouseUp

Code: Select all

local theArray
on mouseUp
  put the keys of theArray into theList
  sort theList descending
  repeat for each line theLine in theList
    put theLine & tab & theArray[theLine] & return after theList
  end repeat
  put theList into field 1
end mouseUp

Code: Select all

local theArray
on mouseUp
  combine theArray by return and tab
  put theArray into field 1
end mouseUp

Code: Select all

put the keys of tArray into myKeyList
put the number of lines of myKeyList into tNumberOfKeys

Code: Select all

put extents (tArray) into tLowestAndHighestValue

Code: Select all

convert theArray[theLine] from seconds to system date and system time

Code: Select all

convert theArray[theKey] from seconds to system date and system time

Code: Select all

on mouseUp
   -- make the array
   repeat with i = 1 to 20
      put i + i into tArray[i]
   end repeat

   put "number of keys = number of entries" &&  the number of lines of the keys of tArray & cr after tCollect
   put "extents" && extents (tArray) & cr & cr after tCollect
   put "Min" && min (tArray) & cr after tCollect
   put "Max" && max (tArray) & cr after tCollect
   put "Sum" && sum (tArray) & cr after tCollect
   put "Average" && average (tArray) & cr after tCollect
   put "Median" && median (tArray) & cr after tCollect
   put "StdDev" && standarddeviation  (tArray) & cr after tCollect
   put tCollect
end mouseUp

Code: Select all

on mouseUp
   
   -- place a Basic Table Field onto a card and name it tbl1
   
   -- The Basic Table Field is just a slighly advanced Text Field.

   -- setup tArray with embeded tab 
   -- (its the embeded tab that seperates the data into Basic Table Field columns)
   put "A" & tab & "q"  into tArray[1]
   put "B" & tab & "w" into tArray[2]
   put "C" & tab & "e" into tArray[3]
   put "D" & tab & "r" into tArray[4]
   put "E" & tab & "t" into tArray[5]
   put "F" & tab & "y" into tArray[6]
   
   -- setup tArray2
   put "a" into tArray2[1]
   put "b" into tArray2[2]
   put "c" into tArray2[3]
   put "d" into tArray2[4]
   put "e" into tArray2[5]
   put "f" into tArray2[6]
   
   -- setup tArray3
   put "1" into tArray3[1]
   put "2" into tArray3[2]
   put "3" into tArray3[3]
   put "4" into tArray3[4]
   put "5" into tArray3[5]
   put "6" into tArray3[6]
   
   -- retreive the count of elements
   put the keys of tArray into myKeyList
   put the number of lines of myKeyList into tNumberOfKeys
   -- Put the number of lines of the keys of tArray into tNumberOfKeys  -- is a one liner instead of the two above - cool
   
   
   -- Concatinate the data into a single array
   repeat with i = 1 to tNumberOfKeys
      
      put tArray[i] & tab & tArray2[i] & tab & tArray3[i] into tArrayConcatinated[i]
      
   end repeat
   
   
   
   -- setup the array for assigning to the basic table field 
   
   --                                                       After this combine command 
   combine tArrayConcatinated using return 
   --combine tArrayConcatinated using return and tab  -- tab adds array index (1,2,3) column to front of each element
   --                                                       the tArrayConcatinated is NO LONGER an array 
   
   put tArrayConcatinated into field tbl1
   
   
 breakpoint  -- see how table is NOT REALLY sorted 
                   -- mearly listed by index (1,2,3) only 
                   -- i.e. the index order in which the arrays were constructed at very top of this script
   
   -- OK now sort the string (since the combine command turns the tArrayConcatinated array into a string)
   -- sort lines of tArrayConcatinated numeric by word 2 of each   -- Numberic does not work if word 2 is Alphabetic (q,w,e,r,t,y) and returns no error
   sort lines of tArrayConcatinated by word 2 of each  -- Alphabetic - default - no variation of Alpha, Alphabetic, nor Alphabetical would work in place of numeric
   
   put tArrayConcatinated into field tbl1
   
   -- now see how table is sorted by column 2
   
   
end mouseUp