Autocad for mac - lisp to change floors

[Anonymous]

Hi guys, I have this lsp to quickly change and copy things from one floor to another. You first write the command PISOS to set the distance between floors in your paper space (for example 500) and the when you write the command UP or DOWN it changes floors. CU to copy UP, etc.

Does someone have an equivalent lsp that works in Autocad for mac?

Thanks!

[maxim_k · Accepted solution]

Welcome to Autodesk Forums!

Hi Maria,

I don't see anything in your AutoLISP routine which can prevent it from using in AutoCAD for Mac, except this strings:

(DEFUN setstline (/ stline)
 (get_imf)
 (SETQ
   stline (STRCAT
     "MAT PISOS: "		"$(RTOS,$(GETVAR,USERR1),2,0)"
     " - OSNAP: "		"$(getvar,osmode)"
     " - LTSCALE: "		"$(getvar,ltscale)"
     " - PSLTSCALE: "		"$(getvar,psltscale)"
     " - IMAGEFRAME: "		"$(getvar,useri5)"
     " - PROJECTNAME: "		"$(getvar,projectname)"
    )
 )
 (SETVAR "modemacro" stline)
)
(setstline)

I commented these lines in the routine and attached it to my post.

Can you test it now?

Maxim

[Anonymous]

Oh that works, that you so much Maxim!

[john.vellek]

I am glad to hear that it worked. I’ve just accepted the response to your post as a solution so that others can benefit from the information.

In the future, please click on the ‘Accept as Solution’ button if/when relevant. Please feel free to let me know if you have any questions or concerns!