home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Liren Large Software Subsidy 13
/
13.iso
/
p
/
p058
/
1.img
/
H91A.PAK
/
ACAD.MNU
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
GB2312 (detected)
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
AudoCAD Menu
|
1991-08-14
|
87.6 KB
|
4,354 lines
***BUTTONS
;
^c
$p1=*
^c^c
^B
^O
^G
^D
^E
^T
***AUX1
;
$p1=*
^C^C
^B
^O
^G
^D
^E
^T
***POP1
**APOP1
[╣ñ╛▀]
[OSNAP]^C^C$p1= $p1=* OSNAP \
[╡╜╘▓╨─]CENter
[╡╜╢╦╡π]ENDpoint
[╡╜▓σ╚δ╡π]INSert
[╡╜╜╗╡π]INT
[╡╜╓╨╝Σ╡π]MIDpoint
[╡╜╫ε╜ⁿ╡π]NEArest
[╡╜╜ß╡π]NODe
[╡╜┤╣╧▀╡π]PER
[╦─╖╓╘▓╡π]QUAdrant
[┐∞╦┘,]QUICK,^Z$p1=*
[╡╜╟╨╧▀╡π]TANgent
NONE
[~--]
[╡π╣²┬╦╞≈...]$p1=filters $p1=*
[╚í╧√:]^C^C
[╗╪═╦╥╗▓╜]^C^CU
[Redo]^C^CREDO
[┴╨▒φ]^C^CLIST
**filters
[╡π╣²┬╦╞≈]
.X
.Y
.Z
.XY
.XZ
.YZ
[╣ñ╛▀...]$p1= $p1=*
***POP2
**PFLAT
[╞╜├µ]$P2=PFLAT $P2=* $S=SS $S=SFLAT ^C^C^P(SETVAR "CMDECHO" 0) ^P
[~--]
[╓ß╧▀]$P2=PF1 $P2=* $S=SS $S=SFL1
[╟╜╠σ]$P2=PF2 $P2=* $S=SS $S=SFL2
[├┼┤░]$P2=PF3 $P2=* $S=SS $S=SFL3
[╓∙]$P2=PF4 $P2=* $S=SS $S=SFL4
[╤⌠╠¿]$P2=PF5 $P2=* $S=SS $S=SFL5
[╢¿╥σ╞╜├µ]^C^C^P(progn (if (= C:DEFflat nil) (load "hj05")) (princ)) ^PDEFFLAT
[┬Ñ╠▌]$S=SS $S=SSTAIR
[╠¿╜╫]$S=SS $S=SF
**PF1
[╞╜├µ]$P2=POP2 $P2=*
[╓ß╧▀]
[~--]
[╓ß╧▀╔Φ╝╞]^C^C^P(if (= C:DESAXIS nil) (load1 "hj53")) desaxis
[~--]
[╓ß╧▀╫ó╝╟]^C^C^P(if (= C:DIMAXIS nil) (load1 "HJ54")) (load "HJ16F") (HJ16F C:DIMAXIS)
[~--]
[╧▀╨═▒╚└²]^C^Cltscale
[╓ß╧▀▒α╝¡]^C^C^P(if (= C:DIMEDIT nil) (load1 "HJ28")) ^PDIMEDIT
[╖╓╟°║┼]^C^C^P(if (= C:PAXIS nil) (load1 "HJ28")) ^PPAXIS
[╫▄│▀┤τ]^C^C^P(if (= C:EXDIM nil) (load1 "HJ28")) ^PEXDIM
[~--]
[Lastmenu]$P2= $P2=* $S= $S=
**PF2
[╞╜├µ]$P2=POP2 $P2=*
[~--]
[╡Ñ╧▀╟╜]
[┴¼╨°╗¡╟╜]^C^P(if (= C:LINE-C nil) (load1 "HJ102")) LINE-C
[┴╜╡π╗¡╟╜]^C^P(if (= C:LINE-2 nil) (load1 "HJ102")) LINE-2
[╛╪╨╬╗¡╟╜]^C^P(if (= C:RECT nil) (load1 "HJ102")) RECT
[╘▓╗í╗¡╟╜]^C^P(if (= C:ARC-W nil) (load1 "HJ102")) ARC-W
[╒█╧▀╗¡╟╜]^C^P(if (= C:PLINE-W nil) (load1 "HJ102")) PLINE-W
[╟σ╢α╙α╧▀]^C^C^P(if (= C:MLIN nil) (load1 "hj11")) (load "HJ11F") (HJ11F C:MLIN)
[~--]
[▒Σ╦½╧▀╟╜]^C^C^P(if (= C:DubWALL nil) (load1 "HJ18")) (load "HJ18F") (HJ18F C:DUBWALL)
[╚╬╥Γ╦½╧▀]^C^C^P(if (= C:dubw nil) (load1 "HJ14")) (load "HJ14F") (HJ14F C:DUBw)
[╛╓▓┐╦½╧▀]^C^C^P(if (= C:dubw1 nil) (load1 "HJ12")) (load "HJ14F") (HJ14F C:DUBw1)
[~--]
[╕─═Γ╟╜║±]^C^C^P(if (= C:ThiWALL nil) (load1 "HJ13")) (load "HJ13F") (HJ13F C:THIWALL)
[╖┐╝Σ▒Ω╫ó]^C^C^P(if (= C:ROOM nil) (load1 "HJ23")) (load "HJ23F") (HJ23F C:ROOM)
[~--]
[╟σ│²╟╜╠σ]^C^C^P(if (= C:ERWALL nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:ERWALL)
[╥╞╢»╟╜╠σ]^C^C^P(if (= C:WAMOVE nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:WAMOVE)
[╕─╟╜║±]^C^C^P(if (= C:THWALL nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:THWALL)
[╨▐╟╜╜╟]^C^C^P(if (= C:FW2 nil) (load "hj16")) fw2
[▒ú╬┬╟╜]^C^C^P(if (= C:BWALL nil) (load1 "hj55")) (load "HJ55F") (HJ10F C:BWALL)
[╟╜╧▀┴¼╜╙]^C^C^P(if (= C:WINTER nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:WINTER)
[╒√└φ╟╜╧▀]^C^C^P(if (= C:MLIN nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:MLIN)
[~--]
[
**PF3
[Flat]$P2=POP2 $P2=*
[├┼┤░╔Φ╝╞]
[├┼┤░╔Φ╝╞]
[~--]
[╓╨╡π▓σ┤░]^C^C^P(if (= C:DEWD nil) (load1 "hj17")) (setq mc "CC") (load "HJ17F") (HJ17F C:DEWD)
[╛α└δ▓σ┤░]^C^C^P(if (= C:DEWD nil) (load1 "hj20")) (setq mc "CC") (load "HJ20F") (HJ20F C:DEWD)
[╓╨╡π▓σ├┼]^C^C^P(if (= C:DEWD nil) (load1 "hj17")) (setq mc "MM") (load "HJ17F") (HJ17F C:DEWD)
[╛α└δ▓σ├┼]^C^C^P(if (= C:DEWD nil) (load1 "hj20")) (setq mc "MM") (load "HJ20F") (HJ20F C:DEWD)
[~--]
[╕─├┼┤░┐φ]^C^C^P(if (= C:CHANWIDE nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:CHANWIDE)
[▓┴│²├┼┤░]^C^C^P(if (= C:WDERASE nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:WDERASE)
[╥╞╢»├┼┤░]^C^C^P(if (= C:WDMOVE nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:WDMOVE)
[├┼┤░╢¿╨═]^C^C^P(if (= C:DTOW nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:DTOW)
[╗í╟╜├┼┤░]^C^C^P(if (= C:AWIN nil) (load1 "hj22")) (load "HJ22F") (HJ22F C:AWIN)
[~--]
[╔╧╥╗╥│]$P2= $P2=* $S= $S=
**PF4
[╞╜├µ]$P2=POP2 $P2=*
[╓∙╫╙]
[~--]
[╓∙╢¿╨═]^C^C^P(if (= C:COTYPE nil) (load1 "hj101")) COTYPE
[╡Ñ╡π▓σ╓∙]^C^C^P(if (= C:COINSS nil) (load1 "hj101")) COINSS
[╨╨┴╨▓σ╓∙]^C^C^P(if (= C:COINSL nil) (load1 "hj101")) COINSL
[╓∙▒α╝¡]^C^C^P(if (= C:COEDIT nil) (load1 "hj101")) COEDIT
[~--]
[Lastmenu]$P2= $P2=* $S= $S=
**PF5
[╞╜├µ]$P2=POP2 $P2=*
[╤⌠╠¿]
[~--]
[╛╪╨╬╤⌠╠¿]^C^C^P(if (= C:BAL1 nil) (load1 "hj56")) (load "HJ56F") (HJ56F C:BAL1)
[╫¬╜╟╤⌠╠¿]^C^C^P(if (= C:BAL2 nil) (load1 "hj56")) (load "HJ56F") (HJ56F C:BAL2)
[~--]
[╔╧╥╗╥│]$P2= $P2=* $S= $S=
***POP3
**P3D
[╚²╬¼─ú╨═]$P3=P3D $P3=*
[╫Θ║╧╞╜├µ]^C^C^P(progn (if (= C:combine nil) (load "hj06")) (princ)) ^PCOMBINE
[╚²╬¼╔·│╔]$P3=P3D1 $P3=* $S=SS $S=S3D0
[~--]
[╕─╚²╬¼╟╜]$P3=P3D2 $P3=* $S=SS $S=S3D1
[╬▌╢Ñ]$P3=P3D3 $P3=* $S=SS $S=S3D2
[├┼┤░╨▐╕─]$P3=P3D4 $P3=* $S=SS $S=S3D3
[~--]
**P3D1
[╚²╬¼─ú╨═]
[╔·│╔]
[~--]
[╟╜╔·│╔]^C^C^P(progn (if (= C:WALL3D NIL) (load1 "HJ30")) (princ)) ^PWALL3D
[├┼┤░╔·│╔]^C^C^P(progn (if (= C:WALL3D NIL) (load1 "HJ30")) (princ)) ^PWALL3D
[╓∙╔·│╔]^C^C^P(progn (if (= C:COLU3D NIL) (load1 "HJ34")) (princ)) ^PCOLU3D
[╤⌠╠¿╔·│╔]^C^C^P(progn (if (= C:BALC3D nil) (load1 "hj36")) (princ)) ^P3DBALC
[╬▌╢Ñ]$S=SS $S=S3D2
[~--]
[╔╧╥╗╥│]$P3= $P3=* $S= $S=
**P3D2
[╚²╬¼─ú╨═]$P3=POP3 $P3=*
[▒α╝¡]
[~--]
[╟╜╠σ╟π╨▒]^C^C^P(progn (if (= C:3DROTATE nil) (load1 "hj37")) (princ)) ^P3DROTATE
[╝╙╟╜╠σ]^C^C^P(progn (if (= C:3DADD nil) (load1 "hj34")) (princ)) ^P3DADD
[╚²╬¼▒▀]
[┐╔╝√]^C^C^P(progn (if (= C:MV nil) (load1 "hj35")) (princ)) ^PMV
[▓╗┐╔╝√]^C^C^P(progn (if (= C:MI nil) (load1 "hj33")) (princ)) ^PMI
[├┼┤░▒α╝¡]$S=SS $S=S3D3
[~--]
[╔╧╥╗╥│]$P3= $P3=* $S= $S=
**P3D3
[╚²╬¼]$P3=POP3 $P3=*
[╖┐╢Ñ]
[~--]
[╤╪┐┌╔·│╔]^C^C^P(progn (if (= C:EAVES nil) (load1 "hj31")) (princ)) ^PEAVES
[╖Γ▒╒╖┐╢Ñ]
[~--]
[╖┐╢Ñ╞≡╞┬]^C^C^P(if (= c:edroof nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:EDROOF)
[╦─╞┬╖┐╢Ñ]^C^C^P(if (= c:roof1 nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:ROOF1)
[╠∞┤░╤╠┤╤]^C^C^P(if (= c:roof2 nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:ROOF2)
[~--]
[Lastmenu]$P3= $P3=* $S= $S=
**P3D4
[╚²╬¼]$P3=POP3 $P3=*
[├┼┤░▒α╝¡]
[~--]
[╫÷╥∞╨╬┤░]^C^C^P(progn (if (= C:WSHAPE nil) (load1 "hj32")) (princ)) ^PWSHAPE
[╥╞╢»├┼┤░]^C^C$s=ss $S=S3D32
[▓ú┴º─╗╟╜]$S=SS $S=S3D31
[~--]
[╔╧╥╗╥│]$P3= $P3=* $S= $S=
***POP4
**PELEV
[┴ó╞╩├µ]$P4=PELEV
[┴ó├µ]
[~--]
[╫╘╢»╔·│╔]^C^C^P(progn (IF (= C:autoELev NIL) (LOAD1 "hj51")) (princ)) ^PAUTOELEV
[~--]
[┴ó├µ╩╙═╝]^C^C^P(progn (IF (= C:ELDAT NIL) (LOAD1 "hj51")) (princ)) ^PELDAT
[╩╙═╝╩Σ│÷]^C^C^P(progn (IF (= C:ELOUT NIL) (LOAD1 "hj51")) (princ)) ^PELOUT
[~--]
[╞╩├µ]$S=SE2
[~--]
[╫╘╢»╔·│╔]^C^C^P(progn (IF (= C:AutoCROS NIL) (LOAD1 "hj50")) (princ)) ^PAutoCROS
[*********]
[╞╩├µ╩╙═╝]^C^C^P(progn (IF (= C:CRTAKE NIL) (LOAD1 "hj50")) (princ)) ^PCRTAKE
[╩╙═╝╩Σ│÷]^C^C^P(progn (IF (= C:CROUT NIL) (LOAD1 "hj50")) (princ)) ^PCROUT
[~--]
[├┼┤░▒α╝¡]^C^C^P(progn (IF (= C:CHANGEWD NIL) (LOAD1 "hj52")) (princ)) ^PCHANGEWD
[~--]
[╔Φ╓├╗µ═╝]^C^C^P(cond ((= (getvar "acadver") "10") (command "script" "t0")) +
((= (getvar "acadver") "10 c10") (command "script" "t1")) +
((= (getvar "acadver") "11") (command "script" "t2")) +
) ^P
[╗·╬¬DXB]C^C^P(cond ((= (getvar "acadver") "10") (command "script" "t0")) +
((= (getvar "acadver") "10 c10") (command "script" "t1")) +
((= (getvar "acadver") "11") (command "script" "t2")) +
) ^P
[╕±╩╜]
***POP5
**PT
[╬─╫╓▒Ω╫ó]$P5=PT $P5=*
[╫╓╨═╢¿╥σ]$S=SS $S=ST1
[╬─╫╓▒Ω╫ó]$S=SS $S=ST2
[│▀┤τ▒Ω╫ó]$S=SS $S=ST3
[═╝└²╖√║┼]$S=SS $S=ST4
[~--]
**APOP2
[╗µ╓╞└α]
[╓▒ú¼╒█╧▀]*^C^C$S=X $s=line line
[╗¡╘▓╗í]*^C^C$S=X $s=poparc arc
[╗¡╘▓╗í]*^C^C$S=X $s=popcircl circle
[╢α╥σ╧▀]*^C^C$S=X $s=pline pline
[3D╢α╥σ╧▀]*^C^C$S=X $S=3dpoly 3dpoly
[▓σ╚δ┐Θ]^C^Csetvar attdia 1 $S=X $s=insert insert
[╬─╫╓]*^C^C$S=X $s=Dtext Dtext
[╗¡╥⌡╙░╧▀...]^C^C$i=hatch1 $i=*
[╚²╬¼╜ß╣╣...]$i=3dobjects $i=*
**APOP3
[╨▐╕─└α]
[▓┴│²└α]*^C^C$S=X $s=erase erase si auto
[╥╞╢»]*^C^C$S=X $s=move move si auto
[╕┤╓╞]*^C^C$S=X $s=copy copy si auto
[╕─╨╘╓╩]*^C^C$S=X $S=chprop chprop si auto
[╟╨╢╧]*^C^C$S=X $S=break break
[╗¡╘▓╜╟]*^C^C$S=X $S=fillet fillet
[╛╡╧≤]*^C^C$S=X $S=mirror mirror auto
[╨▐╝⌠]*^C^C$S=X $s=trim trim auto
[╤╙│ñ]*^C^C$S=X $s=extend extend auto
[╔∞╦⌡]*^C^C$S=X $s=stretch stretch crossing
[PEDIT]^C^C^P+
(defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
(setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
(if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
(m:p2 m:pa m:pc))(progn(prompt "▒╗╤í╩╡╠σ▓╗╩╟╥╗╠⌡╢α╥σ╧▀")(terpri);+
(if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
(initget "Yes No")(setq m:w (getkword "─π╧δ╥¬╫¬╗╗╦ⁿ┬≡? <Y>"));+
(if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
(menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
(defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
(if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
(progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
(if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
(defun perror (msg)(setq *error* m:err m:err nil)(princ))+
(defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
(setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
**APOP4
[╧╘╩╛┐╪╓╞]
[╓╪╗¡:]'redraw
[~--]
[╖┼╦⌡┤░┐┌]'zoom w
[╟░╥╗═╝]'zoom p
[╚½═╝╖┼╦⌡]^C^Czoom a
[╢»╠¼╖┼╦⌡]'zoom d
[~--]
[╥╞╞┴─╗]'pan
[╢»╠¼╚²╬¼▓┘╫≈]^C^C$i=dviewi $i=*
[╣█▓∞╖╜╧≥]^C^C$S=X $S=VPOINT3D $i=3dviews $i=*
[~--]
[╩╙═╝╞╜├µ (UCS)]^C^Cplan;;
[╩╙═╝╞╜├µ (World)]^C^Cplan wo
[~--]
[╔Φ╢α╩╙┤░]^C^C$S=X $S=vports $i=vporti $i=*
**APOP5
[╖╜╩╜╔Φ╓├]
[UCS ╢╘╗░┐≥]^C^C$S=X $s=ucs1 dducs
[UCS ▓┘╫≈]^C^C$S=X $S=ucs1 $i=ucs $i=*
[╟░╥╗╕÷ UCS]^C^CUCS P
[~--]
[╗µ═╝╖╜╩╜╔Φ╓├]'ddrmodes
[╩╡╠σ╔·│╔╖╜╩╜]'ddemodes
[▓π╔Φ╓├]'ddlmodes
***POP6
[╞Σ╦√]
[╜°╚δBL┐Γ]^C^C^P(progn (princ "Loading block libarian ...") (if (= C:bl nil) (command "SCRIPT" "BL") (C:BL))) ^P
[╜°╚δDL┐Γ]^C^C^P(command "shell" "dl") ^P
[Ashade]^C^C^P(progn(setq m:err *error*)(princ))+
(defun *error* (msg)(princ msg)(setq *error* m:err m:err nil)(princ))+
(cond ((null C:SCENE)(vmon)(if (/= nil (findfile "ashade.lsp"));+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ ashade. ")(load "ashade")+
(menucmd "I=AS")(menucmd "I=*")(setq *error* m:err m:err nil))(progn (terpri);+
(prompt "╬─╝■'Ashade.lsp'╘┌─π╡─╡▒╟░╦╤╦≈─┐┬╝╓╨╒╥▓╗╡╜. ")+
(terpri)(prompt "╟δ▓╬╝√AutoShade╩╓▓ß╡─░▓╫░╦╡├≈. ");+
(setq *error* m:err m:err nil)(princ))))+
(T (setq *error* m:err m:err nil)(menucmd "I=AS")(menucmd "I=*")(princ))) ^P
[╔Φ╓├╫╓╨═]^C^C$i=fonts1 $i=*
**APOP6
[╞Σ╦√]
[Ashade]^C^C^P(progn(setq m:err *error*)(princ))+
(defun *error* (msg)(princ msg)(setq *error* m:err m:err nil)(princ))+
(cond ((null C:SCENE)(vmon)(if (/= nil (findfile "ashade.lsp"));+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ ashade. ")(load "ashade")+
(menucmd "I=AS")(menucmd "I=*")(setq *error* m:err m:err nil))(progn (terpri);+
(prompt "╬─╝■'Ashade.lsp'╘┌─π╡─╡▒╟░╦╤╦≈─┐┬╝╓╨╒╥▓╗╡╜. ")+
(terpri)(prompt "╟δ▓╬╝√AutoShade╩╓▓ß╡─░▓╫░╦╡├≈. ");+
(setq *error* m:err m:err nil)(princ))))+
(T (setq *error* m:err m:err nil)(menucmd "I=AS")(menucmd "I=*")(princ))) ^P
[╔Φ╓├╫╓╨═]^C^C$i=fonts1 $i=*
***POP7
[╬─╝■└α]
[▒ú┤µ═╝╨╬]^C^CSave;
[╜ß╩°▒α╝¡]^C^Cend
[╖┼╞·═╦│÷]^C^C$S=X $s=quit quit
[~-- ]
[╙├╗µ═╝╗·]^C^Cplot
[╙├┤≥╙í╗·]^C^Cprplot
***POP8
[╟≤╓·]
[╟≤╓·]'help
***icon
**hymnu
[ HOUSE ]$S=HYMNU
[═¿╙├╗µ═╝]$S=HYMNU
[ ▓╦ ╡Ñ ]$S=HYMNU
[********]
[▒α╝¡├ⁿ┴ε]$I=IC00 $I=*
[ ▓╢ ╗± ]$I=IC01 $I=*
[╗µ═╝├ⁿ┴ε]$I=IC02 $I=*
[╡π╧▀╗µ╓╞]$I=IC03 $I=*
[╝╕║╬═╝╨╬]$I=IC04 $I=*
[╧╘╩╛┐╪╓╞]$I=IC05 $I=*
[│▀┤τ▒Ω╫ó]$I=IC06 $I=*
[╬─▒╛╫╓╨═]$I=IC07 $I=*
[▓π╔½╧▀╨═]^c^c'ddlmodes
[═╝░╕╠ε│Σ]$I=IC09 $I=*
[╝╞ ╦π ╞≈]$S=IC010 (load1 "HY40") (hj01)
[╫┤╠¼╔Φ╓├]$I=IC011 $I=*
[╬─╝■╣▄└φ]$I=IC012 $I=*
[┐Θ╨╬╡≈╙├]$I=IC013 $I=*
[********]
[ACAD▓╦╡Ñ]$s=s
[╕∙ ▓╦ ╡Ñ]$s=screen
**ic01
[▓╢╗±╖╜╩╜:]
[HY(HY01)]cen
[HY(HY02)]end
[HY(HY03)]ins
[HY(HY04)]int
[HY(HY05)]mid
[HY(HY06)]nea
[HY(HY07)]nod
[HY(HY08)]per
[HY(HY09)]qua
**IC02
[╗µ═╝├ⁿ┴ε:]
[HY(HY11)]^c^cline
[HY(HY12)]^c^cpline
[HY(HY13)]^c^carc
[HY(HY14)]^c^ccircle
[HY(HY15)]^c^cellipse
[HY(HY16)]^c^cpolygon
[HY(HY17)]^c^cpoint
[HY(HY18)]^c^cdonut
[ ╧┬╥╗╥│]$i=ic02a $i=*
**IC02a
[╗µ═╝├ⁿ┴ε:]
[HY(HY19)]^c^csolid
[HY(HY20)]^c^ctrace
[HY(HY21)]^c^csketch
[ ╔╧╥╗╥│]$i=ic02 $i=*
[ ═╦│÷]^c^c
**IC03
[▓╢╗±╖╜╩╜╗¡╧▀:]
[HY(HY31)]^c^cline end \end \ $i=*
[HY(HY32)]^c^cline int \int \ $i=*
[HY(HY33)]^c^cline end \int \ $i=*
[HY(HY34)]^c^cline nea \per \ $i=*
[HY(HY35)]^c^cline mid \mid \ $i=*
[HY(HY36)]^c^cline mid \per \ $i=*
[HY(HY37)]^c^cline qua \end \ $i=*
[HY(HY38)]^c^cline end \per \ $i=*
[HY(HY39)]^c^cpline end \end \ ;$i=*
[HY(HY40)]^c^cpline int \int \ ;$i=*
[HY(HY41)]^c^cpline end \int \ ;$i=*
[HY(HY42)]^c^cpline nea \per \ ;$i=*
[HY(HY43)]^c^cpline mid \per \ ;$i=*
[HY(HY44)]^c^cpline qua \end \ ;$i=*
[HY(HY45)]^c^cpline end \per \ ;$i=*
[ ╧┬╥╗╥│]$i=ic03a $i=*
**IC03a
[╡π╧▀╗µ╓╞]
[HY(HY46)](load1 "hy02")
[HY(HY47)](load1 "hy03")
[HY(HY48)](load1 "hy04")
[HY(HY49)](load1 "hy05")
[HY(HY50)](load1 "hy30")
[HY(HY51)](load1 "hy31")
[HY(HY52)](load1 "hy09")
[HY(HY53)](load1 "hy08")
[HY(HY54)](load1 "hy14")
[HY(HY55)](load1 "hy23")
[HY(HY56)](load1 "hy22")
[HY(HY57)](load1 "hy35")
[HY(HY58)](load1 "hy24")
[HY(HY59)](load1 "hy25")
[HY(HY60)](load1 "hy36")
[ ═╦│÷]^c^c
**IC04
[╝╕║╬═╝╨╬╗µ╓╞]
[HY(HY61)](load1 "hy10")
[HY(HY62)](load1 "hy11")
[HY(HY63)](load1 "hy12")
[HY(HY64)](load1 "hy13")
[HY(HY65)](load1 "hy15")
[HY(HY66)](load1 "hy16")
[HY(HY67)](load1 "hy17")
[ ╧┬╥╗╥│]$i=ic04a $i=*
[ ═╦│÷]^c^c
**ic04a
[╝╕║╬═╝╨╬╗µ╓╞]
[HY(HY68)](load1 "hy18")
[HY(HY69)](load1 "hy19")
[HY(HY70)](load1 "hy20")
[HY(HY71)](load1 "hy21")
[HY(HY72)](load1 "hy34")
[HY(HY73)](load1 "hy26")
[HY(HY74)](load1 "hy27")
[HY(HY75)](load1 "hy28")
[HY(HY76)](load1 "hy29")
[ ╔╧╥╗╥│]$i=ic04 $i=*
**IC00a
[╖╜╩╜╤í╘±]
[----A----]A
[----C----]C
[----D----]D
[----E----]E
[----M----]M
[----P----]P
[----R----]R
[----W----]W
[----Y----]Y
**IC00
[▒α╝¡├ⁿ┴ε]
[HY(HY80)]^c*^c^cscale si auto
[HY(HY81)]^c^crotate si auto
[HY(HY82)]^c^coffset si auto
[HY(HY83)]^c^cmove si auto
[HY(HY84)]*^c^c^cerase si auto
[HY(HY85)]^c^coops
[HY(HY86)]^c^cpedit
[HY(HY87)]^c^cexplode si auto
[HY(HY88)]^c^carray si auto
[HY(HY89)]^c^cdivide si auto
[HY(HY90)]^c^cmirror si auto
[HY(HY91)]^c^cbreak \f
[HY(HY92)]^c^cbreak
[HY(HY93)]^c^ccopy si auto
[ ═╦│÷]^c^c
[ ╧┬╥╗╥│]$i=ic00b $i=*
**IC00b
[▒α╝¡├ⁿ┴ε]
[HY(HY94)]^c^cextend si auto
[HY(HY95)]^c^cstretch c
[HY(HY96)]$p1=ic00a $p1=* trim
[HY(HY97)]^c^cfillet r 0;
[HY(HY98)]^c^cfillet r\ \\
[HY(HY99)]^c^chamfer d \\;
[HY(HY100)]^c^cmeasure
[HY(HY101)]$p1=ic00a $p1=* change
[HY(HY102)]^c^cattedit ;;;;
[ ╔╧╥╗╥│]$i=ic00 $i=*
[ ═╦│÷]^c^c
**IC05
[╧╘╩╛┐╪╓╞├ⁿ┴ε]
[YH(H110)]^c^c'zoom d
[YH(HY111)]^c^c'zoom w
[YH(HY112)]^c^c'zoom p
[YH(HY113)]^c^cview w
[YH(HY114)]^c^cview r
[YH(HY115)]^c^cview s
[YH(HY116)]^c^c'pan
[YH(HY117)]^c^credraw
[YH(HY118)]$i=ic05a $i=*
[ ═╦│÷]^c^c
**IC05a
[╚²╬¼╩╙═╝]
[hy1(hy119)]^c^cVPOINT;;
[YH(HY120)]^C^Cvpoint;-1,1,1;
[YH(HY121)]^C^Cvpoint;-1,0,0;
[YH(HY122)]^C^Cvpoint;-1,-1,1;
[YH(HY123)]^c^chide
[YH(HY124)]^C^Cvpoint;0,1,0;
[YH(HY125)]^C^Cvpoint;0,0,1;
[YH(HY126)]^C^Cvpoint;0,-1,0;
[YH(HY127)]^c^celev
[YH(HY128)]^C^Cvpoint;1,1,1;
[YH(HY129)]^C^Cvpoint;1,0,0;
[YH(HY130)]^C^Cvpoint;1,-1,1;
[YH(HY131)]
[YH(HY132)]
[YH(HY133)]
[ Exit]^c^c
**ic06a
[│▀┤τ▒Ω╫ó]
[YH(H160)]^C^CDIM;^CDIMEXO;^C
[YH(HY161)]^C^CDIM;^CDIMEXE;^C
[YH(HY162)]^C^CDIM;^CDIMTSZ;^C
[YH(HY163)]^C^CDIM;^CDIMDLI;^C
[YH(HY164)]^C^CDIM;DIMSE1;OFF;
[YH(HY165)]^C^CDIM;DIMSE1;ON;
[YH(HY166)]^C^CDIM;DIMTXT;
[YH(HY167)]^C^CDIM;DIMSE2;OFF;
[YH(HY168)]^C^CDIM;DIMSE2;ON;
[ ═╦│÷]^c^c
**ic06b
[│▀┤τ▒Ω╫ó]
[YH(H156)]^C^CDIM;RADIUS;
[YH(HY157)]^C^CDIM;DIAMETER;
[YH(HY158)]^C^CDIM;LEADER;
[YH(HY159)]^C^CDIM;ANGULAR;
[YH(HY154)]^C^CDIM;VERTICAL;NEA \NEA \\;CONTINU;NEA \;CONTINU;NEA \CONTINU;NEA \;CONTINU;NEA \;
[YH(HY155)]^C^CDIM;VERTICAL;NEA \NEA \\;BASELINE;NEA \;BASELINE;NEA \;BASELINE;NEA \;BASELINE;NEA \;
[ ╔Φ╓├└α]$I=ic06a $I=*
[ ╔╧╥╗╥│]$i=ic06 $I=*
[ ═╦│÷]^c^c
**ic06
[│▀┤τ▒Ω╫ó]
[YH(H140)]^C^CDIM;HOR;
[YH(HY141)]^C^CDIM;ALIGNED;
[YH(HY142)]^C^CDIM;HOR;NEA \NEA \\;
[YH(HY143)]^C^CDIM;ALIGNED;NEA \NEA \\;
[YH(HY144)]^C^CDIM;HOR;\\\\CONTINU;\\CONTINU;\\CONTINU;\\CONTINU;\\
[YH(HY145)]^C^CDIM;HOR;\\\\BASELINE;\\BASELINE;\\BASELINE;\\BASELINE;\\;
[YH(HY146)]^C^CDIM;HOR;NEA \NEA \\;CONTINU;NEA \;CONTINU;NEA \;CONTINU;NEA \;
[YH(HY147)]^C^CDIM;HOR;NEA \NEA \\;BASELINE;NEA \;BASELINE;NEA \;BASELINE;NEA \;
[YH(HY148)]^C^CDIM;VERTICAL;
[YH(HY149)]^C^CDIM;ROTATED;
[YH(HY150)]^C^CDIM;VERTICAL;NEA \NEA \\;
[YH(HY151)]^C^CDIM;ROTATED;NEA \NEA \\;
[YH(HY152)]^C^CDIM;VERTICAL;\\\\CONTINU;\\CONTINU;\\CONTINU;\\CONTINU;\\
[YH(HY153)]^C^CDIM;VERTICAL;\\\\BASELINE;\\BASELINE;\\BASELINE;\\BASELINE;\\BASELINE;\\
[ ╔Φ╓├└α]$I=IC06a $I=*
[ ═╦│÷]^C^C
**IC07
[╬─▒╛╫╓╨═]
[YH(H170)]^c^ctext
[YH(HY171)]^c^ctext c
[YH(HY172)]^c^ctext r
[YH(HY173)]^c^cdtext
[YH(HY174)]^c^cdtext c
[YH(HY175)]^c^cdtext r
[YH(HY176)]^c^cstyle hz txt,hztxt;;;;;
[YH(HY177)]^c^cstyle
[YH(HY178)]^c^c$i=fonts1 $i=*
[ ═╦│÷]^C^C
**IC09
[═╝░╕╠ε│Σ]
[YH(H180)]^c^chatch angle
[YH(HY181)]^c^chatch ansi31
[YH(HY182)]^c^chatch ansi32
[YH(HY183)]^c^chatch ansi33
[YH(HY184)]^c^chatch ansi34
[YH(HY185)]^c^chatch ansi35
[YH(HY186)]^c^chatch ansi36
[YH(HY187)]^c^chatch ansi37
[YH(HY188)]^c^chatch ansi38
[HY(H0)]^c^chatch hj1
[HY(H1)]^c^chatch hj2
[YH(HY191)]^c^chatch brick
[YH(HY207)]^c^chatch line
[YH(HY193)]^c^chatch cork
[YH(HY194)]^c^chatch cross
[ ╧┬╥╗╥│]^c^c$i=ic09a $i=*
**IC09a
[═╝░╕╠ε│Σ]
[YH(H195)]^c^chatch dash
[YH(HY196)]^c^chatch dolmit
[YH(HY197)]^c^chatch dots
[YH(HY198)]^c^chatch earth
[YH(HY199)]^c^chatch escher
[YH(HY200)]^c^chatch grate
[YH(HY201)]^c^chatch hound
[YH(HY202)]^c^chatch flex
[YH(HY203)]^c^chatch grass
[YH(HY204)]^c^chatch hex
[YH(HY205)]^c^chatch honey
[YH(HY192)]^c^chatch clay
[YH(HY206)]^c^chatch insul
[YH(HY208)]^c^chatch mudst
[ ╧┬╥╗╥│]^c^c$i=ic09b $i=*
[ ╔╧╥╗╥│]^c^c$i=ic09 $i=*
**Ic09b
[═╝░╕╠ε│Σ]
[YH(H209)]^c^chatch net
[YH(HY210)]^c^chatch net3
[YH(HY211)]^c^chatch plast
[YH(HY212)]^c^chatch plasti
[YH(HY190)]^c^chatch brass
[YH(HY214)]^c^chatch square
[YH(HY215)]^c^chatch stars
[YH(HY216)]^c^chatch steel
[YH(HY217)]^c^chatch swamp
[YH(HY218)]^c^chatch trans
[YH(HY219)]^c^chatch triang
[YH(HY220)]^c^chatch zigzag
[ ╡┌╥╗╥│]^c^c$i=ic09 $i=*
[ ╔╧╥╗╥│]^c^c$i=ic09a $i=*
[ ═╦│÷]^C^C
**IC010
[▓╬╩²╤í╘±]$s=ic010
[ = ]=;
[ + ]+\
[ - ]-\
[ x ]x\
[ / ]/\
[ ( ](\
[ ) ])\
[ 1 ]1\
[ 2 ]2\
[ 3 ]3\
[ 4 ]4\
[ 5 ]5\
[ 6 ]6\
[ 7 ]7\
[ 8 ]8\
[ 9 ]9\
[ 0 ]0\
[ . ].\
[║»╩²╤í╘±]$i=IC010A $I=*
[ ╔╧╥╗╥│]$s=hymnu
[╕∙▓╦╡Ñ]$s=screen
**IC010A
[║»╩²╧ε╤í╘±:]
[YH(H300)]SIN\
[YH(HY301)]ARS\
[YH(HY302)]SQT\
[YH(HY303)]MST\
[YH(HY304)]COS\
[YH(HY305)]ARC\
[YH(HY306)]SQR\
[YH(HY307)]MSR\
[YH(HY308)]TAN\
[YH(HY309)]ART\
[YH(HY310)]EXP\
[YH(HY311)]REC\
[YH(HY312)]LN\
[YH(HY313)]LOG\
[YH(HY314)]CON\
[YH(HY315)]PAI\
[ ═╦│÷]^c
**IC011
[╫┤╠¼╔Φ╓├]
[YH(H221)]^c^climits
[YH(HY222)]^c^cunits
[YH(HY223)]^c^cid
[YH(HY224)]^c^caperture
[YH(HY225)]^c^cgrid
[YH(HY226)]^c^celev
[YH(HY227)]^c^cdist
[YH(HY228)]^c^cqtext
[YH(HY229)]^c^csnap
[YH(HY230)]^c^ctime
[YH(HY231)]^c^carea
[YH(HY232)]^c^cosnap
[YH(HY233)]^c^caxis
[YH(HY234)]^c^cstatus
[YH(HY235)]^c^cdblist
[YH(HY236)]^c^cdragmode
[ ═╦│÷]^C^C
**IC012
[╬─╝■╣▄└φ]
[YH(H240)]^c^csave
[YH(HY241)]^c^cfiles
[YH(HY242)]^c^cmslide
[YH(HY243)]^c^cdxfout
[YH(HY244)]^c^cend
[YH(HY245)]^c^cplot
[YH(HY246)]^c^cvslide
[YH(HY247)]^c^cdxfin
[YH(HY248)]^c^cquit
[YH(HY249)]^c^cpplot
[YH(HY250)]^c^cscript
[YH(HY251)]^c^crename
[YH(HY252)]^c^cdir
[YH(HY253)]^c^ctype
[YH(HY254)]^c^cedit
[ ═╦│÷]^c^c
**IC013
[┐Θ╨╬╡≈╙├]
[YH(H260)]^c^cblock
[YH(HY261)]^c^cinsert
[YH(HY262)]^c^cbase
[YH(HY263)]^c^cblock ?
[YH(HY264)]^c^cminsert
[YH(HY265)]^c^csetvar addia
[YH(HY266)]^c^cwblock
[YH(HY267)]^c^cattdef
[ ═╦│÷]^c^c
**p202
[╠ß ╩╛:]
[**╩Σ╚δ│ñ╢╚┐╔╙├╒²,╕║║┼▒φ╩╛╧▀╢╬╖╜╧≥,╚τ╣√┤╙**]
[**╥╗╡π╧≥╫≤╗¡╥╗╧▀╢╬,│ñ╢╚╩²╓╡╟░╙ª╝╙╕║║┼. **]
[]
**p203
[╠ß ╩╛:]
[**╩Σ╚δ│ñ╢╚┐╔╙├╒²,╕║║┼▒φ╩╛╧▀╢╬╖╜╧≥,╚τ╣√┤╙**]
[**╥╗╡π╧≥╧┬╗¡╥╗╧▀╢╬,│ñ╢╚╩²╓╡╟░╙ª╝╙╕║║┼. **]
[]
**p204
[╠ß ╩╛:]
[** ╧▀╢╬╡─╖╜╧≥╬¬╞≡╡π╙δ╖╜╧≥╡π┴¼╧▀╖╜╧≥ **]
[**╖╜╧≥╡π
**c1
[Select windows]
[hj01(c1)]c1
[hj01(c2)]c2
[hj01(c3)]c3
[hj01(c4)]c4
[hj01(c5)]c5
[hj01(c6)]c6
[hj01(c7)]c7
[ DOOR]$i=m0 $i=*
**m0
[Select door]
[hj01(mb1)]mb1
[hj01(mb11)]mb11
[hj01(mb12)]mb12
[hj01(mb13)]mb13
[hj01(mb2)]mb2
[hj01(mb21)]mb21
[ Windowpage]$i=c1 $i=*
[ Nextpage]$i=m01 $i=*
**m01
[Select door]
[hj01(mc1)]mc1
[hj01(mc11)]mc11
[hj01(mc12)]mc12
[hj01(mc13)]mc13
[hj01(mc2)]mc2
[hj01(mc21)]mc21
[ lastpage]$i=m0 $i=*
[ nextpage]$i=m1 $i=*
**m1
[Select door]
[hj01(ma1)]ma1
[hj01(ma11)]ma11
[hj01(ma12)]ma12
[hj01(ma13)]ma13
[hj01(ma2)]ma2
[hj01(ma21)]ma21
[hj01(ma10)]ma10
[hj01(ma101)]ma101
[ nextpage]$i=m2 $i=*
**m2
[Select door]
[hj01(ma111)]ma111
[hj01(ma131)]ma131
[hj01(ma14)]ma14
[hj01(ma3)]ma3
[hj01(ma31)]ma31
[hj01(ma4)]ma4
[hj01(ma41)]ma41
[ lastpage]$i=m1 $i=*
[ nextpage]$i=m3 $i=*
**m3
[Select door]
[hj01(ma42)]ma42
[hj01(ma43)]ma43
[hj01(ma5)]ma5
[hj01(ma51)]ma51
[hj01(ma6)]ma6
[hj01(ma61)]ma61
[hj01(ma7)]ma7
[hj01(ma8)]ma8
[hj01(ma9)]ma9
[hj01(ma81)]ma81
[hj01(ma16)]ma16
[ lastpage]$i=m2 $i=*
[ Beginpage]$i=c1 $i=*
[ Exit]^c
**poly
[╔Φ╓├╢α▒▀╨╬═°╕±║═╢α╥σ╧▀▒Σ┴┐]
[acad(pmq)]'setvar surftype 5
[acad(pmc)]'setvar surftype 6
[acad(pmb)]'setvar surftype 8
[acad(plq)]'setvar splinetype 5
[acad(plc)]'setvar splinetype 6
[ ╔Φ╓├SPLINESEGS]'setvar splinesegs \
[ ╔Φ╓├SPLFRAME]'setvar splframe \
[ ╔Φ╓├DENSITY]'setvar surfu \'setvar surfv \
[ ═╦│÷]$p3=pop3
**as
[╤í╘±Ashade├ⁿ┴ε]
[acad(camera)]^C^C$S=X $S=CAMERA camera \\\$i=as $i=*
[acad(camview)]^C^C$S=X $S=ASHADE camview
[acad(point)]^C^C$S=X $S=LIGHTS LIGHT \p \$i=as $i=*
[acad(directed)]^C^C$S=X $S=LIGHTS LIGHT \d \\$i=as $i=*
[acad(scene)]^C^C$S=X $S=ACTION scene
[acad(filmroll)]^C^C$S=X $S=ACTION filmroll
[ ═╦│÷]^c^c
**ucs
[╙├╗º╫°▒Ω╧╡╤í╧ε]
[ ╔Φ╓├╬¬World]^C^Cucs world
[acad(left)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
ucs 3p \@0,-1,0 @0,0,1 ^P
[ ╔Φ╓├╬¬Screen]^C^Cucs view
[acad(top)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
ucs 3p \@1,0,0 @0,1,0 ^P
[acad(front)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
ucs 3p \@1,0,0 @0,0,1 ^P
[acad(bottom)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
ucs 3p \@1,0,0 @0,-1,0 ^P
[acad(back)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
ucs 3p \@-1,0,0 @0,0,1 ^P
[acad(right)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
ucs 3p \@0,1,0 @0,0,1 ^P
[ ═╦│÷]^c^c
**3DViews
[╤í╘±╣█▓∞╖╜╧≥]
[acad(ul)]^C^CVPOINT R;<<135;
[acad(l)]^C^CVPOINT R;<<180;
[acad(ll)]^C^CVPOINT R;<<225;
[acad(user)]
[acad(u)]^C^CVPOINT R;<<90;
[acad(p)]^C^Cvpoint 0,0,1
[acad(lo)]^C^CVPOINT R;<<270;
[acad(user)]
[acad(ur)]^C^CVPOINT R;<<45;
[acad(r)]^C^CVPOINT R;<<0;
[acad(lr)]^C^CVPOINT R;<<315;
[acad(user)]
[acad(t)]VPOINT;;
[acad(h)]$S=X $S=HIDE
[ ═╦│÷]^c^c
**dviewi
[DVIEW╤í╧ε]
[acad(dvca)]^C^C$S=X $S=DVIEW select;\dview;p;;ca;\\;
[acad(dvzo)]^C^C$S=X $S=DVIEW select;\dview;p;;z;\;
[acad(dvpa)]^C^C$S=X $S=DVIEW select;\dview;p;;pa;\\;
[ ═╦│÷]^c^c
**3DObjects
[╚²╬¼╨╬╠σ║═╚²╬¼╟·├µ├ⁿ┴ε]
[acad(box3d)]^C^C^P(progn(setq m:err *error*)(prin1))+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:BOX))(C:BOX))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(wedge)]^C^C^P(progn(setq m:err *error*)(princ));+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:WEDGE))(C:WEDGE))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(rev)]^C^C$S=X $S=3D revsurf
[acad(surftab1)]'setvar surftab1 \$I=*
[acad(pyramid)]^C^C^P(progn(setq m:err *error*)(princ))+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:PYRAMID))(C:PYRAMID))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(cone)]^C^C^P(progn(setq m:err *error*)(princ));+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:CONE))(C:CONE))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(rul)]^C^C$S=X $S=3D rulesurf
[acad(surftab2)]'setvar surftab2 \$I=*
[acad(dome)]^C^C^P(progn(setq m:err *error*)(princ));+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:DOME))(C:DOME))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(dish)]^C^C^P(progn(setq m:err *error*)(princ));+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:DISH))(C:DISH))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(edg)]^C^C$S=X $S=3D edgesurf
[acad(mesh)]^C^C^P(progn(setq m:err *error*)(princ));+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:MESH))(C:MESH))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(sphere)]^C^C^P(progn(setq m:err *error*)(princ));+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:SPHERE))(C:SPHERE))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(torus)]^C^C^P(progn(setq m:err *error*)(princ));+
(defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2"))(progn (terpri)(prompt +
"╬─╝■`3d.lsp'╘┌─π╡─╡▒╟░╦╤╦≈┬╖╛╢─┐┬╝╓╨╒╥▓╗╡╜. " )(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ")+
(princ))))(T (princ)))(cond ((not (null C:TORUS))(C:TORUS))(T (princ)));+
(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
[acad(tab)]^C^C$S=X $S=3D tabsurf
[ ═╦│÷]^c^c
**fonts1
[╤í╘±╬─▒╛╫╓╠σ]
[acad(romans)]^c^cstyle romans romans
[acad(romanc)]^c^cstyle romanc romanc
[acad(italicc)]^c^cstyle italicc italicc
[acad(romand)]^c^cstyle romand romand
[acad(romant)]^c^cstyle romant romant
[acad(italict)]^c^cstyle italict italict
[acad(monotxt)]^c^cstyle monotxt monotxt
[ ╧┬╥╗╒┼]$i=fonts2 $i=*
[ ═╦│÷]^c^c
**fonts2
[╤í╘±╬─▒╛╫╓╠σ]
[acad(gothice)]^c^cstyle gothice gothice
[acad(greeks)]^c^cstyle greeks greeks
[acad(scripts)]^c^cstyle scripts scripts
[acad(gothicg)]^c^cstyle gothicg gothicg
[acad(greekc)]^c^cstyle greekc greekc
[acad(scriptc)]^c^cstyle scriptc scriptc
[acad(gothici)]^c^cstyle gothici gothici
[ ╧┬╥╗╒┼]$i=fonts3 $i=*
[ ═╦│÷]^c^c
**fonts3
[╤í╘±╬─▒╛╫╓╠σ]
[acad(syastro)]^c^cstyle syastro syastro
[acad(symath)]^c^cstyle symath symath
[acad(symusic)]^c^cstyle symusic symusic
[acad(symap)]^c^cstyle symap symap
[acad(symeteo)]^c^cstyle symeteo symeteo
[acad(txt)]^c^cstyle txt txt
[acad(user)]
[ ┐¬╩╝]$i=fonts1 $i=*
[ ═╦│÷]^c^c
**hatch1
[╤í╘±╥⌡╙░╧▀═╝░╕]
[ Previous/User]^c^chatch
[acad(ansi31)]^c^chatch ansi31
[acad(ansi32)]^c^chatch ansi32
[acad(ansi34)]^c^chatch ansi34
[acad(ansi35)]^c^chatch ansi35
[acad(ansi33)]^c^chatch ansi33
[acad(ansi36)]^c^chatch ansi36
[acad(ansi37)]^c^chatch ansi37
[acad(ansi38)]^c^chatch ansi38
[acad(box)]^c^chatch box
[acad(brass)]^c^chatch brass
[acad(brick)]^c^chatch brick
[acad(clay)]^c^chatch clay
[acad(cork)]^c^chatch cork
[ ╧┬╥╗╒┼]$i=hatch2 $i=*
[ ═╦│÷]^c^c
**hatch2
[╤í╘±╥⌡╙░╧▀═╝░╕]
[acad(cross)]^c^chatch cross
[acad(dash)]^c^chatch dash
[acad(dolmit)]^c^chatch dolmit
[acad(dots)]^c^chatch dots
[acad(earth)]^c^chatch earth
[acad(escher)]^c^chatch escher
[acad(flex)]^c^chatch flex
[acad(grass)]^c^chatch grass
[acad(grate)]^c^chatch grate
[acad(hex)]^c^chatch hex
[acad(honey)]^c^chatch honey
[acad(hound)]^c^chatch hound
[acad(insul)]^c^chatch insul
[acad(line)]^c^chatch line
[ ╧┬╥╗╒┼]$i=hatch3 $i=*
[ ═╦│÷]^c^c
**hatch3
[╤í╘±╥⌡╙░╧▀═╝░╕]
[acad(mudst)]^c^chatch mudst
[acad(net)]^c^chatch net
[acad(net3)]^c^chatch net3
[acad(plast)]^c^chatch plast
[acad(plasti)]^c^chatch plasti
[acad(sacncr)]^c^chatch sacncr
[acad(square)]^c^chatch square
[acad(stars)]^c^chatch stars
[acad(steel)]^c^chatch steel
[acad(swamp)]^c^chatch swamp
[acad(trans)]^c^chatch trans
[acad(triang)]^c^chatch triang
[acad(zigzag)]^c^chatch zigzag
[acad(angle)]^c^chatch angle
[ ┐¬╩╝]$i=hatch1 $i=*
[ ═╦│÷]^c^c
**vporti
[╩╙┤░╔Φ╓├ (╝╠│╨╡▒╟░╩╙┤░)]
[acad(vp1)]^C^CVPORTS;SI
[acad(vp3v)]^C^CVPORTS;SI;;3;v
[acad(vp3h)]^C^CVPORTS;SI;;3;h
[acad(vp4)]^C^CVPORTS;SI;;4
[acad(vp2v)]^C^CVPORTS;SI;;2;v
[acad(vp3r)]^C^CVPORTS;SI;;3;r
[acad(vp3l)]^C^CVPORTS;SI;;3;l
[acad(vp4l)]^C^C^PUNDO;M;(setq m:g (getvar "gridmode"));SETVAR;GRIDMODE;0;+
VPORTS;SI;;2;;(setvar "CVPORT" (car (cadr (vports))))(princ);;2;;;J;;+
(car (cadr (vports)));(setvar "CVPORT" (car (cadr (vports))))(princ)+
;;3;h;(setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT"+
(car (cadddr (vports))))(setvar "gridmode" m:g)(princ);ZOOM;A;+
(setvar "CVPORT" (car (cadddr (vports))))(setvar "gridmode" m:g)(princ);+
ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))(setvar "gridmode" m:g)+
(princ);ZOOM;A;UNDO;E ^P
[acad(vp2h)]^C^CVPORTS;SI;;2;h
[acad(vp3a)]^C^CVPORTS;SI;;3;a;
[acad(vp3b)]^C^CVPORTS;SI;;3;b;
[acad(vp4r)]^C^C^PUNDO;M;(setq m:g (getvar "gridmode"));SETVAR;GRIDMODE;0;+
VPORTS;SI;;2;;;2;;(setvar "CVPORT" (car (caddr (vports))));;j;;+
(car (caddr (vports)));(setvar "CVPORT" (car (cadr (vports))));;3;h;+
(setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))+
(setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))+
(setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))+
(setvar "gridmode" m:g)(princ);ZOOM;A;UNDO;E ^P
[ ║╧▓ó╩╙┤░]^C^CVPORTS;J
[ ╗╓╕┤╥╤▒ú┤µ╩╙┤░]^C^CVPORTS;R;
[ ┴╨│÷╥╤▒ú┤µ╩╙┤░]^C^CVPORTS;?;
[ ═╦│÷]^c^c
***SCREEN
**ROOT
[HOUSEA91]$P1=POP1 $P2=POP2 $P3=POP3 $P4=POP4 $P5=POP5 $P6=POP6 $P7=POP7 $P8=POP8 $S=SCREEN
[* * * * *]
[│⌡╩╝╔Φ╓├]$S=SS $S=SETA91
[╞╜├µ]$S=SS $S=SFLAT ^C^C^P(progn (SETVAR "CMDECHO" 0) (princ)) ^P
[╚²╬¼─ú╨═]$S=SS $S=S3D
[┴ó╞╩├µ]$S=SS $S=SELEV
[╬─╫╓▒Ω╫ó]$S=SS $S=ST
[┐Θ╢¿╥σ]$S=SS $S=SB
[▓π]$S=SS $S=SL
[╧╘╩╛]$S=SS $S=SA
[╩Σ│÷]$S=SS $S=SOUT
[═¿╙├╗µ═╝]$S=SS $S=hymnu
[ACAD▓╦╡Ñ]^C^C^P(PROGN (PROMPT "to AutoCAD menu ..") (PRINC)) ^P$P1=APOP1 $P2=APOP2 $P3=APOP3 $P4=APOP4 $P5=APOP5 $P6=APOP6 $P7=APOP7 $P8=APOP8 $S=S
**SA 3
[╧╘╩╛╣ª─▄]
[┤░┐┌╖┼┤≤]'ZOOM W
[╢»╠¼╖┼┤≤]'ZOOM D
[╛í┴┐┤≤]'ZOOM E
[ȫͼ]'ZOOM A
[╥í╥╞]'PAN
[╣█▓∞╩╙═╝]VPOINT
[═╕╩╙]DVIEW
**SS
[HOUSEA91]$P1=POP1 $P2=POP2 $P3=POP3 $P4=POP4 $P5=POP5 $P6=POP6 $P7=POP7 $P8=POP8 $S=SCREEN
[* * * *]
[╔╧╥╗╥│]$S= $S=
**S1 3
[╤í╘±]
Yes
No
**S2 3
[╤í╘±]
[╦│╩▒Cw]Cw
[─µ╩▒CCw]CCw
**S4 3
[╤í╘±]
[╫≤]left
[╙╥]Right
**S5 3
[╤í╘±]
[╔╧]
[╧┬]
**SETA91 3
[╔Φ╓├]
[▒╚└²]^C^C^P(progn (if (= C:setup nil) (load1 "hj01")) (princ)) ^PSETUP Scale
[╡Ñ╬╗]^C^C^P(progn (if (= C:setup nil) (load1 "hj01")) (princ)) ^PSETUP Unit
[╝½╧▐]LIMITS
[Seting]
[Layers]
[_ FLAT _]$S=SFLAT
[ ROOT ]$S=ROOT
**UNIT 3
[╣½╓╞]$S=SS $S=UNIT4 Decimal
[╙ó╓╞]$S=SS $S=UNIT4 Architect
**UNIT3 3
[▒╚└²]
[1:1]1:1 $S=SS $S=SETA91
[1:10]1:10 $S=SS $S=SETA91
[1:20]1:20 $S=SS $S=SETA91
[1:50]1:50 $S=SS $S=SETA91
[1:100]1:100 $s=ss $s=SETA91
[1:150]1:150 $S=SS $S=SETA91
[1:200]1:200 $S=SS $S=SETA91
[1:300]1:300 $S=SS $S=SETA91
[1:500]1:500 $S=SS $S=SETA91
**UNIT4 3
[╡Ñ╬╗╝╢]UNIT
[├╫]M $S=SS $S=SETA91
[╖╓├╫]DM $S=SS $S=SETA91
[└σ├╫]CM $S=SS $S=SETA91
[║┴├╫]MM $S=SS $S=SETA91
**EXCHSYS
[SYSTEM]SYS
[EXCHANGE]EXCH
[LayFILE]
[GET .DAT]
[FLAYER]
[MATHLAY]
[ EDIT ]
[FLAYER]
[MATHLAY]
[SET]
[FLAYER]^c^c(load1 "HJ02") EXCHLAY
[MATHLAYER]^c^c(load1 "HJ02") EXCHLAY
[LAST]$S=
[ROOTNEMU]$S=ROOT
**SFLAT 3
[╞╜├µ]$S=SFLAT SETVAR CMDECHO 0
[╓ß╧▀]$S=SS $S=SFL1
[╟╜╠σ]$S=SS $S=SFL2
[├┼┤░]$S=SS $S=SFL3
[╓∙]$S=SS $S=SFL4
[╤⌠╠¿]$S=SS $S=SFL5
[╖┐╢Ñ]$S=SS $S=SFL6
[├┼┤░│▀┤τ]$S=SS $S=SFL8
[
[╢¿╥σ╞╜├µ]^C^C^P(progn (if (= C:DEFflat nil) (load1 "hj05")) (princ)) ^PDEFFLAT
[┬Ñ╠▌]$S=SS $S=SSTAIR
[╠¿╜╫]$S=SS $S=SF
**SFL1 3
[╓ß╧▀]
[╓ß╧▀╔Φ╝╞]^C^C^P(if (= C:DESAXIS nil) (load1 "hj53")) desaxis
[--------]
[╓ß╧▀╫ó╝╟]^C^C^P(if (= C:DIMAXIS nil) (load1 "HJ54")) (load "HJ16F") (HJ16F C:DIMAXIS)
[--------]
[╧▀╨═▒╚└²]^C^Cltscale
[╓ß╧▀▒α╝¡]^C^C^P(if (= C:DIMEDIT nil) (load1 "HJ28")) ^PDIMEDIT
[▓σ╨┬╓ß╧▀]^C^C^P(if (= c:adaxis nil) (load1 "hj28")) ADAXIS
[╖╓╟°║┼]^C^C^P(if (= C:PAXIS nil) (load1 "HJ28")) ^PPAXIS
[╨▐╕─▒Ω║┼]^C^C^P(progn (if (= C:chdim nil) (load1 "hj104")) (princ)) ^PCHDIM
[│▀┤τ╨▐╕─]^C^C^P(progn (if (= C:EXDIM nil) (load1 "HJ28")) (princ)) ^PEXDIM
**SFL2 3
[╟╜╠σ]
[┴¼╨°╗¡╟╜]^C^P(if (= C:LINE-C nil) (load1 "HJ102")) LINE-C
[┴╜╡π╗¡╟╜]^C^P(if (= C:LINE-2 nil) (load1 "HJ102")) LINE-2
[╛╪╨╬╗¡╟╜]^C^P(if (= C:RECT nil) (load1 "HJ102")) RECT
[╘▓╗í╟╜]^C^P(if (= C:ARC-W nil) (load1 "HJ102")) ARC-W
[╒█╧▀╗¡╟╜]^C^P(if (= C:PLINE-W nil) (load1 "HJ102")) PLINE-W
[╟σ│²╓╪╧▀]^C^C^P(if (= C:MLIN nil) (load1 "hj11")) (load "HJ11F") (HJ11F C:MLIN)
[▒Σ╦½╧▀╟╜]^C^C^P(if (= C:DubWALL nil) (load1 "HJ18")) (load "HJ18F") (HJ18F C:DUBWALL)
[╚╬╥Γ╦½╧▀]^C^C^P(if (= C:dubw nil) (load1 "HJ14")) (load "HJ14F") (HJ14F C:DUBw)
[╛╓▓┐╦½╧▀]^C^C^P(if (= C:dubw1 nil) (load1 "HJ12")) (load "HJ14F") (HJ14F C:DUBw1)
[╕─═Γ╟╜║±]^C^C^P(if (= C:ThiWALL nil) (load1 "HJ13")) (load "HJ13F") (HJ13F C:THIWALL)
[╖┐╝Σ▒Ω╫ó]^C^C^P(if (= C:ROOM nil) (load1 "HJ23")) (load "HJ23F") (HJ23F C:ROOM)
[╨▐╟╜╜╟]^C^C^P(if (= C:FW2 nil) (load "hj16")) fw2
[╟╜╠σ▒α╝¡]^C^C$S=SS $S=FL21
**FL21 3
[╟╜╠σ▒α╝¡]^C^C$S=SS $S=FL21
[╟σ│²╟╜╧▀]^C^C^P(if (= C:ERWALL nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:ERWALL)
[╥╞╢»╟╜╧▀]^C^C^P(if (= C:WAMOVE nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:WAMOVE)
[╕─╟╜║±]^C^C^P(if (= C:THWALL nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:THWALL)
[▒ú╬┬╟╜]^C^C^P(if (= C:BWALL nil) (load1 "hj55")) (load "HJ55F") (HJ10F C:BWALL)
[╟╜╧▀┴¼╜╙]^C^C^P(if (= C:WINTER nil) (load1 "hj10")) (load "HJ10F") (HJ10F C:WINTER)
[╟╜╧▀▒Σ┤╓]^C^C^P(if (= C:WALL-W nil) (load1 "hj59")) WALL-W
**SFL3 3
[├┼┤░╔Φ╝╞]
[╓╨╡π▓σ┤░]^C^C^P(load1 "hj17") (setq mc "CC") (load "HJ17F") (HJ17F C:DEWD)
[╛α└δ▓σ┤░]^C^C^P(load1 "hj20") (setq mc "CC") (load "HJ20F") (HJ20F C:DEWD)
[╓╨╡π▓σ├┼]^C^C^P(load1 "hj17") (setq mc "MM") (load "HJ17F") (HJ17F C:DEWD)
[╛α└δ▓σ├┼]^C^C^P(load1 "hj20") (setq mc "MM") (load "HJ20F") (HJ20F C:DEWD)
[╗í╟╜├┼┤░]^C^C^P(if (= C:AWIN nil) (load1 "hj22")) (load "HJ22F") (HJ22F C:AWIN)
[╕─├┼┤░┐φ]^C^C^P(if (= C:CHANWIDE nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:CHANWIDE)
[▓┴│²├┼┤░]^C^C^P(if (= C:WDERASE nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:WDERASE)
[╥╞╢»├┼┤░]^C^C^P(if (= C:WDMOVE nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:WDMOVE)
[├┼┤░╢¿╨═]^C^C^P(if (= C:DefWD nil) (load1 "hj15")) (load "HJ15F") (HJ15F C:DEfwd)
[╫≤╙╥╛╡╧≥]^C^C^P(if (= C:MILR nil) (load1 "hj15")) MILR
[╔╧╧┬╛╡╧≥]^C^C^P(if (= C:MIUD nil) (load1 "hj15")) MIUD
[▒Ω╫ó╛╡╧≥]^C^C^P(if (= c:mitxt nil) (load1 "hj15")) ^PMITXT
[╔╧╥╗╥│]^C^C$s= $s=
**SFL4 3
[╓∙]
[╓∙╢¿╨═]^C^C^P(if (= C:COTYPE nil) (load1 "hj101")) COTYPE
[╜╗╡π▓σ╓∙]^C^C^P(if (= C:COINSS nil) (load1 "hj101")) COINSS
[╨╨┴╨▓σ╓∙]^C^C^P(if (= C:COINSL nil) (load1 "hj101")) COINSL
[╓∙▒α╝¡]^C^C^P(if (= C:COEDIT nil) (load1 "hj101")) COEDIT
**SFL5 3
[╤⌠╠¿]
[╛╪╨╬╤⌠╠¿]^C^C^P(if (= C:BAL1 nil) (load1 "hj56")) (load "HJ56F") (HJ56F C:BAL1)
[╫¬╜╟╤⌠╠¿]^C^C^P(if (= C:BAL2 nil) (load1 "hj56")) (load "HJ56F") (HJ56F C:BAL2)
**SFL6 3
[╖┐╢Ñ]
[╗¡PLINE]^C^C^P(progn (if (= c:rpline nil) (load1 "hj46")) (princ)) ^PRPline
[╖Γ▒╒╖┐╢Ñ]^C^C^P(if (= c:proof nil) (load1 "hj25")) (load "HJ25F") (HJ25F C:PROOF)
[╤╪┐┌╔·│╔]^C^C^P(progn (if (= C:EAVES nil) (load1 "hj31")) (princ)) ^PEAVES
[╖┐╢Ñ╞≡╞┬]^C^C^P(if (= c:edroof nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:EDROOF)
[╦─╞┬╖┐╢Ñ]^C^C^P(if (= c:roof1 nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:ROOF1)
[╠∞┤░╤╠┤╤]^C^C^P(if (= c:roof2 nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:ROOF2)
**SFL8 3
[├┼┤░│▀┤τ]
[═Γ├┼┤░]^C^C^P(if (= c:fdim nil) (load1 "hj58")) (load "HJ58F") (HJ58F C:FDIM)
[─┌├┼┤░]^C^C^P(if (= c:ldim nil) (load1 "hj103")) (load "hj58f") (hj58f c:ldim)
**S3D 3
[╚²╬¼╣ª─▄]$S=S3D
[╫Θ║╧╞╜├µ]^C^C^P(progn (if (= C:combine nil) (load1 "hj06")) (princ)) ^PCOMBINE
[╚²╬¼╔·│╔]^C^C$S=SS $S=S3D0
[╚²╬¼▒α╝¡]$S=SS $S=S3D1
**S3D0 3
[╚²╬¼╔·│╔]
[╟╜╠σ╔·│╔]^C^C^P(progn (if (= C:WALL3D NIL) (load1 "HJ30")) (princ)) ^PWALL3D
[├┼┤░╔·│╔]^C^C^P(progn (if (= C:WALL3D NIL) (load1 "HJ30")) (princ)) ^PWALL3D
[╓∙╫╙╔·│╔]^C^C^P(progn (if (= C:COLU3D NIL) (load1 "HJ34")) (princ)) ^PCOLU3D
[╤⌠╠¿╔·│╔]^C^C^P(progn (if (= C:BALC3D nil) (load1 "hj36")) (princ)) ^PBALC3D
[╬▌╢Ñ]$S=SS $S=S3D2
**S3D1 3
[▒α╝¡]
[╟╜╠σ╟π╨▒]^C^C^P(progn (if (= C:3DROTATE nil) (load1 "hj37")) (princ)) ^P3DROTATE
[╝╙╟╜╠σ]^C^C^P(progn (if (= C:3DADD nil) (load1 "hj33")) (princ)) ^P3DADD
[╚²╬¼▒▀]
[┐╔╝√]^C^C^P(progn (if (= C:MV nil) (load1 "hj35")) (princ)) ^PMV
[▓╗┐╔╝√]^C^C^P(progn (if (= C:MI nil) (load1 "hj33")) (princ)) ^PMI
[├┼┤░▒α╝¡]$S=SS $S=S3D3
**S3D2 3
[╬▌╢Ñ]
[╗¡PLINE]^C^C^P(progn (if (= c:rpline nil) (load1 "hj46")) (princ)) ^PRPline
[╖Γ▒╒╖┐╢Ñ]^C^C^P(if (= c:proof nil) (load1 "hj25")) (load "HJ25F") (HJ25F C:PROOF)
[╤╪┐┌╔·│╔]^C^C^P(progn (if (= C:EAVES nil) (load1 "hj31")) (princ)) ^PEAVES
[╬▌╢Ñ╞≡╞┬]^C^C^P(if (= c:edroof nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:EDROOF)
[╦─╞┬╖┐╢Ñ]^C^C^P(if (= c:roof1 nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:ROOF1)
[╠∞┤░╤╠┤╤]^C^C^P(if (= c:roof2 nil) (load1 "hj26")) (load "HJ26F") (HJ26F C:ROOF2)
**S3D3 3
[├┼┤░▒α╝¡]
[╫÷╥∞╨╬┤░]^C^C^P(progn (if (= C:WSHAPE nil) (load1 "hj32")) (princ)) ^PWSHAPE
[╥╞╢»┤░]^C^C$s=ss $S=S3D32
[▓ú┴º─╗╟╜]$S=SS $S=S3D31
**S3D31 3
[▓ú┴º─╗╟╜]
[▓ú┴º─╗]^C^C^P(progn (if (= C:GLASSC nil) (load1 "hj39")) (princ)) ^PGLASSC
[╔·│╔]
[3DMESH]$S=3D
[POLYMESH]^C^C^P(progn (if (= C:POLYMESH NIL) (load1 "hj38")) (princ)) ^PPOLYMESH
Pline
[surftb1:]SETVAR SURFTAB1
[surftb2:]SETVAR SURFTAB2
**S3D32 3
[├┼┤░╥╞╢»]
[╟░║≤╬╗╥╞]^C^C^P(progn (if (= C:3DWA NIL) (load1 "hj44")) (princ)) ^P3DWA
[╫÷⌠ñ▌╜┐┌]^C^C^P(progn (if (= C:3DWB NIL) (load1 "hj40")) (princ)) ^P3DWB
[╫÷═╣┤░]^C^C^P(progn (if (= C:3DWC NIL) (load1 "hj43")) (princ)) ^P3DWC
**SELEV 3
[┴ó├µ]$S=SS $S=SE1
[╞╩├µ]$S=SS $S=SE2
**SE1 3
[┴ó├µ╔·│╔]$S=SS S=SE1
[╫╘╢»╔·│╔]^C^C^P(progn (IF (= C:Autoelev NIL) (LOAD1 "hj51")) (princ)) ^PAutoelev
[┴ó├µ╩╙═╝]^C^C^P(progn (IF (= C:ELDAT NIL) (LOAD1 "hj51")) (princ)) ^PELDAT
[╩╙═╝╩Σ│÷]^C^C^P(progn (IF (= C:ELOUT NIL) (LOAD1 "hj51")) (princ)) ^PELOUT
[├┼┤░▒α╝¡]^C^C^P(progn (IF (= C:CHANGEWD NIL) (LOAD1 "hj52")) (princ)) ^PCHANGEWD
[╔Φ╓├╗µ═╝]^C^C^P(cond ((= (getvar "acadver") "10") (command "script" "t0")) +
((= (getvar "acadver") "10 c10") (command "script" "t1")) +
((= (getvar "acadver") "11") (command "script" "t2")) +
) ^P
[╗·╬¬DXB]C^C^P(cond ((= (getvar "acadver") "10") (command "script" "t0")) +
((= (getvar "acadver") "10 c10") (command "script" "t1")) +
((= (getvar "acadver") "11") (command "script" "t2")) +
) ^P
[╕±╩╜]
**SE2 3
[╞╩├µ╔·│╔]$S=SE2
[╫╘╢»╔·│╔]^C^C^P(progn (IF (= C:AutoCROS NIL) (LOAD1 "hj50")) (princ)) ^PAutoCROS
[╞╩├µ╩╙═╝]^C^C^P(progn (IF (= C:CRTAKE NIL) (LOAD1 "hj50")) (princ)) ^PCRTAKE
[╩╙═╝╩Σ│÷]^C^C^P(progn (IF (= C:CROUT NIL) (LOAD1 "hj50")) (princ)) ^PCROUT
[├┼┤░▒α╝¡]^C^C^P(progn (IF (= C:CHANGEWD NIL) (LOAD1 "hj52")) (princ)) ^PCHANGEWD
[╔Φ╓├╗µ═╝]^C^C^P(cond ((= (getvar "acadver") "10") (command "script" "t0")) +
((= (getvar "acadver") "10 c10") (command "script" "t1")) +
((= (getvar "acadver") "11") (command "script" "t2")) +
) ^P
[╗·╬¬DXB]C^C^P(cond ((= (getvar "acadver") "10") (command "script" "t0")) +
((= (getvar "acadver") "10 c10") (command "script" "t1")) +
((= (getvar "acadver") "11") (command "script" "t2")) +
) ^P
[╕±╩╜]
**SSTAIR 3
[┬Ñ╠▌╔·│╔]
[MAKE]
[╛╪╨╬┬Ñ╠▌]^C^C^P(progn(if (= C:rstair nil) (load1 "hj41")) (princ)) ^PRSTAIR
[╘░╨╬┬Ñ╠▌]^C^C^P(progn (if (= C:cstair nil) (load1 "hj42")) (princ)) ^PCSTAIR
[╚²╜╟╨╬]
[╗í╨╬]
**ST 3
[╬─╫╓▒Ω╫ó]$S=ST
[╫╓╨╬]$S=SS $S=ST1
[╬─▒╛]$S=SS $S=ST2
[│▀┤τ▒Ω╫ó]$S=SS $S=ST3
[═╝└²╖√║┼]$S=SS $S=ST4
**ST1 3
[╫╓╨═]
[╫╓╨═╔Φ╓├]$S=SS $S=ST11
[╫╓╨═╨▐╕─]^C^C^P(progn (if (= C:EDITSTYL NIL) (LOAD1 "HJ60")) (princ)) ^PEDITSTYL
**ST11 3
[╫╓╨═╔Φ╓├]
[STYLE]
[HZTEXT]^C^CSETVAR REGENMODE 0 STYLE HZ TXT,HZTXT 0.8 0;;;
[STANDARD]^C^CSETVAR REGENMODE 0 STYLE STANDARD TXT 0.8 0;;;;
[COMPLEX]^C^CSETVAR REGENMODE 0 STYLE COMPLEX COMPLEX 0.8 0;;;;
[?]STYLE ?
[╔Φ┐φ╕▀▒╚]style;;;;\;;;;
[╔Φ╫÷╨▒╜╟]style;;;;;\;;;
**ST2 3
[╬─▒╛]
[TEXT L]TEXT
[TEXT R]TEXT R
[TEXT C]TEXT C
[TEXT M]TEXT M
[TEXT A]TEXT A
[┤╩╫Θ]$S=SS $S=ST21
[╨▐╕─╬─▒╛]^C^C^P(progn (if (= C:editext nil) (load1 "hj61")) (princ)) ^PEDITEXT
**ST21 3
[╬─▒╛╙δ]
[┤╩╫Θ]
[╢¿╥σ┤╩╫Θ]^C^C^P(progn (if (= C:DEfitem nil) (load1 "hj62")) (princ)) ^PDefitem
[╨▐╕─╢¿╥σ]^C^C^P(progn (if (= C:EDITEM NIL) (load1 "hj63")) (princ)) ^PEDITEM
[▓Θ╤»]^C^C^P(progn (if (= C:SITEM NIL) (load1 "hj105")) (princ)) ^PSITEM
[┤╩╫Θ╡≈╙├]^C^C^P(progn (if (= C:FWRITE NIL) (load1 "hj65"))(princ)) ^PFWRITE
[╩Θ╨┤╦╡├≈]^C^C^P(progn (if (= C:WWRITE NIL) (load1 "hj66"))(princ)) ^PWWRITE
[─┌╚▌╨▐╕─]^C^C^P(progn (if (= C:CHANTEXT NIL) (load1 "hj67"))(princ)) ^PCHANTEXT
**SF 3
[╞Σ╦ⁿ]
[╠¿╜╫]$S=SS $S=SF2
[╙Ω┼∩]$S=SS $S=F3
[╬└╔·╔Φ▒╕]$S=SS $S=F4
[╝╥╛▀]$S=SS $S=F5
[╔Φ▒╕]$S=SS $S=F6
**SF2 3
[╠¿╜╫]
[╚²├µ╠¿╜╫]^C^C^P(progn (if (= c:steps nil) (load1 "hj70")) (load "hj70f") (princ)) ^P\STEPS
[╡Ñ├µ╠¿╜╫]^C^C^P(progn (if (= C:step1 nil) (load1 "hj71")) (load "hj70f") (princ)) ^P\STEP1
[╦½▓α╗¿│╪]^C^C^P(progn (if (= C:DUSTEPS nil) (load1 "hj72")) (load "hj70f") (princ)) ^P\DUSTEPS
[╡Ñ▓α╗¿│╪]^C^C^P(progn (if (= C:SIsteps nil) (load1 "hj73")) (load "hj70f") (princ)) ^P\SISTEPS
**SB 3
[BLOCK]
[╢¿╥σ]
[╢¿╥σ┐Θ]^C^C^P(progn(IF (= C:DEFDW NIL) (load1 "hj07")) (princ)) ^PDEFDW
[▒α╝¡]
[╧╘╩╛]
**SL 3
[▓π▓┘╫≈]
[╩╡╠σ▓┘╫≈]^C^C^P(progn (if (= C:elayer nil) (load1 "hj04")) (princ)) ^PELAYER
[Find]
[Get]
[╢╘╗░┐≥]^C^C'ddlmodes
**SL1 3
[╙├╩╡╠σ╢╘]^C^C^P(progn (if (= C:elayer nil) (load1 "hj04")) (princ)) ^PELAYER
[▓π▓┘╫≈]^C^C^P(progn (if (= C:elayer nil) (load1 "hj04")) (princ)) ^PELAYER
[╔╛│²]Delete
[╢│╜ß]Freaze
[╣╪▒╒]Off
**SOUT 3
[╩Σ│÷]
[╣Θ╥╗╩Σ│÷]^C^C^P(progn (if (= C:output nil) (load1 "hj03")) (princ)) ^POUTPUT
[TEXTchang]^C^C^P()
[═╝╖∙]
[╗µ═╝]
[┤≥╙í╗·]
**S
[-╕∙▓╦╡Ñ-]^C^C$S=X $S=S $P1=POP1 $P3=POP3
[─┐▒Ω▓╢╫╜]$S=OSNAPB
[│⌡╩╝╗»: ]^C^C^P(progn(prompt "╫░╚δ│⌡╩╝╗»... ")(load "setup")) ^P$S=X $S=UNITS
[┐Θ▓┘╫≈└α]$S=X $S=BL
[▒Ω│▀┤τ:]$S=X $S=DIM ^C^CDIM
[╧╘╩╛┐╪╓╞]$S=X $S=DS
[╗µ╓╞└α:]$S=X $S=DR
[╨▐╕─└α:]$S=X $S=ED
[▓Θ╤»└α:]$S=X $S=INQ
[▓π▓┘╫≈:]$S=X $S=LAYER ^C^CLAYER
[╔Φ╓├└α:]$S=X $S=SET
[╙├╗µ═╝╗·]$S=X $S=PLOT
[UCS:]$S=X $S=UCS1 ^C^CUCS
[╘╙└α:]$S=X $S=UT
[╚²╬¼╣ª─▄]$S=X $S=3D
[ASHADE:]^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(princ))(cond ((null C:SCENE)(vmon)+
(if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
(prompt "╟δ╡╚┤²... ╫░╚δashade. ")(load "ashade")+
(menucmd "S=X")(menucmd "S=ASHADE")(setq *error* m:err m:err nil))(progn (terpri);+
(prompt "╬─╝■'Ashade.lsp'╘┌─π╡─╡▒╟░╦╤╦≈─┐┬╝╓╨╒╥▓╗╡╜. ")+
(terpri)(prompt "╟δ▓╬╝√AutoShade╩╓▓ß╡─░▓╫░╦╡├≈. ");+
(setq *error* m:err m:err nil)(princ))))+
(T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=ASHADE")(princ))) ^P
[▒ú┤µ═╝╨╬]^C^CSAVE
[HOUSEA91]^P(progn (prompt "To house91 menu") (princ)) ^P$P1=POP1 $P2=POP2 $P3=POP3 $P4=POP4 $P5=POP5 $P6=POP6 $P7=POP7 $P8=POP8 $S=SCREEN
**X 3
[╔╧╕÷▓╦╡Ñ]$S= $S=
[╗µ═╝└α:]^C^C$S=X $S=DR
[╨▐╕─└α:]^C^C$S=X $S=ED
**BL 3
[╩⌠╨╘└α:]$S=X $S=ATTDEF ^C^CATTDEF
[╢¿╥σ╗∙╡π]^C^CBASE
[╢¿╥σ┐Θ:]$S=X $S=BLOCK ^C^CBLOCK
[▓σ╚δ┐Θ:]$S=X $S=INSERT ^C^CINSERT
[╒≤┴╨▓σ╚δ]$S=X $S=MINSERT ^C^CMINSERT
[╨┤┐Θ:]$S=X $S=WBLOCK ^C^CWBLOCK
**DS 3
[╩⌠╨╘╧╘╩╛]$S=X $S=ATTDISP ^C^CATTDISP
[╢»╠¼╩╙═╝]$S=X $S=DVIEW ^C^CDVIEW
[╥╞╞┴─╗:]'PAN
[╓├╞╜├µ:]$S=X $S=PLAN ^C^CPLAN
[╓╪╗¡:]'REDRAW
[╩╙┤░╓╪╗¡]'REDRAWALL
[╓╪╔·│╔:]^C^CREGEN
[╩╙┤░╓╪╔·]^C^CREGENALL
[╫╘╢»╓╪╔·]$S=X $S=RGNAUTO ^C^CREGENAUTO
[╩╙═╝:]$S=X $S=VIEW 'VIEW
[┐╪╓╞╛½╢╚]$S=X $S=VIEWRES ^C^CVIEWRES
[╣█▓∞╖╜╧≥]$S=X $S=VPOINT ^C^CVPOINT
[╖┼╦⌡:]$S=X $S=ZOOM 'ZOOM
**DR 3
[╗¡╘▓╗í:]$S=X $S=ARC
[╩⌠╨╘╢¿╥σ]$S=X $S=ATTDEF ^C^CATTDEF
[╗¡╘▓:]$S=X $S=CIRCLE
[╩╡╨─╘▓╗╖]^C^CDONUT
[╬─╫╓:]$S=X $S=DTEXT ^C^CDTEXT
[╗¡═╓╘▓:]$S=X $S=ELLIPSE ^C^CELLIPSE
[╗¡╥⌡╙░╧▀]$S=X $S=HATCH ^C^CHATCH
[▓σ╚δ┐Θ:]$S=X $S=INSERT ^C^CINSERT
[╓▒╧▀╒█╧▀:]$S=X $S=LINE ^C^CLINE
[╒≤┴╨▓σ╚δ]$S=X $S=MINSERT ^C^CMINSERT
[╞½╥╞┐╜▒┤]$S=X $S=OFFSET ^C^COFFSET
[PLINE:]$S=X $S=PLINE ^C^CPLINE
[--╗╣╙╨--]$S=X $S=DR2
**DR2 3
[╗¡╡π:]$S=X $S=POINT ^C^CPOINT
[╗¡╢α▒▀╨╬]$S=X $S=POLYGON ^C^CPOLYGON
[╨═ SHAPE]$S=X $S=SHAPE ^C^CSHAPE
[╗µ▓▌═╝:]$S=X $S=SKETCH ^C^CSKETCH
[╩╡╠σ:]$S=X $S=SOLID ^C^CSOLID
[╬─╫╓:]$S=X $S=TEXT ^C^CTEXT
[╗¡┐φ╧▀:]$S=X $S=TRACE ^C^CTRACE
[╗¡╚²╬¼├µ]$S=X $S=3DFACE ^C^C3DFACE
[╚²╬¼╣ª─▄]$S=X $S=3D
[--╗╣╙╨--]$S=X $S=DR
[╔╧╕÷▓╦╡Ñ]$S= $S=
**ED 3
[╣╣│╔╒≤┴╨]$S=X $S=ARRAY ^C^CARRAY
[╨▐╕─╩⌠╨╘]$S=X $S=ATTEDIT ^C^CATTEDIT
[▒α╝¡╩⌠╨╘]^C^CDDATTE
[╟╨╢╧:]$S=X $S=BREAK ^C^CBREAK
[╗¡╡╣╜╟:]$S=X $S=CHAMFER ^C^CCHAMFER
[╨▐╕─:]$S=X $S=CHANGE ^C^CCHANGE
[╕─╨╘╓╩:]$S=X $S=CHPROP ^C^CCHPROP
[╕┤╓╞:]$S=X $S=COPY ^C^CCOPY
[╗«╖╓:]$S=X $S=DIVIDE ^C^CDIVIDE
[▓┴│²:]$S=X $S=ERASE ^C^CERASE
[╖╓╜Γ:]^C^CEXPLODE
[╤╙│ñ:]$S=X $S=EXTEND ^C^CEXTEND
[--╗╣╙╨--]$S=X $S=ED2
**ED2 3
[╗¡╘▓╜╟:]$S=X $S=FILLET ^C^CFILLET
[▓Γ┴┐:]$S=X $S=MEASURE ^C^CMEASURE
[╣╣│╔╛╡╧≤]$S=X $S=MIRROR ^C^CMIRROR
[╥╞╢»:]$S=X $S=MOVE ^C^CMOVE
[╞½╥╞┐╜▒┤]$S=X $S=OFFSET ^C^COFFSET
[PEDIT:]^C^C^P+
(defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
(setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
(if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
(m:p2 m:pa m:pc))(progn(prompt "▒╗╤í╩╡╠σ▓╗╩╟╥╗╠⌡╢α╥σ╧▀")(terpri);+
(if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
(initget "Yes No")(setq m:w (getkword "─π╧δ╥¬╫¬╗╗╦ⁿ┬≡? <Y>"));+
(if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
(menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
(defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
(if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
(progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
(if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
(defun perror (msg)(setq *error* m:err m:err nil)(princ))+
(defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
(setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
[╨²╫¬:]$S=X $S=ROTATE ^C^CROTATE
[╤í─┐▒Ω╝»]$S=X $S=SELECT ^C^CSELECT
[╬∩╠σ╖┼╦⌡]$S=X $S=SCALE ^C^CSCALE
[╔∞╦⌡:]$S=X $S=STRETCH ^C^CSTRETCH C
[╨▐╝⌠:]$S=X $S=TRIM ^C^CTRIM
[UNDO:]$S=X $S=UNDO ^C^CUNDO
[--╗╣╙╨--]$S=X $S=ED
**INQ 5
[╟≤├µ╗²:]$S=X $S=AREA ^C^CAREA
[╧Ω╧╕┴╨▒φ]^CDBLIST
[╟≤╛α└δ:]^C^CDIST
[╟≤╓·:]'HELP
[╧╘╩╛╫°▒Ω]$S=X $S=ID ^C^CID
[╥╗░π┴╨▒φ]$S=X $S=LIST ^C^CLIST
[┴╨╫┤╠¼:]^C^CSTATUS
[┐┤╩▒╝Σ:]^C^CTIME
**SET 3
[╔Φ╓├╩╡╠σ]'DDEMODES
[╔Φ╓├╫≈═╝]'DDRMODES
[--------]
[░╨╟°│▀┤τ]$S=X $S=APERTURE ^C^CAPERTURE
[╓ß╧▀╖╜╩╜]$S=X $S=AXIS ^C^CAXIS
[╣Γ╡π╖╜╩╜]$S=X $S=BLIPMODE ^C^CBLIPMODE
[╔Φ╓├╤╒╔½]$S=X $S=COLOR ^C^CCOLOR
[═╧╢»╖╜╩╜]$S=X $S=DRAGMODE ^C^CDRAGMODE
[┴ó╠σ▓π╕▀]^C^CELEV
[═°╕±╖╜╩╜]$S=X $S=GRID ^C^CGRID
[▒Ω║┼:]$S=X $S=HANDLES ^C^CHANDLES
[╔Φ╓├╧▀╨═]$S=X $S=LINETYPE ^C^CLINETYPE
[╔Φ╓├═╝╖∙]$S=X $S=LIMITS ^C^CLIMITS
[--╗╣╙╨--]$S=X $S=SET2
**SET2 3
[╧▀╨═▒╚└²]^C^CLTSCALE
[─┐▒Ω▓╢╫╜]$S=X $S=OSNAPC ^C^COSNAP
[┐∞╦┘╬─╫╓]$S=X $S=QTEXT ^C^CQTEXT
[╨▐╕─▒Σ┴┐]$S=X $S=SETVAR 'SETVAR
[═°╕±▓╢╫╜]$S=X $S=SNAP ^C^CSNAP
[╔Φ╓├╫╓╨═]$S=X $S=STYLE ^C^CSTYLE
[═╝╨╬░σ╩╜]$S=X $S=TABLET ^C^CTABLET
[UCS:]$S=X $S=UCS1 ^C^CUCS
[UCS═╝▒Ω:]$S=X $S=UCSICON ^C^CUCSICON
[╤í╡Ñ╬╗╓╞]^CUNITS
[╔Φ╢α╩╙┤░]$S=X $S=VPORTS ^C^CVPORTS
[--╗╣╙╨--]$S=X $S=SET
**PLOT 3
[ ╟δ ]
[ ┴¼ ]
[ ║├ ]
[ ╗µ ]
[ ═╝ ]
[ ╔Φ ]
[ ▒╕ ]
[╙├╗µ═╝╗·]^C^CPLOT
[╙├┤≥╙í╗·]^C^CPRPLOT
**UT 3
[╩⌠╨╘╠ß╚í]$S=X $S=ATTEXT ^C^CATTEXT
[╜╗╗╗╬─╝■]$S=X $S=DXF
[┤┼┼╠╬─╝■]^C^CFILES
[IGES╜╗╗╗]$S=X $S=IGES
[╫░╚δ▓╦╡Ñ]$S=X $S=CHTEMP ^C^CMENU
[╟σ└φ╖╧┴╧]$S=X $S=PURGE ^C^CPURGE
[╕─├√:]$S=X $S=RENAME ^C^CRENAME
[├ⁿ┴ε╬─╝■]$S=X $S=SCRIPT ^C^CSCRIPT
[╓╞▓Ñ═╝╞¼]$S=X $S=SLIDES
[═Γ▓┐├ⁿ┴ε]$S=X $S=EXCOMDS
[═Γ▓┐├ⁿ┴ε]$S=X $S=EXCOMDS
[╜ß╩°▒α╝¡]$S=X $S=END
[╖┼╞·═╦│÷]$S=X $S=QUIT
**OSNAPB 2
[ ╟≤╓· ]$S= 'help
[╡╜╘▓╨─]CENTER $S=
[╡╜╢╦╡π]ENDPOINT $S=
[╡╜▓σ╚δ╡π]INSERT $S=
[╡╜╜╗╡π]INTERSEC $S=
[╡╜╓╨╝Σ╡π]MIDPOINT $S=
[╡╜╫ε╜ⁿ╡π]NEAREST $S=
[╡╜╜ß╡π]NODE $S=
[╡╜┤╣╧▀╡π]PERPEND $S=
[╦─╖╓╘▓╡π]QUADRANT $S=
[┐∞╦┘,]QUICK,^Z
[╡╜╟╨╧▀╡π]TANGENT $S=
[▓╗▓╢╫╜]NONE $S=
[╚í╧√:]^C^C$S=
[╗╪═╦╥╗▓╜]^C^CU $S=
[REDO:]^C^CREDO $S=
[╓╪╗¡:]'REDRAW $S=
[╕─▒Σ┴┐:]$S= 'SETVAR
[╔╧╥╗▓╦╡Ñ]$S=
**BLOCK 3
[╢¿╥σ┐Θ]^C^CBLOCK
[┴╨│÷┐Θ├√]?
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌╓╨]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
Yes
[╗╓╕┤╘¡═╝]^C^COOPS
**INSERT 3
[┐Θ▓σ╚δ:]^C^CINSERT
[┴╨╚½▓┐┐Θ]?
[*]*\
[╫≤╧┬╜╟]corner
xyz
[═╧╢»╖╜╩╜]drag
[▒╚└²]Scale
[X▒╚└²]Xscale
[Y▒╚└²]Yscale
[Z▒╚└²]Zscale
[╨²╫¬]Rotate
**WBLOCK 3
[╨┤┐Θ:]^C^CWBLOCK
=
*
[┐╒╕±];
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**MINSERT 3
[╒≤┴╨▓σ╚δ:]^C^CMINSERT
[┴╨│÷┐Θ├√]?
[╫≤╧┬╜╟]Corner
xyz
[═╧╢»╖╜╩╜]drag
**DIM 3
[▒Ω│▀┤τ:]^C^CDIM
[▒Ω╫ó╥╗┤╬:]^C^CDIM1
[╓▒╧▀╨═]$S=X $S=DIMLINEAR
[╜╟╢╚╨═]angular
[╓▒╛¡╨═]diameter
[░δ╛╢╨═]radius
[╓╨╨─╧▀]center
[┼╘╫ó╨═]leader
[╨▐╕─▒Σ┴┐]$S=X $S=VAR1
[╓╪╗¡]'REDRAW
[┐┤┐╪╓╞┴┐]status
[╗╪═╦]undo
[╗╗╫╓╨╬]style
[╖╡╗╪]EXIT;$S=X $S=S
[--╗╣╙╨--]$S=X $S=FORMAT
**DIMLINEAR 3
[▒Ω│▀┤τ:]^C^CDIM
[▒Ω╫ó╥╗┤╬:]^C^CDIM1
[╦«╞╜▒Ω╫ó]horiz
[┤╣╓▒▒Ω╫ó]vertical
[┴╜═╖╢╘╞δ]aligned
[╓╕╢¿╜╟╢╚]rotated
[╗∙╧▀╩╜]^C^Cdim BASE
[┴¼╨°╩╜]^C^Cdim CONT
[--╗╣╙╨--]$S=X $S=DIM
**ATTDEF 3
[╢¿╥σ╩⌠╨╘:]^C^CATTDEF
[▓╗┐╔╝√]Invisible
[│ú╩²╩⌠╨╘]Constant
[╤Θ╓ñ]Verify
[╘ñ╓├]P
[┴╜═╖╢╘╞δ]Aligned
[╬─╫╓╛╙╓╨]C
[┴╜═╖╢¿╕▀]Fit
[╓╨╨─╢╘╞δ]Middle
[╙╥╢╘╞δ]Right
[╤í╫╓╨═]Style
**LAYER 3
[╔Φ╓├═╝▓π]'DDLMODES
[▓π▓┘╫≈:]^C^CLAYER
[┴╨│÷▓π├√]? *
[╘∞╡▒╟░▓π]Make
[╓├╡▒╟░▓π]Set
[╢¿╥σ╨┬▓π]New
[╧╘╩╛─│▓π]ON
[╣╪▒╒─│▓π]OFF
[╔Φ╓├╤╒╔½] COLOR $S=X $S=LACOLOR \$S=X $S=LAYER
[ɫƷ]^C^CVSLIDE chroma
[╓╪╗¡]'REDRAW
[╔Φ╓├╧▀╨═]LTYPE $S=X $S=LALT \$S=X $S=LAYER
[╢│╜ß─│▓π]Freeze
[╜Γ╢│─│▓π]Thaw
**LACOLOR 3
[-╓├╤╒╔½-]
[║∞]red
[╗╞]yellow
[┬╠]green
[└╝┬╠]cyan
[└╝]blue
[╛º║∞]magenta
[░╫]white
**LALT 3
[-╤í╧▀╨═-]
[╩╡╧▀]CONTINUOUS
[╨Θ╧▀]dashed
[╥■▓╪╧▀]hidden
[╓╨╨─╧▀]center
[╗├╙░╧▀]phantom
[╡π╧▀]dot
[╡π╗«╧▀]dashdot
[▒▀╜τ╧▀]border
[╗«╖╓╧▀]divide
**ZOOM 3
[╖┼╦⌡:]'ZOOM
[ȫͼֽ]All
[╓╪╢¿╓╨╨─]C
[╢»╠¼╖┼╦⌡]Dynamic
[╛í┐╔─▄┤≤]Extents
[╢¿╫≤╧┬╜╟]Left
[╟░╥╗╖∙]Previous
[┤░┐┌╓╨]Window
Yes
No
**ATTDISP 3
[╩⌠╨╘╧╘╩╛:]^C^CATTDISP
[╒²│ú]Normal
[╧╘╩╛]ON
[▓╗╧╘╩╛]OFF
**DVIEW 3
[╢»╠¼╧╘╩╛:]^C^CDview
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╥╗╕÷]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╙δ▓π╧α═¼]^P(defun berror (msg)(setq *error* m:err m:err nil)(princ))+
(progn (setq m:err *error* *error* berror);+
(setq l(getstring (strcat "Layer name: <" (getvar "clayer") "> ")))+
(if (= l "")(setq s(ssget "X" (list(cons 8 (getvar "clayer")))))+
(setq s(ssget "X" (list(cons 8 l)))))(setq *error* m:err m:err nil) s) ^P
[--------]
[╢»╠¼╩╙═╝]^C^CDVIEW;;
[ ╩╙═╝ ]$S=X $S=DVIEW1
[ ▓┘╫≈ ]$S=X $S=DVIEW1
**DVIEW1 3
[╧α╗·]CAmera
[─┐▒Ω]TArget
[╛α└δ]Distance
[╡π]POints
[╥╞╢»═╝╨╬]PAn
[╖┼╦⌡]Zoom
[╫¬╢»]TWist
[╝⌡▓├╞╜├µ]Clip $S=X $S=DVIEW2
[╧√╥■▓╪╧▀]Hide
[╣╪ Off]Off
[╗╪═╦]Undo
[═╦│÷]Exit $S=X $S=S
**DVIEW2 3
[║≤╜╪├µ]Back $S=X $S=BACK
[╟░╜╪├µ]Front $S=X $S=FRONT
[╣╪▒╒]Off $S=X $S=DVIEW1
**BACK 3
[║≤▓├╝⌡]
[ ╜╪├µ ]
[┐¬ ON]On $S=X $S=DVIEW1
[╣╪ OFF]Off $S=X $S=DVIEW1
**FRONT 3
[╟░▓├╝⌡]
[ ╜╪├µ ]
[┐¬ ON]On $S=X $S=DVIEW1
[╣╪ OFF]Off $S=X $S=DVIEW1
[╩╙╡π]Eye $S=X $S=DVIEW1
**RGNAUTO 3
[╫╘╢»╓╪╔·]^C^CREGENAUTO
[┐¬ ON]On $S=X $S=DS
[╣╪ OFF]Off $S=X $S=DS
**VIEW 3
[╩╙═╝╣▄└φ:]'VIEW
[┴╨│÷═╝├√]?
[╔╛│²]Delete;
[╗╓╕┤]Restore;
[▒ú┤µ]Save;
[┤░┐┌╓╨]Window;
**VPORTS 3
[╢α╩╙┤░:]^C^CVPORTS
[▒ú┤µ]Save
[╗╓╕┤]Restore
[╔╛│²]Delete
[╧α┴¼]Join
[╡Ñ╥╗]Single
[┴╨╩╙┤░├√]?
[ 2╕÷╩╙┤░]2 $S=X $S=VP2
[ 3╕÷╩╙┤░]3 $S=X $S=VP3
[ 4╕÷╩╙┤░]4
**VP2 3
[ˮƽ]H $S=X $S=VPORTS
[┤╣╓▒]V $S=X $S=VPORTS
**VP3 3
[ˮƽ]H $S=X $S=VPORTS
[┤╣╓▒]V $S=X $S=VPORTS
[╔╧├µ]A $S=X $S=VPORTS
[╧┬├µ]B $S=X $S=VPORTS
[╫≤├µ]L $S=X $S=VPORTS
[╙╥├µ]R $S=X $S=VPORTS
**LINE 3
[╓▒╧▀╒█╧▀:]^C^CLINE
[╙δ╟░╧α┴¼]^C^CLINE;;
[▒╒║╧]close
[╗╪═╦]undo
.x
.y
.z
.xy
.xz
.yz
**3D 3
[EDGSURF:]^C^CEDGESURF
[REVSURF:]^C^CREVSURF
[RULSURF:]^C^CRULESURF
[TABSURF:]^C^CTABSURF
[Surftb1:]'SETVAR SURFTAB1
[Surftb2:]'SETVAR SURFTAB2
[╚²╬¼╟·├µ]$S=X $S=3DFACE ^C^C3DFACE
[╚²╬¼═°╕±]^C^C3DMESH
[3D╢α╥σ╧▀:]$S=X $S=3DPOLY ^C^C3DPOLY
[ ╚²╬¼ ]^C^C^P(progn(setq m:err *error*)(princ))+
(defun m:l3d () (cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn(terpri)(prompt +
"The file `3d.lsp' was not found in your search path directories. ")(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ");+
(princ))))((not (null C:BOX)) (menucmd "S=X") (menucmd "S=3D2")(princ))+
(T(princ)))(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg);+
(menucmd "S=X")(menucmd "S=S")(setq *error* m:err m:err nil)(princ))(m:l3d);^P
[ ╩╡╠σ ]^C^C^P(progn(setq m:err *error*)(princ))+
(defun m:l3d () (cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
(progn (terpri)(prompt "╟δ╡╚┤²... ╫░╚δ╚²╬¼╨╬╠σ. ");+
(load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn(terpri)(prompt +
"The file `3d.lsp' was not found in your search path directories. ")(terpri);+
(prompt "╟δ╝±▓ΘSupport╬─╝■╡─░▓╫░▓ó╘┘╩╘╥╗╧┬. ");+
(princ))))((not (null C:BOX)) (menucmd "S=X") (menucmd "S=3D2")(princ))+
(T(princ)))(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg);+
(menucmd "S=X")(menucmd "S=S")(setq *error* m:err m:err nil)(princ))(m:l3d);^P
**3D2 3
Box
Cone
Dish
Dome
Mesh
Pyramid
Sphere
Torus
Wedge
**ELEVTHK 3
[╔Φ╕▀╢╚:]^C^CELEV
[╨▐╕─:]^C^CCHANGE
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╕─╕▀╢╚]PROP E
[╕─║±╢╚]PROP T
**HIDE 3
[╧√╥■╧▀?]
[╧√]^C^CHIDE
[▓╗╧√]$S= $S=
**VPOINT 3
[╣█▓∞╖╜╧≥]^C^CVPOINT
[╨²╫¬╖╜╧≥]rotate;
[╙├┬▐┼╠];
[╞╜├µ]none 0,0,1
[╧√╥■▓╪╧▀]$S=X $S=HIDE
**VPOINT3D 3
[ ╫╘XY ]^C^CVPOINT R;;
[╞╜├µ╡─ ]^C^CVPOINT R;;
[ ╜╟╢╚ ]^C^CVPOINT R;;
[ +80 ]<<80
[ +60 ]<<60
[ +45 ]<<45
[ +30 ]<<30
[ +10 ]<<10
[ 0 ]<<0.0000001
[ -10 ]<<350
[ -30 ]<<330
[ -45 ]<<315
[ -60 ]<<300
[ -80 ]<<280
**PLINE 3
[PLINE:]^C^CPLINE
[╗¡╘▓╗í╢╚]ARC $S=X $S=PARC
[▒╒║╧]Close
[░δ╕▀]Halfwid
[│ñ╢╚]Length
[╗╪═╦]Undo
[┐φ╢╚]Width
[│Σ╠ε─┌▓┐]'SETVAR FILLMODE 1
[▓╗│Σ╠ε]'SETVAR FILLMODE 0
**PARC 3
[╗¡╘▓╗í╢╬]
[╤í╜╟╢╚]$S=X $S=PARCANG A
[╘▓╨─]$S=X $S=PARCEN CE
[╒²╟╨╖╜╧≥]D \DRAG
[░δ╛╢]$S=X $S=PARCRAD R
[═╧╢»]S \DRAG
[▒╒║╧]$S=X $S=PLINE CLOSE
[╗╪═╦]Undo
[╗¡╓▒╧▀╢╬]$S=X $S=PLINE L
[PLINE:]$S=X $S=PLINE ^C^CPLINE
**PARCANG 3
[-╤í╜╟╢╚-]
[╘▓╨─]$S=X $S=PARC Center drag
[░δ╛╢]$S=X $S=PARC R \
[═╧╢»╖╜╩╜]$S=X $S=PARC drag
**PARCEN 3
[--╘▓╨─--]
[╜╟╢╚]$S=X $S=PARC A drag
[│ñ╢╚]$S=X $S=PARC L drag
[═╧╢»]$S=X $S=PARC drag
**PARCRAD 3
[--░δ╛╢--]
[╜╟╢╚]A \drag $S=X $S=PARC A \drag
[═╧╢»]$S=X $S=PARC drag
**OFFSET 3
[╞½╥╞┐╜▒┤]^C^COFFSET
[═¿╣²╡╚╡π]Through
[╔╧╥╗╕÷];
**ARC 3
[--╘▓╗í--]
[╚²╡π╘▓╗í]^C^CARC \\DRAG
[╩╝,╨─,╓╒]^c^CARC \C \DRAG
[╩╝,╨─,╜╟]^C^CARC \C \A DRAG
[╩╝,╨─,╧╥]^C^CARC \C \L DRAG
[╩╝,╓╒,╜╟]^C^CARC \E \A
[╩╝,╓╒,░δ]^C^CARC \E \R
[╩╝,╓╒,╓▒]^C^CARC \E \D DRAG
[╨─,╩╝,╓╒]^C^CARC C \\DRAG
[╨─,╩╝,╜╟]^C^CARC C \\A DRAG
[╨─,╩╝,╧╥]^C^CARC C \\L DRAG
[╙δ╟░╧α╟╨]^C^CARC ;DRAG
**popARC 3
[--╘▓╗í--]
[╚²╡π╘▓╗í:]*^C^CARC \\DRAG
[╩╝,╨─,╓╒]*^C^CARC \C \DRAG
[╩╝,╨─,╜╟]*^C^CARC \C \A DRAG
[╩╝,╨─,╧╥]*^C^CARC \C \L DRAG
[╩╝,╓╒,╜╟]*^C^CARC \E \A
[╩╝,╓╒,░δ]*^C^CARC \E \R
[╩╝,╓╒,╓▒]*^C^CARC \E \D DRAG
[╨─,╩╝,╓╒]*^C^CARC C \\DRAG
[╨─,╩╝,╜╟]*^C^CARC C \\A DRAG
[╨─,╩╝,╧╥]*^C^CARC C \\L DRAG
[╙δ╟░╧α╟╨:]^C^CARC ;DRAG
**CIRCLE 3
[--╗¡╘▓--]
[╨─,░δ╛╢:]^C^CCIRCLE \DRAG
[╨─,╓▒╛╢:]^C^CCIRCLE \D
[┴╜╡π╘▓:]^C^CCIRCLE 2P \DRAG
[╚²╡π╘▓:]^C^CCIRCLE 3P \\DRAG
[╙δ┴╜╬∩╟╨]^C^CCIRCLE TTR
**popCIRCL 3
[-╗¡╘▓-]
[╨─,░δ╛╢:]*^C^CCIRCLE \DRAG
[╨─,╓▒╛╢:]*^C^CCIRCLE \D
[┴╜╡π╘▓:]*^C^CCIRCLE 2P \DRAG
[╚²╡π╘▓:]*^C^CCIRCLE 3P \\DRAG
[╙δ┴╜╬∩╟╨]*^C^CCIRCLE TTR
**ASHADE 3
[╣Γ╘┤:]^C^C$S=X $S=LIGHTS LIGHT
[╒╒╧α╗·:]^C^C$S=X $S=CAMERA CAMERA
[╓┤╨╨]^C^C$S=X $S=ACTION
[CAMVIEW:]^C^CCAMVIEW
**LIGHTS 3
[╣Γ╘┤:]^C^CLIGHT
[╡π╣Γ╘┤]p
[╓▒╧▀╣Γ╘┤]Directed
[╣²┬╦╞≈]
.x
.y
.z
.xy
.xz
.yz
[╒╒╧α╗·:]^C^C$S=X $S=CAMERA CAMERA
[╓┤╨╨]$S=X $S=ACTION
**CAMERA 3
[╒╒╧α╗·:]^C^CCAMERA
[╣²┬╦╞≈]
.x
.y
.z
.xy
.xz
.yz
[CAMVIEW:]^C^CCAMVIEW
[╣Γ╘┤:]^C^C$S=X $S=LIGHTS LIGHT
[╓┤╨╨]$S=X $S=ACTION
**ACTION 3
[╓┤╨╨]
[╛░╧≤:]^C^CSCENE
[FLMROLL:]^C^CFILMROLL
[╣Γ╘┤:]^C^C$S=X $S=LIGHTS LIGHT
[╒╒╧α╗·:]^C^C$S=X $S=CAMERA CAMERA
**ELLIPSE 3
[╗µ═╓╘▓:]^C^CELLIPSE
[╘▓╨─]C
[╨²╫¬]Rotation
[┴ó╠σ╘▓]Iso
[╓▒╛╢]Diameter
**POLYGON 3
[╗µ╢α▒▀╨╬]^C^CPOLYGON
[▒▀╖╜╩╜]Edge
[─┌╜╙]I
[═Γ╜╙]C
**SHAPE 3
[▓σ╚δ╨═:]^C^CSHAPE
[┴╨│÷╨═├√]?
[╫░╚δ╨═:]^C^CLOAD
[┴╨╨═╬─╝■]?
**SKETCH 3
[╦µ╩╓╗¡═╝]^C^CSKETCH
[┴¼╜╙]Connect
[▓┴│²]Erase
[╝╟┬╝]Record
[│÷┐┌]x
[═╦│÷]Quit
[------]
[╗¡│╔PLIN]'SETVAR SKPOLY 1
[╗¡│╔╓▒╧▀]'SETVAR SKPOLY 0
[------]
**SOLID 3
[╩╡╠σ:]^C^CSOLID
[│Σ╠ε─┌▓┐]'SETVAR FILLMODE 1
[▓╗│Σ╠ε]'SETVAR FILLMODE 0
**TRACE 3
[╗¡┐φ╧▀:]^C^CTRACE
[│Σ╠ε─┌▓┐]'SETVAR FILLMODE 1
[▓╗│Σ╠ε]'SETVAR FILLMODE 0
**POINT 3
[╗¡╡π:]^C^CPOINT
.x
.y
.z
.xy
.xz
.yz
[ ╕┤╘╙╡π]
[╟╜╠σ▒α╝¡]^C^C$S=SS $S=FL21
[ ╡─└²╫╙]
[┐┤└²╫╙:]^C^CVSLIDE points
[ ╚Ñ╡⌠ ]^C^CREDRAW
[ └²╫╙:]^C^CREDRAW
[╔Φ╡π╖╜╩╜]'SETVAR PDMODE
[╔Φ╡π│▀┤τ]'SETVAR PDSIZE
**HATCH 3
[╗¡╥⌡╙░╧▀]^C^CHATCH
[┴╨╥⌡╙░├√]?
u
u,o
u,i
[╩╟╡─]Yes
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╧ε]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**3DFACE 3
[╗¡╚²╬¼├µ]^C^C3DFACE
.x
.y
.z
.xy
.xz
.yz
[▓╗┐╔╝√╡─]I
[┐┤▒▀╜τ]^P(setvar "splframe" 1)(prompt "Invisible edges will be SHOWN after next Regeneration.")(princ) ^P
[╥■▓╪▒▀╜τ]^P(setvar "splframe" 0)(prompt "Invisible edges will be HIDDEN after next Regeneration.")(princ) ^P
**3DPOLY 3
[╗¡╚²╬¼╢α╥σ╧▀:]^C^C3DPOLY
[╖Γ▒╒]Close
[╗╪═╦]Undo
.x
.y
.z
.xy
.xz
.yz
**ID 3
[╡π:]^C^CID
.x
.y
.z
.xy
.xz
.yz
**LIMITS 3
[╫ε┤≤═╝╖∙]^C^CLIMITS
ON
OFF
**UCS1 3
[UCS:]^C^CUCS
[UCS╢╘╗░]^C^CDDUCS
[┴╨UCS├√]?
[╟░╥╗╕÷]Previous
[╗╓╕┤]Restore
[▒ú┤µ]S
[╔╛│²]Delete
[World]World
[UCS╕─├√:]^C^CRename UCS
[Follow:]'SETVAR UCSFOLLOW
[--╗╣╙╨--]$S=X $S=UCS2
**UCS2 3
[UCS:]$S=X $S=UCS1 ^C^CUCS
[╘¡╡π]Origin
[Z╓ß]Zaxis
[╚²╡π]3point
X
Y
Z
[╩╙═╝]View
[╩╡╠σ]Entity
[--╗╣╙╨--]$S=X $S=UCS1
**UCSICON 3
[UCS═╝▒Ω:]^C^CUCSICON
ON
OFF
[╦∙╙╨ALL]All
[╘¡╡π]Origin
[╫≤╧┬╜╟]Noorigin
**PLAN 3
[╞╜├µ:]^C^CPLAN
[╡▒╟░]Current
UCS
World
[Follow:]'SETVAR UCSFOLLOW
**LIST 3
[╥╗░π┴╨▒φ:]^C^CLIST
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**AREA 3
[╟≤├µ╗²:]^C^CAREA
[╩╡╠σ]Entity
[╠φ╝╙]Add
[╝⌡╚Ñ]Subtract
**TEXT 3
[╨┤╬─╫╓:]^C^CTEXT
[╢»╠¼╬─╫╓]^C^CDTEXT
[┴╜═╖╢¿╕▀]aligned
[╓╨╨─╢╘╞δ]C
[┴╜═╖╢╘╞δ]fit
[╬─╫╓╛╙╓╨]middle
[╙╥▒▀╢╘╞δ]right
[╗╗╫╓╨═]style
[╘∞╫╓╨═:]$S=X $S=STYLE ^C^CSTYLE
**TEXTSET 5
[╢»╠¼╬─╫╓]$S=X $S=DTEXT ^C^C$T4=DTEXT1 $T4=DTEXT2
[╨┤╬─╫╓]$S=X $S=TEXT ^C^C$T4=TEXT1 $T4=TEXT2
[╘∞╫╓╨═:]$S=X $S=STYLE ^C^CSTYLE
**STYLE 3
[╘∞╫╓╨═:]^C^CSTYLE
[┴╨╫╓╨═├√]?
[╫╓╠σ]$S=X $S=F1
[╩╟]Yes
[▓╗╩╟]No
[╢»╠¼╬─╫╓]$S=X $S=DTEXT ^C^CDTEXT
[╨┤╬─╫╓:]$S=X $S=TEXT ^C^CTEXT
**F1 3
Cyrillic
Cyriltlc
Greekc
Greeks
Gothice
Gothicg
Gothici
Italicc
Italict
ROMANC
Romand
Romans
[-╗╣╙╨-]$S=X $S=F2
[╫╓╨═]$S=X $S=STYLE
**F2 3
Romant
Scriptc
Scripts
Syastro
Symap
Symath
Symeteo
Symusic
[--╗╣╙╨--]$S=X $S=F1
[╫╓╨═]$S=X $S=STYLE
**DTEXT 3
[╢»╠¼╬─╫╓:]^C^CDTEXT
[╨┤╬─╫╓:]^C^CTEXT
[╓╨╨─╢╘╞δ]C
[╙╥▒▀╢╘╞δ]right
[┴╜═╖╢¿╕▀]aligned
[╓╨╨─╢╘╞δ]middle
[┴╜═╖╢╘╞δ]fit
[╘∞╫╓╨═]style
[╘∞╫╓╨═]$S=X $S=STYLE ^C^CSTYLE
**AXIS 3
[╓ß╧▀╖╜╩╜:]^C^CAXIS
[▓╢╫╜╡π]SNAP
[┐¬ON]ON
[╣╪OFF]OFF
[XY▓╗╡╚╛α]Aspect
**BLIPMODE 3
[╣Γ╡π╖╜╩╜][BLIPS:]^C^CBLIPMODE
[┐¬ON]ON
[╣╪OFF]OFF
**END 3
[╜ß╩° ?]END ?
[╜ß╩°▒α╝¡]^C^CEND
[▓╗╜ß╩°]$S=X $S=S
**QUIT 3
[═╦│÷:]^c^cquit
[╩╟]Y
[╖±]n $S=X $S=S
**VAR1 3
[╣½╙ó╗∞║╧]$S=X $S=OF DIMALT \
[╣½╙ó╛½╢╚]DIMALTD \
[╣½╙ó▒╚└²]DIMALTF \
[dimapost]DIMAPOST \
[dimaso]$S=X $S=OF DIMASO \
[╝²═╖│ñ]DIMASZ \
[--------]
[╝²═╖┐Θ]DIMBIK \
[╝²═╖┐Θ1]DIMBLK1 \
[╝²═╖┐Θ2]DIMBLK2 \
[--------]
[╘▓╨─╖√│ñ]DIMCEN \
[dimdle]DIMDLE \
[╧▀╝Σ╛α└δ]DIMDLI \
[╧▀═Γ│ñ╢╚]DIMEXE \
[--╗╣╙╨--]$S=X $S=VAR2
[▒Ω│▀┤τ╧▀]$S=X $S=DIM
**VAR2 3
[╤╙╔∞╧▀┐╒]DIMEXO \
[│▀┤τ▒╚└²]DIMLFAC \
[dimlim]$S=X $S=OF DIMLIM \
[dimpost]DIMPOST \
[dimrnd]DIMRND \
[dimsah]$S=X $S=OF DIMSAH \
[╚½▓┐▒╚└²]DIMSCALE \
[╬▐╤╙╔∞1]$S=X $S=OF DIMSE1 \
[╬▐╤╙╔∞2]$S=X $S=OF DIMSE2 \
[dimsho]$S=X $S=OF DIMSHO \
[dimsoxd]$S=X $S=OF DIMSOXD \
[╬─╫╓╧▀╔╧]$S=X $S=OF DIMTAD \
[─┌╦«╞╜]$S=X $S=OF DIMTIH \
[dimtih]$S=X $S=OF DIMTIX \
[╟░╥╗▓╦╡Ñ]$S=X $S=VAR1
[--╗╣╙╨--]$S=X $S=VAR3
[▒Ω│▀┤τ╧▀]$S=X $S=DIM
**VAR3 3
[╕║╣½▓ε]DIMTM \
[dimtofl]$S=X $S=OF DIMTOFL \
[dimtoh]$S=X $S=OF DIMTOH \
[dimtol]$S=X $S=OF DIMTOL \
[dimtp]DIMTP \
[dimtsz]DIMTSZ \
[dimtvp]DIMTVP \
[dimtxt]DIMTXT \
[dimzin]$S=X $S=DIMZIN DIMZIN \
[--╗╣╙╨--]$S=X $S=VAR2
[▒Ω│▀┤τ╧▀]$S=X $S=DIM
**OF 3
[┐¬ ON]$S= $S= ON
[╣╪ OFF]$S= $S= OFF
**DIMZIN 4
[ ╨┬ ]
[▒Ω╫ó]
[ ╓╡ ]
[0]$S= $S= 0
[1]$S= $S= 1
[2]$S= $S= 2
[3]$S= $S= 3
**FORMAT 3
[▒Ω│▀┤τ:]^C^CDIM
[▒Ω╫ó╥╗┤╬:]^C^CDIM1
[HOMETEXT]$S=X $S=HOMETEXT HOMETEXT
[UPDATE]$S=X $S=UPDATE UPDATE
[NEWTEXT]$S=X $S=NEWTEXT NEWTEXT
[▒Ω│▀┤τ╧▀]$S=X $S=DIM
**HOMETEXT 3
[▒Ω│▀┤τ:]^C^CDIM
[▒Ω╫ó╥╗┤╬:]^C^CDIM1
HOMETEXT
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╧ε]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**UPDATE 3
[▒Ω│▀┤τ:]^C^CDIM
[▒Ω╫ó╥╗┤╬:]^C^CDIM1
UPDATE
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
╟░╤í╘±╧ε]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**NEWTEXT 3
[▒Ω│▀┤τ:]^C^CDIM
[▒Ω╫ó╥╗┤╬:]^C^CDIM1
[NEWTEXT]NEWTEXT
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╧ε]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**LINETYPE 3
[╫░╚δ╧▀╨═:]^C^CLINETYPE
[┴╨╧▀╨═├√]?
[╫░╚δ╧▀╨═]Create
[╔·│╔╧▀╨═]Load
[╔Φ╓├╧▀╨═]S $S=X $S=CHLT \$S=X $S=LINETYPE
Yes
No
**LIMITS 3
[╚╖╢¿═╝╖∙]^C^CLIMITS
[┐¬ ON]on
[╣╪ Off]off
**SNAP 3
[═°╕±▓╢╫╜:]^C^CSNAP
[┐¬ ON]ON
[╣╪ OFF]OFF
[XY▓╗╡╚╛α]A;
[╨²╫¬]R;
[Style]S;
[╡╚╓ß▓Γ]Iso;
[▒Ω╫╝╩╜]Standard;
**TABLET 3
[═╝╨╬░σ╩╜:]^C^CTABLET
[▒Ω╫╝]cal
[┼Σ╓├╤∙░σ]CFG 4 25 9 11 9 9 13 25 7 Y
[╓╪┼Σ╓├]CFG 4 Y 25 9 11 9 9 13 25 7 Y
[┐¬ ON]ON
[╣╪ OFF]OFF
Yes
No
**OSNAPC 3
[─┐▒Ω▓╢╫╜]^C^COSNAP
[╡╜╘▓╨─]CENTER\
[╡╜╢╦╡π]ENDPOINT\
[╡╜▓σ╚δ╡π]INSERT\
[╡╜╜╗╡π]INTERSEC\
[╡╜╓╨╝Σ╡π]MIDPOINT\
[╡╜╫ε╜ⁿ╡π]NEAREST\
[╡╜╜ß╡π]NODE\
[╡╜┤╣╧▀╡π]PERPEND\
[╦─╖╓╘▓╡π]QUADRANT\
[╡╜╟╨╧▀╡π]TANGENT\
[╚í╧√]^C^COSNAP NONE $S= $S=
[┐∞╦┘,]QUICK,^Z
[,],\
**DRAGMODE 3
[═╧╢»╖╜╩╜]^C^CDRAGMODE
[┐¬ ON]ON $S=X $S=S
[╣╪ OFF]OFF $S=X $S=S
[╫╘╢»]A $S=X $S=S
**GRID 3
[═°╕±╖╜╩╜]^C^CGRID
[g=▓╢╫╜╡π]SNAP
[┐¬ ON]ON
[╣╪ OFF]OFF
[XY▓╗╡╚╛α]Aspect
**HANDLES 3
[▒Ω║┼:]^C^CHANDLES
[┐¬ ON]ON
[╔╛│²]DESTROY
**SETVAR 3
[╕─▒Σ┴┐:]^C^CSETVAR
[┴╨▒Σ┴┐├√]?
[╕─▒Σ┴┐]SETVAR
**QTEXT 3
[┐∞╦┘╬─╫╓]^C^CQTEXT
[┐¬ ON]ON
[╣╪ OFF]OFF
[╓╪╔·│╔:]REGEN
**VIEWRES 3
[╓├┐∞╖┼╦⌡]^C^CVIEWRES
No
Yes
100
500
[╫╘╢»╔·│╔]^C^CREGENAUTO
[ On]On
[ Off]Off
**APERTURE 3
[╚╖╢¿░╨╟°:]'SETVAR APERTURE
[╩░╚í║╨:]'SETVAR PICKBOX
[1]$S= $S= 1
[2]$S= $S= 2
[3]$S= $S= 3
[4]$S= $S= 4
[5]$S= $S= 5
[6]$S= $S= 6
[7]$S= $S= 7
[8]$S= $S= 8
[9]$S= $S= 9
[10]$S= $S= 10
[15]$S= $S= 15
**ARRAY 3
[╣╣│╔╒≤┴╨:]^C^CARRAY
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╫▀]Remove
[╠φ╝╙]add
[╗╪═╦]Undo
╜
[╛╪╨╬]Rectang
[╗╖╨╬]Polar
[╩╟]Yes
[╖±]No
**ROTATE 3
[╨²╫¬:]^C^CROTATE
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[▓╬╒╒╖╜╩╜]Referenc
**SELECT 3
[╤í─┐▒Ω╝»]^C^CSELECT
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╧ε]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**SCALE 3
[╬∩╠σ╖┼╦⌡]^C^CSCALE
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[┤░┐┌─┌═Γ]Previous
[╚í╫▀]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[▓╬╒╒╖╜╩╜]Referenc
**BREAK 3
[╟╨╢╧:]^C^CBREAK
[╡┌╥╗╡π]First
[╟╨│╔┴╜╢╧]@
**BREAK2P 3
[╟╨╢╧:]^C^CBREAK \F
**BREAKSPL 3
[╟╨│╔┴╜╢╧]^C^CBREAK \F \@
**MOVE 3
[╥╞╢»:]^C^CMOVE
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╢»]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**COPY 3
[╕┤╓╞:]^C^CCOPY
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╢»]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╢α╓╪╕┤╓╞]Multiple
**UNDO 3
[╗╪═╦:]^C^CUNDO
[╗╪═╦╥╗▓╜]^C^CUNDO 1
[╫╘╢»╫Θ│╔]$S=X $S=UNDOA Auto
[═╦╡╜▒Ω╓╛]Back
[╫Θ╜ß╩°]End
[╫Θ┐¬╩╝]Group
[╫Θ▒Ω╓╛]Mark
[╕─┐╪╓╞┴┐]$S=X $S=UNDOC Control
Yes
No
[REDO:]REDO
**UNDOC 3
[╚½▓┐╣ª─▄]All
[├╗╙╨UNDO]none
[╓╗═╦╥╗┤╬]One
**UNDOA 3
On
Off
**ERASE 3
[▓┴│²:]^C^CERASE
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╗╓╕┤╘¡═╝]^C^COOPS
**PSEL 3
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[┤░┐┌─┌═Γ]Crossing
Yes
No
**P0 3
[PEDIT:]^C^C^P+
(defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
(setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
(if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
(m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
(if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
(initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
(if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
(menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
(defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
(if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
(progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
(if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
(defun perror (msg)(setq *error* m:err m:err nil)(princ))+
(defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
(setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
[▒╒║╧]Close
[┐¬╖┼]Open
[╧α┴¼]Join
[┐φ╢╚]Width
[╨▐╕─╜ß╡π]E $S=X $S=PVERTED
[╟·╧▀─Γ║╧]Fit
[╤∙╠⌡╟·╧▀]Spline
[▓╗╗¡╟·╧▀]Decurve
[╗╪═╦]U
[═╦│÷]X $S=X $S=S
[PolyVars]$S=X $S=PVARS $i=poly $i=*
**P8 3
[PEDIT:]^C^C^P+
(defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
(setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
(if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
(m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
(if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
(initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
(if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
(menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
(defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
(if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
(progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
(if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
(defun perror (msg)(setq *error* m:err m:err nil)(princ))+
(defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
(setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
[╣╪▒╒]Close
[┤≥┐¬]Open
[╨▐╕─╜ß╡π]E $S=X $S=3DPVERTED
[╤∙╠⌡╟·╧▀]Spline
[▓╗╗¡╟·╧▀]Decurve
[╗╪═╦]U
[═╦│÷]X $S=X $S=S
[PolyVars]$S=X $S=PVARS $i=poly $i=*
**P16 3
[PEDIT:]^C^C^P+
(defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
(setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
(if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
(m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
(if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
(initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
(if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
(menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
(defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
(if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
(progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
(if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
(defun perror (msg)(setq *error* m:err m:err nil)(princ))+
(defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
(setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
[╨▐╕─╜ß╡π]E $S=X $S=3DMVERTED
[╞╜╗¼╡─]Smooth
[▓╗╞╜╗¼╡─]Desmooth
[M╣╪▒╒]M
[N╣╪▒╒]N
[M┤≥┐¬]M
[N┤≥┐¬]N
[╗╪═╦]U
[═╦│÷]X $S=X $S=S
[PolyVars]$S=X $S=PVARS $i=poly $i=*
**PVERTED 3
[╨▐╕─╜ß╡π]
[╧┬╥╗╕÷]Next
[╟░╥╗╕÷]Previous
[╢╧┐¬]Break
[▓σ╚δ]Insert
[╥╞╢»]Move
[└¡╓▒]Straight
[┐φ╢╚]Width
[╧α╟╨]Tangent
Go
[╓╪╔·│╔]Regen
[╗╪═╦]X U $S=X $S=P0
[═╦│÷]X $S=X $S=P0
**3DPVERTED 3
[╨▐╕─╜ß╡π]
[╧┬╥╗╕÷]Next
[╟░╥╗╕÷]Previous
[╟╨╢╧]Break
[▓σ╚δ]Insert
[╥╞╢»]Move
[╓╪╔·│╔]Regen
[╓▒╜╙]Straight
[═╦│÷]X $S=X $S=P8
**3DMVERTED 3
[╨▐╕─╜ß╡π]
[╧┬╥╗╕÷]Next
[╟░╥╗╕÷]Previous
[╫≤:]Left
[╙╥:]Right
[╔╧:]Up
[╧┬:]Down
[╥╞╢»]Move
[╓╪╔·│╔]Regen
[═╦│÷]X $S=X $S=P16
**PVARS 3
[Polyvars]$i=poly $i=*
[SPLframe]'SETVAR SPLFRAME
[ On]1
[ Off]0
[SPLsegs]'SETVAR SPLINESEGS
[SPLtype]'SETVAR SPLINETYPE
[ Quad]5
[ Cubic]6
[SURFtype]'SETVAR SURFTYPE
[ Quad]5
[ Cubic]6
[ Bezier]8
[UDensity]'SETVAR SURFU
[VDensity]'SETVAR SURFV
**TRIM 3
[╨▐╝⌠:]^C^CTRIM
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**ATTEXT 3
[╩⌠╨╘╠ß╚í:]^C^CATTEXT
CDF
SDF
DXF
[▓┐╖╓╠ß╚í]Ent
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**SLIDES 3
[╘∞═╝╞¼:]^C^CMSLIDE
[┐┤═╝╞¼:]^C^CVSLIDE
**SCRIPT 3
[├ⁿ┴ε╬─╝■]^C^CSCRIPT
[╖╡╗╪:]'RESUME
[╓╪╕┤:]^C^CRSCRIPT
**PURGE 3
[╟σ└φ╖╧┴╧]^C^CPURGE
[╬┤╙├╡─┐Θ]Blocks
[╬┤╙├╡─▓π]LAyers
[╬┤╙├╧▀╨═]LTypes
[╬┤╙├╡─╨╬]SHapes
[╬┤╙├╡─╨═]STyles
[╚½▓┐]All
[╩╟]Yes
[▓╗╩╟]No
**RENAME 3
[╕─├√:]^C^CRENAME
[╕─┐Θ├√]Block
[╕─▓π┤╬]LAyer
[╕─╧▀╨═├√]LType
[╕─╫╓╨═├√]Style
[╕─UCS├√]Ucs
[╕─╩╙╟°├√]VIew
[╕─╩╙┤░├√]VPort
**DXF 3
[╢┴╚δDXF:]^C^CDXFIN
[╩Σ│÷DXF:]^C^CDXFOUT
16
[▓┐╖╓╩Σ│÷]Entities
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╢┴╚δDXB:]^C^CDXBIN
**IGES 3
[IGES╢┴╚δ]^C^CIGESIN
[IGES╩Σ│÷]^C^CIGESOUT
**EXTEND 3
[╤╙│ñ:]^C^CEXTEND
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╢»]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╤í─┐▒Ω╝»]^C^CSELECT
[╖┼╦⌡┤░┐┌]'ZOOM W
**STRETCH 3
[╔∞╦⌡:]^C^CSTRETCH C
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
**MIRROR 3
[╗¡╛╡╧≤═╝]^C^CMIRROR
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╢»]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
Yes
No
**FILLET0 3
[╘▓╜╟╬¬:0]^C^CFILLET R 0;;
[╒√╕÷PLIN]P
**FILLET 3
[╗¡╘▓╜╟:]^C^CFILLET
[╕─░δ╛╢]R \FILLET
[░δ╛╢╬¬:0]R 0 FILLET
[╒√╕÷PLIN]polyline
**CHAMFER 3
[╗¡╡╣╜╟:]^C^CCHAMFER
[╛α└δ]D \\CHAMFER
[╛α└δ = 0]D 0 0 CHAMFER
[╒√╕÷PLINE]polyline
**DIVIDE 3
[╗«╖╓:]^C^CDIVIDE
[▓σ╚δ┐Θ]Block
Yes
No
**MEASURE 3
[▓Γ┴┐:]^C^CMEASURE
[▓σ╚δ┐Θ]Block
Yes
No
**CHANGE 3
[╨▐╕─:]^C^CCHANGE
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╢»]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╕─╤╒╔½]PROP COLOR $S=X $S=CHCOLOR \ $S=X $S=CHANGE
[ɫƷ]^C^CVSLIDE chroma
[╓╪╗¡]^C^CREDRAW
[╕─╕▀╢╚]PROP ELEV
[╕─▓π]PROP LAYER
[╕─╧▀╨═]PROP LT $S=X $S=CHLT \$S=X $S=CHANGE
[╕─║±╢╚]PROP THICKNESS
**CHPROP 3
[╕─╨╘╓╩:]^C^CCHPROP
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[╟░╤í╘±╝»]Previous
[┤░┐┌─┌═Γ]Crossing
[╥╞╢»]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╕─╤╒╔½]PROP COLOR $S=X $S=CHCOLOR \$S=X $S=CHPROP
[ɫƷ]^C^CVSLIDE chroma
[╓╪╗¡]^C^CREDRAW
[╕─▓π]PROP LAYER
[╕─╧▀╨═]PROP LT $S=X $S=CHLT \$S=X $S=CHPROP
[╕─║±╢╚]PROP THICKNESS
**CHCOLOR 3
[-╤╒╔½-]
[╙δ▓π╧α═¼]bylayer
[╙δ┐Θ╧α═¼]byblock
[║∞]red
[╗╞]yellow
[┬╠]green
[└╝┬╠]cyan
[└╝]blue
[╛º║∞]magenta
[░╫]white
**CHLT 3
[╕─╧▀╨═]
[╙δ▓π╧α═¼]bylayer
[╙δ┐Θ╧α═¼]byblock
[╩╡╧▀]CONTINUOUS
[╨Θ╧▀]dashed
[╥■▓╪╧▀]hidden
[╓╨╨─╧▀]center
phantom
[╡π╧▀]dot
[╡π╗«╧▀]dashdot
border
[╗«╖╓╧▀]divide
**COLOR 3
[╔Φ╓├╤╒╔½]^C^CCOLOR
[╙δ▓π╧α═¼]bylayer
[╙δ┐Θ╧α═¼]byblock
[║∞]red
[╗╞]yellow
[┬╠]green
[└╝┬╠]cyan
[└╝]blue
[╛º║∞]magenta
[░╫]white
[ɫƷ]^C^CVSLIDE chroma
[╓╪╗¡]^C^CREDRAW
**ATTEDIT 3
[╨▐╕─╩⌠╨╘:]^C^CATTEDIT
[┤░┐┌╓╨]Window
[╔╧╥╗╕÷]Last
[┤░┐┌─┌═Γ]Crossing
[╚í╫▀]Remove
[╠φ╝╙]Add
[╗╪═╦]Undo
[╕─╓╡]Value $S=X $S=ATTEDIT2
[╕─╬╗╓├]Position
[╕─╕▀╢╚]Height
[╕─╜╟╢╚]Angle
[╕─╫╓╨═]Style
[╕─▓π]Layer
[╕─╤╒╔½] $S=X $S=ATTCOLOR C
[╧┬╥╗╕÷]Next
[╔╧╕÷▓╦╡Ñ]$S= $S=
**ATTEDIT2 3
[╨▐╕─]Change $S=X $S=ATTEDIT
[╠µ╗╗]Replace $S=X $S=ATTEDIT
**ATTCOLOR 3
[╕─╤╒╔½]
[║∞]RED $S= $S=
[╗╞]YELLOW $S= $S=
[┬╠]GREEN $S= $S=
[└╝┬╠]CYAN $S= $S=
[└╝]BLUE $S= $S=
[╛º║∞]MAGENTA $S= $S=
[░╫]WHITE $S= $S=
**UNITS 2
[-╡Ñ╬╗╓╞- ]
[└α╨═ ]
[┐╞╤º]1;
[╩«╜° ]2;
[╣ñ│╠]3;
[╜¿╓■]4;
[┤≤╡╪▓Γ┴┐]5;
**U1 2
[┐╞╤º╓╞]
[▒╚└² ]
[4 ▒╢ ]4.0;
[2 ▒╢ ]2.0;
[ȫ ]1.0;
[░δ ]0.5;
[╦─╖╓╓«╥╗]0.25;
[╞Σ╦√...]^P0;^P
**U2 2
[╩«╜°╓╞]
[▒╚└² ]
[4 ▒╢ ]4.0;
[2 ▒╢ ]2.0;
[ȫ ]1.0;
[░δ ]0.5;
[╦─╖╓╓«╥╗ ]0.25;
[╞Σ╦√...]^P0;^P
**U3 2
[╣ñ│╠]
[▒╚└²]
[1"=10' ]120.0;
[1"=20' ]240.0;
[1"=30' ]360.0;
[1"=40' ]480.0;
[1"=50' ]600.0;
[1"=60' ]720.0;
[1"=80' ]960.0;
[1"=100' ]1200.0;
[╞Σ╦√...]^P0;^P
**U4 2
[╜¿╓■└α]
[1/40"=1']480.0;
[1/20"=1']240.0;
[1/16"=1']192.0;
[ 1/8"=1']96.0;
[ 1/4"=1']48.0;
[ 1/2"=1']24.0;
[ 3/4"=1']16.0;
[ 1"=1']12.0;
[ 3"=1']4.0;
[ 6"=1']2.0;
[ ȫ ]1.0;
[╞Σ╦√...]^P0;^P
**U5 2
[┤≤╡╪▓Γ┴┐ ]
[ 1:5000 ]5000.0;
[ 1:2000 ]2000.0;
[ 1:1000 ]1000.0;
[ 1:500 ]500.0;
[ 1:200 ]200.0;
[ 1:100 ]100.0;
[ 1:75 ]75.0;
[ 1:50 ]50.0;
[ 1:20 ]20.0;
[ 1:10 ]10.0;
[ 1:5 ]5.0;
[ȫ ]1.0;
[╞Σ╦√...]^P0;^P
**ENGLISH 2
[ˮƽ]
[═╝╓╜ ]
[│▀┤τ ]
[A-8.5x11]11.0 8.5;
[B- 11x17]17.0 11.0;
[C- 17x22]22.0 17.0;
[ 18x24]24.0 18.0;
[D- 22X34]34.0 22.0;
[ 24x36]36.0 24.0;
[E- 34x44]44.0 34.0;
[╞Σ╦√...]^P0 0;^P
[┤╣╓▒>]$S=X $S=ENGVERT
**ENGVERT 2
[┤╣╓▒]
[═╝╓╜ ]
[│▀┤τ ]
[A-8.5x11]8.5 11.0;
[B- 11x17]11.0 17.0;
[C- 17x22]17.0 22.0;
[ 18x24]18.0 24.0;
[D- 22X34]22.0 34.0;
[ 24x36]24.0 36.0;
[E- 34x44]34.0 44.0;
[╞Σ╦√...]^P0 0;^P
[ˮƽ>]$S=X $S=ENGLISH
**METRIC 2
[ˮƽ]
[═╝╓╜]
[│▀┤τ]
[1189x841]1189.0 841.0;
[1000x707]1000.0 707.0;
[ 841x594]841.0 594.0;
[ 594x420]594.0 420.0;
[ 420x297]420.0 297.0;
[ 297x210]297.0 210.0;
[╞Σ╦√...]^P0 0;^P
[┤╣╓▒>]$S=X $S=METRICVERT
**METRICVERT 2
[┤╣╓▒]
[═╝╓╜]
[│▀┤τ]
[1189x841]841.0 1189.0;
[1000x707]707.0 1000.0;
[ 841x594]594.0 841.0;
[ 594x420]420.0 594.0;
[ 420x297]297.0 420.0;
[ 297x210]210.0 297.0;
[╞Σ╦√...]^P0 0;^P
[ˮƽ>]$S=X $S=METRIC
**CHTEMP 3
[╕─╤∙]
[ ░σ ]
[Arch...]^C^C^P(progn(if v:acam(progn(command "menu" (strcat v:acam "aec-a"))+
(prompt "AEC Architectural loaded."))(prompt "AEC Architectural not available.")+
)(princ)) ^P
[Mech...]^C^C^P(progn(if v:acmm(progn(command "menu" (strcat v:acmm "aec-m"))+
(prompt "AEC Mechanical loaded."))(prompt "AEC Mechanical not available.")+
)(princ)) ^P
**EXCOMDS 3
[CATALOG:]^C^CCATALOG
[DEL:]^C^CDEL
[DIR:]^C^CDIR
[EDIT:]^C^CEDIT
[SH:]^C^CSH
[SHELL:]^C^CSHELL
[TYPE:]^C^CTYPE
***TABLET1
[A-1]
[A-2]
[A-3]
[A-4]
[A-5]
[A-6]
[A-7]
[A-8]
[A-9]
[A-10]
[A-11]
[A-12]
[A-13]
[A-14]
[A-15]
[A-16]
[A-17]
[A-18]
[A-19]
[A-20]
[A-21]
[A-22]
[A-23]
[A-24]
[A-25]
[B-1]
[B-2]
[B-3]
[B-4]
[B-5]
[B-6]
[B-7]
[B-8]
[B-9]
[B-10]
[B-11]
[B-12]
[B-13]
[B-14]
[B-15]
[B-16]
[B-17]
[B-18]
[B-19]
[B-20]
[B-21]
[B-22]
[B-23]
[B-24]
[B-25]
[C-1]
[C-2]
[C-3]
[C-4]
[C-5]
[C-6]
[C-7]
[C-8]
[C-9]
[C-10]
[C-11]
[C-12]
[C-13]
[C-14]
[C-15]
[C-16]
[C-17]
[C-18]
[C-19]
[C-20]
[C-21]
[C-22]
[C-23]
[C-24]
[C-25]
[D-1]
[D-2]
[D-3]
[D-4]
[D-5]
[D-6]
[D-7]
[D-8]
[D-9]
[D-10]
[D-11]
[D-12]
[D-13]
[D-14]
[D-15]
[D-16]
[D-17]
[D-18]
[D-19]
[D-20]
[D-21]
[D-22]
[D-23]
[D-24]
[D-25]
[E-1]
[E-2]
[E-3]
[E-4]
[E-5]
[E-6]
[E-7]
[E-8]
[E-9]
[E-10]
[E-11]
[E-12]
[E-13]
[E-14]
[E-15]
[E-16]
[E-17]
[E-18]
[E-19]
[E-20]
[E-21]
[E-22]
[E-23]
[E-24]
[E-25]
[F-1]
[F-2]
[F-3]
[F-4]
[F-5]
[F-6]
[F-7]
[F-8]
[F-9]
[F-10]
[F-11]
[F-12]
[F-13]
[F-14]
[F-15]
[F-16]
[F-17]
[F-18]
[F-19]
[F-20]
[F-21]
[F-22]
[F-23]
[F-24]
[F-25]
[G-1]
[G-2]
[G-3]
[G-4]
[G-5]
[G-6]
[G-7]
[G-8]
[G-9]
[G-10]
[G-11]
[G-12]
[G-13]
[G-14]
[G-15]
[G-16]
[G-17]
[G-18]
[G-19]
[G-20]
[G-21]
[G-22]
[G-23]
[G-24]
[G-25]
[H-1]
[H-2]
[H-3]
[H-4]
[H-5]
[H-6]
[H-7]
[H-8]
[H-9]
[H-10]
[H-11]
[H-12]
[H-13]
[H-14]
[H-15]
[H-16]
[H-17]
[H-18]
[H-19]
[H-20]
[H-21]
[H-22]
[H-23]
[H-24]
[H-25]
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
***TABLET2
$S=X $S=HIDE
$S=X $S=VPOINT VPOINT;;
$S=X $S=ELEVTHK ^C^CELEV
$S=X $S=UCS1 ^C^CUCS
^C^CUCS;PREV
^C^CUCS;V
;
^O
$S=X $S=ZOOM 'ZOOM W
$S=X $S=LINE ^C^CLINE
'REDRAW
[VPOINT ]^C^CVPOINT R;<<135;$S=X $S=VPOINT3D
[VPT rear]^C^CVPOINT R;<<90;$S=X $S=VPOINT3D
[VPOINT ]^C^CVPOINT R;<<45;$S=X $S=VPOINT3D
$S=X $S=UCS1 ^C^CUCS
^C^CUCS;;
^C^CPLAN;W
;
^O
$S=X $S=ZOOM 'ZOOM W
$S=X $S=PLINE ^C^CPLINE
'REDRAW
[VPT left]^C^CVPOINT R;<<180;$S=X $S=VPOINT3D
[VPT plan]^C^CPLAN;;
[VPT rigt]^C^CVPOINT R;<<0;$S=X $S=VPOINT3D
$S=X $S=DVIEW ^C^CDVIEW
$S=X $S=DVIEW ^C^CSELECT;\DVIEW;P;;CA;\\;
$S=X $S=DVIEW ^C^C$S=X $S=DVIEW1 DVIEW;;
;
^D
$S=X $S=ZOOM 'ZOOM D
$S=X $S=ARC ^C^CARC
'REDRAW
[VPOINT ]^C^CVPOINT R;<<225;$S=X $S=VPOINT3D
[VPT frnt]^C^CVPOINT R;<<270;$S=X $S=VPOINT3D
[VPOINT ]^C^CVPOINT R;<<315;$S=X $S=VPOINT3D
$S=X $S=DVIEW ^C^CDVIEW
$S=X $S=DVIEW ^C^CSELECT;\DVIEW;P;;Z;\;
$S=X $S=DVIEW ^C^CSELECT;\DVIEW;P;;PA;\\;
;
^Q
$S=X $S=ZOOM 'ZOOM A
$S=X $S=CIRCLE ^C^CCIRCLE
'REDRAW
^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(princ))(cond ((null C:LIGHT)(vmon)+
(if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
(prompt "Please wait... Loading ashade. ")(load "ashade")+
(menucmd "S=X")(menucmd "S=LIGHTS")(setq *error* m:err m:err nil))(progn (terpri);+
(prompt "The file 'Ashade.lsp' was not found in your current search directories")+
(terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
(setq *error* m:err m:err nil)(princ))))+
(T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=LIGHTS")(princ)));+
(if (and C:LIGHT as-err)(C:LIGHT)(prompt "LIGHT is not properly loaded."))(princ) ^P
^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(princ))(cond ((null C:CAMERA)(vmon)+
(if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
(prompt "Please wait... Loading ashade. ")(load "ashade")+
(menucmd "S=X")(menucmd "S=CAMERA")(setq *error* m:err m:err nil))(progn (terpri);+
(prompt "The file 'Ashade.lsp' was not found in your current search directories")+
(terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
(setq *error* m:err m:err nil)(princ))))+
(T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=CAMERA")(princ)));+
(if (and C:CAMERA as-err)(C:CAMERA)(prompt "CAMERA is not properly loaded."))(princ) ^P
^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
(setq *error* m:err m:err nil)(princ))(cond ((null C:LIGHT)(vmon)+
(if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
(prompt "Please wait... Loading ashade. ")(load "ashade")+
(menucmd "S=X")(menucmd "S=ACTION")(setq *error* m:err m:err nil))(progn (terpri);+
(prompt "The file 'Ashade.lsp' was not found in your current search directories")+
(terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
(setq *error* m:err m:err nil)(princ))))+
(T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=ACTION")(princ))) ^P
$S=X $S=3D ^C^CRULESURF
$S=X $S=3D ^C^CREVSURF
$S=X $S=3DFACE ^C^C3DFACE
;
'GRAPHSCR
$S=X $S=ZOOM 'ZOOM P
$S=X $S=ELLIPSE ^C^CELLIPSE
'REDRAW
$S=X $S=VPORTS ^C^CVPORTS
$S=X $S=VPORTS ^C^CVPORTS;JOIN
^C^CVPORTS;SI
$S=X $S=3D ^C^CEDGESURF
$S=X $S=3D ^C^CTABSURF
$S=X $S=3DPOLY ^C^C3DPOLY
;
^E
$S=X $S=ZOOM 'ZOOM E
$S=X $S=POLYGON ^C^CPOLYGON
'REDRAW
;
;
;
;
;
;
;
^G
$S=X $S=ZOOM 'ZOOM
$S=X $S=POINT ^C^CPOINT
'REDRAW
$S=X $S=BLOCK ^C^CBLOCK
$S=X $S=INSERT ^C^CINSERT
$S=X $S=ATTDEF ^C^CATTDEF
;
$S=X $S=LAYER ^C^CLAYER
$S=X $S=LAYER ^C^CLAYER
;
^B
$S=X $S=PAN 'PAN
^C^CDONUT
'REDRAW
$S=X $S=WBLOCK ^C^CWBLOCK
$S=X $S=MINSERT ^C^CMINSERT
$S=X $S=ATTDEF ^C^CATTDEF
;
$S=X $S=LAYER ^C^CLAYER ? *;;
^C^CLAYER S \;
;
^B
$S=X $S=DS
$S=X $S=DR
'REDRAW
***TABLET3
;
;
;
<<135
<<135
<<90
<<90
<<45
<<45
;
;
;
<<180
<<180
<\
<\
<<0
<<0
;
;
;
<<225
<<225
<<270
<<270
<<315
<<315
;
;
;
^H
^H
^H
^H
^H
^H
;
;
;
7/8\
7/8\
/16\
/16\
/32\
/32\
;
;
;
1/2\
1/2\
5/8\
5/8\
3/4\
3/4\
;
;
;
1/8\
1/8\
1/4\
1/4\
3/8\
3/8\
;
;
;
-\
-\
/\
/\
X\
X\
;
;
;
@\
@\
'\
'\
"\
"\
;
;
;
7\
7\
8\
8\
9\
9\
;
;
4\
4\
5\
5\
6\
6\
;
;
;
1\
1\
2\
2\
3\
3\
;
;
0\
0\
.\
.\
,\
,\
***TABLET4
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
^C^CTIME
$S=X $S=ID ^C^CID
^C^CSTATUS
$S=X $S=LIST ^C^CLIST
'HELP
'HELP
;
$S=X $S=DTEXT ^C^CDTEXT
$S=X $S=DTEXT ^C^CDTEXT C
$S=X $S=DTEXT ^C^CDTEXT R
;
^C^COSNAP NONE
CENTER
ENDPOINT
INSERT
INTERSEC
MIDPOINT
NEAREST
NODE
PERPEND
QUADRANT
TANGENT
;
^C^CSAVE
^C^CSAVE
^C^CDBLIST
$S=X $S=AREA ^C^CAREA
^C^CDIST
$S=X $S=LIST ^C^CLIST
'HELP
'HELP
;
$S=X $S=DTEXT ^C^CDTEXT A
$S=X $S=DTEXT ^C^CDTEXT M
$S=X $S=DTEXT ^C^CDTEXT F
;
^C^C
^C^C
^C^CU
^C^CREDO
MULTIPLE
WINDOW
LAST
PREVIOUS
CROSSING
REMOVE
ADD
;
$S=X $S=END ^C^CEND
$S=X $S=QUIT ^C^CQUIT
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
^C^CFILES
^C^CFILES
^C^CDIM1 STATUS
$S=X $S=VAR1 ^C^CDIM
UNDO
'REDRAW
EXIT;$S=X $S=S
EXIT;$S=X $S=S
;
$S=X $S=TEXTSET
$S=X $S=SNAP ^C^CSNAP
$S=X $S=GRID ^C^CGRID
;
$S=X $S=SCALE ^C^CSCALE
$S=X $S=ROTATE ^C^CROTATE
$S=X $S=OFFSET ^C^COFFSET
$S=X $S=MOVE ^C^CMOVE
$S=X $S=ERASE ^C^CERASE
$S=X $S=ERASE ^C^CERASE
^C^COOPS
^C^C^P+
(defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
(setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
(if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
(m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
(if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
(initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
(if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
(menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
(defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
(if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
(progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
(if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
(defun perror (msg)(setq *error* m:err m:err nil)(princ))+
(defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
(setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
^C^CEXPLODE
$S=X $S=ARRAY ^C^CARRAY
$S=X $S=DIVIDE ^C^CDIVIDE
;
^C^CPLOT
^C^CPRPLOT
$S=X $S=DIM ^C^CDIM1
$S=X $S=DIM ^C^CDIM LEADER
$S=X $S=DIMLINEAR BASELINE
$S=X $S=DIMLINEAR CONTIN
$S=X $S=DIMLINEAR ^C^CDIM VERT
$S=X $S=DIMLINEAR ^C^CDIM HORIZ
;
$S=X $S=AXIS ^C^CAXIS
$S=X $S=SET
$S=X $S=OSNAPC ^C^COSNAP
;
$S=X $S=MIRROR ^C^CMIRROR
$S=X $S=BREAK2P ^C^CBREAK \F
$S=X $S=BREAKSPL ^C^CBREAK \F \@
$S=X $S=COPY ^C^CCOPY
$S=X $S=EXTEND ^C^CEXTEND
$S=X $S=STRETCH ^C^CSTRETCH C
$S=X $S=TRIM ^C^CTRIM
$S=X $S=FILLET0 ^C^CFILLET R 0;;
$S=X $S=FILLET ^C^CFILLET
$S=X $S=CHAMFER ^C^CCHAMFER
$S=X $S=MEASURE ^C^CMEASURE
;
$S=X $S=UT
$S=X $S=CHTEMP ^C^CMENU
$S=X $S=DIM ^C^CDIM CENTER
$S=X $S=DIM ^C^CDIM RADIUS
$S=X $S=DIM ^C^CDIM DIAMETER
$S=X $S=DIM ^C^CDIM ANGULAR
$S=X $S=DIM ^C^CDIM ROTATED
$S=X $S=DIMLINEAR ^C^CDIM ALIGNED
;
$S=X $S=QTEXT ^C^CQTEXT
$S=X $S=DRAGMODE ^C^CDRAGMODE
$S=X $S=APERTURE
;
$S=X $S=CHANGE ^C^CCHANGE
$S=X $S=CHANGE ^C^CCHANGE
$S=X $S=ATTEDIT ^C^CATTEDIT
;
$S=X $S=EXCOMDS
$S=X $S=EXCOMDS
**DTEXT1 33
$S=X $S=DTEXT ^C^CDTEXT
$S=X $S=DTEXT ^C^CDTEXT C
$S=X $S=DTEXT ^C^CDTEXT R
**DTEXT2 58
$S=X $S=DTEXT ^C^CDTEXT A
$S=X $S=DTEXT ^C^CDTEXT M
$S=X $S=DTEXT ^C^CDTEXT F
**TEXT1 33
$S=X $S=TEXT ^C^CTEXT
$S=X $S=TEXT ^C^CTEXT C
$S=X $S=TEXT ^C^CTEXT R
**TEXT2 58
$S=X $S=TEXT ^C^CTEXT A
$S=X $S=TEXT ^C^CTEXT M
$S=X $S=TEXT ^C^CTEXT F