A simple object spacing script.
on spacedOut
put 1 into mCnt
put 12 into mSpace
put the selectedObjects into theObjectList
repeat for each line mLine in theObjectList
if mCnt is 1 then -- it's the first object
put the right of mLine into nextRight
put mcnt + 1 into mCnt
next repeat
end if
set the left of mLine to nextRight + mSpace
put the right of mLine into nextRight
put mcnt + 1 into mcnt
end repeat
end spacedOut
_______________________________________________
use-livecode mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
