EN.LSP

هذا الليسب من تصميمي

و يستخدم عند الانتهاء من الرسم

يقوم بعمل

GO TO LAYOUT

ZOOM EXT

PURGE

BIND

(DEFUN C:EN()

(setvar “bindtype” 1)
(command “audit” “y”)
(command “-xref” “b” “*”)
(COMMAND “PURGE””ALL””*””N”)
(COMMAND “LAYER” “COLOR” “7” “CW”””)
(COMMAND “LAYER” “COLOR” “7” “HW”””)
(COMMAND “LAYER” “COLOR” “7” “PL-W-CW”””)
(COMMAND “LAYER” “COLOR” “7” “PL-W-HW”””)
(COMMAND “layer” “off” “*C-PRKG-IDEN”””)
(COMMAND “TILEMODE””0”)
(COMMAND “ZOOM””E”)
(COMMAND”QSAVE”)
(COMMAND”CLOSE”)

)

 

%d مدونون معجبون بهذه: