Note to self - paste the actual code...
function arevers p
local t
local tNumElems
put the number of lines in p into tNumElems
split p by cr
put empty into t
repeat for each line l in the keys of p
put p[tNumElems] & cr after t
subtract 1 from tNumElems
end repeat
return t
end arevers
--
Mark Wieder
ahsoftware at gmail.com