Thanks, I found your variants in the archives, nice adaptation, and clearly useful for utility work. What I have been needing is a way of examining the contents of an array at a glance, so the version that formats it as an indented list is most useful.
-- Peter Peter M. Brigham pmb...@gmail.com http://home.comcast.net/~pmbrig On May 14, 2012, at 11:45 AM, Bob Sneidar wrote: > It came from Trevor that way. I had to clean it up as well. It works though. > I used this technique to create my own kind of printKeys function. Instead of > breaking out each key as a line in the text, and then the value as key:value, > I create a single line for each key with a value, and then I bracket all the > key names to distinguish them from the value. This has several advantages. I > can now filter the result by any of the keys. I can also reconstruct the > array after the filtering is done so I can effectively filter an array. > Pretty handy at times. > > Let me know if you want those functions as well. > > Bob > > > On May 12, 2012, at 7:27 AM, Peter M. Brigham, MD wrote: > >> Thanks, Bob. >> >> BTW, don't know why but as you can see your LC scripts tend to have >> asterisks bracketing keywords, not to mention extra blank lines. Are you >> pasting formatted text that's getting mis-translated? >> >> I can clean this up and try it out, thanks again. >> >> -- Peter >> >> Peter M. Brigham >> pmb...@gmail.com >> http://home.comcast.net/~pmbrig >> >> >> On May 10, 2012, at 5:48 PM, Bob Sneidar wrote: >> >>>> *function* PrintArray @pArray, pDimension, pFullData >>>> >>>> *if* pDimension is empty *then* *put* 0 into pDimension >>>> >>>> >>>> >>>> *put* the keys of pArray into theKeys >>>> >>>> *sort* theKeys numeric >>>> >>>> >>>> >>>> *repeat* for each line theKey in theKeys >>>> >>>> *if* pArray[theKey] is an array *then* >>>> >>>> *put* _printCharXTimes(space, pDimension * 5) & theKey & cr >>>> aftertheText >>>> >>>> *put* pArray[theKey] into theTempArray >>>> >>>> *put* PrintArray(theTempArray, pDimension + 1, pFullData) aftertheText >>>> >>>> *else* >>>> >>>> *if* pFullData *then* >>>> >>>> *put* _printCharXTimes(space, pDimension * 5) & theKey & ":" && >>>> pArray[theKey] & cr after theText >>>> >>>> *else* >>>> >>>> *put* _printCharXTimes(space, pDimension * 5) & theKey & ":" && >>>> line 1 of pArray[theKey] & cr after theText >>>> >>>> *end* *if* >>>> >>>> *end* *if* >>>> >>>> *end* *repeat* >>>> >>>> >>>> >>>> *return* theText >>>> >>>> *end* PrintArray >>>> >>>> >>>> >>>> *private* *function* _printCharXTimes pChar, pTimes >>>> >>>> *local* theStr >>>> >>>> >>>> >>>> *repeat* with i = 1 to pTimes >>>> >>>> *put* pChar after theStr >>>> >>>> *end* *repeat* >>>> >>>> *return* theStr >>>> *end* _printCharXTimes >>> >> >> >> _______________________________________________ >> use-livecode mailing list >> use-livecode@lists.runrev.com >> Please visit this url to subscribe, unsubscribe and manage your subscription >> preferences: >> http://lists.runrev.com/mailman/listinfo/use-livecode > > > _______________________________________________ > use-livecode mailing list > use-livecode@lists.runrev.com > Please visit this url to subscribe, unsubscribe and manage your subscription > preferences: > http://lists.runrev.com/mailman/listinfo/use-livecode _______________________________________________ use-livecode mailing list use-livecode@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-livecode
