Row2Col II: Difference between revisions

From Pickwiki
Jump to navigationJump to search
Stuboy (talk | contribs)
No edit summary
(No difference)

Revision as of 03:56, 16 September 2010

function Row2Col(doc)

  *// swap x & y axis
  max    = dcount(doc,@am)
  newDoc = raise(doc<1>)
  for i = 2 to max
     newDoc = splice(newDoc,char(222),raise(doc))
  next i
  doc = convert(char(222),@vm,newDoc)

return(doc) end