0 Members and 1 Guest are viewing this topic.
(load "Support Folder\\2\\3\\4\\Z2S - Zoom to Structure.LSP")(C:z2s)
(findfile "_Routine_Library\\Z2S - Zoom to Structure\\Z2S - Zoom to Structure.LSP")(load "Z2S - Zoom to Structure")(C:z2s)
Command:(findfile "_Routine_Library
Code: [Select](findfile "_Routine_Library\\Z2S - Zoom to Structure\\Z2S - Zoom to Structure.LSP")(load "Z2S - Zoom to Structure")(C:z2s)
(load "_Routine_Library\\Z2S - Zoom to Structure\\Z2S - Zoom to Structure.LSP")(C:z2s)
(load (findfile "_Routine_Library\\Z2S - Zoom to Structure\\Z2S - Zoom to Structure.LSP"))(C:z2s)
Command: (load (findfile "_Routine_Library/Z2S - Zoom to Structure/Z2S - Zoom to Structure.LSP"))(C:z2s) ; error: bad argument type: stringp nil
(findfile "A\\B\\Name with spaces.lsp")(findfile "A/B/Name with spaces.lsp")(load "A\\B\\Name with spaces.lsp")(load "A/B/Name with spaces.lsp")
(Load "A\\B\\Name with spaces.lsp")(c:LoadTest)(Load "A/B/Name with spaces.lsp")(c:LoadTest)
Command: *Cancel*Command: *Cancel*Command: *Cancel*Command: *Cancel*Command: (findfile "_Routine_Library\\MT2ML - MText to Mleader\\MT2ML - MText to Mleader.LSP")(Load "_Routine_Library\\MT2ML - MText to Mleader\\MT2ML - MText to Mleader.LSP")\\MT2MLSelect source text: -*Invalid selection*Expects a single object.Select source text: MText*Invalid selection*Expects a single object.Select source text: to*Invalid selection*Expects a single object.Select source text: Mleader.LSP")*Invalid selection*Expects a single object.Select source text: ; error: bad argument type: lentityp nilCommand: Specify opposite corner or [Fence/WPolygon/CPolygon]: *Cancel*Command: (load "("_>("_> _Routine_Library("_>("_> Z2S - Zoom to Pipe Network Structure("_>
(defun c:Main_Routine ()(defun c:CLC() (findfile "_Routine_Library\CLC - Change Selected\CLC - Change Selected.LSP")(load "CLC - Change Selected.lsp")(C:CLC))(defun c:DEMO() (findfile "_Routine_Library\DEMO - Demo Selection\DEMO - Demo Selection.LSP")(load "DEMO - Demo Selection.lsp")(C:DEMO))(defun c:DPG() (findfile "_Routine_Library\DPG - Delete Duplicate Points\DPG - Delete Duplicate Points.LSP")(load "DPG - Delete Duplicate Points.lsp")(C:DPG))(princ)
Mr Ron, because we have a lisp routine in each folder. For the purpose of revisions to that routine, I have a void type folder that I can back it up at.I think the real way to attack it even though its more work is to create a master routine.Code: [Select](defun c:Main_Routine ()(defun c:CLC() (findfile "_Routine_Library\CLC - Change Selected\CLC - Change Selected.LSP")(load "CLC - Change Selected.lsp")(C:CLC))(defun c:DEMO() (findfile "_Routine_Library\DEMO - Demo Selection\DEMO - Demo Selection.LSP")(load "DEMO - Demo Selection.lsp")(C:DEMO))(defun c:DPG() (findfile "_Routine_Library\DPG - Delete Duplicate Points\DPG - Delete Duplicate Points.LSP")(load "DPG - Delete Duplicate Points.lsp")(C:DPG))(princ)In my CUI and macro button I can now call the routines from that and it does work. Somewhat of a pain, but it does work.