[编程交流] CopyStored.lsp - Copy stored o

;;; ------------------------------------------------------------------------;;;    CopyStored.lsp v1.3;;;;;;    Copyright© 08.18.09;;;    Alan J. Thompson (alanjt);;;;;;    Permission to use, copy, modify, and distribute this software;;;    for any purpose and without fee is hereby granted, provided;;;    that the above copyright notice appears in all copies and;;;    that both that copyright notice and the limited warranty and;;;    restricted rights notice below appear in all supporting;;;    documentation.;;;;;;    The following program(s) are provided "as is" and with all faults.;;;    Alan J. Thompson DOES NOT warrant that the operation of the program(s);;;    will be uninterrupted and/or error free.;;;;;;    Allows user to select object(s) for copying (uses first object in;;;    selection for insertion point or specified point) and stores;;;    selection set and insertion point for later usage.;;;;;;    Express Tools "acet-ss-drag-move" subroutine required.;;;;;;    Revision History:;;;;;;    v1.1 (09.29.09) 1. Changed copy method.;;;            2. Updated error handler;;;            3. Added AT:SS->List subroutine.;;;;;;    v1.2 (12.15.09) 1. Updated to account for non WCS (oversite).;;;;;;    v1.3 (02.23.10) 1. Added check if "acet-ss-drag-move" is loaded.;;;            2. Added option to specify copy base point.;;;;;; ------------------------------------------------------------------------