***BUTTONS1 ; $p0=* ^C^C ^B ^O ^G ^D ^E ^T ***POP0 [Osnap] [Intersection]_int [Intersection]_int [Endpoint]_endp [Endpoint]_endp [Nearest]_nea [Nearest]_nea [Perpendicular]_per [Perpendicular]_per [Perpendicular]_per [Midpoint]_mid [Midpoint]_mid [Center]_center [Center]_center [Node]_nod [Quadrant]_qua [Tangent]_tan [Insert]_ins [Cal]^C^Ccal ***POP1 [File] [New]^C^Cnew [Open]^C^Copen [-----------] [Applications]^C^Cappload [Compile]^C^Ccompile [Files]'files [->Import/Export] [DXF In]^C^Cdxfin [DXB In]^C^Cdxbin [IGES In]^C^Cigesin [PostScript In]^C^Cpsin [--] [DXF Out]^C^Cdxfout [DXB Out]^C^Cdxbout [IGES Out]^C^Cigesout [PostScript Out]^C^Cpsout [<-Filmroll]^C^Cfilmroll [Recover]^C^Crecover [-----------] [Plot]^C^Cplot [-----------] [Save]^C^Cqsave [Save As]^C^Csaveas ***POP2 [Data/Set] [----Data----] [Dist]^C^Cdist [Dist(Nea-Per)]^C^Cdistnp [Dist(End-End)]^C^Cdistee [Dist(End-Per)]^C^Cdistep [-------------] [List]^C^Clist [List (Arc)]^C^Carclist [-------------] [Snapang]^C^Csnapan [Id]^C^Cid [-------------] [Ref](ref) [Xref](xref) [* *] [********************] [* *] [---Setting---] [Setvar]^C^Csetvar [Short]^C^Cshort [Object Snap]'ddosnap [Point Style......]'ddptype [Entity Mode]'ddselect [Convertd]^C^Cconvertd [TABLET(RE-CFG)]^C^Ctablet cfg 3 y \\\25 9 \\\14 9 \\\25 7 y \\ [TABLET(RE-CFG-0)]^C^Ctablet cfg 3 \\\25 9 \\\14 9 \\\25 7 y \\ ***POP3 [Draw] [Starts]^C^Cstarts [Line]^C^Cline [->Line Osnap] [Line(End-End)]^C^Clineeed [Line(Mid-Mid)]^C^Clinemmd [Line(Mid-Per)]^C^Clinempd [<-Line(End-Per)]^C^Clineepd [->Polyline] [2D]^C^C_pline [<-3D]^C^C_3dpoly [-----------] [->Arc] [3-point]^C^C_arc [Start, Cen, End]^C^C_arc;\_c [Start, Cen, Angle]^C^C_arc;\_c;\_a [Start, Cen, Length]^C^C_arc;\_c;\_l [Start, End, Angle]^C^C_arc;\_e;\_a [Start, End, Radius]^C^C_arc;\_e;\_r [Start, End, Dir]^C^C_arc;\_e;\_d [Cen, Start, End]^C^C_arc;_c [Cen, Start, Angle]^C^C_arc;_c;\\_a [<-Cen, Start, Length]^C^C_arc;_c;\\_l [->Circle] [Center, Radius]^C^C_circle [Center, Diameter]^C^C_circle;\_diameter [--] [2-Point]^C^C_circle;_2p [3-Point]^C^C_circle;_3p [<-Tan, Tan, Radius]^C^C_circle;_ttr [->Ellipse] [Axis, Eccentricity]^C^C_ellipse; [<-Center, Axis, Axis]^C^C_ellipse;_c; [->Polygon] [Edge]^C^C_polygon;\_edge; [--] [Circumscribed]^C^C_polygon;\\_circumscribed; [<-Inscribed]^C^C_polygon;\\_inscribed; [-----------] [Box]^C^Cboxx [Detail]^C^Cdetail [Cent]^C^Ccent [Ext]^C^Cext [Cut]^C^Ccut [Arce]^C^Carce [-----------] [Point]^C^Cpoint [Donut]^C^Cdonut [Dot]^C^Cdot [-----------] [Bubble]^C^Cbubble [->Parall] [Para1]^C^Cpara1 [<-Para2]^C^Cpara2 [Sch]^C^Csch [Hasal]^C^Chasal [-----------] [->Hatch]^C^Cbhatch [Hatch]^C^Chatch [<-Bhatch]^C^Cbhatch [Hatch Scad]^C^Chatchs [-----------] [->Insert] [Insert]^C^Cinsert [Ddinsert]^C^Cddinsert [<-Minsert]^C^Cminsert [->Block] [Block]^C^C_block [<-Wblock]^C^Cwblock [Sketch]^C^C_sketch ***POP4 [Modify] [Array]^C^Carray [Bound]^C^Cbound [->Break] [Break ]^C^C$S=X $S=break0 _break [One Point]^C^Cbreak1 [Two Point]^C^Cbreak2 [Line ]^C^Cbreakl [<-Int ]^C^Cbreaki [->Copy] [Copy]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_copy,^C^C_copy) [<-Multy Copy]^C^Ccopym [Divide]^C^C_divide [->Erase] [Erase ]^C^Cerase [All ]^C^Ceraseall [Color ]^C^Cerasecol [Layer ]^C^Ceraselay [Linetype]^C^Ceraselin [<-Type ]^C^Ceraseent [->Explode] [Explode]^C^C_explode [Layer ]^C^Cexplodel [Mirror ]^C^Cexplodem [<-Text ]^C^C [->Extend] [Extend ]^C^C_extend [Center ]^C^Cextendc [Line ]^C^Cextendl [<-Multyple]^C^Cextendm [->Fillet] [Fillet]^C^Cfillet [0 ]^C^Cfillet0 [<-? ]^C^Cfillet? [->Chamfer] [Chamfer]^C^C_chamfer [<-X,Y ]^C^C [Measure]^C^C_measure [Mirror]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_mirror,+ ^C^C_mirror) [->Offset] [Offset ]^C^C_offset [<-Multyple]^C^Coffsetm [Move]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_move,+ ^C^C_move) [PolyEdit]^C^Cai_peditm [Rotate]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_rotate,+ ^C^C_rotate)[Rotate 3D]^C^Crotate [->Scale] [Scale]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_scale,^C^C_scale) [<-X,Y]^C^Cscalexy [Stretch]^C^Cstret [------------] [Modify]^C^Cddmodify [------------] [->Trim] [Trim ]^C^C_trim [Line ]^C^Ctriml [Multyple]^C^Ctrimm [<-Select]^C^Ctrims [Trim Type]^C^Ctrimall ***POP5 [Change] [----Change All----] [Change ]^C^C_change [Properties ]^C^Cddchprop [Layer,Linetype,color]^C^Cchgall [Layer ]^C^Cchglayer [Last Layer ]^C^Cchglastl [Color ]^C^Cchgcolor [Ltype ]^C^Cchgltype [----Change Text----] [Chgtext ]^C^Cchgtext [String ]^C^Cchgtexts [String(dialog)]^C^Cchdtexts [Width ]^C^Cchgwidth [Height ]^C^Cchgtexth [Angle ]^C^Cchgangle [Style ]^C^Cchgstyle [Small--->Large]^C^Cchglarge [Large--->Small]^C^Cchgsmall [M2 --->Pyung]^C^Cchgpyung [Match ]^C^Cchgmatch [ + ]^C^Cchgtotal [ - ]^C^Cchg- [ X ]^C^Cchg* [ / ]^C^Cchg/ [ + ]^C^Cchgtotal ***POP6 [Disp] [---Zoom---] [Window]'_zoom _window [Previous]'_zoom _previous [Dynamic]'_zoom _dynamic [Extents]^C^C_zoom _extents [Vmax]'_zoom _vmax [All(Regen)]^C^C_zoom _all [All(Redraw)]^C^Czm [In]^C^Czi [Out]^C^Czo [-----------] [Redraw]'_redraw [Regen]^C^Cregen [Pan]'_pan [-----------] [View Save]'VIEW W PLOT 0.000,0.000 INTERSEC \layer s 0 f board ; ***POP7 [Layer] [Work (Select)]^C^Ccurlay [Work (Dialog)]^C^Cworklay [------------] [Frzen Lay]^C^Cfrzenlay [Thaw Lay]^C^Cthawlay [------------] [Thaw Arwall]^C^Cthawaw [Thaw Wall]^C^Cthawbw [------------] [Frzen Select]^C^Cfrzens [Thaw Select]^C^Cthaws [------------] [Frzen All]^C^Cfrzenall [Thaw All]^C^Cthawall [------------] [Layer Control]'_ddlmodes ***POP8 [Plan] [Auto Wall]^C^Cautowall [------------] [Symbol]^C^Csymbolpl [Car]^C^Ccar [Column]^C^Ccolumn [Form]^C^Cform [Kitchen]^C^Ckitchen [Tree]^C^Ctree [Sch]^C^Csch [Sch1]^C^Csch1 [------------] [Stair]^C^Cstairp [Stair-1p]^C^Cstair1p [Elevator]^C^Celevp [------------] [Title]^c^c$I=title $I=* [Text-Unit]^C^Ctextun01 [Text-Plan]^C^Ctextpl01 [------------] [Room Name]^C^Croomname [Unit type.....]^C^Ctypeu [Window Sign...]^C^Cwd [Toilet]^C^Ctoilet [------------] [Wall Open]^C^Cwallopen [Wall Drawing]^C^Cwall [Wall Select ]^C^Cwalls [------------] [Door.(Wood)]^C^Cwdoor [Door.(Steel)]^C^Ctdoor [Door.(S.Steel)]^C^Csdoor [Window]^C^Cawwin ***POP9 [Elev] [Balconys]^C^Cbalconys [Man]^C^Cman [Floor Line]^C^Cfl [Text-Elev]^C^Ctextel01 [Pent House]^C^Cphouse [Main Door]^C^Cmdoor [Title]^C^Ctitlep ***POP10 [Sect] [Stairs]^C^Cstair [Symbol]^C^Csymbolse [Text Symbol]^C^Ctextse01 [WAll Brick]^C^Cwallbi [WAll Brock]^C^Cwallbo [Cobble Stone]^C^Cgobble [Title]^C^Ctitles [----------] [Window]^C^Csewin ***POP11 [Stru] [Beam List]^C^Cblist [Column List]^C^Cclist [----------] [Structure number]^C^Cstrlst [Text Symbol]^C^Ctextf01 [----------] [Slab Open]^C^Cleaders [Wall Open]^C^Cleaderw [----------] [Title]^C^Ctitlet [----------] [Bar-1EA]^C^Cbar1ea [Bar-4EA]^C^Cbar4ea [----------] [Beam]^C^Cbeam ***POP12 [Site/Win] [----Site----] [Direct]^C^Cdirect [Unit Type]^C^Csite-u [Parking]^C^Cparking [Symbol]^C^Csymbolsi [Text Symbol]^C^Ctextbi01 [Title]^C^Ctitleb [* *] [***********] [* *] [Window&Door] [Sheet Insert]^C^Cwindoor [Window]^C^Cwindow [Door]^C^Cdoor ***POP13 [Dim/Text] [--Dim--] [Dim Scad (Out)]^C^Cdimout [Dim Scad (In)]^C^Cdimin [Dim Text]^C^Cdimtext [-------] [->Dimensions] [->Linear] [Horizontal]^C^C_dim1 _horizontal [Vertical]^C^C_dim1 _vertical [Aligned]^C^C_dim1 _aligned [Rotated]^C^C_dim1 _rotated [Baseline]^C^C_dim1 _baseline [<-Continue]^C^C_dim1 _continue [->Radial] [Diameter]^C^C_dim1 _diameter [Radius]^C^C_dim1 _radius [<-Center Mark]^C^C_dim1 _center [->Ordinate] [Automatic]^C^C_dim1 $S=X $S=dimord _ordinate [X-Datum]^C^C_dim1 $S=X $S=dimord _ordinate;\_x [<-Y-Datum]^C^C_dim1 $S=X $S=dimord _ordinate;\_y [Angular]^C^C_dim1 _angular [<-Leader]^C^C_dim1 _leader [Dimension Style]^C^Cddim [->Edit Dims] [->Dimension Text] [Change Text]^C^C_dim1 $S=X $S=dimed _newtext [Home Position]^C^C_dim1 $S=X $S=dimed _hometext [Move Text]^C^C_dim1 $S=X $S=tedit0 _tedit [<-Rotate Text]^C^C_dim1 $S=X $S=dimed _trotate [Oblique Dimension]^C^C_dim1 $S=X $S=dimed _oblique [<-Update Dimension]^C^C_dim1 $S=X $S=dimed _update [********] [* *] [********] [--Text--] [Leader]^C^Cleader [->Text] [Dynamic]^C^C_dtext [Import Text]^C^Casctext [Set Style...]$I=fonts1 $I=* [--] [->Attributes] [Define...]^C^Cddattdef [Edit...]^C^C_ddatte [<-<-Extract...]^C^Cddattext [-------] [JIN HANGL STYLE]^C^C$I=jinhangl $I=* [->MJ HANGUL] [Font Select ]^C^C$I=cadfont $I=* [<-Hangul Utility]^C^C$I=cadutil $I=* [ACAD HANGL STYLE]^C^C$I=acadhan $I=* [Style]^C^C$I=fonts1 $I=* [-------] [Matching Text]^C^Cmtext [Hdtext]^C^Chdtext [Dhtext]^C^Cdhtext [Convert]^C^Cconvert ***icon **title [Select Title Pattern] [shim(titlep)]^c^ctitlep [shim(titlee)]^c^ctitlee [shim(titles)]^c^ctitles [shim(titlet)]^c^ctitlet [shim(titler)]^c^ctitler [shim(titleb)]^c^cTITLEB [shim(titleu)]^c^cTITLEu **hatch1 [Select Hatch Pattern] [ Previous/User]^c^chatch [acad(line)]^c^chatch line [acad(dots)]^c^chatch dots [acad(ansi37)]^c^chatch ansi37 [acad(plast)]^c^chatch plast [acad(net)]^c^chatch net [acad(brick)]^c^chatch brick [acad(brass)]^c^chatch brass [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(cross)]^c^chatch cross [acad(dash)]^c^chatch dash [acad(dolmit)]^c^chatch dolmit [acad(ansi38)]^c^chatch ansi38 [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(cork)]^c^chatch cork [acad(mudst)]^c^chatch mudst [acad(clay)]^c^chatch clay [acad(net3)]^c^chatch net3 [acad(box)]^c^chatch box [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 **acadhan [** Select AutoCAD Hangul Hanja Font **] [dtext(hcm)]^c^cstyle hcm tjhan,hcm [dtext(hsm)]^c^cstyle hsm tjhan,hsm [dtext(hgm)]^c^cstyle hgm tjhan,hgm [dtext(hbm)]^c^cstyle hbm tjhan,hbm [dtext(hwm)]^c^cstyle hwm ewm,hwm [dtext(hnm)]^c^cstyle hnm tjhan,hnm [dtext(hcg)]^c^cstyle hcg tjhan,hcg [dtext(hsg)]^c^cstyle hsg tjhan,hsg [dtext(hgg)]^c^cstyle hgg egm,hgg [dtext(hbg)]^c^cstyle hgg tjhan,hbg [dtext(hog)]^c^cstyle hog tjhan,hog [dtext(hng)]^c^cstyle hng tjhan,hng [dtext(tjhan)]^c^cstyle tjhan tjhan [hj(hj)]^c^cstyle hj tjhan,hj **cadfont [Select MJGUL Font] [cadfont(cadsg,Hangul Single Gothic)]^c^cstyle cadsg romans,cadsg 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadhd,Hangul Double Gothic)]^c^cstyle cadhd outline,cadhd 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadhm,Hangul Double Munjo)]^c^cstyle cadhm romand,cadhm 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadhjsm,Hangul Hanja Double Munjo)]^c^cstyle cadhjsm cada01,cadhjsm 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadhjjg,Hangul Hanja Double Gothic)]^c^cstyle cadhjjg cada03,cadhjjg 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadhl,Hangul Headline)]^c^cstyle cadhl outline,cadhl 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadkg,Hangul Bold Gothic)]^c^cstyle cadkg outline,cadkg 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadkm,Hangul Bold Munjo)]^c^cstyle cadkm outline,cadkm 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadsa,Hangul Sammul)]^c^cstyle cadsa cada03,cadsa 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadks,Hangul Gungseo)]^c^cstyle cadks cada02,cadks 0 1 0 n n ^P(c:hdtext) ^P [cadfont(caddn,Hangul Dinaroo)]^c^cstyle caddn cada04,caddn 0 1 0 n n ^P(c:hdtext) ^P [cadfont(cadtg,Hangul Graphic)]^c^cstyle cadtg cada03,cadtg 0 1 0 n n ^P(c:hdtext) ^P **cadutil [Select MJ HANGUL Function] [cadutil(hdtext,Hangul Dtext)]^C^Chdtext [cadutil(htext,Hangul Text)]^C^Chtext [cadutil(hattdef,Hangul Attribute Define)]^C^Chattdef [cadutil(hattedit,Hangul Attribute Edit)]^C^Chattedit [cadutil(hddedit,Hangul Attribute Dedit)]^C^Chddedit [cadutil(hinsert,Hangul Insert)]^C^Chinsert [cadutil(hexplode,Hangul Explode)]^C^Chexplode [cadutil(himport,Text Import)]^C^Chimport [cadutil(hexport,Text Export)]^C^Chexport [cadutil(hhatch,Text Hatch)]^C^Chhatch [cadutil(hdscale,Text Dynamic Scale)]^C^Chdscale [cadutil(harrange,Text Arrange)]^C^Charrange [cadutil(hadjust,Text Adjust)]^C^Chadjust [cadutil(hsplit,Text Split)]^C^Chsplit [cadutil(hjoin,Text Join)]^C^C^hjoin [cadutil(hconfig,Hangul Config)]^C^Chconfig [cadutil(hcvt1,JIN2 to MJGUL)]^C^Chconvert 1 [cadutil(hcvt2,JIN3 to MJGUL)]^C^Chconvert 2 [cadutil(savejin2,Save JIN2)]^C^Csavejin2 [cadutil(loadjin2,Load JIN2)]^C^Cloadjin2 [cadutil(savejin3,Save JIN3)]^C^Csavejin3 [cadutil(loadjin3,Load JIN3)]^C^Cloadjin3 [cadutil(saveauto,Save AutoHangul)]^C^Csaveauto [cadutil(loadauto,Load AutoHangul)]^C^Cloadauto [cadutil(savegoun,Save Goungul)]^C^Csavegoun [cadutil(loadgoun,Load Goungul)]^C^Cloadgoun **jinhangl [Jinhangl Style Select] [jin(hs)]^C^C^P(command "style" "standard" "romans,hs" "" "" "" "" "" "")+ (princ) ^Pdtext [jin(hd)]^C^C^P(command "style" "hd" "helved,hd" "" "" "" "" "" "")+ (princ) ^Pdtext [jin(hg)]^C^C^P(command "style" "hgh" "romand,hg" "" "" "" "" "" "")+ (princ) ^Pdtext [jin(htxt)]^C^C^P(command "style" "htxt" "txt,htxt" "" "" "" "" "" "")+ (princ) ^Pdtext **GAGU1 [*** UNIT SYMBOL MARK ***] [ccc(ccc)]^c^cINSERT C:/SBLOCK/SUNIT/USM101 \ ; [ccc(ddd)]^c^cINSERT C:/SBLOCK/SUNIT/USM102 \ ; [ccc(eee)]^c^cINSERT C:/SBLOCK/SUNIT/USM103 \ ; [SUNIT1(USM104)]^c^cINSERT C:/SBLOCK/SUNIT/USM104 \ ; [SUNIT1(USM105)]^c^cINSERT C:/SBLOCK/SUNIT/USM105 \ ; [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [SUNIT1(USM110)]^c^cINSERT C:/SBLOCK/SUNIT/USM105 \ ;180 [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [SUNIT1(USM106)]^c^cINSERT C:/SBLOCK/SUNIT/USM101 \ ;180 [SUNIT1(USM107)]^c^cINSERT C:/SBLOCK/SUNIT/USM102 \ ;180 [SUNIT1(USM108)]^c^cINSERT C:/SBLOCK/SUNIT/USM103 \ ;180 [SUNIT1(USM109)]^c^cINSERT C:/SBLOCK/SUNIT/USM104 \ ;180 **USM1 [*** UNIT SYMBOL MARK ***] [SUNIT1(USM01)]^c^cINSERT C:/SBLOCK/SUNIT/USM01 \ \ [SUNIT1(USM02)]^c^cINSERT C:/SBLOCK/SUNIT/USM02 \ \ [SUNIT1(USM03)]^c^cINSERT C:/SBLOCK/SUNIT/USM03 \ \ [SUNIT1(USM04)]^c^cINSERT C:/SBLOCK/SUNIT/USM04 \ \ [SUNIT1(USM05)]^c^cINSERT C:/SBLOCK/SUNIT/USM05 \ \EXPLODE L [SUNIT1(USM06)]^c^cINSERT C:/SBLOCK/SUNIT/USM06 \ \ [SUNIT1(USM07)]^c^cINSERT C:/SBLOCK/SUNIT/USM07 \ \EXPLODE L [SUNIT1(USM08)]^c^cINSERT C:/SBLOCK/SUNIT/USM08 \ \EXPLODE L [ EXIT ]^c^c **UBATH1 [*** UNIT BATH SYMBOL LIST ***] [SUNIT(UBATH01)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH01 \ ;\ [SUNIT(UBATH02)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH02 \ ;\ [SUNIT(UBATH03)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH03 \ ;\ [SUNIT(UBATH04)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH04 \ ;\ [SUNIT(UBATH05)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH05 \ ;\ [SUNIT(UBATH06)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH06 \ ;\ [SUNIT(UBATH07)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH07 \ ;\ [SUNIT(UBATH08)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH08 \ ;\ [SUNIT(UBATH09)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH09 \ ;\ [SUNIT(UBATH10)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH10 \ ;\ [SUNIT(UBATH11)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH11 \ ;\ [SUNIT(UBATH12)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH12 \ ;\ [SUNIT(UBATH13)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH13 \ ;\ [SUNIT(UBATH14)]^c^cINSERT C:/SBLOCK/SUNIT/UBATH14 \ ;\ [ EXIT ]^c^c [ EXIT ]^c^c **uti1 [*** UNIT TITLE LIST ***] [SUNIT(UTI01)]^c^cINSERT C:/SBLOCK/SUNIT/UTI01 \ \EXPLODE L [SUNIT(UTI02)]^c^cINSERT C:/SBLOCK/SUNIT/UTI02 \ \EXPLODE L [SUNIT(UTI03)]^c^cINSERT C:/SBLOCK/SUNIT/UTI03 \ \EXPLODE L [SUNIT(UTI04)]^c^cINSERT C:/SBLOCK/SUNIT/UTI04 \ \EXPLODE L [SUNIT(UTI05)]^c^cINSERT C:/SBLOCK/SUNIT/UTI05 \ \EXPLODE L [SUNIT(UTI06)]^c^cINSERT C:/SBLOCK/SUNIT/UTI06 \ \EXPLODE L [SUNIT(UTI07)]^c^cINSERT C:/SBLOCK/SUNIT/UTI07 \ \EXPLODE L [SUNIT(UTI08)]^c^cINSERT C:/SBLOCK/SUNIT/UTI08 \ \EXPLODE L [ EXIT ]^c^c **UTABLE1 [*** UNIT TABLE LIST ***] [SUNIT(UTABLE01)]^c^cINSERT C:/SBLOCK/SUNIT/UTABLE01 \ \ [SUNIT(UTABLE02)]^c^cINSERT C:/SBLOCK/SUNIT/UTABLE02 \ \ [SUNIT(UTABLE03)]^c^cINSERT C:/SBLOCK/SUNIT/UTABLE03 \ \ [ EXIT ]^c^c **UD1 [] [SUNIT(UD01)]^c^cINSERT C:/SBLOCK/SUNIT/UD01 \ \EXPLODE L [SUNIT(UD02)]^c^cINSERT C:/SBLOCK/SUNIT/UD02 \ \EXPLODE L [SUNIT(UD03)]^c^cINSERT C:/SBLOCK/SUNIT/UD03 \ \EXPLODE L [SUNIT(UD05)]^c^cINSERT C:/SBLOCK/SUNIT/UD05 \ \EXPLODE L [SUNIT(UD06)]^c^cINSERT C:/SBLOCK/SUNIT/UD06 \ \EXPLODE L [SUNIT(UD07)]^c^cINSERT C:/SBLOCK/SUNIT/UD07 \ \EXPLODE L [SUNIT(UD04)]^c^cINSERT C:/SBLOCK/SUNIT/UD04 \ \EXPLODE L [SUNIT(UD08)]^c^cINSERT C:/SBLOCK/SUNIT/UD08 \ \EXPLODE L [ EXIT ]^c^c **USTAIR1 [*** UNIT STAIR LIST ***] [SUNIT(USTAIR01)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR01 int \ ;\EXPLODE L [SUNIT(USTAIR02)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR02 int \ ;\EXPLODE L [SUNIT(USTAIR03)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR03 int \ ;\EXPLODE L [SUNIT(USTAIR13)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR13 int \ ;\EXPLODE L [SUNIT(USTAIR04)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR04 int \ ;\EXPLODE L [SUNIT(USTAIR05)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR05 int \ ;\EXPLODE L [SUNIT(USTAIR06)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR06 int \ ;\EXPLODE L [SUNIT(USTAIR14)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR14 int \ ;\EXPLODE L [SUNIT(USTAIR07)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR07 int \ ;\EXPLODE L [SUNIT(USTAIR08)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR08 int \ ;\EXPLODE L [SUNIT(USTAIR09)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR09 int \ ;\EXPLODE L [SUNIT(USTAIR15)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR15 int \ ;\EXPLODE L [SUNIT(USTAIR10)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR10 int \ ;\EXPLODE L [SUNIT(USTAIR11)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR11 int \ ;\EXPLODE L [SUNIT(USTAIR12)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR12 int \ ;\EXPLODE L [ NEXT ]^c^c$I=USTAIR2 $I=* **USTAIR2 [*** UNIT STAIR LIST ***] [SUNIT(USTAIR16)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR16 int \ ;\EXPLODE L [SUNIT(USTAIR17)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR17 int \ ;\EXPLODE L [SUNIT(USTAIR18)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR18 int \ ;\EXPLODE L [SUNIT(USTAIR28)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR28 int \ ;\EXPLODE L [SUNIT(USTAIR19)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR19 int \ ;\EXPLODE L [SUNIT(USTAIR20)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR20 int \ ;\EXPLODE L [SUNIT(USTAIR21)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR21 int \ ;\EXPLODE L [SUNIT(USTAIR29)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR29 int \ ;\EXPLODE L [SUNIT(USTAIR22)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR22 int \ ;\EXPLODE L [SUNIT(USTAIR23)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR23 int \ ;\EXPLODE L [SUNIT(USTAIR24)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR24 int \ ;\EXPLODE L [SUNIT(USTAIR30)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR30 int \ ;\EXPLODE L [SUNIT(USTAIR25)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR25 int \ ;\EXPLODE L [SUNIT(USTAIR26)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR26 int \ ;\EXPLODE L [SUNIT(USTAIR27)]^c^cINSERT C:/SBLOCK/SUNIT/USTAIR27 int \ ;\EXPLODE L [ NEXT ]^c^c$I=USTAIR1 $I=* **UOPEN [*** SCALE = 1 / 40 ***] [SUNIT(UOPEN01)]^c^c^P(if (not c:uopen1) (load"c:/acad/ama/uopen1"))+ (princ) uopen1 [SUNIT(UOPEN02)]^c^c^P(if (not c:uopen3) (load"c:/acad/ama/uopen3"))+ (princ) uopen3 [SUNIT(UOPEN03)]^c^cINSERT *C:/SBLOCK/SUNIT/UOPEN03 \ ; [SUNIT(UOPEN04)]^c^c^P(if (not c:uopen2) (load"c:/acad/ama/uopen2"))+ (princ) uopen2 [SUNIT(UOPEN05)]^c^c^P(if (not c:uopen4) (load"c:/acad/ama/uopen4"))+ (princ) uopen4 [SUNIT(UOPEN06)]^c^cINSERT *C:/SBLOCK/SUNIT/UOPEN04 \ ; [SUNIT(UOPEN07)]^c^cINSERT *C:/SBLOCK/SUNIT/UOPEN01 \ ; [SUNIT(UOPEN08)]^c^cINSERT *C:/SBLOCK/SUNIT/UOPEN02 \ ; [ EXIT ]^c^c **k1 [*** SINK LIST ***] [SUNIT(K01)]^c^cINSERT C:/SBLOCK/SUNIT/K01 \ \ [SUNIT(K02)]^c^cINSERT C:/SBLOCK/SUNIT/K02 \ \ [SUNIT(K03)]^c^cINSERT C:/SBLOCK/SUNIT/K03 \ \ [SUNIT(K04)]^c^cINSERT C:/SBLOCK/SUNIT/K04 \ \ [SUNIT(K05)]^c^cINSERT C:/SBLOCK/SUNIT/K05 \ \ [SUNIT(K06)]^c^cINSERT C:/SBLOCK/SUNIT/K06 \ \ [SUNIT(K07)]^c^cINSERT C:/SBLOCK/SUNIT/K07 \ \ [SUNIT(K08)]^c^cINSERT C:/SBLOCK/SUNIT/K08 \ \ [SUNIT(K09)]^c^cINSERT C:/SBLOCK/SUNIT/K09 \ \ [SUNIT(K10)]^c^cINSERT C:/SBLOCK/SUNIT/K10 \ \ [SUNIT(K11)]^c^cINSERT C:/SBLOCK/SUNIT/K11 \ \ [SUNIT(K12)]^c^cINSERT C:/SBLOCK/SUNIT/K12 \ \ [SUNIT(K13)]^c^cINSERT C:/SBLOCK/SUNIT/K13 \ \ [SUNIT(K14)]^c^cINSERT C:/SBLOCK/SUNIT/K14 \ \ [ NEXT ]^c^c$i=K2 $I=* [ EXIT ]^c^c **K2 [*** SINK LIST ***] [SUNIT(K15)]^c^cINSERT C:/SBLOCK/SUNIT/K15 \ \ [SUNIT(K16)]^c^cINSERT C:/SBLOCK/SUNIT/K16 \;;\ [SUNIT(K17)]^c^cINSERT C:/SBLOCK/SUNIT/K17 \ \ [SUNIT(K18)]^c^cINSERT C:/SBLOCK/SUNIT/K18 \;;\ [SUNIT(K19)]^c^cINSERT C:/SBLOCK/SUNIT/K19 \ \ [SUNIT(K20)]^c^cINSERT C:/SBLOCK/SUNIT/K20 \;;\ [SUNIT(K21)]^c^cINSERT C:/SBLOCK/SUNIT/K21 \;;\ [SUNIT(K22)]^c^cINSERT C:/SBLOCK/SUNIT/K22 \ \ [SUNIT(K23)]^c^cINSERT C:/SBLOCK/SUNIT/K23 \ \ [SUNIT(K24)]^c^cINSERT C:/SBLOCK/SUNIT/K24 \ \ [SUNIT(K25)]^c^cINSERT C:/SBLOCK/SUNIT/K25 \;;\ [ NEXT ]^c^c$I=K1 $I=* [ NEXT ]^c^c$I=K1 $I=* [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **URN1 [*** UNIT ROOM NAME LIST1 ***] [SUNIT(URN01)]^c^cINSERT C:/SBLOCK/SUNIT/URN01 \ EXPLODE L; [SUNIT(URN02)]^c^cINSERT C:/SBLOCK/SUNIT/URN02 \ EXPLODE L [SUNIT(URN03)]^c^cINSERT C:/SBLOCK/SUNIT/URN03 \ EXPLODE L [SUNIT(URN04)]^c^cINSERT C:/SBLOCK/SUNIT/URN04 \ EXPLODE L [SUNIT(URN05)]^c^cINSERT C:/SBLOCK/SUNIT/URN05 \ EXPLODE L [SUNIT(URN06)]^c^cINSERT C:/SBLOCK/SUNIT/URN06 \ EXPLODE L [SUNIT(URN07)]^c^cINSERT C:/SBLOCK/SUNIT/URN07 \ EXPLODE L [SUNIT(URN08)]^c^cINSERT C:/SBLOCK/SUNIT/URN08 \ EXPLODE L [SUNIT(URN09)]^c^cINSERT C:/SBLOCK/SUNIT/URN09 \ EXPLODE L [SUNIT(URN10)]^c^cINSERT C:/SBLOCK/SUNIT/URN10 \ EXPLODE L [SUNIT(URN11)]^c^cINSERT C:/SBLOCK/SUNIT/URN11 \ EXPLODE L [SUNIT(URN12)]^c^cINSERT C:/SBLOCK/SUNIT/URN12 \ EXPLODE L [SUNIT(URN13)]^c^cINSERT C:/SBLOCK/SUNIT/URN13 \ EXPLODE L [SUNIT(URN14)]^c^cINSERT C:/SBLOCK/SUNIT/URN14 \ EXPLODE L [ NEXT ]^c^c$I=URN2 $I=* [ EXIT ]^c^c **URN2 [*** UNIT ROOM NAME LIST2 ***] [SUNIT(URN15)]^c^cINSERT C:/SBLOCK/SUNIT/URN15 \ EXPLODE L [SUNIT(URN16)]^c^cINSERT C:/SBLOCK/SUNIT/URN16 \ EXPLODE L [SUNIT(URN17)]^c^cINSERT C:/SBLOCK/SUNIT/URN17 \ EXPLODE L [SUNIT(URN18)]^c^cINSERT C:/SBLOCK/SUNIT/URN18 \ EXPLODE L [SUNIT(URN19)]^c^cINSERT C:/SBLOCK/SUNIT/URN19 \ EXPLODE L [SUNIT(URN20)]^c^cINSERT C:/SBLOCK/SUNIT/URN20 \ EXPLODE L [ NEXT ]^c^c$I=URN1 $I=* [ NEXT ]^c^c$I=URN1 $I=* [SUNIT(URN23)]^c^cINSERT C:/SBLOCK/SUNIT/URN23 int \ \EXPLODE L [SUNIT(URN24)]^c^cINSERT C:/SBLOCK/SUNIT/URN24 int \ \EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c [SUNIT(URN27)]^c^cINSERT C:/SBLOCK/SUNIT/URN27 int \ \EXPLODE L [SUNIT(URN28)]^c^cINSERT C:/SBLOCK/SUNIT/URN28 int \ \EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c **UDWLIST1 [] [sunit(UDWLIST1)]^c^cINSERT C:/SBLOCK/SUNIT/UDWLIST1 \ \EXPLODE L [sunit(UDWLIST2)]^c^cINSERT C:/SBLOCK/SUNIT/UDWLIST2 \ \EXPLODE L [sunit(UDWLIST3)]^c^cINSERT C:/SBLOCK/SUNIT/UDWLIST3 \ \EXPLODE L [sunit(UDWLIST4)]^c^cINSERT C:/SBLOCK/SUNIT/UDWLIST4 \ \EXPLODE L [sunit(UDWLIST5)]^c^cINSERT C:/SBLOCK/SUNIT/UDWLIST5 \ \EXPLODE L [sunit(UDWLIST6)]^c^cINSERT C:/SBLOCK/SUNIT/UDWLIST6 \ \EXPLODE L [sunit(UDWLIST7)]^c^cINSERT C:/SBLOCK/SUNIT/UDWLIST7 \ \EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c **UELEV [*** SELECT OF THE ELEVATOR LIST ***] [sunit(ELEV01)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV01 INT \ ;\EXPLODE L [sunit(ELEV02)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV02 INT \ ;\EXPLODE L [sunit(ELEV03)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV03 INT \ ;\EXPLODE L [sunit(ELEV04)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV04 INT \ ;\EXPLODE L [sunit(ELEV05)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV05 INT \ ;\EXPLODE L [sunit(ELEV06)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV06 INT \ ;\EXPLODE L [sunit(ELEV07)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV07 INT \ ;\EXPLODE L [sunit(ELEV08)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV08 INT \ ;\EXPLODE L [sunit(ELEV09)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV09 INT \ ;\EXPLODE L [sunit(ELEV10)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV10 INT \ ;\EXPLODE L [sunit(ELEV11)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV11 INT \ ;\EXPLODE L [sunit(ELEV12)]^C^CINSERT C:/SBLOCK/SUNIT/ELEV12 INT \ ;\EXPLODE L [ NEXT ]^C^C$i=UELET $I=* [ NEXT ]^C^C$i=UELET $I=* [ EXIT ]^C^C [ EXIT ]^C^C **UELET [*** SELECT OF THE ELEVATOR LIST ***] [sunit(ELET01)]^C^CINSERT C:/SBLOCK/SUNIT/ELET01 INT \ \EXPLODE L [sunit(ELET02)]^C^CINSERT C:/SBLOCK/SUNIT/ELET02 INT \ \EXPLODE L [sunit(ELET03)]^C^CINSERT C:/SBLOCK/SUNIT/ELET03 INT \ \EXPLODE L [sunit(ELET04)]^C^CINSERT C:/SBLOCK/SUNIT/ELET04 INT \ \EXPLODE L [sunit(ELET05)]^C^CINSERT C:/SBLOCK/SUNIT/ELET05 INT \ \EXPLODE L [sunit(ELET06)]^C^CINSERT C:/SBLOCK/SUNIT/ELET06 INT \ \EXPLODE L [sunit(ELET07)]^C^CINSERT C:/SBLOCK/SUNIT/ELET07 INT \ \EXPLODE L [sunit(ELET08)]^C^CINSERT C:/SBLOCK/SUNIT/ELET08 INT \ \EXPLODE L [sunit(ELET09)]^C^CINSERT C:/SBLOCK/SUNIT/ELET09 INT \ \EXPLODE L [sunit(ELET10)]^C^CINSERT C:/SBLOCK/SUNIT/ELET10 INT \ \EXPLODE L [ NEXT ]^c^c$i=UELEV $i=* [ NEXT ]^c^c$i=UELEV $i=* [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C **TREE1 [*** TREE LIST1 ***] [sunit(TREE1)]^c^cINSERT C:/sBLOCK/sUNIT/TREE1 \\\\ [sunit(TREE2)]^c^cINSERT C:/sBLOCK/sUNIT/TREE2 \\\\ [sunit(TREE3)]^c^cINSERT C:/sBLOCK/sUNIT/TREE3 \\\\ [sunit(TREE4)]^c^cINSERT C:/sBLOCK/sUNIT/TREE4 \\\\ [sunit(TREE5)]^c^cINSERT C:/sBLOCK/sUNIT/TREE5 \\\\ [sunit(TREE6)]^c^cINSERT C:/sBLOCK/sUNIT/TREE6 \\\\ [sunit(TREE7)]^c^cINSERT C:/sBLOCK/sUNIT/TREE7 \\\\ [sunit(TREE8)]^c^cINSERT C:/sBLOCK/sUNIT/TREE8 \\\\ [sunit(TREE9)]^c^cINSERT C:/sBLOCK/sUNIT/TREE9 \\\\ [sunit(TREE10)]^c^cINSERT C:/sBLOCK/sUNIT/TREE10 \\\\ [sunit(TREE11)]^c^cINSERT C:/sBLOCK/sUNIT/TREE11 \\\\ [sunit(TREE12)]^c^cINSERT C:/sBLOCK/sUNIT/TREE12 \\\\ [sunit(TREE13)]^c^cINSERT C:/sBLOCK/sUNIT/TREE13 \\\\ [ PREVIOUS ]^c^c$I=TREE4 $I=* [ NEXT ]^c^c$I=TREE2 $I=* [ EXIT ]^c^c **TREE2 [*** TREE LIST2 ***] [sunit(TREE14)]^c^cINSERT C:/sBLOCK/sUNIT/TREE14 \\\\ [sunit(TREE15)]^c^cINSERT C:/sBLOCK/sUNIT/TREE15 \\\\ [sunit(TREE16)]^c^cINSERT C:/sBLOCK/sUNIT/TREE16 \\\\ [sunit(TREE17)]^c^cINSERT C:/sBLOCK/sUNIT/TREE17 \\\\ [sunit(TREE18)]^c^cINSERT C:/sBLOCK/sUNIT/TREE18 \\\\ [sunit(TREE19)]^c^cINSERT C:/sBLOCK/sUNIT/TREE19 \\\\ [sunit(TREE20)]^c^cINSERT C:/sBLOCK/sUNIT/TREE20 \\\\ [sunit(TREE21)]^c^cINSERT C:/sBLOCK/sUNIT/TREE21 \\\\ [sunit(TREE22)]^c^cINSERT C:/sBLOCK/sUNIT/TREE22 \\\\ [sunit(TREE23)]^c^cINSERT C:/sBLOCK/sUNIT/TREE23 \\\\ [sunit(TREE24)]^c^cINSERT C:/sBLOCK/sUNIT/TREE24 \\\\ [sunit(TREE25)]^c^cINSERT C:/sBLOCK/sUNIT/TREE25 \\\\ [sunit(TREE26)]^c^cINSERT C:/sBLOCK/sUNIT/TREE26 \\\\ [ PREVIOUS ]^c^c$I=TREE1 $I=* [ NEXT ]^c^c$I=TREE3 $I=* [ EXIT ]^c^c **TREE3 [*** TREE LIST3 ***] [sunit(TREE27)]^c^cINSERT C:/sBLOCK/sUNIT/TREE27 \\\\ [sunit(TREE28)]^c^cINSERT C:/sBLOCK/sUNIT/TREE28 \\\\ [sunit(TREE29)]^c^cINSERT C:/sBLOCK/sUNIT/TREE29 \\\\ [sunit(TREE30)]^c^cINSERT C:/sBLOCK/sUNIT/TREE30 \\\\ [sunit(TREE31)]^c^cINSERT C:/sBLOCK/sUNIT/TREE31 \\\\ [sunit(TREE32)]^c^cINSERT C:/sBLOCK/sUNIT/TREE32 \\\\ [sunit(TREE33)]^c^cINSERT C:/sBLOCK/sUNIT/TREE33 \\\\ [sunit(TREE34)]^c^cINSERT C:/sBLOCK/sUNIT/TREE34 \\\\ [sunit(TREE35)]^c^cINSERT C:/sBLOCK/sUNIT/TREE35 \\\\ [sunit(TREE36)]^c^cINSERT C:/sBLOCK/sUNIT/TREE36 \\\\ [sunit(TREE37)]^c^cINSERT C:/sBLOCK/sUNIT/TREE37 \\\\ [sunit(TREE38)]^c^cINSERT C:/sBLOCK/sUNIT/TREE38 \\\\ [sunit(TREE39)]^c^cINSERT C:/sBLOCK/sUNIT/TREE39 \\\\ [ PREVIOUS ]^c^c$I=TREE2 $I=* [ NEXT ]^c^c$I=TREE4 $I=* [ EXIT ]^c^c **TREE4 [*** TREE LIST4 ***] [sunit(TREE40)]^c^cINSERT C:/sBLOCK/sUNIT/TREE40 \\\\ [sunit(TREE41)]^c^cINSERT C:/sBLOCK/sUNIT/TREE41 \\\\ [sunit(TREE42)]^c^cINSERT C:/sBLOCK/sUNIT/TREE42 \\\\ [sunit(TREE43)]^c^cINSERT C:/sBLOCK/sUNIT/TREE43 \\\\ [sunit(TREE44)]^c^cINSERT C:/sBLOCK/sUNIT/TREE44 \\\\ [sunit(TREE45)]^c^cINSERT C:/sBLOCK/sUNIT/TREE45 \\\\ [sunit(TREE46)]^c^cINSERT C:/sBLOCK/sUNIT/TREE46 \\\\ [ PREVIOUS ]^c^c$I=TREE3 $I=* [ NEXT ]^c^c$I=TREE1 $I=* [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **PELEV [*** SELECT OF THE ELEVATOR LIST ***] [sunit(ELEV01)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV01 INT \ \EXPLODE L [sunit(ELEV02)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV02 INT \ \EXPLODE L [sunit(ELEV03)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV03 INT \ \EXPLODE L [sunit(ELEV04)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV04 INT \ \EXPLODE L [sunit(ELEV05)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV05 INT \ \EXPLODE L [sunit(ELEV06)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV06 INT \ \EXPLODE L [sunit(ELEV07)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV07 INT \ \EXPLODE L [sunit(ELEV08)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV08 INT \ \EXPLODE L [sunit(ELEV09)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV09 INT \ \EXPLODE L [sunit(ELEV10)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV10 INT \ \EXPLODE L [sunit(ELEV11)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV11 INT \ \EXPLODE L [sunit(ELEV12)]^C^CINSERT C:/SBLOCK/SPLAN/PELEV12 INT \ \EXPLODE L [ NEXT ]^C^C$I=pelet $i=* [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C **PELET [*** SELECT OF THE ELEVATOR LIST ***] [sunit(ELET01)]^C^CINSERT C:/SBLOCK/SPLAN/PELET01 INT \ \EXPLODE L [sunit(ELET02)]^C^CINSERT C:/SBLOCK/SPLAN/PELET02 INT \ \EXPLODE L [sunit(ELET03)]^C^CINSERT C:/SBLOCK/SPLAN/PELET03 INT \ \EXPLODE L [sunit(ELET04)]^C^CINSERT C:/SBLOCK/SPLAN/PELET04 INT \ \EXPLODE L [sunit(ELET05)]^C^CINSERT C:/SBLOCK/SPLAN/PELET05 INT \ \EXPLODE L [sunit(ELET06)]^C^CINSERT C:/SBLOCK/SPLAN/PELET06 INT \ \EXPLODE L [sunit(ELET07)]^C^CINSERT C:/SBLOCK/SPLAN/PELET07 INT \ \EXPLODE L [sunit(ELET08)]^C^CINSERT C:/SBLOCK/SPLAN/PELET08 INT \ \EXPLODE L [sunit(ELET09)]^C^CINSERT C:/SBLOCK/SPLAN/PELET09 INT \ \EXPLODE L [sunit(ELET10)]^C^CINSERT C:/SBLOCK/SPLAN/PELET10 INT \ \EXPLODE L [ NEXT ]^c^c$i=PELEV $i=* [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C **PLAN **PSM1 [*** PLAN SYMBOL MARK ***] [SPLAN(PSM01)]^c^cINSERT C:/SBLOCK/SPLAN/PSM01 \ \ [SPLAN(PSM02)]^c^cINSERT C:/SBLOCK/SPLAN/PSM02 \ \ [SPLAN(PSM03)]^c^cINSERT C:/SBLOCK/SPLAN/PSM03 \ \ [SPLAN(PSM04)]^c^cINSERT C:/SBLOCK/SPLAN/PSM04 \ \ [SPLAN(PSM05)]^c^cINSERT C:/SBLOCK/SPLAN/PSM05 \ \ [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **1STAIR1 [*** PLAN 1st STAIR LIST ***] [SPLAN(1STAIR01)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR01 int \ \EXPLODE L [SPLAN(1STAIR02)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR02 int \ \EXPLODE L [SPLAN(1STAIR03)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR03 int \ \EXPLODE L [SPLAN(1STAIR13)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR13 int \ \EXPLODE L [SPLAN(1STAIR04)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR04 int \ \EXPLODE L [SPLAN(1STAIR05)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR05 int \ \EXPLODE L [SPLAN(1STAIR06)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR06 int \ \EXPLODE L [SPLAN(1STAIR14)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR14 int \ \EXPLODE L [SPLAN(1STAIR07)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR07 int \ \EXPLODE L [SPLAN(1STAIR08)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR08 int \ \EXPLODE L [SPLAN(1STAIR09)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR09 int \ \EXPLODE L [SPLAN(1STAIR15)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR15 int \ \EXPLODE L [SPLAN(1STAIR10)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR10 int \ \EXPLODE L [SPLAN(1STAIR11)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR11 int \ \EXPLODE L [SPLAN(1STAIR12)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR12 int \ \EXPLODE L [ NEXT ]^c^c$I=1STAIR2 $I=* **1STAIR2 [*** PLAN 1st STAIR LIST ***] [SPLAN(1STAIR16)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR16 int \ \EXPLODE L [SPLAN(1STAIR17)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR17 int \ \EXPLODE L [SPLAN(1STAIR18)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR18 int \ \EXPLODE L [SPLAN(1STAIR28)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR28 int \ \EXPLODE L [SPLAN(1STAIR19)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR19 int \ \EXPLODE L [SPLAN(1STAIR20)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR20 int \ \EXPLODE L [SPLAN(1STAIR21)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR21 int \ \EXPLODE L [SPLAN(1STAIR29)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR29 int \ \EXPLODE L [SPLAN(1STAIR22)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR22 int \ \EXPLODE L [SPLAN(1STAIR23)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR23 int \ \EXPLODE L [SPLAN(1STAIR24)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR24 int \ \EXPLODE L [SPLAN(1STAIR30)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR30 int \ \EXPLODE L [SPLAN(1STAIR25)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR25 int \ \EXPLODE L [SPLAN(1STAIR26)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR26 int \ \EXPLODE L [SPLAN(1STAIR27)]^c^cINSERT C:/SBLOCK/SPLAN/1STAIR27 int \ \EXPLODE L [ NEXT ]^c^c$I=1STAIR1 $I=* **PSTAIR1 [*** PLAN STAIR LIST ***] [SPLAN(PSTAIR01)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR01 int \ \EXPLODE L [SPLAN(PSTAIR02)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR02 int \ \EXPLODE L [SPLAN(PSTAIR03)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR03 int \ \EXPLODE L [SPLAN(PSTAIR13)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR13 int \ \EXPLODE L [SPLAN(PSTAIR04)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR04 int \ \EXPLODE L [SPLAN(PSTAIR05)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR05 int \ \EXPLODE L [SPLAN(PSTAIR06)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR06 int \ \EXPLODE L [SPLAN(PSTAIR14)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR14 int \ \EXPLODE L [SPLAN(PSTAIR07)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR07 int \ \EXPLODE L [SPLAN(PSTAIR08)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR08 int \ \EXPLODE L [SPLAN(PSTAIR09)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR09 int \ \EXPLODE L [SPLAN(PSTAIR15)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR15 int \ \EXPLODE L [SPLAN(PSTAIR10)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR10 int \ \EXPLODE L [SPLAN(PSTAIR11)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR11 int \ \EXPLODE L [SPLAN(PSTAIR12)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR12 int \ \EXPLODE L [ NEXT ]^c^c$I=PSTAIR2 $I=* **PSTAIR2 [*** PLAN STAIR LIST ***] [SPLAN(PSTAIR16)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR16 int \ \EXPLODE L [SPLAN(PSTAIR17)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR17 int \ \EXPLODE L [SPLAN(PSTAIR18)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR18 int \ \EXPLODE L [SPLAN(PSTAIR28)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR28 int \ \EXPLODE L [SPLAN(PSTAIR19)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR19 int \ \EXPLODE L [SPLAN(PSTAIR20)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR20 int \ \EXPLODE L [SPLAN(PSTAIR21)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR21 int \ \EXPLODE L [SPLAN(PSTAIR29)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR29 int \ \EXPLODE L [SPLAN(PSTAIR22)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR22 int \ \EXPLODE L [SPLAN(PSTAIR23)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR23 int \ \EXPLODE L [SPLAN(PSTAIR24)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR24 int \ \EXPLODE L [SPLAN(PSTAIR30)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR30 int \ \EXPLODE L [SPLAN(PSTAIR25)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR25 int \ \EXPLODE L [SPLAN(PSTAIR26)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR26 int \ \EXPLODE L [SPLAN(PSTAIR27)]^c^cINSERT C:/SBLOCK/SPLAN/PSTAIR27 int \ \EXPLODE L [ NEXT ]^c^c$I=PSTAIR1 $I=* **POPEN [*** SCALE = 1 / 100 ***] [SPLAN(POPEN01)]^c^c^P(if (not c:popen1) (load"c:/acad/ama/popen1"))+ (princ) popen1 [SPLAN(POPEN02)]^c^c^P(if (not c:popen3) (load"c:/acad/ama/popen3"))+ (princ) popen3 [SPLAN(POPEN03)]^c^cINSERT C:/SBLOCK/SPLAN/POPEN03 \ \ [SPLAN(POPEN04)]^c^c^P(if (not c:popen2) (load"c:/acad/ama/popen2"))+ (princ) popen2 [SPLAN(POPEN05)]^c^c^P(if (not c:popen4) (load"c:/acad/ama/popen4"))+ (princ) popen4 [SPLAN(POPEN06)]^c^cINSERT C:/SBLOCK/SPLAN/POPEN04 \ \ [SPLAN(POPEN07)]^c^cINSERT C:/SBLOCK/SPLAN/POPEN01 \ \ [SPLAN(POPEN08)]^c^cINSERT C:/SBLOCK/SPLAN/POPEN02 \ \ [ EXIT ]^c^c **PWN1 [*** SCALE = 1 / 100 ***] [SPLAN(PWN01)]^c^cINSERT C:/SBLOCK/SPLAN/PWN01 \ \EXPLODE L [SPLAN(PWN02)]^c^cINSERT C:/SBLOCK/SPLAN/PWN02 \ \EXPLODE L [SPLAN(PWN03)]^c^cINSERT C:/SBLOCK/SPLAN/PWN03 \ \EXPLODE L [SPLAN(PWN04)]^c^cINSERT C:/SBLOCK/SPLAN/PWN04 \ \EXPLODE L [SPLAN(PWN05)]^c^cINSERT C:/SBLOCK/SPLAN/PWN05 \ \EXPLODE L [SPLAN(PWN06)]^c^cINSERT C:/SBLOCK/SPLAN/PWN06 \ \EXPLODE L [SPLAN(PWN07)]^c^cINSERT C:/SBLOCK/SPLAN/PWN07 \ \EXPLODE L [SPLAN(PWN08)]^c^cINSERT C:/SBLOCK/SPLAN/PWN08 \ \EXPLODE L [SPLAN(PWN09)]^c^cINSERT C:/SBLOCK/SPLAN/PWN09 \ \EXPLODE L [SPLAN(PWN10)]^c^cINSERT C:/SBLOCK/SPLAN/PWN10 \ \EXPLODE L [SPLAN(PWN11)]^c^cINSERT C:/SBLOCK/SPLAN/PWN11 \ \EXPLODE L [SPLAN(PWN12)]^c^cINSERT C:/SBLOCK/SPLAN/PWN12 \ \EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **PRN1 [*** PLAN ROOM NAME LIST ***] [SPLAN(PRN01)]^c^cINSERT C:/SBLOCK/SPLAN/PRN01 \ \EXPLODE L [SPLAN(PRN02)]^c^cINSERT C:/SBLOCK/SPLAN/PRN02 \ \EXPLODE L [SPLAN(PRN03)]^c^cINSERT C:/SBLOCK/SPLAN/PRN03 \ \EXPLODE L [SPLAN(PRN04)]^c^cINSERT C:/SBLOCK/SPLAN/PRN04 \ \EXPLODE L [SPLAN(PRN05)]^c^cINSERT C:/SBLOCK/SPLAN/PRN05 \ \EXPLODE L [SPLAN(PRN06)]^c^cINSERT C:/SBLOCK/SPLAN/PRN06 \ \EXPLODE L [SPLAN(PRN07)]^c^cINSERT C:/SBLOCK/SPLAN/PRN07 \ \EXPLODE L [SPLAN(PRN08)]^c^cINSERT C:/SBLOCK/SPLAN/PRN08 \ \EXPLODE L [SPLAN(PRN09)]^c^cINSERT C:/SBLOCK/SPLAN/PRN09 \ \EXPLODE L [SPLAN(PRN10)]^c^cINSERT C:/SBLOCK/SPLAN/PRN10 \ \EXPLODE L [SPLAN(PRN11)]^c^cINSERT C:/SBLOCK/SPLAN/PRN11 \ \EXPLODE L [SPLAN(PRN12)]^c^cINSERT C:/SBLOCK/SPLAN/PRN12 \ \EXPLODE L [SPLAN(PRN13)]^c^cINSERT C:/SBLOCK/SPLAN/PRN13 \ \EXPLODE L [SPLAN(PRN14)]^c^cINSERT C:/SBLOCK/SPLAN/PRN14 \ \EXPLODE L [ NEXT ]^c^c$I=PRN2 $I=* [ EXIT ]^c^c **PRN2 [*** PLAN ROOM NAME LIST ***] [SPLAN(PRN15)]^c^cINSERT C:/SBLOCK/SPLAN/PRN15 \ \EXPLODE L [SPLAN(PRN16)]^c^cINSERT C:/SBLOCK/SPLAN/PRN16 \ \EXPLODE L [SPLAN(PRN17)]^c^cINSERT C:/SBLOCK/SPLAN/PRN17 \ \EXPLODE L [SPLAN(PRN18)]^c^cINSERT C:/SBLOCK/SPLAN/PRN18 \ \EXPLODE L [SPLAN(PRN19)]^c^cINSERT C:/SBLOCK/SPLAN/PRN19 INT \ \EXPLODE L [SPLAN(PRN20)]^c^cINSERT C:/SBLOCK/SPLAN/PRN20 \ \EXPLODE L [SPLAN(PRN21)]^c^cINSERT C:/SBLOCK/SPLAN/PRN21 \ \EXPLODE L [SPLAN(PRN22)]^c^cINSERT C:/SBLOCK/SPLAN/PRN22 \ \EXPLODE L [ NEXT ]^c^c$I=PRN1 $I=* [ NEXT ]^c^c$I=PRN1 $I=* [ NEXT ]^c^c$I=PRN1 $I=* [ NEXT ]^c^c$I=PRN1 $I=* [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **pt1 [*** PLAN TITLE LIST1 ***] [splan(pt01)]^c^cINSERT C:/SBLOCK/SPLAN/PT01 \ \EXPLODE L [splan(pt02)]^c^cINSERT C:/SBLOCK/SPLAN/PT02 \ \EXPLODE L [splan(pt03)]^c^cINSERT C:/SBLOCK/SPLAN/PT03 \ \EXPLODE L [splan(pt04)]^c^cINSERT C:/SBLOCK/SPLAN/PT04 \ \EXPLODE L [splan(pt05)]^c^cINSERT C:/SBLOCK/SPLAN/PT05 \ \EXPLODE L [splan(pt06)]^c^cINSERT C:/SBLOCK/SPLAN/PT06 \ \EXPLODE L [splan(pt07)]^c^cINSERT C:/SBLOCK/SPLAN/PT07 \ \EXPLODE L [ NEXT ]^c^c$i=PT2 $i=* [ EXIT ]^c^c **pt2 [*** PLAN TITLE LIST2 ***] [splan(pt07-1)]^c^cINSERT C:/SBLOCK/SPLAN/PT07-1 \ \EXPLODE L [splan(pt07-2)]^c^cINSERT C:/SBLOCK/SPLAN/PT07-2 \ \EXPLODE L [splan(pt07-3)]^c^cINSERT C:/SBLOCK/SPLAN/PT07-3 \ \EXPLODE L [splan(pt08)]^c^cINSERT C:/SBLOCK/SPLAN/PT08 \ \EXPLODE L [splan(pt09)]^c^cINSERT C:/SBLOCK/SPLAN/PT09 \ \EXPLODE L [splan(pt10)]^c^cINSERT C:/SBLOCK/SPLAN/PT10 \ \EXPLODE L [ PREVIOUS ]^c^c$i=PT1 $i=* [ PREVIOUS ]^c^c$i=PT1 $i=* [ EXIT ]^c^c **ld100 [] [splan(ld01)]^C^Cinsert c:/sblock/splan/ld01 \ \EXPLODE L [splan(ld02)]^C^Cinsert c:/sblock/splan/ld02 \ \EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c **type [] [splan(type1)]^C^Cinsert c:/sblock/splan/type1 \ \EXPLODE L [splan(type2)]^C^Cinsert c:/sblock/splan/type2 \ \EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c **CAR1 [*** CAR LIST ***] [splan(CAR1)]^C^CINSERT C:/sBLOCK/splan/CAR1 \ ; [splan(CAR2)]^C^CINSERT C:/sBLOCK/splan/CAR2 \ ; [splan(CAR3)]^C^CINSERT C:/sBLOCK/splan/CAR3 \ ; [splan(CAR4)]^C^CINSERT C:/sBLOCK/splan/CAR4 \ ; [splan(CAR5)]^C^CINSERT C:/sBLOCK/splan/CAR5 \ ; [splan(CAR6)]^C^CINSERT C:/sBLOCK/splan/CAR6 \ ; [splan(CAR7)]^C^CINSERT C:/sBLOCK/splan/CAR7 \ ; [splan(CAR8)]^C^CINSERT C:/sBLOCK/splan/CAR8 \ ; [splan(CAR9)]^C^CINSERT C:/sBLOCK/splan/CAR9 \ ; [splan(CAR10)]^C^CINSERT C:/sBLOCK/splan/CAR10 \ ; [splan(CAR11)]^C^CINSERT C:/sBLOCK/splan/CAR11 \ ; [splan(CAR12)]^C^CINSERT C:/sBLOCK/splan/CAR12 \ ; [splan(CAR13)]^C^CINSERT C:/sBLOCK/splan/CAR13 \ ; [splan(CAR14)]^C^CINSERT C:/sBLOCK/splan/CAR14 \ ; [ NEXT ]^c^c$I=CAR2 $I=* [ EXIT ]^c^c **CAR2 [*** CAR LIST ***] [splan(CAR15)]^C^CINSERT C:/sBLOCK/splan/CAR15 \ ; [splan(CAR16)]^C^CINSERT C:/sBLOCK/splan/CAR16 \ ; [splan(CAR17)]^C^CINSERT C:/sBLOCK/splan/CAR17 \ ; [splan(CAR18)]^C^CINSERT C:/sBLOCK/splan/CAR18 \ ; [splan(CAR19)]^C^CINSERT C:/sBLOCK/splan/CAR19 \ ; [splan(CAR20)]^C^CINSERT C:/sBLOCK/splan/CAR20 \ ; [splan(CAR21)]^C^CINSERT C:/sBLOCK/splan/CAR21 \ ; [splan(CAR22)]^C^CINSERT C:/sBLOCK/splan/CAR22 \ ; [splan(CAR23)]^C^CINSERT C:/sBLOCK/splan/CAR23 \ ; [splan(CAR24)]^C^CINSERT C:/sBLOCK/splan/CAR24 \ ; [splan(CAR25)]^C^CINSERT C:/sBLOCK/splan/CAR25 \ ; [splan(CAR26)]^C^CINSERT C:/sBLOCK/splan/CAR26 \ ; [splan(CAR27)]^C^CINSERT C:/sBLOCK/splan/CAR27 \ ; [ PREVIOUS ]^c^c$I=CAR1 $I=* [ EXIT ]^c^c [ EXIT ]^c^c **EWN1 [*** SCALE = 1 / 150 ***] [SPLAN(PWN01)]^c^cINSERT C:/SBLOCK/SELEV/EWN01 \ \EXPLODE L [SPLAN(PWN02)]^c^cINSERT C:/SBLOCK/SELEV/EWN02 \ \EXPLODE L [SPLAN(PWN03)]^c^cINSERT C:/SBLOCK/SELEV/EWN03 \ \EXPLODE L [SPLAN(PWN04)]^c^cINSERT C:/SBLOCK/SELEV/EWN04 \ \EXPLODE L [SPLAN(PWN05)]^c^cINSERT C:/SBLOCK/SELEV/EWN05 \ \EXPLODE L [SPLAN(PWN06)]^c^cINSERT C:/SBLOCK/SELEV/EWN06 \ \EXPLODE L [SPLAN(PWN07)]^c^cINSERT C:/SBLOCK/SELEV/EWN07 \ \EXPLODE L [SPLAN(PWN08)]^c^cINSERT C:/SBLOCK/SELEV/EWN08 \ \EXPLODE L [SPLAN(PWN09)]^c^cINSERT C:/SBLOCK/SELEV/EWN09 \ \EXPLODE L [SPLAN(PWN10)]^c^cINSERT C:/SBLOCK/SELEV/EWN10 \ \EXPLODE L [SPLAN(PWN11)]^c^cINSERT C:/SBLOCK/SELEV/EWN11 \ \EXPLODE L [SPLAN(PWN12)]^c^cINSERT C:/SBLOCK/SELEV/EWN12 \ \EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **ELEV **ETI150 [*** ELEVATION TITLE SCALE=1/150 ***] [SELEV(ETI01)]^c^cINSERT C:/SBLOCK/SELEV/ETI01 \ \EXPLODE L [SELEV(ETI02)]^c^cINSERT C:/SBLOCK/SELEV/ETI02 \ \EXPLODE L [SELEV(ETI03)]^c^cINSERT C:/SBLOCK/SELEV/ETI03 \ \EXPLODE L [SELEV(ETI04)]^c^cINSERT C:/SBLOCK/SELEV/ETI04 \ \EXPLODE L [SELEV(ETI05)]^c^cINSERT C:/SBLOCK/SELEV/ETI05 \ \EXPLODE L [SELEV(ETI06)]^c^cINSERT C:/SBLOCK/SELEV/ETI06 \ \EXPLODE L [SELEV(ETI07)]^c^cINSERT C:/SBLOCK/SELEV/ETI07 \ \EXPLODE L [ NEXT ]^c^c$i=ETI100 $i=* [ EXIT ]^c^c **ETI100 [*** ELEVATION TITLE SCALE=1/150 ***] [SELEV(ETI01)]^c^cINSERT C:/SBLOCK/SELEV/ETI101 \ \EXPLODE L [SELEV(ETI02)]^c^cINSERT C:/SBLOCK/SELEV/ETI102 \ \EXPLODE L [SELEV(ETI03)]^c^cINSERT C:/SBLOCK/SELEV/ETI103 \ \EXPLODE L [SELEV(ETI04)]^c^cINSERT C:/SBLOCK/SELEV/ETI104 \ \EXPLODE L [SELEV(ETI05)]^c^cINSERT C:/SBLOCK/SELEV/ETI105 \ \EXPLODE L [SELEV(ETI06)]^c^cINSERT C:/SBLOCK/SELEV/ETI106 \ \EXPLODE L [SELEV(ETI07)]^c^cINSERT C:/SBLOCK/SELEV/ETI107 \ \EXPLODE L [ NEXT ]^c^c$i=ETI150 $i=* [ EXIT ]^c^c **EMD1 [*** ELEVATION MAIN DOOR ***] [SELEV(EMD01)]^c^cINSERT C:/SBLOCK/SELEV/EMD01 \ ; [SELEV(EMD02)]^c^cINSERT C:/SBLOCK/SELEV/EMD02 \ ; [SELEV(EMD03)]^c^cINSERT C:/SBLOCK/SELEV/EMD03 \ ; [SELEV(EMD04)]^c^cINSERT C:/SBLOCK/SELEV/EMD04 \ ; [SELEV(EMD05)]^c^cINSERT C:/SBLOCK/SELEV/EMD05 \ ; [SELEV(EMD06)]^c^cINSERT C:/SBLOCK/SELEV/EMD06 \ ; [ NEXT ]^c^c$i=EMD2 $i=* [ EXIT ]^c^c [ EXIT ]^c^c **EMD2 [*** ELEVATION MAIN DOOR ***] [SELEV(EMD01)]^c^cINSERT C:/SBLOCK/SELEV/EMD101 \ ; [SELEV(EMD02)]^c^cINSERT C:/SBLOCK/SELEV/EMD102 \ ; [SELEV(EMD03)]^c^cINSERT C:/SBLOCK/SELEV/EMD103 \ ; [SELEV(EMD04)]^c^cINSERT C:/SBLOCK/SELEV/EMD104 \ ; [SELEV(EMD05)]^c^cINSERT C:/SBLOCK/SELEV/EMD105 \ ; [SELEV(EMD06)]^c^cINSERT C:/SBLOCK/SELEV/EMD106 \ ; [ NEXT ]^c^c$i=EMD1 $i=* [ EXIT ]^c^c [ EXIT ]^c^c **FL1 [*** ELEVATION FLOOR LINE ***] [SELEV(FL15L)]^c^cINSERT C:/SBLOCK/SELEV/FL15L \ ; [SELEV(FL25L)]^c^cINSERT C:/SBLOCK/SELEV/FL25L \ ; [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [SELEV(FL15R)]^c^cINSERT C:/SBLOCK/SELEV/FL15R \ ; [SELEV(FL25R)]^c^cINSERT C:/SBLOCK/SELEV/FL25R \ ; [ EXIT ]^c^c **EPH1 [] [SELEV(EPH01)]^c^cINSERT C:/SBLOCK/SELEV/EPH01 \ ; [SELEV(EPH02)]^c^cINSERT C:/SBLOCK/SELEV/EPH02 \ ; [SELEV(EPH03)]^c^cINSERT C:/SBLOCK/SELEV/EPH03 \ ; [SELEV(EPH04)]^c^cINSERT C:/SBLOCK/SELEV/EPH04 \ ; **man [*** MAN LIST ***] [selev(MAN1)]^C^CINSERT C:/SBLOCK/SELEV/MAN1 \ ; [selev(MAN2)]^C^CINSERT C:/SBLOCK/SELEV/MAN2 \ ; [selev(MAN3)]^C^CINSERT C:/SBLOCK/SELEV/MAN3 \ ; [selev(MAN4)]^C^CINSERT C:/SBLOCK/SELEV/MAN4 \ ; [selev(MAN5)]^C^CINSERT C:/SBLOCK/SELEV/MAN5 \ ; [selev(MAN6)]^C^CINSERT C:/SBLOCK/SELEV/MAN6 \ ; [selev(MAN7)]^C^CINSERT C:/SBLOCK/SELEV/MAN7 \ ; [selev(MAN8)]^C^CINSERT C:/SBLOCK/SELEV/MAN8 \ ; [ EXIT ]^C^C **SEC **SECTITLE [*** SECTION TITLE LIST ***] [SSEC(STI01)]^c^cINSERT C:/SBLOCK/SSEC/STI01 \ \EXPLODE L [SSEC(STI02)]^c^cINSERT C:/SBLOCK/SSEC/STI02 \ \EXPLODE L [ EXIT ]^C^C [ EXIT ]^C^C **SECRNAME1 [*** SECTION ROOM NAME LIST ***] [ssec(SRN01)]^c^cINSERT C:/SBLOCK/SSEC/SRN01 \ \EXPLODE L [ssec(SRN02)]^c^cINSERT C:/SBLOCK/SSEC/SRN02 \ \EXPLODE L [ssec(SRN03)]^c^cINSERT C:/SBLOCK/SSEC/SRN03 \ \EXPLODE L [ssec(SRN04)]^c^cINSERT C:/SBLOCK/SSEC/SRN04 \ \EXPLODE L [ssec(SRN05)]^c^cINSERT C:/SBLOCK/SSEC/SRN05 \ \EXPLODE L [ssec(SRN06)]^c^cINSERT C:/SBLOCK/SSEC/SRN06 \ \EXPLODE L [ssec(SRN07)]^c^cINSERT C:/SBLOCK/SSEC/SRN07 \ \EXPLODE L [ssec(SRN08)]^c^cINSERT C:/SBLOCK/SSEC/SRN08 \ \EXPLODE L [ssec(SRN09)]^c^cINSERT C:/SBLOCK/SSEC/SRN09 \ \EXPLODE L [ssec(SRN10)]^c^cINSERT C:/SBLOCK/SSEC/SRN10 \ \EXPLODE L [ssec(SRN11)]^c^cINSERT C:/SBLOCK/SSEC/SRN11 \ \EXPLODE L [ssec(SRN12)]^c^cINSERT C:/SBLOCK/SSEC/SRN12 \ \EXPLODE L [ssec(SRN13)]^c^cINSERT C:/SBLOCK/SSEC/SRN13 \ \EXPLODE L [ssec(SRN14)]^c^cINSERT C:/SBLOCK/SSEC/SRN14 \ \EXPLODE L [ NEXT ]^c^c$I=SECRNAME2 $I=* [ EXIT ]^c^c **SECRNAME2 [*** SECTION ROOM NAME LIST ***] [ssec(SRN15)]^c^cINSERT C:/SBLOCK/SSEC/SRN15 \ \EXPLODE L [ssec(SRN16)]^c^cINSERT C:/SBLOCK/SSEC/SRN16 \ \EXPLODE L [ssec(SRN17)]^c^cINSERT C:/SBLOCK/SSEC/SRN17 \ \EXPLODE L [ssec(SRN18)]^c^cINSERT C:/SBLOCK/SSEC/SRN18 \ \EXPLODE L [ssec(SRN19)]^c^cINSERT C:/SBLOCK/SSEC/SRN19 \ \EXPLODE L [ssec(SRN20)]^c^cINSERT C:/SBLOCK/SSEC/SRN20 \ \EXPLODE L [ssec(SRN21)]^c^cINSERT C:/SBLOCK/SSEC/SRN21 \ \EXPLODE L [ssec(SRN22)]^c^cINSERT C:/SBLOCK/SSEC/SRN22 \ \EXPLODE L [ssec(SRN101)]^c^cINSERT C:/SBLOCK/SSEC/SRN101 \ \EXPLODE L [ssec(SRN102)]^c^cINSERT C:/SBLOCK/SSEC/SRN102 \ \EXPLODE L [ssec(SRN103)]^c^cINSERT C:/SBLOCK/SSEC/SRN103 \ \EXPLODE L [ssec(SRN104)]^c^cINSERT C:/SBLOCK/SSEC/SRN104 \ \EXPLODE L [ssec(SRN105)]^c^cINSERT C:/SBLOCK/SSEC/SRN105 \ \EXPLODE L [ssec(SRN106)]^c^cINSERT C:/SBLOCK/SSEC/SRN106 \ \EXPLODE L [ NEXT ]^c^c$I=SECRNAME3 $I=* [ EXIT ]^c^c **SECRNAME3 [*** SECTION ROOM NAME LIST ***] [ssec(SRN107)]^c^cINSERT C:/SBLOCK/SSEC/SRN107 \ \EXPLODE L [ NEXT ]^c^c$I=SECRNAME1 $I=* [ PREVIOUS ]^c^c$I=SECRNAME2 $I=* [ EXIT ]^c^c **NB **NSM1 [*** SYMBOL MARK ***] [SNB(NSM01)]^c^cINSERT C:/SBLOCK/SNB/NSM01 \ \ [SNB(NSM02)]^c^cINSERT C:/SBLOCK/SNB/NSM02 END \ \ [SNB(NSM03)]^c^cINSERT C:/SBLOCK/SNB/NSM03 \ \ [SNB(NSM04)]^c^cINSERT C:/SBLOCK/SNB/NSM04 \ \ [SNB(NSM05)]^c^cINSERT C:/SBLOCK/SNB/NSM05 end \ \ [SNB(NSM06)]^c^cINSERT C:/SBLOCK/SNB/NSM06 \ \ [SNB(NSM07)]^c^cINSERT C:/SBLOCK/SNB/NSM07 \ \ [SNB(NSM08)]^c^cINSERT C:/SBLOCK/SNB/NSM08 \ \ [ EXIT ]^c^c **NSM2 [*** SYMBOL MARK ***] [SNB(NSM11)]^c^cINSERT C:/SBLOCK/SNB/NSM11 \ \ [SNB(NSM15)]^c^cINSERT C:/SBLOCK/SNB/NSM15 \ \EXPLODE L [SNB(NSM19)]^c^cINSERT C:/SBLOCK/SNB/NSM19 END \ \EXPLODE L [ EXIT ]^c^c [SNB(NSM12)]^c^cINSERT C:/SBLOCK/SNB/NSM12 \ \ [SNB(NSM16)]^c^cINSERT C:/SBLOCK/SNB/NSM16 \ \EXPLODE L [SNB(NSM20)]^c^cINSERT C:/SBLOCK/SNB/NSM20 END \ \EXPLODE L [ EXIT ]^c^c [SNB(NSM13)]^c^cINSERT C:/SBLOCK/SNB/NSM13 \ \ [SNB(NSM17)]^c^cINSERT C:/SBLOCK/SNB/NSM17 \ \ [SNB(NSM21)]^c^cINSERT C:/SBLOCK/SNB/NSM21 END \ \EXPLODE L [ EXIT ]^c^c [SNB(NSM14)]^c^cINSERT C:/SBLOCK/SNB/NSM14 \ \ [SNB(NSM18)]^c^cINSERT C:/SBLOCK/SNB/NSM18 \ \ [SNB(NSM22)]^c^cINSERT C:/SBLOCK/SNB/NSM22 END \ \EXPLODE L [ EXIT ]^c^c **2-4 [] [SNB(2-4N)]^c^cINSERT C:/SBLOCK/SNB/2-4N \ \ [ EXIT ]^c^c [SNB(2-4S)]^c^cINSERT C:/SBLOCK/SNB/2-4S \ \ [ EXIT ]^c^c **FF40 [*** STRUCTURAL LIST (SCALE=1/40) ***] [snb(FF01)]^c^cINSERT C:/SBLOCK/SNB/FF40-01 \ \EXPLODE L [snb(FF02)]^c^cINSERT C:/SBLOCK/SNB/FF40-02 \ \EXPLODE L [snb(FF03)]^c^cINSERT C:/SBLOCK/SNB/FF40-03 \ \EXPLODE L [snb(FF04)]^c^cINSERT C:/SBLOCK/SNB/FF40-04 \ \EXPLODE L [snb(FF05)]^c^cINSERT C:/SBLOCK/SNB/FF40-05 \ \EXPLODE L [snb(FF06)]^c^cINSERT C:/SBLOCK/SNB/FF40-06 \ \EXPLODE L [snb(FF07)]^c^cINSERT C:/SBLOCK/SNB/FF40-07 \ \EXPLODE L [snb(FF100)]^c^c$I=FF100 $I=* [ EXIT ]^c^c **FF100 [*** STRUCTURAL LIST (SCALE=1/100) ***] [snb(FF01)]^c^cINSERT C:/SBLOCK/SNB/FF100-01 \ \EXPLODE L [snb(FF02)]^c^cINSERT C:/SBLOCK/SNB/FF100-02 \ \EXPLODE L [snb(FF03)]^c^cINSERT C:/SBLOCK/SNB/FF100-03 \ \EXPLODE L [snb(FF04)]^c^cINSERT C:/SBLOCK/SNB/FF100-04 \ \EXPLODE L [snb(FF05)]^c^cINSERT C:/SBLOCK/SNB/FF100-05 \ \EXPLODE L [snb(FF06)]^c^cINSERT C:/SBLOCK/SNB/FF100-06 \ \EXPLODE L [snb(FF07)]^c^cINSERT C:/SBLOCK/SNB/FF100-07 \ \EXPLODE L [snb(FF150)]^c^c$I=FF150 $I=* [ EXIT ]^c^c **FF150 [*** STRUCTURAL LIST (SCALE=1/150) ***] [snb(FF01)]^c^cINSERT C:/SBLOCK/SNB/FF150-01 \ \EXPLODE L [snb(FF02)]^c^cINSERT C:/SBLOCK/SNB/FF150-02 \ \EXPLODE L [snb(FF03)]^c^cINSERT C:/SBLOCK/SNB/FF150-03 \ \EXPLODE L [snb(FF04)]^c^cINSERT C:/SBLOCK/SNB/FF150-04 \ \EXPLODE L [snb(FF05)]^c^cINSERT C:/SBLOCK/SNB/FF150-05 \ \EXPLODE L [snb(FF06)]^c^cINSERT C:/SBLOCK/SNB/FF150-06 \ \EXPLODE L [snb(FF07)]^c^cINSERT C:/SBLOCK/SNB/FF150-07 \ \EXPLODE L [snb(FF40)]^c^c$I=FF40 $I=* [ EXIT ]^c^c **SHIM **SWINDOW [*** SELECT OF THE SECTION WINDOW LIST ***] [SHIM(SWIN1)]^c^c^P(if (not c:SWIN1) (load"c:/acad/ama/SWIN1"))(princ) SWIN1 [SHIM(SWIN2)]^c^c^P(if (not c:SWIN2) (load"c:/acad/ama/SWIN2"))(princ) SWIN2 [SHIM(SWIN3)]^c^c^P(if (not c:SWIN3) (load"c:/acad/ama/SWIN3"))(princ) SWIN3 [SHIM(SWIN4)]^c^c^P(if (not c:SWIN4) (load"c:/acad/ama/SWIN4"))(princ) SWIN4 [SHIM(SWIN5)]^c^c^P(if (not c:SWIN5) (load"c:/acad/ama/SWIN5"))(princ) SWIN5 [SHIM(SWIN6)]^c^c^P(if (not c:SWIN6) (load"c:/acad/ama/SWIN6"))(princ) SWIN6 [SHIM(SWIN7)]^c^c^P(if (not c:SWIN7) (load"c:/acad/ama/SWIN7"))(princ) SWIN7 [SHIM(SWIN8)]^c^c^P(if (not c:SWIN8) (load"c:/acad/ama/SWIN8"))(princ) SWIN8 [SHIM(SWIN9)]^c^c^P(if (not c:SWIN9) (load"c:/acad/ama/SWIN9"))(princ) SWIN9 **UDOOR1 [*** UNIT DOOR LIST1 ***] [SHIM(UDOOR1)]^c^c^P(if (not c:door1) (load"c:/acad/ama/door1"))(princ) door1 [SHIM(UDOOR2)]^c^c^P(if (not c:door2) (load"c:/acad/ama/door2"))(princ) door2 [SHIM(UDOOR4)]^c^c^P(if (not c:door3) (load"c:/acad/ama/door3"))(princ) door3 [SHIM(UDOOR5)]^c^c^P(if (not c:door4) (load"c:/acad/ama/door4"))(princ) door4 [SHIM(UDOOR3)]^c^c^P(if (not c:door5) (load"c:/acad/ama/door5"))(princ) door5 [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C [SHIM(UDOOR6)]^c^c^P(if (not c:door6) (load"c:/acad/ama/door6"))(princ) door6 [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C [SHIM(UDOOR9)]^c^c^P(if (not c:door9) (load"c:/acad/ama/door9"))(princ) door9 [SHIM(UDOOR10)]^c^c^P(if (not c:door10) (load"c:/acad/ama/door10"))+ (princ) door10 [SHIM(UDOOR7)]^c^c^P(if (not c:door7) (load"c:/acad/ama/door7"))(princ) door7 [SHIM(UDOOR8)]^c^c^P(if (not c:door8) (load"c:/acad/ama/door8"))(princ) door8 **UWINDOW1 [*** UNIT WINDOW LIST1 ***] [SHIM(WIN1)]^c^c^P(if (not c:win1) (load"c:/acad/ama/win1"))(princ) win1 [SHIM(WIN2)]^c^c^P(if (not c:win2) (load"c:/acad/ama/win2"))(princ) win2 [SHIM(WIN3)]^c^c^P(if (not c:win3) (load"c:/acad/ama/win3"))(princ) win3 [SHIM(WIN4)]^c^c^P(if (not c:win4) (load"c:/acad/ama/win4"))(princ) win4 [SHIM(WIN5)]^c^c^P(if (not c:win5) (load"c:/acad/ama/win5"))(princ) win5 [SHIM(WIN6)]^c^c^P(if (not c:win6) (load"c:/acad/ama/win6"))(princ) win6 [SHIM(WIN7)]^c^c^P(if (not c:win7) (load"c:/acad/ama/win7"))(princ) win7 [SHIM(WIN9)]^c^c^P(if (not c:win9) (load"c:/acad/ama/win9"))(princ) win9 [SHIM(WIN8)]^c^c^P(if (not c:win8) (load"c:/acad/ama/win8"))(princ) win8 [SHIM(WIN11)]^c^c^P(if (not c:win11) (load"c:/acad/ama/win11"))(princ) win11 [SHIM(WIN12)]^c^c^P(if (not c:win12) (load"c:/acad/ama/win12"))(princ) win12 [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C [ EXIT ]^C^C **WINDOWA [*** CA. WINDOW LIST1 ***] [WIN(CAW1)]^c^cINSERT C:/SBLOCK/WIN/CAW1 int \ EXPLODE L [WIN(CAW2)]^c^cINSERT C:/SBLOCK/WIN/CAW2 int \ EXPLODE L [WIN(CAW3)]^c^cINSERT C:/SBLOCK/WIN/CAW3 int \ EXPLODE L [WIN(CAW4)]^c^cINSERT C:/SBLOCK/WIN/CAW4 int \ EXPLODE L [WIN(CAW5)]^c^cINSERT C:/SBLOCK/WIN/CAW5 int \ EXPLODE L [WIN(CAW6)]^c^cINSERT C:/SBLOCK/WIN/CAW6 int \ EXPLODE L [WIN(CAW7)]^c^cINSERT C:/SBLOCK/WIN/CAW7 int \ EXPLODE L [WIN(CAW8)]^c^cINSERT C:/SBLOCK/WIN/CAW8 int \ EXPLODE L [WIN(CAW9)]^c^cINSERT C:/SBLOCK/WIN/CAW9 int \ EXPLODE L [WIN(CAW10)]^c^cINSERT C:/SBLOCK/WIN/CAW10 int \ EXPLODE L [WIN(CAW11)]^c^cINSERT C:/SBLOCK/WIN/CAW11 int \ EXPLODE L [WIN(CAW12)]^c^cINSERT C:/SBLOCK/WIN/CAW12 int \ EXPLODE L [WIN(CAW13)]^c^cINSERT C:/SBLOCK/WIN/CAW13 int \ EXPLODE L [WIN(CAW14)]^c^cINSERT C:/SBLOCK/WIN/CAW14 int \ EXPLODE L [ NEXT ]$I=WINDOWC $I=* [ EXIT ]^c^c **WINDOWB [*** W. WINDOW LIST1 ***] [WIN(WW1)]^c^cINSERT C:/SBLOCK/WIN/WW1 int \ EXPLODE L [WIN(WW2)]^c^cINSERT C:/SBLOCK/WIN/WW2 int \ EXPLODE L [WIN(WW3)]^c^cINSERT C:/SBLOCK/WIN/WW3 int \ EXPLODE L [WIN(WW4)]^c^cINSERT C:/SBLOCK/WIN/WW4 int \ EXPLODE L [WIN(WW5)]^c^cINSERT C:/SBLOCK/WIN/WW5 int \ EXPLODE L [WIN(WW6)]^c^cINSERT C:/SBLOCK/WIN/WW6 int \ EXPLODE L [WIN(WW7)]^c^cINSERT C:/SBLOCK/WIN/WW7 int \ EXPLODE L [WIN(WW8)]^c^cINSERT C:/SBLOCK/WIN/WW8 int \ EXPLODE L [WIN(WW9)]^c^cINSERT C:/SBLOCK/WIN/WW9 int \ EXPLODE L [ NEXT ]$I=WINDOWD $I=* [ NEXT ]$I=WINDOWD $I=* [ NEXT ]$I=WINDOWD $I=* [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **WINDOWC [*** CA. WINDOW LIST2 ***] [WIN(CAW21)]^c^cINSERT C:/SBLOCK/WIN/CAW21 int \ EXPLODE L [WIN(CAW22)]^c^cINSERT C:/SBLOCK/WIN/CAW22 int \ EXPLODE L [WIN(CAW23)]^c^cINSERT C:/SBLOCK/WIN/CAW23 int \ EXPLODE L [WIN(CAW24)]^c^cINSERT C:/SBLOCK/WIN/CAW24 int \ EXPLODE L [WIN(CAW25)]^c^cINSERT C:/SBLOCK/WIN/CAW25 int \ EXPLODE L [WIN(CAW26)]^c^cINSERT C:/SBLOCK/WIN/CAW26 int \ EXPLODE L [WIN(CAW27)]^c^cINSERT C:/SBLOCK/WIN/CAW27 int \ EXPLODE L [WIN(CAW28)]^c^cINSERT C:/SBLOCK/WIN/CAW28 int \ EXPLODE L [WIN(CAW29)]^c^cINSERT C:/SBLOCK/WIN/CAW29 int \ EXPLODE L [WIN(CAW210)]^c^cINSERT C:/SBLOCK/WIN/CAW210 int \ EXPLODE L [ NEXT ]$I=WINDOWA $I=* [ NEXT ]$I=WINDOWA $I=* [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **WINDOWD [*** W. WINDOW LIST2 ***] [WIN(WW21)]^c^cINSERT C:/SBLOCK/WIN/WW21 int \ EXPLODE L [WIN(WW22)]^c^cINSERT C:/SBLOCK/WIN/WW22 int \ EXPLODE L [WIN(WW23)]^c^cINSERT C:/SBLOCK/WIN/WW23 int \ EXPLODE L [WIN(WW24)]^c^cINSERT C:/SBLOCK/WIN/WW24 int \ EXPLODE L [WIN(WW25)]^c^cINSERT C:/SBLOCK/WIN/WW25 int \ EXPLODE L [WIN(WW26)]^c^cINSERT C:/SBLOCK/WIN/WW26 int \ EXPLODE L [WIN(WW27)]^c^cINSERT C:/SBLOCK/WIN/WW27 int \ EXPLODE L [WIN(WW28)]^c^cINSERT C:/SBLOCK/WIN/WW28 int \ EXPLODE L [WIN(WW29)]^c^cINSERT C:/SBLOCK/WIN/WW29 int \ EXPLODE L [ NEXT ]$I=WINDOWB $I=* [ NEXT ]$I=WINDOWB $I=* [ NEXT ]$I=WINDOWB $I=* [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **WINDOWE [*** CA. DOOR LIST ***] [WIN(CAD1)]^c^cINSERT C:/SBLOCK/WIN/CAD1 int \ EXPLODE L [WIN(CAD2)]^c^cINSERT C:/SBLOCK/WIN/CAD2 int \ EXPLODE L [WIN(CAD3)]^c^cINSERT C:/SBLOCK/WIN/CAD3 int \ EXPLODE L [WIN(CAD4)]^c^cINSERT C:/SBLOCK/WIN/CAD4 int \ EXPLODE L [WIN(CAD5)]^c^cINSERT C:/SBLOCK/WIN/CAD5 int \ EXPLODE L [WIN(CAD6)]^c^cINSERT C:/SBLOCK/WIN/CAD6 int \ EXPLODE L [WIN(CAD7)]^c^cINSERT C:/SBLOCK/WIN/CAD7 int \ EXPLODE L [WIN(CAD8)]^c^cINSERT C:/SBLOCK/WIN/CAD8 int \ EXPLODE L [WIN(CAD9)]^c^cINSERT C:/SBLOCK/WIN/CAD9 int \ EXPLODE L [WIN(CAD10)]^c^cINSERT C:/SBLOCK/WIN/CAD10 int \ EXPLODE L [WIN(CAD11)]^c^cINSERT C:/SBLOCK/WIN/CAD11 int \ EXPLODE L [WIN(CAD12)]^c^cINSERT C:/SBLOCK/WIN/CAD12 int \ EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **WINDOWF [*** W. DOOR LIST ***] [WIN(WD1)]^c^cINSERT C:/SBLOCK/WIN/WD1 int \ EXPLODE L [WIN(WD2)]^c^cINSERT C:/SBLOCK/WIN/WD2 int \ EXPLODE L [WIN(WD3)]^c^cINSERT C:/SBLOCK/WIN/WD3 int \ EXPLODE L [WIN(WD4)]^c^cINSERT C:/SBLOCK/WIN/WD4 int \ EXPLODE L [WIN(WD5)]^c^cINSERT C:/SBLOCK/WIN/WD5 int \ EXPLODE L [WIN(WD6)]^c^cINSERT C:/SBLOCK/WIN/WD6 int \ EXPLODE L [WIN(WD7)]^c^cINSERT C:/SBLOCK/WIN/WD7 int \ EXPLODE L [WIN(WD8)]^c^cINSERT C:/SBLOCK/WIN/WD8 int \ EXPLODE L [WIN(WD9)]^c^cINSERT C:/SBLOCK/WIN/WD9 int \ EXPLODE L [WIN(WD10)]^c^cINSERT C:/SBLOCK/WIN/WD10 int \ EXPLODE L [WIN(WD11)]^c^cINSERT C:/SBLOCK/WIN/WD11 int \ EXPLODE L [WIN(WD12)]^c^cINSERT C:/SBLOCK/WIN/WD12 int \ EXPLODE L [WIN(WD13)]^c^cINSERT C:/SBLOCK/WIN/WD13 int \ EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **WINDOWG [*** ST. DOOR LIST ***] [WIN(SD1)]^c^cINSERT C:/SBLOCK/WIN/SD1 int \ EXPLODE L [WIN(SD2)]^c^cINSERT C:/SBLOCK/WIN/SD2 int \ EXPLODE L [WIN(SD3)]^c^cINSERT C:/SBLOCK/WIN/SD3 int \ EXPLODE L [WIN(SD4)]^c^cINSERT C:/SBLOCK/WIN/SD4 int \ EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **WINDOWH [*** SS. DOOR LIST ***] [WIN(SSD1)]^c^cINSERT C:/SBLOCK/WIN/SSD1 int \ EXPLODE L [WIN(SSD2)]^c^cINSERT C:/SBLOCK/WIN/SSD2 int \ EXPLODE L [WIN(SSD3)]^c^cINSERT C:/SBLOCK/WIN/SSD3 int \ EXPLODE L [WIN(SSD4)]^c^cINSERT C:/SBLOCK/WIN/SSD4 int \ EXPLODE L [WIN(SSD5)]^c^cINSERT C:/SBLOCK/WIN/SSD5 int \ EXPLODE L [WIN(SSD6)]^c^cINSERT C:/SBLOCK/WIN/SSD6 int \ EXPLODE L [WIN(SSD7)]^c^cINSERT C:/SBLOCK/WIN/SSD7 int \ EXPLODE L [WIN(SSD8)]^c^cINSERT C:/SBLOCK/WIN/SSD8 int \ EXPLODE L [WIN(SSD9)]^c^cINSERT C:/SBLOCK/WIN/SSD9 int \ EXPLODE L [WIN(SSD10)]^c^cINSERT C:/SBLOCK/WIN/SSD10 int \ EXPLODE L [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c [ EXIT ]^c^c **poly [Set Spline Fit Variables] [acad(pm-quad,Quadric Fit Polymesh)]'surftype 5 [acad(pm-cubic,Cubic Fit Polymesh)]'surftype 6 [acad(pm-bezr,Bezier Fit Polymesh)]'surftype 8 [acad(pl-quad,Quadric Fit Polyline)]'splinetype 5 [acad(pl-cubic,Cubic Fit Polyline)]'splinetype 6 **3DObjects [3D Objects] [acad(box3d,3D Box)]^C^Cai_box [acad(Pyramid)]^C^Cai_pyramid [acad(Wedge)]^C^Cai_wedge [acad(Dome)]^C^Cai_dome [acad(Sphere)]^C^Cai_sphere [acad(Cone)]^C^Cai_cone [acad(Torus)]^C^Cai_torus [acad(Dish)]^C^Cai_dish [acad(Mesh)]^C^Cai_mesh **fonts1 [Select Text Font] [acad(romans,Roman Simplex)]'_style romans romans [acad(romanc,Roman Complex)]'_style romanc romanc [acad(romand,Roman Duplex)]'_style romand romand [acad(romant,Roman Triplex)]'_style romant romant [acad(italicc,Italic Complex)]'_style italicc italicc [acad(italict,Italic Triplex)]'_style italict italict [acad(scripts,Script Simplex)]'_style scripts scripts [acad(scriptc,Script Complex)]'_style scriptc scriptc [acad(cyrillic,Cyrillic Alpha.)]'_style cyrillic cyrillic [acad(cyriltlc,Cyrillic Trans.)]'_style cyriltlc cyriltlc [acad(greeks,Greek Simplex)]'_style greeks greeks [acad(greekc,Greek Complex)]'_style greekc greekc [acad(gothice,Gothic English)]'_style gothice gothice [acad(gothicg,Gothic German)]'_style gothicg gothicg [acad(gothici,Gothic Italian)]'_style gothici gothici [acad(syastro,Astronomical)]'_style syastro syastro [acad(symath,Mathematical)]'_style symath symath [acad(symusic,Music Symbols)]'_style symusic symusic [acad(symap,Mapping Symbols)]'_style symap symap [acad(symeteo,Meteorological)]'_style symeteo symeteo [acad(cibt,City Blueprint)]'_style CityBlueprint cibt____.pfb [acad(cobt,Country Blueprint)]'_style CountryBlueprint cobt____.pfb [acad(eur,EuroRoman)]'_style EuroRoman eur_____.pfb [acad(euro,EuroRoman Oblique)]'_style EuroRomanOblique euro____.pfb [acad(par,PanRoman)]'_style PanRoman par_____.pfb [acad(rom,Romantic)]'_style Romantic rom_____.pfb [acad(romb,Romantic Bold)]'_style RomanticBold romb____.pfb [acad(romi,Romantic Italic)]'_style RomanticItalic romi____.pfb [acad(sas,SansSerif)]'_style SansSerif sas_____.pfb [acad(sasb,SansSerif Bold)]'_style SansSerifBold sasb____.pfb [acad(sasbo,SansSerif Bold Oblique)]'_style SansSerifBoldOblique sasbo___.pfb [acad(saso,SansSerif Oblique)]'_style SansSerifOblique saso____.pfb [acad(suf,Super French)]'_style SuperFrench suf_____.pfb [acad(te,Technic)]'_style Technic te______.pfb [acad(teb,Technic Bold)]'_style TechnicBold teb_____.pfb [acad(tel,Technic Light)]'_style TechnicLight tel_____.pfb [acad(monotxt,Mono-spaced TXT)]'_style monotxt monotxt [acad(txt,Original TXT)]'_style txt txt **vporti [Tiled Viewport Layout] [acad(vport-1,Single)]^C^C(ai_tiledvp 1 nil) [acad(vport-3v,Three: Vertical)]^C^C(ai_tiledvp 3 "V") [acad(vport-3h,Three: Horizontal)vp3h]^C^C(ai_tiledvp 3 "H") [acad(vport-4,Four: Equal)]^C^C(ai_tiledvp 4 nil) [acad(vport-2v,Two: Vertical)]^C^C(ai_tiledvp 2 "V") [acad(vport-3r,Three: Right)]^C^C(ai_tiledvp 3 "R") [acad(vport-3l,Three: Left)]^C^C(ai_tiledvp 3 "L") [acad(vport-4l,Four: Left)]^C^C(ai_tiledvp 4 "L") [acad(vport-2h,Two: Horizontal)]^C^C(ai_tiledvp 2 "H") [acad(vport-3a,Three: Above)]^C^C(ai_tiledvp 3 "A") [acad(vport-3b,Three: Below)]^C^C(ai_tiledvp 3 "B") [acad(vport-4r,Four: Right)]^C^C(ai_tiledvp 4 "R") **Comment Begin AutoCAD Screen Menus ***SCREEN **S [Auto CAD]^c^c$S=X $S=S $P1=POP1 $P3=POP3 [S - CAD]^c^c$S=SCAD [* * * *]$S=OSNAPB [ASE]^C^C^P(ai_aseinit_chk) ^P [BLOCKS]{B} $S=BL [DIM:]^C^C_DIM [DISPLAY]{B} $S=DS [DRAW]{B} $S=DR [EDIT]{B} $S=ED [INQUIRY]{B} $S=INQ [LAYER...]$S=LAYER '_DDLMODES [MODEL]{B} $S=SOLIDS [MVIEW]$S=MVIEW [PLOT...]^C^C_PLOT [RENDER]{B} $S=RENDER [SETTINGS]{B} $S=SET [SURFACES]{B} $S=3D [UCS:]^C^C_UCS [UTILITY]{B} $S=UT [SAVE:]^C^C_QSAVE [CURRENT]^c^cCURLAY [0.......]'LAYER S 0 ;;; [FN......]'LAYER S FN ;;; [HIDDENS.]'LAYER S HIDDENS ;;; [HIDDENL.]'LAYER S HIDDENL ;;; [DW......]'LAYER S DW ;;; [DW1.....]'LAYER S DW1 ;;; [WALL....]'LAYER S WALL ;;; [ARWALL..]'LAYER S ARWALL ;;; [CEN1....]'LAYER S CEN1 ;;; [CEN2....]'LAYER S CEN2 ;;; [DIM.....]'LAYER S DIM ;;; [TEXT....]'LAYER S TEXT ;;; [BAR.....]'LAYER S BAR ;;; [HA......]'LAYER S HA ;;; [BLOCK...]'LAYER S BLOCK ;;; [BOARD...]'LAYER S BOARD ;;; [USER1...]'LAYER S USER1 ;;; [USER2...]'LAYER S USER2 ;;; [USER3...]'LAYER S USER3 ;;; [USER4...]'LAYER S USER4 ;;; **SCAD 4 [A......]^c^c$S=A-COMMAND [B......]^c^c$S=B-COMMAND [C......]^c^c$S=C-COMMAND [D......]^c^c$S=D-COMMAND [E......]^c^c$S=E-COMMAND [F......]^c^c$S=F-COMMAND [G......]^c^c$S=G-COMMAND [H......]^c^c$S=H-COMMAND [I......]^c^c$S=I-COMMAND [J......]^c^c$S=J-COMMAND [K......]^c^c$S=K-COMMAND [L......]^c^c$S=L-COMMAND [M......]^c^c$S=M-COMMAND [N......]^c^c$S=N-COMMAND [O......]^c^c$S=O-COMMAND [P......]^c^c$S=P-COMMAND [Q......]^c^c$S=Q-COMMAND [R......]^c^c$S=R-COMMAND [S......]^c^c$S=S-COMMAND [T......]^c^c$S=T-COMMAND [U......]^c^c$S=U-COMMAND [V......]^c^c$S=V-COMMAND [W......]^c^c$S=W-COMMAND [X......]^c^c$S=X-COMMAND [Y......]^c^c$S=Y-COMMAND [Z......]^c^c$S=Z-COMMAND **A-COMMAND 4 [ABOUT....]'ABOUT [APERTURE.]'APERTURE [ARC......]^c^cARC [ARCE.....]^c^cARCE [AREA.....]^c^cAREA [AREAB....]^c^cAREAB [ARRAY....]^c^cARRAY [ATTDEF...]^c^cATTDEF [ATTDISP..]'ATTDISP [ATTEDIT..]^c^cATTEDIT [ATTEXT...]^c^cATTEXT [AUDIT....]^c^cAUDIT [AUTOWALL.]^c^cAUTOWALL [AWWIN....]^c^cAWWIN **B-COMMAND 4 [BALCONYD.]^c^cBALCONYD [BALCONYS.]^c^cBALCONYS [BAR1EA...]^c^cBAR1EA [BAR4EA...]^c^cBAR4EA [BASE.....]'BASE [BEAM1....]^c^cBEAM1 [BEAM2....]^c^cBEAM2 [BHATCH...]^c^cBHATCH [BLIPMODE.]'BLIPMODE [BLIST....]^c^cBLIST [BLOCK....]^c^cBLOCK [BOUND....]^c^cBOUND [BOX......]^c^cBOX [BOX-1....]^c^cBOXX [BPOLY....]^c^cBPOLY [BREAK....]^c^cBREAK [BREAK1...]^c^cBREAK1 [BREAK2...]^c^cBREAK2 [BREAKI...]^c^cBREAKI [BREAKL...]^c^cBREAKL [BUBBLE...]^c^cBUBBLE **C-COMMAND 4 [CAR......]^c^cCAR [CANCLE...]^c^c [CENT.....]^c^cCENT [CHAMFER..]^c^cCHAMFER [CHANGE...]^c^c$S=C-CHANGE [CHGDATE..]^c^cCHGDATE [CIRCLE...]^c^cCIRCLE [CLIST....]^c^cCLIST [COLOR....]'COLOR [COLUMN...]^c^cCOLUMN [COMPILE..]^c^cCOMPILE [CONFIG...]^c^cCONFIG [CONVERTD.]^c^cCONVERTD [COPY.....]^c^cCOPY [COPY MULT]^c^cCOPYM [CUT......]^c^cCUT **C-CHANGE 4 [CHANGE...]^c^cCHANGE [TEXT ALL]^c^cCHGTEXT [ANGLE....]^c^cCHGANGLE [HEIGHT...]^c^cCHGTEXTH [JOIN.....]^c^cCHGJOIN [LARGE....]^c^cCHGLARGE [MATCH....]^c^cCHGMATCH [PYUNG....]^c^cCHGPYUNG [SMALL....]^c^cCHGSMALL [STRING..D]^c^cCHGTEXTD [STRING...]^c^cCHGTEXTS [STYLE....]^c^cCHGSTYLE [WIDTH....]^c^cCHGWIDTH [ + ]^c^cCHGTOTAL [ - ]^c^cCHG- [ X ]^c^cCHG* [ / ]^c^cCHG/ [CHPROP...]^c^cCHPROP [LA,LT,COL]^c^cCHGALL [LAYER....]^c^cCHGLAYER [LASTLAYER]^c^cCHGLASTL [COLOR....]^c^cCHGCOLOR [LINITYPE.]^c^cCHGLTYPE **D-COMMAND 4 [DBLIST...]^c^cDBLIST [DDATTDEF.]^c^cDDATTDEF [DDATTE...]^c^cDDATTE [DDATTEXT.]^c^cDDATTEXT [DDCHROP..]^c^cDDCHROP [DDEDIT...]^c^cDDEDIT [DDEMODES.]'DDEMODES [DDGRIPS..]'DDGRIPS [DDIM.....]^c^cDDIM [DDINSERT.]^c^cDDINSERT [DDLMODES.]'DDLMODES [DDOSNAP..]'DDOSNAP [DDPSTYLE.]'DDPSTYLE [DDRENAME.]^c^cDDRENAME [DDRMODES.]'DDRMODES [DDSELECT.]'DDSELECT [DDUCS....]^c^cDDUCS [DDUNITS..]'DDUNITS [NEXT.....]^c^c$S=D-NEXT1 **D-NEXT1 4 [DELAY....]^c^cDELAY [DETAIL...]^c^cDETAIL [DHTEXT...]^c^c^P(if (not c:dhtext) (xload"hangul.exp"))(princ) dhtext [DIM......]^c^cDIM [DIM1.....]^c^cDIM1 [DIMIN....]^c^cDIMIN [DIMINW...]^c^cDIMINW [DIMOUT...]^c^cDIMOUT [DIMOUTW..]^c^cDIMOUTW [DIRECT...]^c^cDIRECT [DIST.....]'DIST [DIST..E-E]'DISTEE [DIST..E-P]'DISTEP [DIST..N-E]'DISTNP [DIVIDE...]^c^cDIVIDE [DONUT....]^c^cDONUT [DOT......]^c^cDOT [DOUGHNUT.]^c^cDUGHNUT [DRAGMODE.]'DRAGMODE [DTEXT....]^c^cDTEXT [DVIEW....]^c^cDVIEW [DXBIN....]^c^cDXBIN [DXFIN....]^c^cDXFIN [DXFOUT...]^c^cDXFOUT [PREVIOUS.]^c^c$S=D-COMMAND **E-COMMAND 4 [EAWIN....]^c^cEAWIN [EDGESURF.]^c^cEDGESURF [ELEV.....]'ELEV [ELEVP....]^c^cELEVP [ELLIPSE..]^c^cELLIPSE [Elsa View]^c^cEV [END......]^c^cEND [ERASE....]^c^cERASE [ERASE-ALL]^c^cERASEALL [ERASE-COL]^c^cERASECOL [ERASE-ENT]^c^cERASEENT [ERASE-LAY]^c^cERASELAY [ERASE-LT.]^c^cERASELIN [ESDOOR...]'SCRIPT [EXPLODE..]^c^cEXPLODE [EXPL-LAY.]^c^cEXPLODEL [EXPL-MIRR]^c^cEXPLODEM [EXPL-TEXT]^c^c^P(if (not c:texplode) (load"jin2"))+ (princ) texplode [EXT......]^c^cEXT [EXTEND...]^c^cEXTEND [EXTE-CENT]^c^cEXTENDC [EXTE-LINE]^c^cEXTENDL [EXTE-MULT]^c^cEXTENDM **F-COMMAND 4 [FL.......]^c^cFL [FILES....]'FILES [FILL.....]'FILL [FILLET...]^c^cFILLET [FILLET-0.]^c^cFILLET0 [FILLET-?.]^c^cFILLET? [FILMROLL.]^c^cFILMROLL [FORM.....]^c^cFORM **G-COMMAND 4 [GOBBLE...]^c^cGOBBLE [GRAPHSCR.]^c^cGRAPHSCR [GRID.....]'GRID **H-COMMAND 4 [HANDLES..]^c^cHANDLES [HASAL....]^c^cHASAL [HELP.....]'HELP [HIDE.....]^c^cHIDE [HDTEXT...]^c^cHDTEXT [HATCH....]^c^cHATCH [HATCH-D..]^C^C$i=hatch1 $i=* [HATCH-S..]^c^cHATCHS [HAT-CONC.]^c^cHATCONC [HAT-BRICK]^c^cHATBRICK [HAT-BROCK]^c^cHATBROCK [HAT-TILE.]^c^cHATTTI [HAT-XY...]^c^cHATTIXY [HAT-TI100]^c^cHATTI100 [HAT-TI150]^c^cHATTI150 [HAT-TI200]^c^cHATTI200 [HAT-TI300]^c^cHATTI300 [HAT-CONCM]^c^cHATCONCM [HAT-FORM.]^c^cHATFORM [HAT-SLOPE]^c^cHATSLOPE [HAT-GL1..]^c^cHATGL1 [HAT-GL2..]^c^cHATGL2 [HAT-DOT..]^c^cHATDOTS **I-COMMAND 4 [ID.......]^c^cID [IGESIN...]^c^cIGESIN [IGESOUT..]^c^cIGESOUT [INSERT...]^c^cINSERT [ISOPLANE.]'ISOPLANE **J-COMMAND 4 [JOIN-LINE]^c^cJOINS [JOIN-LI-C]^c^cJOINC [JOIN-ARC.]^c^cJOINARC **K-COMMAND 4 [KITCHEN..]^c^cKITCHEN **L-COMMAND 4 [LAYER....]'LAYER [LAYER-D..]'DDLMODES [WORK.....]^c^cCURLAY [WORK-D...]^c^cWORKLAY [FROZEN...]^c^cFRZENLAY [THAW.....]^c^cTHAWLAY [ARWALL...]^c^cTHAWAW [WALL.....]^c^cTHAWBW [FROZEN-S.]^c^cFRZENLAY [FROZENALL]^c^cFRZENALL [THAWALL..]^c^cTHAWALL [LEADER...]^c^cLEADER [LEADERS..]^c^cLEADERS [LEADERW..]^c^cLEADERW [LEVEL....]^c^cLEVEL [LIMITS...]'LIMITS [LINE.....]^c^cLINE [LINE..E-E]^c^cLINEEE [LINE..E-P]^c^cLINEEP [LINE..M-M]^c^cLINEMM [LINE..M-P]^c^cLINEMP [LINETYPE.]'LINETYPE [LIST.....]^c^cLIST [LIST-ARC.]^c^cARCLIST [LOAD.....]^c^cLOAD [LTSCALE..]'LTSCALE **M-COMMAND 4 [MAN......]^c^cMAN [MDOOR....]^c^cMDOOR [MEASURE..]^c^cMEASURE [MENU.....]^c^cMENU [MINSERT..]^c^cMINSERT [MIRROR...]^c^cMIRROR [MOVE.....]^c^cMOVE [MSLIDE...]^c^cMSLIDE [MSPACE...]^c^cMSPACE [MULTIPLE.]^c^cMULTIPLE [MVIEW....]^c^cMVIEW **N-COMMAND 4 [NEW......]^c^cNEW **O-COMMAND 4 [OFFSET...]^c^cOFFSET [OFFSET-M.]^c^cOFFSETM [OOPS.....]^c^cOOPS [OPEN.....]^c^cOPEN [ORTHO....]'ORTHO [OSNAP....]'OSNAP **P-COMMAND 4 [PAN......]'PAN [PARA1....]^c^cPARA1 [PARA2....]^c^cPARA2 [PEDIT....]^c^cPEDIT [PARKING..]^c^cPARKING [PFACE....]^c^cPFACE [PHOUSE...]^c^cPHOUSE [PLAN.....]^c^cPLAN [PLINE....]^c^cPLINE [PLOT.....]^c^cPLOT [POINT....]^c^cPOINT [POLYGON..]^c^cPOLYGON [PSDRAG...]'PSDRAG [PSFILL...]'PSFILL [PSIN.....]^c^cPSIN [PSOUT....]^c^cPSOUT [PSPACE...]^c^cPSPACE [PURGE....]^c^cPURGE **Q-COMMAND 4 [QSAVE....]^c^cQSAVE [QTEXT....]^c^cQTEXT [QUIT.....]^c^cQUIT **R-COMMAND 4 [RECOVER..]^c^cRECOVER [REDEFINE.]^c^cREDEFINE [REDO.....]^c^cREDO [REDRAW...]'REDRAW [REDRAWALL]'REDRAWALL [REGEN....]^c^cREGEN [REGENALL.]^c^cREGENALL [REGENAUTO]'REGENAUTO [REINIT...]^c^cREINIT [RENAME...]^c^cRENAME [RESUME...]^c^cRESUME [REVSURF..]^c^cREVSURF [RSNAMEP..]^c^cRNAMEP [RSNAMES..]^c^cRNAMES [RSNAMEU..]^c^cRNAMEU [ROTATE...]^c^cROTATE [RSCRIPT..]^c^cRSCRIPT [RULESURF.]^c^cRULESURF **S-COMMAND 4 [SAVE.....]^c^cSAVE [SAVEAS...]^c^cSAVEAS [SCALE....]^c^cSCALE [SCALE-XY.]^c^cSCALEXY [SCRIPT...]'SCRIPT [SCH......]^c^cSCH [SCH3.....]^c^cSCH3 [SDOOR....]^c^cSDOOR [SELECT...]^c^cSELECT [SETVAR...]'SETVAR [SEWIN....]^c^cSEWIN [SH.......]^c^cSH [SHADE....]^c^cSHADE [SHAPE....]^c^cSHAPE [SHELL....]^c^cSHELL [SHORT....]^c^cSHORT [SITE-UNIT]^c^cSITE-U [SKETCH...]^c^cSKETCH [SNAP.....]'SNAP [SNAPANG..]^c^cSNAPAN [SOLID....]^c^cSOLID [NEXT.....]^c^c$S=S-NEXT1 **S-NEXT1 [STAIR-SEC]^c^cSTAIR [STAIR-1P.]^c^cSTAIR1P [STAIR-TP.]^c^cSTAIRP [STARTS...]^c^cSTARTS [STATUS...]'STATUS [STRETCH..]^c^cSTRET [STRLST...]^c^cSTRLST [STYLE....]'STYLE [SYMBOL-PL]^c^cSYMBOLPL [SYMBOL-SE]^c^cSYMBOLSE [SYMBOL-SI]^c^cSYMBOLSI [SYMBOL-ST]^c^cSYMBOLST [PREVIOUS.]^c^c$S=S-COMMAND **T-COMMAND 4 [TABLET..]^c^cTABLET [TABLET-R]^C^Ctablet cfg 3 y \\\25 9 \\\14 9 \\\25 7 y \\ [TABLET-0]^C^Ctablet cfg 3 \\\25 9 \\\14 9 \\\25 7 y \\ [TABSURF.]^c^cTABSURF [TDOOR...]^c^cTDOOR [TEXT....]^c^cTEXT [TEXT-PLA]^c^cTEXTPL1 [TEXT-SIT]^c^cTEXTSI1 [TEXT-UNI]^c^cTEXTUN1 [TEXTSCR.]'TEXTSCR [TIME....]'TIME [TITLE...]^c^cTITLE [TOILET..]^c^cTOILET [TRACE...]^c^cTRACE [TREE....]^c^cTREE [TREESTAT]'TREESTAT [TRIM....]^c^cTRIM [TRIM-ALL]^c^cTRIMALL [TRIM-LIN]^c^cTRIML [TRIM-MUL]^c^cTRIMM [TRIM-SEL]^c^cTRIMS [TRIM-LIN]^c^cTRIML [TYPE-UNI]^c^cTYPEU **U-COMMAND 4 [U.......]^c^cU [UCS.....]^c^cUCS [UCSICON.]^c^cUCSICON [UNDEFINE]^c^cUNDEFINE [UNDO....]^c^cUNDO [UNITS...]'UNITS **V-COMMAND 4 [VIEW....]'VIEW [VIEW-SAV]'VIEW W PLOT 0.000,0.000 INTERSEC \layer s 0 f board ; [VIEWPORT]^c^cVIEWPORTS [VIEWRES.]^c^cVIEWRES [VPLAYER.]^c^cVPLAYER [VPOINT..]^c^cVPOINT [VPORTS..]^c^cVPORTS [VSLIDE..]^c^cVSLIDE **W-COMMAND 4 [WALL-BLI]^c^cWALLBI [WALL-BLO]^c^cWALLBO [WBLOCK..]^c^cWBLOCK [WDOOR-LI]^c^cWD [WDOOR...]^c^cWDOOR [WALLPOIN]^c^cWALLP [WALL-DRA]^c^cWALL [WALL-SEL]^c^cWALLS **X-COMMAND 4 [XBIND...]^c^cXBIND [XREF....]^c^cXREF **Y-COMMAND 4 **Z-COMMAND 4 [ZOOM....]'ZOOM [ZOOM-A-D]'ZOOM A [ZOOM-A-G]'ZA [ZOOM-D..]'ZOOM D [ZOOM-E..]'ZOOM E [ZOOM-IN.]'ZI [ZOOM-OUT]'ZO [ZOOM-P..]'ZOOM P [ZOOM-V..]'ZOOM V [ZOOM-W..]'ZOOM W **HEADER {H} [* * * *]$S=OSNAPB **HEADER0 {H} [* * * *]$S=OSNAPB **HEADER1 {H} [1 * * *]$S=OSNAPB **HEADER2 {H} [* 2 * *]$S=OSNAPB **HEADER3 {H} [1 2 * *]$S=OSNAPB **HEADER4 {H} [* * 3 *]$S=OSNAPB **HEADER5 {H} [1 * 3 *]$S=OSNAPB **HEADER6 {H} [* 2 3 *]$S=OSNAPB **HEADER7 {H} [1 2 3 *]$S=OSNAPB **HEADER8 {H} [* * * 4]$S=OSNAPB **HEADER9 {H} [1 * * 4]$S=OSNAPB **HEADER10 {H} [* 2 * 4]$S=OSNAPB **HEADER11 {H} [1 2 * 4]$S=OSNAPB **HEADER12 {H} [* * 3 4]$S=OSNAPB **HEADER13 {H} [1 * 3 4]$S=OSNAPB **HEADER14 {H} [* 2 3 4]$S=OSNAPB **HEADER15 {H} [1 2 3 4]$S=OSNAPB **X 3 {L} $S= {D} {E} **GRIP_EDIT 3 MOve MIrror ROtate SCale STretch [Base pt]B Copy Reference Undo [eXit]X {L} {D} {E} **BL 4 [ATTDEF:]^C^C_ATTDEF [BASE:]'_BASE [BLOCK:]^C^C_BLOCK [INSERT:]^C^C_INSERT [MINSERT:]^C^C_MINSERT [WBLOCK:]^C^C_WBLOCK [XBIND:]^C^C_XBIND [XREF:]^C^C_XREF **DS 4 [ATTDISP:]'_ATTDISP [DVIEW:]^C^C_DVIEW [MVIEW:]^C^C$S=MVIEW _MVIEW [PAN:]'_PAN [PLAN:]^C^C_PLAN [REDRALL:]'_REDRAWALL [REDRAW:]'_REDRAW [REGEN:]^C^C_REGEN [REGNALL:]^C^C_REGENALL [RGNAUTO:]{B} $S=RGNAUTO '_REGENAUTO [SHADE]$S=SHADE [VIEW:]'_VIEW [VIEWRES:]^C^C_VIEWRES [VPOINT:]^C^C_VPOINT [ZOOM:]'_ZOOM **DR 4 [ARC]$S=ARC [ATTDEF:]^C^C_ATTDEF [BHATCH:]^C^CBHATCH [CIRCLE]$S=CIRCLE [DONUT:]^C^C_DONUT [DTEXT:]^C^C_DTEXT [ELLIPSE:]^C^C_ELLIPSE [HATCH:]^C^C_HATCH [INSERT:]^C^C_INSERT [LINE:]^C^C_LINE [MINSERT:]^C^C_MINSERT [OFFSET:]^C^C_OFFSET [next]{B} $S=DR2 **DR2 4 [PLINE:]^C^C_PLINE [POINT:]^C^C_POINT [POLYGON:]^C^C_POLYGON [SHAPE:]^C^C_SHAPE [SKETCH:]^C^C_SKETCH [SOLID:]^C^C_SOLID [TEXT:]^C^C_TEXT [TRACE:]^C^C_TRACE [3DFACE:]^C^C_3DFACE [3D Surfs]{B} $S=3D [MODELER]{B} $S=SOLIDS [previous]{B} $S=DR **ED 4 [ARRAY:]^C^C_ARRAY [ATTEDIT:]^C^C_ATTEDIT [BREAK:]{B} $S=BREAK0 ^C^C_BREAK [CHAMFER:]^C^C_CHAMFER [CHANGE:]^C^C_CHANGE [CHPROP:]^C^C_CHPROP [COPY:]^C^C_COPY [DDATTE:]^C^C_DDATTE [DDEDIT:]^C^C_DDEDIT [DDMODFY:]^C^CDDMODIFY [DIVIDE:]^C^C_DIVIDE [ERASE:]^C^C_ERASE [EXPLODE:]^C^C_EXPLODE [next]{B} $S=ED2 **ED2 4 [EXTEND:]^C^C_EXTEND [FILLET:]^C^C_FILLET [MEASURE:]^C^C_MEASURE [MIRROR:]^C^C_MIRROR [MOVE:]^C^C_MOVE [OFFSET:]^C^C_OFFSET [PEDIT:]^C^C^Pai_peditm ^P [ROTATE:]^C^C_ROTATE [SCALE:]^C^C_SCALE [SELECT:]^C^C_SELECT [STRETCH:]^C^C_STRETCH C [TRIM:]^C^C_TRIM [UNDO:]^C^C_UNDO [previous]{B} $S=ED **PLOT 4 [PLOT...]^C^C_PLOT [PSOUT:]^C^C_PSOUT {L} {D} {E} **PSOUT 4 [PSOUT:]^C^C_PSOUT [Display]_DISPLAY [Extents]_EXTENTS [Limits]_LIMITS [View]_VIEW [Window]_WINDOW [None]_NONE [EPSI]_EPSI {B} $S=PSOUT2 \$S= $S= [TIFF]_TIFF {B} $S=PSOUT2 \$S= $S= [Inches]_INCHES [Mm]_MILLIMETERS [Fit]_FIT {L} {D} {E} **PSOUT2 4 128 256 512 **INQ 5 [AREA:]^C^C_AREA [DBLIST:]^C_DBLIST [DIST:]'_DIST [HELP:]'_HELP [ID:]^C^C_ID [LIST:]^C^C_LIST [STATUS:]'_STATUS [TIME:]^C^C_TIME **SET 4 [DDEMODES]'_DDEMODES [DDRMODES]'_DDRMODES [--------] [APERTUR:]'_APERTURE [BLIPS:]{B} $S=BLIPMOD '_BLIPMODE [COLOR:]'_COLOR [DRAGMOD:]{B} $S=DRAGMOD '_DRAGMODE [ELEV:]^C^C_ELEV [GRID:]'_GRID [HANDLES:]{B} $S=HANDLS ^C^C_HANDLES [LINETYP:]'_LINETYPE [LIMITS:]'_LIMITS [next]{B} $S=SET2 **SET2 4 [LTSCALE:]'_LTSCALE [ORTHO:]'_ORTHO [OSNAP:]'_OSNAP [QTEXT:]{B} $S=QTXT ^C^C_QTEXT [SETVAR:]'_SETVAR [SNAP:]'_SNAP [STYLE:]'_STYLE [TABLET:]^C^C_TABLET [UCS:]^C^C_UCS [UCSICON:]^C^C_UCSICON [UNITS:]^C^C{B} $S=UNITS0 _UNITS [VPORTS:]^C^C_VPORTS [previous]{B} $S=SET **UT 4 [ATTEXT:]^C^C_ATTEXT [AUDIT:]^C^C{B} $S=AUDIT0 _AUDIT \$S= $S= [DXF/DXB]{B} $S=DXF [FILES:]'_FILES [IGES]{B} $S=IGES [MENU:]^C^C_MENU [PURGE:]^C^C_PURGE [PSOUT:]^C^C_PSOUT [RENAME:]^C^C_RENAME [SCRIPT:]{B} $S=SCRIPT0 '_SCRIPT [SLIDES]{B} $S=SLIDES [External]{B} $S=EXCOMDS [Commands]{B} $S=EXCOMDS [next]{B} $S=UT2 **UT2 4 [NEW...]^C^C_NEW [OPEN...]^C^C_OPEN [SAVE AS:]^C^C_SAVEAS [QSAVE...]^C^C_QSAVE [END:]^C^C_END [QUIT:]^C^C_QUIT [ABOUT:]^C^C_ABOUT [CONFIG:]^C^C_CONFIG [COMPILE:]^C^C_COMPILE [RECOVER:]^C^C_RECOVER [REINIT:]^C^C_REINIT [previous]{B} $S=UT **OSNAPB 4 [ HELP ]$S= '_HELP [CENter]_CENTER $S= [ENDpoint]_ENDPOINT $S= [INSert]_INSERT $S= [INTersec]_INTERSEC $S= [MIDpoint]_MIDPOINT $S= [NEArest]_NEAREST $S= [NODe]_NODE $S= [PERpend]_PERPEND $S= [QUAdrant]_QUADRANT $S= [QUICK,]_QUICK,^Z [TANgent]_TANGENT $S= [NONE]_NONE $S= [CANCEL:]^C^C$S= [U:]^C^C_U $S= [REDO:]^C^C_REDO $S= [REDRAW:]'_REDRAW $S= {L} **OSELECT1 4 [ALL]ALL [Last]_LAST [Previous]_PREVIOUS [Crossing]_CROSSING [Fence]_FENCE [CPolygon]_CPOLYGON [WPolygon]_WPOLYGON [Window]_WINDOW [Add]_ADD [Remove]_REMOVE [Undo]_UNDO [Filters]'filter {L} **BLOCK 4 [BLOCK:]^C^C_BLOCK ? {S} {O} {Y} [OOPS]^C^C_OOPS {L} {D} {E} **INSERT 4 [INSERT:]^C^C_INSERT [File...]~ ? * [corner]_CORNER [xyz]_XYZ [drag]_DRAG [Scale]_SCALE [Xscale]_XSCALE [Yscale]_YSCALE [Zscale]_ZSCALE [Rotate]_ROTATE [Blk Name]'_INSNAME {L} {D} {E} **WBLOCK 4 [WBLOCK:]^C^C_WBLOCK = * [blank]; {S} {O} [Blk Name]'_INSNAME {L} {D} {E} **MINSERT 4 [MINSERT:]^C^C_MINSERT ? [corner]_CORNER [xyz]_XYZ [drag]_DRAG [Blk Name]'_INSNAME {L} {D} {E} **XBIND 4 [XBIND:]^C^C_XBIND [Block]_BLOCK [Dimstyle]_DIMSTYLE [Layer]_LAYER [Ltype]_LTYPE [Style]_STYLE [XREF:]_XREF {L} {D} {E} **XREF 4 [XREF:]^C^C_XREF ? [Attach]_ATTACH [Bind]_BIND [Detach]_DETACH [Path]_PATH [Reload]_RELOAD [Show log]^C^C^PTYPE (strcat (getvar "DWGNAME") ".XLG") ^P [XBIND:]_XBIND {L} {D} {E} **DIM 4 [DIM:]^C^C_DIM [Aligned]_ALIGNED [Angular]_ANGULAR [Diameter]_DIAMETER [Horizntl]_HORIZONTAL [Leader]_LEADER [Ordinate]{B} $S=DIMORD _ORDINATE [Radius]_RADIUS [Rotated]_ROTATED [Vertical]_VERTICAL [Edit]{B} $S=DIMED [Dim Styl]{B} $S=DIMSTY [Dim Vars]{B} $S=VAR1 [next]{B} $S=DIM2 [Exit]EXIT;{B} $S=S {L} {D} {E} **DIM1 4 [DIM:]^C^C_DIM [Aligned]_ALIGNED [Angular]_ANGULAR [Diameter]_DIAMETER [Horizntl]_HORIZONTAL [Leader]_LEADER [Ordinate]{B} $S=DIMORD _ordinate [Radius]_RADIUS [Rotated]_ROTATED [Vertical]_VERTICAL [Edit]{B} $S=DIMED [Dim Styl]{B} $S=DIMSTY [Dim Vars]{B} $S=VAR1 [next]{B} $S=DIM2 [Exit]EXIT;{B} $S=S {L} {D} {E} **DIM2 4 [DIM:]^C^C_DIM [Baseline]_BASELINE [Continue]_CONTINUE [Center]_CENTER [Status]_STATUS [previous]$S=DIM **DIMORD 4 [DIM:]^C^C_DIM [X datum]_XDATUM [Y datum]_YDATUM [Dim Menu]$S=DIM **DIMED 4 [DIM:]^C^C_DIM [Hometext]_HOMETEXT [Newtext]_NEWTEXT [Oblique]_OBLIQUE [TRotate]_TROTATE [Tedit]{B} $S=TEDIT0 _TEDIT [Update]_UPDATE {S} {O} [Undo]_UNDO [REDRAW:]'_REDRAW [Dim Menu]$S=DIM **TEDIT0 4 [DIM:]^C^C_DIM [Tedit:]_TEDIT [angle]_ANGLE [home]_HOME [left]_LEFT [right]_RIGHT [Dim Menu]$S=DIM **VAR1 4 [dimalt]{B} $S=OF _DIMALT \ [dimaltd]_DIMALTD \ [dimaltf]_DIMALTF \ [dimapost]_DIMAPOST \ [dimaso]{B} $S=OF _DIMASO \ [dimasz]_DIMASZ \ [--------] [dimblk]_DIMBLK \ [dimblk1]_DIMBLK1 \ [dimblk2]_DIMBLK2 \ [--------] [dimcen]_DIMCEN \ [dimclrd]_DIMCLRD \ [dimclre]_DIMCLRE \ [dimclrt]_DIMCLRT \ [next]{B} $S=VAR2 [Dim Menu]$S=DIM **VAR2 4 [dimdle]_DIMDLE \ [dimdli]_DIMDLI \ [dimexe]_DIMEXE \ [dimexo]_DIMEXO \ [dimgap]_DIMGAP \ [dimlfac]_DIMLFAC \ [dimlim]{B} $S=OF _DIMLIM \ [dimpost]_DIMPOST \ [dimrnd]_DIMRND \ [dimsah]{B} $S=OF _DIMSAH \ [dimscale]_DIMSCALE \ [dimse1]{B} $S=OF _DIMSE1 \ [dimse2]{B} $S=OF _DIMSE2 \ [previous]{B} $S=VAR1 [next]{B} $S=VAR3 [Dim Menu]$S=DIM **VAR3 4 [dimsho]{B} $S=OF _DIMSHO \ [dimsoxd]{B} $S=OF _DIMSOXD \ [dimtad]{B} $S=OF _DIMTAD \ [dimtfac]_DIMTFAC \ [dimtih]{B} $S=OF _DIMTIH \ [dimtix]{B} $S=OF _DIMTIX \ [dimtm]DIMTM \ [dimtofl]{B} $S=OF _DIMTOFL \ [dimtoh]{B} $S=OF _DIMTOH \ [dimtol]{B} $S=OF _DIMTOL \ [dimtp]_DIMTP \ [dimtsz]_DIMTSZ \ [dimtvp]_DIMTVP \ [dimtxt]_DIMTXT \ [dimzin]_DIMZIN \ [previous]{B} $S=VAR2 [Dim Menu]$S=DIM **OF 4 [on]$S= $S= _ON [off]$S= $S= _OFF **DIMZIN 4 [DIMZIN:]_DIMZIN [ New] [ Dimzin] [ Value] [0]$S= $S= 0 [1]$S= $S= 1 [2]$S= $S= 2 [3]$S= $S= 3 {L} **DIMSTY 4 [DIM:]^C^C_DIM [Dimstyle]'_DIMSTYLE [Save]_SAV [Restore]_RESTORE [Override]_OVERRIDE [Variabls]_VARIABLES ? [Dim Menu]$S=DIM **ATTDEF 4 [ATTDEF:]^C^C_ATTDEF [ AttDef]^C^CDDATTDEF [Dialogue]^C^CDDATTDEF [ ...]^C^CDDATTDEF [Invisibl]_INVISIBLE [Constant]_CONSTANT [Verify]_VERIFY [Preset]_PRESET [Justify]_JUSTIFY $S=TEXTOPTS [Style]_STYLE {L} {D} {E} **LAYER 4 [LAYER:]'_LAYER [Dialogue]'_DDLMODES [ ...]'_DDLMODES [?]? * [Make]_MAKE [Set]_SET [New]_NEW [ON]_ON [OFF]_OFF [Color]_COLOR {B} $S=LACOLOR [Ltype]_LTYPE {B} $S=LALT \$S=LAYER [Freeze]_FREEZE [Thaw]_THAW [Lock]_LOCK [Unlock]_UNLOCK {L} {D} {E} **VPLAYER 4 [VPLAYER:]^C^C_VPLAYER ? [Freeze]_FREEZE [Thaw]_THAW [Reset]_RESET [Newfrz]_NEWFRZ [Vpvsdflt]_VPVISDFLT [All]_ALL [Select]_SELECT [Current]_CURRENT {L} {D} {E} **LACOLOR 4 [COLOR] [red]1 $S= $S= [yellow]2 $S= $S= [green]3 $S= $S= [cyan]4 $S= $S= [blue]5 $S= $S= [magenta]6 $S= $S= [white]7 $S= $S= [Chroma]^C^C_VSLIDE acad(chroma) '_LAYER _Color [ Restore]'_REDRAW **LALT 4 [LINETYPE] [contin.]CONTINUOUS dashed hidden center phantom dot dashdot border divide **ZOOM 4 [ZOOM:]'ZOOM [All]_ALL [Center]_C [Dynamic]_DYNAMIC [Extents]_EXTENTS [Left]_LEFT [Previous]_PREVIOUS [Vmax]_VMAX [Window]_WINDOW {Y} {N} {L} {D} {E} **ATTDISP 4 [ATTDISP:]'_ATTDISP [Normal]_NORMAL [ON]_ON [OFF]_OFF {L} {D} {E} **DVIEW 4 [DVIEW:]^C^C_DVIEW {S} {O} [By Layer]^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 [--------] [Dviewblk]^C^C_DVIEW;; [ Dview ]{B} $S=DVIEW1 [Options]{B} $S=DVIEW1 {L} {D} {E} **DVIEW1 4 [CAmera]_CAMERA [TArget]_TARGET [Distance]_DISTANCE [POints]_POINTS [PAn]_PAN [Zoom]_ZOOM [TWist]_TWIST [CLip]_CLIP {B} $S=DVIEW2 [Hide]_HIDE [Off]_OFF [Undo]_UNDO [eXit]_EXIT $S=DVIEW **DVIEW2 4 [Back]_BACK {B} $S=BACK [Front]_FRONT {B} $S=FRONT [Off]_OFF {B} $S=DVIEW1 **BACK 4 [ back] [clipping] [ON]_ON {B} $S=DVIEW1 [OFF]_OFF {B} $S=DVIEW1 **FRONT 4 [ front] [clipping] [ON]_ON {B} $S=DVIEW1 [OFF]_OFF {B} $S=DVIEW1 [Eye]_EYE {B} $S=DVIEW1 **MVIEW 4 [MVIEW:]^C^C_MVIEW [ON]_ON [OFF]_OFF [Hideplot]_HIDEPLOT [Fit]_FIT [2]2 {B} $S=mv2 \$S=MVIEW [3]3 {B} $S=mv2 \\$S=MVIEW [4]4 {B} $S=mv2 \$S=MVIEW [MSPACE:]^C^C_MSPACE [PSPACE:]^C^C_PSPACE [TILEMOD:]^C^C_TILEMODE [VPLAYER:]^C^C_VPLAYER [PSLTSCL:]^C^C_PSLTSCALE {L} {D} {E} **MV2 4 [Horizont]_HORIZONTAL [Vertical]_VERTICAL [Above]_ABOVE [Below]_BELOW [Left]_LEFT [Right]_RIGHT [Fit]_FIT **RGNAUTO 4 [RGNAUTO:]'_REGENAUTO [ON]_ON {B} $S=DS [OFF]_OFF {B} $S=DS **SHADE 4 [SHADE:]^C^C_SHADE [Shadedif]'_SHADEDIF [Shadedge]'_SHADEDGE [ 256-col]0 [ 256-edg]1 [ Hidden]2 [ Filled]3 [REGEN:]^C^C_REGEN {L} {D} {E} **VIEW 4 [VIEW:]'_VIEW ? [Delete]_DELETE [Restore]_RESTORE [Save]_S [Window]_WINDOW [ View]^C^CDDVIEW [Dialogue]^C^CDDVIEW [ ...]^C^CDDVIEW {L} {D} {E} **VPORTS 4 [VPORTS:]^C^C_VPORTS [Save]_S [Restore]_RESTORE [Delete]_DELETE [Join]_JOIN [Single]_SINGLE ? [2]2 {B} $S=VP2 [3]3 {B} $S=VP3 4 {L} {D} {E} **VP2 4 [Horizont]_HORIZONTAL $S=VPORTS [Vertical]_VERTICAL $S=VPORTS **VP3 4 [Horizont]_HORIZONTAL $S=VPORTS [Vertical]_VERTICAL $S=VPORTS [Above]_ABOVE $S=VPORTS [Below]_BELOW $S=VPORTS [Left]_LEFT $S=VPORTS [Right]_RIGHT $S=VPORTS **LINE 4 [LINE:]^C^C_LINE [continue]^C^C_LINE;; [close]_CLOSE [undo]_U .x .y .z .xy .xz .yz {L} {D} {E} **3D 4 [EDGSURF:]^C^C_EDGESURF [REVSURF:]^C^C_REVSURF [RULSURF:]^C^C_RULESURF [TABSURF:]^C^C_TABSURF [Surftb1:]'_SURFTAB1 [Surftb2:]'_SURFTAB2 [3DFACE:]^C^C_3DFACE [3DMESH:]^C^C_3DMESH [PFACE:]^C^C_PFACE [3DPOLY:]^C^C_3DPOLY [ 3d ]{B} $S=3D2 [objects]{B} $S=3D2 **3D2 4 [Box ]^C^CAI_BOX [Cone ]^C^CAI_CONE [Dish ]^C^CAI_DISH [Dome ]^C^CAI_DOME [Mesh ]^C^CAI_MESH [Pyramid]^C^CAI_PYRAMID [Sphere ]^C^CAI_SPHERE [Torus ]^C^CAI_TORUS [Wedge ]^C^CAI_WEDGE **ELEVTHK 4 [ELEV:]^C^C_ELEV [CHANGE:]^C^C_CHANGE {S} {O} [Elev]_PROP _ELEVATION [Thick]_PROP _THICKNESS **VPOINT 4 [VPOINT:]^C^C_VPOINT [rotate]_ROTATE [axes]; [plan]non 0,0,1 [View Pt.]^C^CDDVPOINT [Dialogue]^C^CDDVPOINT [ ...]^C^CDDVPOINT [HIDE:]_HIDE {L} {D} {E} **PLINE 4 [PLINE:]^C^C_PLINE [Arc]_ARC {B} $S=PARC [Close]_CLOSE [Halfwid]_HALFWIDTH [Length]_LENGTH [Undo]_UNDO [Width]_WIDTH [FILL ON]'_FILLMODE 1 [FILL OFF]'_FILLMODE 0 [PEDIT:]^C^Cai_peditm {L} {D} {E} **PARC 4 [POLYARC] [angle]{B} $S=PARCANG _ANGLE [CEnter]{B} $S=PARCEN _CE [tanDir]_DIRECTION \DRAG [Radius]{B} $S=PARCRAD _RADIUS [2nd PT]_SECOND \DRAG [CLose]$S=PLINE _CLOSE [undo]_U [contline]$S=PLINE _L [PLINE:]^C^C_PLINE **PARCANG 4 [ANGLE] [center]{B} $S=PARC _CENTER drag [radius]{B} $S=PARC _RADIUS \ [drag]{B} $S=PARC drag **PARCEN 4 [CENTER] [angle]{B} $S=PARC _ANGLE drag [length]{B} $S=PARC _LENGTH drag [drag]{B} $S=PARC drag **PARCRAD 4 [RADIUS] [angle]_ANGLE \drag {B} $S=PARC _ANGLE \drag [drag]{B} $S=PARC drag **OFFSET 4 [OFFSET:]^C^C_OFFSET [Through]_THROUGH [done]; {L} {D} {E} **ARC 4 [ARC:]^C^CARC [3-point:]^C^C_ARC \\DRAG [S,C,E:]^C^C_ARC \_C \DRAG [S,C,A:]^C^C_ARC \_C \_A DRAG [S,C,L:]^C^C_ARC \_C \_L DRAG [S,E,A:]^C^C_ARC \_E \_A [S,E,R:]^C^C_ARC \_E \_R [S,E,D:]^C^C_ARC \_E \_D DRAG [C,S,E:]^C^C_ARC _C \\DRAG [C,S,A:]^C^C_ARC _C \\_A DRAG [C,S,L:]^C^C_ARC _C \\_L DRAG [CONTIN:]^C^C_ARC ;DRAG {L} {D} {E} **CIRCLE 4 [CIRCLE] [CEN,RAD:]^C^C_CIRCLE \DRAG [CEN,DIA:]^C^C_CIRCLE \_D [2 POINT:]^C^C_CIRCLE _2P \DRAG [3 POINT:]^C^C_CIRCLE _3P \\DRAG [TTR:]^C^C_CIRCLE _TTR {L} {D} {E} **ELLIPSE 4 [ELLIPSE:]^C^C_ELLIPSE [Center]_C [Rotation]_ROTATION [Iso]_ISO [Diameter]_DIAMETER {L} {D} {E} **POLYGON 4 [POLYGON:]^C^C_POLYGON [Edge]_EDGE [I-scribe]_INSCRIBED [C-scribe]_CIRCUMSCRIBED {L} {D} {E} **SHAPE 4 [SHAPE:]^C^C_SHAPE ? [LOAD:]^C^C_LOAD ? {L} {D} {E} **SKETCH 4 [SKETCH:]^C^C_SKETCH [Connect]C [Erase]E [Record]R [eXit]X [Quit]Q [------] [SKPOLY:]'_SKPOLY 1 [SKLINE:]'_SKPOLY 0 [------] {L} {D} {E} **SOLID 4 [SOLID:]^C^C_SOLID [FILL ON]'_FILLMODE 1 [FILL OFF]'_FILLMODE 0 {L} {D} {E} **TRACE 4 [TRACE:]^C^C_TRACE [FILL ON]'_FILLMODE 1 [FILL OFF]'_FILLMODE 0 {L} {D} {E} **POINT 4 [POINT:]^C^C_POINT .x .y .z .xy .xz .yz [Type]'DDPTYPE [ and]'DDPTYPE [Size...]'DDPTYPE [Pdmode:]'_PDMODE [Pdsize:]'_PDSIZE {L} {D} {E} **HATCH 4 [HATCH:]^C^C_HATCH ? u u,o u,i {Y} {N} {S} {O} {L} {D} {E} **3DFACE 4 [3DFACE:]^C^C3DFACE .x .y .z .xy .xz .yz [Invisibl]_INVISIBLE [ShowEdge]^P(setvar "splframe" 1)(prompt "Invisible edges will be SHOWN after next Regeneration.")(princ) ^P [HideEdge]^P(setvar "splframe" 0)(prompt "Invisible edges will be HIDDEN after next Regeneration.")(princ) ^P {L} {D} {E} **3DPOLY 4 [3DPOLY:]^C^C_3DPOLY [Close]_CLOSE [Undo]_UNDO .x .y .z .xy .xz .yz {L} {D} {E} **ID 4 [ID:]'_ID .x .y .z .xy .xz .yz {L} {D} {E} **LIMITS 4 [LIMITS:]'_LIMITS [ON]_ON [OFF]_OFF {L} {D} {E} **UCS 4 [UCS:]^C^C_UCS [DDUCS:]^C^C_DDUCS ? [Previous]_PREVIOUS [Restore]_RESTORE [Save]_SAVE [Delete]_DELETE [World]_WORLD [RENAME:]^C^C_RENAME _UCS [Follow:]'_UCSFOLLOW [next]$S=UCS2 {L} {D} {E} **UCS2 4 [UCS:]^C^C_UCS [Origin]_ORIGIN [Zaxis]_ZAXIS [3point]_3POINT X Y Z [View]_VIEW [Entity]_ENTITY [previous]$S=UCS **UCSICON 3 [UCSICON:]^C^C_UCSICON [ON]_ON [OFF]_OFF [All]_ALL [Origin]_ORIGIN [Noorigin]_NOORIGIN {L} {D} {E} **PLAN 4 [PLAN:]^C^C_PLAN [Current]_CURRENT [UCS]_UCS [World]_WORLD [Follow:]'_UCSFOLLOW {L} {D} {E} **LIST 4 [LIST:]^C^C_LIST {S} {O} {L} {D} {E} **AREA 4 [AREA:]^C^C_AREA [Entity]_ENTITY [Add]_ADD [Subtract]_SUBTRACT {L} {D} {E} **TEXT 4 [TEXT:]^C^C_TEXT [DTEXT:]^C^C_DTEXT [Style]_STYLE [Justify]_JUSTIFY $S=TEXTOPTS [align]_ALIGN [center]_C [fit]_FIT [middle]_M [right]_RIGHT [STYLE:]'_STYLE {L} {D} {E} **TEXTOPTS 5 [Top-]_T\ [Middle-]_M\ [Bottom-]_B\ [ -Left]Left [ -Center]C [ -Right]Right [align]_ALIGN [center]_C [fit]_FIT [middle]_M [right]_RIGHT {L} **TEXTSET 5 [DTEXT]^C^C$S=DTEXT $T4=DTEXT1 $T4=DTEXT2 $T4=DTEXT3 $T4=DTEXT4 + $T4=DTEXT5 $T4=DTEXT6 [REG.TEXT]$S=TEXT ^C^C$T4=TEXT1 $T4=TEXT2 $T4=TEXT3 $T4=TEXT4 + $T4=TEXT5 $T4=TEXT6 [STYLE:]'_STYLE **STYLE 4 [STYLE:]'_STYLE ? [Fonts]{B} $S=F1 {Y} {N} [DTEXT:]^C^C_DTEXT [TEXT:]^C^C_TEXT {L} {D} {E} **F1 4 Cyrillic Cyriltlc Greekc Greeks Gothice Gothicg Gothici Italicc Italict Romanc Romand Romans [next]{B} $S=F2 [STYLMNU]$S=STYLE **F2 4 Romant Scriptc Scripts Syastro Symap Symath Symeteo Symusic [next]{B} $S=F3 [previous]{B} $S=F1 [STYLMNU]$S=STYLE **F3 4 [Cibt]cibt____.pfb [Cobt]cobt____.pfb [Eur]eur_____.pfb [Euro]euro____.pfb [Par]par_____.pfb [Sas]sas_____.pfb [Sasb]sasb____.pfb [Saso]saso____.pfb [Sasbo]sasbo___.pfb [next]{B} $S=F4 [previous]{B} $S=F2 [STYLMNU]$S=STYLE **F4 4 [Rom]rom_____.pfb [Romb]romb____.pfb [Romi]romi____.pfb [Suf]suf_____.pfb [Te]te______.pfb [Teb]teb_____.pfb [Tel]tel_____.pfb [previous]{B} $S=F3 [STYLMNU]$S=STYLE **DTEXT 4 [DTEXT:]^C^C_DTEXT [TEXT:]^C^C_TEXT [Style]_STYLE [Justify]_JUSTIFY $S=TEXTOPTS [align]_ALIGN [center]_C [fit]_FIT [middle]_M [right]_RIGHT [STYLE:]'_style {L} {D} {E} **BLIPMOD 4 [BLIPS:]'_BLIPMODE [ON]_ON [OFF]_OFF **LINETYPE 3 [LINETYP:]'_LINETYPE ? [Create]_CREATE [Load]_LOAD [Set]_SET {B} $S=CHLT \$S=LINETYPE {Y} {N} * {L} {D} {E} **SNAP 4 [SNAP:]'_SNAP [ON]_ON [OFF]_OFF [Aspect]_ASPECT [Rotate]_ROTATE [Style]_STYLE [ Iso]_ISO [ Standrd]_STANDARD [DrawMode]'_DDRMODES [Dialogue]'_DDRMODES [ ...]'_DDRMODES {L} {D} {E} **TABLET 4 [TABLET:]^C^C_TABLET [Cal]^C^C_TABLET;_CAL [Config]^C^C_TABLET;_CFG;4;\\\25;9;\\\11;9;\\\9;13;\\\25;7;Y [Re-Cfg]^C^C_TABLET;_CFG;4;Y;\\\25;9;\\\11;9;\\\9;13;\\\25;7;Y [ON]_ON [OFF]_OFF {Y} {N} [Orthognl]_ORTHOGONAL [Affine]_AFFINE [Projectv]_PROJECTIVE {L} {D} {E} **OSNAP 4 [OSNAP:]'_OSNAP [CENter]_CENTER\ [ENDpoint]_ENDPOINT\ [INSert]_INSERT\ [INTersec]_INTERSEC\ [MIDpoint]_MIDPOINT\ [NEArest]_NEAREST\ [NODe]_NODE\ [PERpend]_PERPEND\ [QUAdrant]_QUADRANT\ [TANgent]_TANGENT\ [NONE]_NONE\ $S= $S= [Quick,]_QUICK,^Z [,],\ {L} {D} {E} **DRAGMOD 4 [DRAGMODE]'_DRAGMODE [ON]_ON {B} $S=S [OFF]_OFF {B} $S=S [Auto]_AUTO {B} $S=S **GRID 4 [GRID:]'_GRID [grd=snap]_SNAP [ON]_ON [OFF]_OFF [Aspect]_ASPECT [DrawMode]'_DDRMODES [Dialogue]'_DDRMODES [ ...]'_DDRMODES {L} {D} {E} **HANDLS 4 [HANDLES:]^C^C_HANDLES [ON]_ON [DESTROY]_DESTROY **SETVAR 4 [SETVAR:]^C^C_SETVAR ['SETVAR]'_SETVAR [? Vars]? * {L} {D} {E} **QTXT 4 [QTEXT:]^C^C_QTEXT [ON]_ON [OFF]_OFF [REGEN:]^C^C_REGEN **ORTHO 4 [ORTHO:]^C^C_ORTHO [ON]_ON [OFF]_OFF [toggle]^O {L} {D} {E} **VIEWRES 4 [VIEWRES:]^C^C_VIEWRES {N} {Y} 100 500 [RGNAUTO:]'_REGENAUTO [ On]_ON [ Off]_OFF {L} {D} {E} **APERTURE 4 [APERTUR:]'_APERTURE [PICKBOX:]'_PICKBOX [1]$S= 1 [2]$S= 2 [3]$S= 3 [4]$S= 4 [5]$S= 5 [6]$S= 6 [7]$S= 7 [8]$S= 8 [9]$S= 9 [10]$S= 10 [15]$S= 15 {L} {D} {E} **ARRAY 4 [ARRAY:]^C^C_ARRAY {S} {O} [Rectang]_RECTANG [Polar]_POLAR {Y} {N} {L} {D} {E} **ROTATE 4 [ROTATE:]^C^C_ROTATE {S} {O} [Referenc]_REFERENCE [ 3D]^C^CROTATE3D [ROTATE]^C^CROTATE3D {L} {D} {E} **SELECT 4 [SELECT:]^C^C_SELECT [Add]_ADD [ALL]_ALL [CPolygon]_CPOLYGON [Crossing]_CROSSING [Fence]_FENCE [Last]_LAST [Previous]_PREVIOUS [Remove]_REMOVE [Window]_WINDOW [WPolygon]_WPOLYGON [Undo]_U [Filters]'filter {L} {D} {E} **SCALE 4 [SCALE:]^C^C_SCALE {S} {O} [Referenc]_REFERENCE {L} {D} {E} **BREAK0 4 [BREAK:]^C^C_BREAK [First]_FIRST @ **BREAK2P 4 [BREAK:]^C^C_BREAK \_F [First]_FIRST @ **BREAKSPL 4 [BREAK:]^C^C_BREAK \_F \@ [First]_FIRST @ **MOVE 4 [MOVE:]^C^C_MOVE {S} {O} {L} {D} {E} **COPY 4 [COPY:]^C^C_COPY {S} {O} [Multiple]_MULTIPLE {L} {D} {E} **DDEDIT 4 [DDEDIT:]^C^C_DDEDIT [Last]_LAST [Undo]_UNDO [ Modify]^C^CDDMODIFY [Dialogue]^C^CDDMODIFY [ ...]^C^CDDMODIFY {L} {D} {E} **UNDO 4 [UNDO:]^C^C_UNDO [Back 1]^C^C_UNDO 1 [Auto]{B} $S=UNDOA _AUTO [Back]_BACK [End]_END [Group]_GROUP [Mark]_MARK [Control]{B} $S=UNDOC _CONTROL {Y} {N} [REDO:]_REDO {L} {D} {E} **UNDOC 4 [All]_ALL [None]_NONE [One]_ONE **UNDOA 4 [On]_ON [Off]_OFF **ERASE 4 [ERASE:]^C^C_ERASE {S} {O} [E Last:]^C^C_ERASE;_L;; [E Pick:]^C^C_ERASE;_SI; [E Prev:]^C^C_ERASE;_P;; [OOPS:]^C^C_OOPS {L} {D} {E} **PSEL 4 [PEDIT:]^C^Cai_peditm {S} [Polyline]$S=OSELECT1 \$S= {N} {Y} [LT Updt]^C^CPLUD **P0 4 [PEDIT:]^C^Cai_peditm [Close]_CLOSE [Open]_OPEN [Join]_JOIN [Width]_WIDTH [Ed Vrtx]_EDIT {B} $S=PVERTED [Fit Curv]_FIT [Spline]_SPLINE [Decurve]_DECURVE [Undo]_UNDO [eXit]_X {B} $S=S [PolyVars]{B} $S=PVARS $I=poly $I=* [LT Updt]^C^CPLUD **P8 4 [PEDIT:]^C^Cai_peditm [Close]_CLOSE [Open]_OPEN [Ed Vrtx]_EDIT {B} $S=3DPVERTED [Spline]_SPLINE [Decurve]_DECURVE [Undo]_UNDO [eXit]_X {B} $S=S [PolyVars]{B} $S=PVARS $I=poly $I=* [LT Updt]^C^CPLUD **P16 4 [PEDIT:]^C^Cai_peditm [Ed Vrtx]_EDIT {B} $S=3DMVERTED [Smooth]_SMOOTH [Desmooth]_DESMOOTH [Mclose]_MCLOSE [Nclose]_NCLOSE [Mopen]_MOPEN [Nopen]_NOPEN [Undo]_UNDO [eXit]_X {B} $S=S [PolyVars]{B} $S=PVARS $I=poly $I=* [LT Updt]^C^CPLUD **PVERTED 4 [EDIT] [VERTEX] [Next]_NEXT [Previous]_PREVIOUS [Break]_BREAK [Insert]_INSERT [Move]_MOVE [Straight]_STRAIGHT [Width]_WIDTH [Tangent]_TANGENT [Go]_GO [Regen]_REGEN [Undo]_X _UNDO {B} $S=P0 [eXit]_X {B} $S=P0 **3DPVERTED 4 [EDIT] [VERTEX] [Next]_NEXT [Previous]_PREVIOUS [Break]_BREAK [Insert]_INSERT [Move]_MOVE [Regen]_REGEN [Straight]_STRAIGHT [eXit]_X {B} $S=P8 **3DMVERTED 4 [EDIT] [VERTEX] [Next]_NEXT [Previous]_PREVIOUS [Left]_LEFT [Right]_RIGHT [Up]_UP [Down]_DOWN [Move]_MOVE [Regen]_REGEN [eXit]_X {B} $S=P16 **PVARS 4 [Polyvars]$I=poly $I=* [SPLframe]'_SPLFRAME [ On]1 [ Off]0 [SPLsegs]'_SPLINESEGS [SPLtype]'_SPLINETYPE [ Quad]5 [ Cubic]6 [SURFtype]'_SURFTYPE [ Quad]5 [ Cubic]6 [ Bezier]8 [UDensity]'_SURFU [VDensity]'_SURFV [PLineGen]'_PLINEGEN **TRIM 4 [TRIM:]^C^C_TRIM {S} {O} [Undo]_UNDO {L} {D} {E} **ATTEXT 4 [ATTEXT:]^C^CATTEXT {S} {O} [CDF]_CDF [SDF]_SDF [DXF]_DXF [Entities]_ENTITIES [Att Ext]^C^CDDATTEXT [Dialogue]^C^CDDATTEXT [ ...]^C^CDDATTEXT {L} {D} {E} **AUDIT0 4 [AUDIT:]^C^CAUDIT {Y} {N} **SLIDES 4 [MSLIDE:]^C^C_MSLIDE [VSLIDE:]^C^C_VSLIDE [REDRAW:]{B} $S=S ^C^C_REDRAW **SCRIPT0 4 [SCRIPT:]'_SCRIPT [RESUME:]'_RESUME [RSCRIPT:]'_RSCRIPT **PURGE 4 [PURGE:]^C^C_PURGE [Blocks]_BLOCKS [Dimstyles]_DIMSTYLES [LAyers]_LAYERS [LTypes]_LTYPES [SHapes]_SHAPES [STyles]_STYLES [All]_ALL {Y} {N} {L} {D} {E} **RENAME 4 [RENAME:]^C^C_RENAME [Block]_BLOCK [Dimstyle]_DIMSTYLE [LAyer]_LAYER [LType]_LTYPE [Style]_STYLE [Ucs]_UCS [VIew]_VIEW [VPort]_VPORT [ Rename]^C^CDDRENAME [Dialogue]^C^CDDRENAME [ ...]^C^CDDRENAME {L} {D} {E} **DXF 4 [DXFIN:]^C^C_DXFIN [DXFOUT:]^C^C_DXFOUT 16 [Entities]_ENTITIES $S=OSELECT1 [Binary]_BINARY {S} {O} [DXBIN:]^C^C_DXBIN **IGES 3 [IGESIN:]^C^C_IGESIN [IGESOUT:]^C^C_IGESOUT **EXTEND 4 [EXTEND:]^C^C_EXTEND {S} {O} [Undo]_UNDO [ZOOM W:]'_ZOOM _W {L} {D} {E} **STRETCH 4 [STRETCH:]^C^C_STRETCH C {S} {O} {L} {D} {E} **MIRROR 4 [MIRROR:]^C^C_MIRROR {S} {O} {Y} {N} [MIRRTEXT]'_MIRRTEXT [ On (1)]1 [ Off (0)]0 [ 3D]^C^CMIRROR3D [MIRROR]^C^CMIRROR3D {L} {D} {E} **FILLET 4 [FILLET:]^C^C_FILLET [radius]_R;\_FILLET [radius 0]_R;0;_FILLET [polyline]_POLYLINE [FILLET:0]^C^C_FILLET;_R;0;; {L} {D} {E} **CHAMFER 4 [CHAMFER:]^C^C_CHAMFER [distance]_D;\\_CHAMFER [dist = 0]_D;0;0;_CHAMFER polyline {L} {D} {E} **DIVIDE 4 [DIVIDE:]^C^C_DIVIDE [Block]_BLOCK {Y} {N} {L} {D} {E} **MEASURE 4 [MEASURE:]^C^C_MEASURE [Block]_BLOCK {Y} {N} {L} {D} {E} **CHANGE 4 [CHANGE:]^C^C_CHANGE {S} {O} [Color]_PROP _COLOR {B} $S=CHCOLOR \$S=CHANGE [Chroma]^C^C_VSLIDE acad(chroma) [ Restore]^C^C_REDRAW [Elev]_PROP _ELEVATION [LAyer]_PROP _LAYER [LType]_PROP _LT {B} $S=CHLT \$S=CHANGE [Thicknes]_PROP _THICKNESS {L} {D} {E} **CHPROP 4 [CHPROP:]^C^C_CHPROP {S} {O} [Color]_PROP _COLOR {B} $S=CHCOLOR \$S=CHPROP [Chroma]^C^C_VSLIDE acad(chroma) [ Restore]^C^C_REDRAW [LAyer]_PROP _LAYER [LType]_PROP _LT {B} $S=CHLT \$S=CHPROP [Thicknes]_PROP _THICKNESS {L} {D} {E} **CHCOLOR 4 [COLOR] [bylayer]_BYLAYER [byblock]_BYBLOCK [red]_RED [yellow]_YELLOW [green]_GREEN [cyan]_CYAN [blue]_BLUE [magenta]_MAGENTA [white]_WHITE **CHLT 4 [LTYPE] [bylayer]_BYLAYER [byblock]_BYBLOCK [contin.]CONTINUOUS dashed hidden center phantom dot dashdot border divide **COLOR 4 [COLOR:]'_COLOR [bylayer]_BYLAYER [byblock]_BYBLOCK [red]_RED [yellow]_YELLOW [green]_GREEN [cyan]_CYAN [blue]_BLUE [magenta]_MAGENTA [white]_WHITE [Chroma]^C^C_VSLIDE acad(chroma) [ Restore]^C^C_REDRAW {L} {D} {E} **ATTEDIT 4 [ATTEDIT:]^C^C_ATTEDIT [Dialogue]^C^C_DDATTE [ ...]^C^C_DDATTE {S} {O} [Value]_VALUE {B} $S=ATTEDIT2 [Position]_POSITION [Height]_HEIGHT [Angle]_ANGLE [Style]_STYLE [Layer]_LAYER [Color]_COLOR {B} $S=ATTCOLOR [Next]_NEXT {L} {D} {E} **ATTEDIT2 4 [Change]_CHANGE $S=ATTEDIT [Replace]_REPLACE $S=ATTEDIT **ATTCOLOR 4 [COLOR] [red]_RED $S= $S= [yellow]_YELLOW $S= $S= [green]_GREEN $S= $S= [cyan]_CYAN $S= $S= [blue]_BLUE $S= $S= [magenta]_MAGENTA $S= $S= [white]_WHITE $S= $S= **UNITS0 4 [UNITS:]^C^C_UNITS [DDUNITS:]^C^CDDUNITS [UNIT ] [TYPE ] [scientfc]1; [decimal ]2; [enginrng]3; [archtect]4; [metric ]5; **U1 4 [Scientfc] [Scale ] [4 TIMES ]4.0; [2 TIMES ]2.0; [FULL ]1.0; [HALF ]0.5; [QUARTER ]0.25; [OTHER ]^P0;^P **U2 4 [Decimal ] [Scale ] [4 TIMES ]4.0; [2 TIMES ]2.0; [FULL ]1.0; [HALF ]0.5; [QUARTER ]0.25; [OTHER ]^P0;^P **U3 4 [Enginrng] [Scale ] [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; [OTHER ]^P0;^P **U4 4 [Archtect] [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; [ FULL ]1.0; [OTHER...]^P0;^P **U5 4 [Metric ] [ 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; [ FULL ]1.0; [OTHER...]^P0;^P **ENGLISH 4 [Horizntl] [ Sheet ] [ Size ] [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; [OTHER...]^P0 0;^P [VERTCAL>]{B} $S=ENGVERT **ENGVERT 4 [Vertical] [ Sheet ] [ Size ] [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; [OTHER...]^P0 0;^P [HORZNTL>]{B} $S=ENGLISH **METRIC 4 [Horizntl] [ Sheet ] [ Size ] [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; [OTHER...]^P0 0;^P [VERTCAL>]{B} $S=METRICVERT **METRICVERT 4 [Vertical] [ Sheet ] [ Size ] [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; [OTHER...]^P0 0;^P [HORZNTL>]{B} $S=METRIC **EXCOMDS 4 [CATALOG:]^C^CCATALOG [DEL:]^C^CDEL [DIR:]^C^CDIR [EDIT:]^C^CEDIT [SH:]^C^CSH [SHELL:]^C^CSHELL [TYPE:]^C^CTYPE **Comment Begin the AME Screen Menus **SOLIDS 4 [SOLEXT: ]^C^C{B} $S=SEXT SOLEXT [SOLREV: ]^C^C{B} $S=SREV SOLREV [SOLIDIFY]^C^C{B} $S=SSOLID SOLIDIFY [DDSOLPRM]^C^CDDSOLPRM [SOLUNION]^C^C{B} $S=SUNION SOLUNION [SOLSUB:]^C^C{B} $S=SSUB SOLSUB [SOLINT:]^C^C{B} $S=SINT SOLINT [SETUP]{B} $S=SSETUP [PRIMS.]{B} $S=PRIM [MODIFY]{B} $S=SMODIFY [INQUIRY]{B} $S=SINQUIRE [DISPLAY]{B} $S=SRENDER [UTILITY]{B} $S=SUTIL **SSETUP 4 [DDSOLVAR]^C^CDDSOLVAR [SOLVAR: ]^C^C{B} $S=SSOLV SOLVAR [ENGINRNG]^C^C^P(ai_setup "in" "sq in" 2 "lb" "cu in") ^P [BRITISH ]^C^C^P(ai_setup "in" "sq ft" 4 "lb" "cu ft") ^P [CGS ]^C^C^P(ai_setup "cm" "sq cm" 2 "gm" "cu cm") ^P [SI ]^C^C^P(ai_setup "m" "sq m" 2 "kg" "cu m") ^P [UPG VARS]^C^C^P(ai_upgvar) ^P [DBL PREC]^C^C^P(ai_upgprec) ^P [SCR COMP]^C^C^P(ai_scrcomp) ^P [*MODEL*]{B} $S=SOLIDS [PRIMS.]{B} $S=PRIM [MODIFY]{B} $S=SMODIFY [INQUIRY]{B} $S=SINQUIRE [DISPLAY]{B} $S=SRENDER [UTILITY]{B} $S=SUTIL **PRIM 4 [SOLBOX: ]^C^C{B} $S=SBOX SOLBOX [SOLCONE:]^C^C{B} $S=SCONE SOLCONE [SOLCYL: ]^C^C{B} $S=SCYL SOLCYL [SOLSPH: ]^C^C{B} $S=SSPH SOLSPHERE [SOLTORS:]^C^C{B} $S=STOR SOLTORUS [SOLWEGE:]^C^C{B} $S=SWEDGE SOLWEDGE [SETUP]{B} $S=SSETUP [*MODEL*]{B} $S=SOLIDS [MODIFY]{B} $S=SMODIFY [INQUIRY]{B} $S=SINQUIRE [DISPLAY]{B} $S=SRENDER [UTILITY]{B} $S=SUTIL **SUTIL 4 [DDSOLMAT]^C^CDDSOLMAT [SOLMAT: ]^C^C{B} $S=SCHMAT SOLMAT [SOLUCS: ]^C^C{B} $S=SUCS SOLUCS [SOLIN:]^C^CSOLIN [SOLOUT:]^C^CSOLOUT [SOLPURG:]^C^C{B} $S=SPURGE SOLPURGE [LOAD]^C^C^P(ai_loadame) ^P [UNLOAD ]^C^C^P(ai_unloadame) ^P [SETUP]{B} $S=SSETUP [PRIMS.]{B} $S=PRIM [MODIFY]{B} $S=SMODIFY [INQUIRY]{B} $S=SINQUIRE [DISPLAY]{B} $S=SRENDER [*MODEL*]{B} $S=SOLIDS **SMODIFY 4 [SOLMOVE:]^C^C{B} $S=SMOVE SOLMOVE [SOLCHP:]^C^C{B} $S=SCHP SOLCHP [SOLSEP:]^C^C{B} $S=SSEP SOLSEP [SOLCUT:]^C^C{B} $S=SCUT SOLCUT [SOLCHAM:]^C^C{B} $S=SCHAM SOLCHAM [SOLFILL:]^C^C{B} $S=SFILL SOLFILL [SETUP]{B} $S=SSETUP [PRIMS.]{B} $S=PRIM [*MODEL*]{B} $S=SOLIDS [INQUIRY]{B} $S=SINQUIRE [DISPLAY]{B} $S=SRENDER [UTILITY]{B} $S=SUTIL **SINQUIRE 4 [SOLLIST:]^C^C{B} $S=SLIST SOLLIST [DDSOLMSP]^C^CDDSOLMASSP [SOLMASSP]^C^C{B} $S=SMASSP SOLMASSP [SOLAREA:]^C^C{B} $S=SAREA SOLAREA [INTERF: ]^C^C{B} $S=SINTERF SOLINTERF [DECOMP:]^C^CSOLDECOMP [SUBDIV:]^C^CSOLSUBDIV [SETUP]{B} $S=SSETUP [PRIMS.]{B} $S=PRIM [MODIFY]{B} $S=SMODIFY [*MODEL*]{B} $S=SOLIDS [DISPLAY]{B} $S=SRENDER [UTILITY]{B} $S=SUTIL **SRENDER 4 [SOLMESH:]^C^C{B} $S=SMESH SOLMESH [SOLWIRE:]^C^C{B} $S=SWIRE SOLWIRE [SOLWDENS]^C^CSOLWDENS [SOLFEAT:]^C^C{B} $S=SFEAT SOLFEAT [SOLSECT:]^C^C{B} $S=SSECT SOLSECT [SOLPROF:]^C^C{B} $S=SPROF SOLPROF [SETUP]{B} $S=SSETUP [PRIMS.]{B} $S=PRIM [MODIFY]{B} $S=SMODIFY [INQUIRY]{B} $S=SINQUIRE [*MODEL*]{B} $S=SOLIDS [UTILITY]{B} $S=SUTIL **SBOX 4 [BOX:]^C^CSOLBOX [Basepln ]Baseplane $S=SBASE [Center ]C Cube Length **SWEDGE 4 [WEDGE:]^C^CSOLWEDGE [Basepln ]Baseplane $S=SBASE Length **SCONE 4 [CONE:]^C^CSOLCONE [Basepln]Baseplane $S=SBASE [Elliptcl]Elliptical Diameter Apex **SCYL 4 [CYLNDER:]^C^CSOLCYL [Basepln]Baseplane $S=SBASE [Elliptcl]Elliptical Diameter [Center]C **SSPH 4 [SPHERE:]^C^CSOLSPHERE [Basepln ]Baseplane $S=SBASE Diameter **STOR 4 [TORUS:]^C^CSOLTORUS [Basepln ]Baseplane $S=SBASE Diameter **SBASE 4 [Entity]e $S= [Last]l $S= [Normal]n $S= [View]v $S= [XY]xy $S= [YZ]yz $S= [ZX]zx $S= [3point]3 $S= **SFILL 4 [SOLFILL:]^C^CSOLFILL Diameter **SCHAM 4 [CHAMFER:]^C^CSOLCHAM Next OK **SEXT 4 [EXTRUDE:]^C^CSOLEXT {S} {O} **SREV 4 [REVOLVE:]^C^CSOLREV {S} {O} Entity X Y **SSOLID 4 [SOLIDFY]^C^CSOLIDIFY {S} {O} **SINT 3 [INTERS:]^C^CSOLINT {S} {O} **SSUB 4 [SUBTRCT:]^C^CSOLSUB {S} {O} **SUNION 4 [UNION:]^C^CSOLUNION {S} {O} **SSEP 4 [SEPRATE:]^C^CSOLSEP {S} {O} **SCHP 4 [CHPRIM:]^C^CSOLCHP Color Delete Evaluate Instance Move Next Pick Replace Size eXit **SCHMAT 4 [MATERAL:]^C^CSOLMAT Change Edit eXit LIst LOad New Remove SAve SEt ? **SCUT 4 [SOLCUT:]^C^CSOLCUT Entity Last Normal View XY YZ ZX 3point Both **SMOVE 4 [SOLMOVE:]^C^CSOLMOVE {S} {O} ? [ Edge]e [ Face]f [Align to] [A-Edge]ae [A-Face]af [A-Ucs]au [A-World]aw [Origin]o OK Next **SPURGE 4 [PURGE:]^C^CSOLPURGE Memory 2DTree Bfile Pmesh Erased All {S} {O} **SLIST 4 [LIST:]^C^CSOLLIST Edge Face Tree Object **SPROF 4 [PROFILE:]^C^CSOLPROF {S} {O} **SFEAT 4 [FEATURE:]^C^CSOLFEAT Edge Face All OK Next **SUCS 4 [UCS:]^C^CSOLUCS Edge Face OK Next **SWIRE 4 [WIRE:]^C^CSOLWIRE {S} {O} **SSECT 4 [SOLSECT:]^C^CSOLSECT Entity Last Normal View XY YZ ZX 3point **SMESH 4 [MESH:]^C^CSOLMESH {S} {O} **SMASSP 4 [MASSPRP:]^C^CSOLMASSP {S} {O} **SAREA 4 [AREA:]^C^CSOLAREA {S} {O} **SINTERF 3 [INTERF:]^C^CSOLINTERF {S} {O} **SSOLV 4 [SOLVAR:]^C^CSOLVAR [Amecomp ]solamecomp [Areau ]solareau [Axcol ]solaxcol [Decomp ]soldecomp [Delent ]soldelent [Display ]soldisplay [Hangle ]solhangle [Hpat ]solhpat [Hsize ]solhsize [Length ]sollength [Mass ]solmass [More... ]{B} $S=SSOLV2 **SSOLV2 4 [SOLVAR:]^C^CSOLVAR [Matcurr ]solmatcurr [Pagelen ]solpagelen [Render ]solrender [Secttype]solsectype [Servmsg ]solservmsg [Solidify]solsolidify [Subdiv ]solsubdiv [Upgrade ]solupgrade [Version ]solamever [Volume ]solvolume [Solwdens]solwdens [Previous]{B} $S=SSOLV **Comment Begin the Render Screen Menus **RENDER 4 [RENDER:]^C^CRENDER [HIDE:]^C^C_HIDE [DDVIEW..]^C^CDDVIEW [LIGHT...]^C^CLIGHT [SCENE...]^C^CSCENE [FINISH..]^C^CFINISH [RPREF...]^C^CRPREF [STATS...]^C^CSTATS [REPLAY..]^C^CREPLAY [SAVEIMG.]^C^CSAVEIMG [Unload:]^C^Cai_unloadave [--------] [RMAN]^C^C^P(progn(setq m:err *error*)(defun *error*(msg)(princ"Error loading: ")+ (princ msg)(setq *error* m:err m:err nil #GTSPO nil)(princ))(princ));+ (cond((null #GTSPO)(vmon)(if(findfile"rman.lsp")(progn(load"rman")+ (menucmd"S=X")(menucmd"S=RMAN"))(progn(terpri);+ (prompt"The RenderMan 'rman.lsp' file can't be found in your search path.")+ (terpri)(prompt"To use RenderMan, you need AutoShade V2 with Autodesk RenderMan.");+ (terpri)(prompt"See your AutoShade documentation for installation instructions.");+ (princ)))(setq *error* m:err m:err nil)(princ))(T(menucmd"S=X")+ (menucmd"S=RMAN")(setq *error* m:err m:err nil)(princ))) ^P **DEFAULTS 4 [DEFAULT:]^C^CDEFAULTS Resize Scale [Prompts]Prompts {B} $S=YESNO \$S= $S= Select **RMAN 4 [RMSETUP:]^C^C{B} $S=RMSETUP RMSETUP [RMPROP: ]^C^C{B} $S=RMPROP RMPROP [RMATTAC:]^C^C{B} $S=RMATTACH RMATTACH [RMEDIT: ]^C^C{B} $S=RMEDIT RMEDIT [RMCOPY: ]^C^C{B} $S=RMCOPY RMCOPY [RMLIST: ]^C^C{B} $S=RMLIST RMLIST [FILMROL:]^C^CFILMROLL [DEFAULT:]^C^C{B} $S=DEFAULTS DEFAULTS [RMSCAN:]^C^CRMSCAN [--------] [RENDER]{B} $S=RENDER **RMSETUP 4 [RMSETUP:]^C^CRMSETUP Air Bucket [Crop]Crop {B} $S=RMSETUPC \$S= $S= [Dest]Dest {B} $S=RMSETUPD \$S= $S= Exposure [Filter]Filter {B} $S=RMSETUPFI \$S= $S= [Format]Format {B} $S=RMSETUPFO \$S= $S= [Merge]Merge {B} $S=YESNO \$S= $S= Rate Samples **RMSETUPC 4 Visual Numeric **RMSETUPD 4 [Cpscript]Cpostscript [Pscript]Postscript File Tiff Vga Tga Targa Vista Framebuffer **RMSETUPFI 4 Box Gaussian **RMSETUPFO 4 Ascii Binary **YESNO 4 Yes No **RMPROP 4 [RMPROP:]^C^CRMPROP Air Color Displace Opaque Project Rate [Smooth]Smooth {B} $S=YESNO \$S= $S= Surface [Tcoord]Tcoord {B} $S=RMPROPTC \$S= $S= **RMPROPTC 4 Insert Pick Numeric **RMEDIT 3 [RMEDIT:]^C^CRMEDIT Air Color Displace Opaque Project Rate [Smooth]Smooth {B} $S=YESNO \$S= $S= Surface [Tcoord]Tcoord {B} $S=RMPROPTC \$S= $S= **RMCOPY 4 [RMCOPY:]^C^CRMCOPY Air Color Displace Opaque Project Rate [Smooth]Smooth {B} $S=YESNO \$S= $S= Surface [Tcoord]Tcoord {B} $S=RMPROPTC \$S= $S= **RMATTACH 4 [RMATTAC:]^C^CRMATTACH ? Layer Select **RMLIST 4 [RMLIST:]^C^CRMLIST Colors Shaders Entity Layer Defined Atmosphere Displacement Light Surface **Comment Begin the ASE Screen Menus **ASEINIT0 4 [InitASE:]^C^C^P(ai_aseinit) ^P **ASE 4 [SET ROW:]^C^C_ASESETROW [MK LINK:]^C^C_ASEMAKELINK [Q-LINK:]^C^C_ASEQLINK [Q-VIEW:]^C^C_ASEQVIEW [Q-EDIT:]^C^C_ASEQEDIT [MAKE DA:]^C^C_ASEMAKEDA [Q-MK DA:]^C^C_ASEQMAKEDA [RELD DA:]^C^C_ASERELOADDA [SQLEDIT:]^C^C_ASESQLED [SELECT:]^C^C_ASESELECT [SET]{B} $S=ASESET [LINK]{B} $S=ASELINK [ROW]{B} $S=ASEROW [UTILITY]{B} $S=ASEUT [TERMNTE:]^C^C_aseterm;$M=$(if,$(=,$(getvar,cmddia),0),\)^P(ai_aseterm) ^P **ASESETROW 4 [SET ROW:]^C^C_ASESETROW Search All First Last Next Previous [Hilite]HIGHLIGHT [Unhilite]UNHIGHLIGHT Set [eXit]X [Key vals]K {L} {D} {E} **ASEQLINK 4 [Q-LINK:]^C^C_ASEQLINK Search All First Last Next Previous [Hilite]HIGHLIGHT [Unhilite]UNHIGHLIGHT Set [eXit]X [Key vals]K {L} {D} {E} **ASEMAKELINK 4 [MK LINK:]^C^C_ASEMAKELINK {S} {O} {L} {D} {E} **ASEMAKEDA 4 [MAKE DA:]^C^C_ASEMAKEDA [Style]STYLE [Justify]JUSTIFY $S=ASETEXTOPTS align [center]C fit [middle]M right [STYLE:]'_STYLE ? {L} {D} {E} **ASEQMAKEDA 4 [Q-MK DA:]^C^C_ASEQMAKEDA [Style]STYLE [Justify]JUSTIFY $S=ASETEXTOPTS align [center]C fit [middle]M right [STYLE:]'_STYLE ? {L} {D} {E} **ASESQLED 4 [SQLEDIT:]^C^C_ASESQLED All First Last Next Previous Delete Edit [Hilite]HIGHLIGHT [Unhilite]UNHIGHLIGHT [SS]S [eXit]X {L} {D} {E} **ASESELECT 4 [SELECT:]^C^C_ASESELECT [SS]S Export [Intersec]INTERSECT Subtract Union Textual [Graphic]GRAPHICAL {L} {D} {E} **ASESET 4 [ASE Set] [TABLE:]^C^C_ASESETTABLE [DB:]^C^C_ASESETDB [DBMS:]^C^C_ASESETDBMS ? **ASELINK 4 [ASE Link] [VIEW:]^C^C_ASEVIEWLINK [EDIT:]^C^C_ASEEDITLINK [DELETE:]^C^C_ASEDELLINK **ASEROW 4 [ASE Row] [VIEW:]^C^C_ASEVIEWROW [EDIT:]^C^C_ASEEDITROW [ADD:]^C^C_ASEADDROW [DELETE:]^C^C_ASEDELROW Yes No **ASEUT 4 [EXPORT:]^C^C_ASEEXPORT [MAKEREP:]^C^C_ASEMAKEREP [POST:]^C^C_ASEPOST Report Fix [ERASE]{B} $S=ASEERASE [CLOSEDB:]^C^C_ASECLOSEDB [TERMDBM:]^C^C_ASETERMDBMS ? Yes No **ASEEDITLINK 4 [ED LINK:]^C^C_ASEEDITLINK Row Table [dataBase]B DBMS All [Search]SEARCH {B} $S=ASEEDLINKSRCH [Key vals]K {L} {D} {E} **ASEDELLINK 4 [DELLINK:]^C^C_ASEDELLINK Row Table [dataBase]B DBMS All Yes No {L} {D} {E} **ASEEXPORT 4 [EXPORT:]^C^C_ASEEXPORT Table [dataBase]B DBMS All SDF CDF Native {L} {D} {E} **ASEERASE 4 [ASEerase] [TABLE:]^C^C_ASEERASETABLE [DB:]^C^C_ASEERASEDB [DBMS:]^C^C_ASEERASEDBMS [ALL:]^C^C_ASEERASEALL ? Yes No **ASEEDLINKSRCH 4 [ED LINK:]^C^C_ASEEDITLINK Search All First Last Next Previous [Highlite]HIGHLIGHT [Unhilite]UNHIGHLIGHT Set [eXit]X **ASETERM 4 [TERMNTE:]^C^C_aseterm;$M=$(if,$(=,$(getvar,cmddia),0),\)^P(ai_aseterm) ^P Yes No {L} {D} {E} **ASETEXTOPTS 5 [Top-]T\ [Middle-]M\ [Bottom-]B\ [ -Left]L [ -Center]C [ -Right]R align [center]C fit [middle]M right {L} **ASERELOADDA 4 [RELD DA:]^C^C_ASERELOADDA {S} {O} {L} {D} {E} **ALIGN 4 [ALIGN:]^C^C_ALIGN {S} {O} {L} {D} {E} **MIRROR3D 4 [MIRR 3D:]^C^C_MIRROR3D {S} {O} [Entity]_ENTITY [Last]_LAST [Z axis]_ZAXIS [View]_VIEW [XY]_XY [YZ]_YZ [ZX]_ZX [3 points]_3POINTS {L} {D} {E} **ROTATE3D 4 [ROTAT 3D:]^C^C_ROTATE3D {S} {O} [Entity]_ENTITY [Last]_LAST [View]_VIEW [X axis]_XAXIS [Y axis]_YAXIS [Z axis]_ZAXIS [2 points]_2POINTS {L} {D} {E} ***Comment This is the new TABLET1 menu containing the code for AME and Rendering. You may put your own macros and menu items here in the space remaining. All of the "blank" line items actually contain one space so that a RETURN is issued when you pick any of them from the tablet. Remove them if want nothing to happen when they are selected or place your own macros in their place. ***TABLET1 [A-1 ]^c^cwdoor [A-2 ]^c^cwdoor [A-3 ]^c^csdoor [A-4 ]^c^csdoor [A-5 ]^c^ctdoor [A-6 ]^c^ctdoor [A-7 ]^c^cawwin [A-8 ]^c^cawwin [A-9 ]^c^cawwin [A-10]^c^ceawin [A-11]^c^ceawin [A-12]^c^cesdoor [A-13]^c^cesdoor [A-14]^c^csewin [A-15]^c^csewin [A-16]^c^csewin [A-17]^c^chplan [A-18]^c^chplan [A-19]^c^chplan [A-20]^c^chplan [A-21]^c^chelev [A-22]^c^chsect [A-23]^c^chsect [A-24]^c^chstru [A-25]^c^chsite [B-1 ]^c^cwdoor01 [B-2 ]^c^cwdoor02 [B-3 ]^c^csdoor01 [B-4 ]^c^csdoor02 [B-5 ]^c^ctdoor01 [B-6 ]^c^ctdoor02 [B-7 ]^c^cawwin01 [B-8 ]^c^cawwin02 [B-9 ]^c^cawin01 [B-10]^c^ceawin01 [B-11]^c^ceawin02 [B-12]^c^cesdoor01 [B-13]^c^cesdoor02 [B-14]^c^csewin01 [B-15]^c^csewin02 [B-16]^c^csedoor01 [B-17]^c^cautowall [B-18]^c^celevp [B-19]^c^ccar [B-20]^c^ccolumn [B-21]^c^cbalconys [B-22]^c^cstairs1 [B-23]^c^cstairs2 [B-24]^c^cblist [B-25]^c^cdirect [C-1 ]^c^cwdoor03 [C-2 ]^c^cwdoor04 [C-3 ]^c^csdoor03 [C-4 ]^c^csdoor04 [C-5 ]^c^ctdoor03 [C-6 ]^c^ctdoor04 [C-7 ]^c^cawwin03 [C-8 ]^c^cawwin04 [C-9 ]^c^cawin02 [C-10]^c^ceawin03 [C-11]^c^ceawin04 [C-12]^c^cesdoor03 [C-13]^c^cesdoor04 [C-14]^c^csewin03 [C-15]^c^csewin04 [C-16]^c^csedoor02 [C-17]^C^Csch3 [C-18]^c^cform [C-19]^c^ckitchen [C-20]^c^ctree [C-21]^c^cbalconyd [C-22]^c^cstairs3 [C-23]^c^cstairs4 [C-24]^c^cclist [C-25]^c^csite-u [D-1 ]^c^cwdoor05 [D-2 ]^c^cwdoor06 [D-3 ]^c^csdoor05 [D-4 ]^c^csdoor06 [D-5 ]^c^ctdoor05 [D-6 ]^c^ctdoor06 [D-7 ]^c^cawwin05 [D-8 ]^c^cawwin06 [D-9 ]^c^cawin03 [D-10]^c^ceawin05 [D-11]^c^ceawin06 [D-12]^c^cesdoor05 [D-13]^c^cesdoor06 [D-14]^c^csewin05 [D-15]^c^csewin06 [D-16]^c^csedoor03 [D-17]^c^cschl [D-18]^c^cschs [D-19]^c^cstairp [D-20]^c^cstair1p [D-21]^c^cman [D-22]^c^cstairs5 [D-23]^c^cstairs6 [D-24]^c^cstrlst [D-25]^c^csymbolsi [E-1 ]^c^cwdoor07 [E-2 ]^c^cwdoor08 [E-3 ]^c^csdoor07 [E-4 ]^c^csdoor08 [E-5 ]^c^ctdoor07 [E-6 ]^c^ctdoor08 [E-7 ]^c^cawwin07 [E-8 ]^c^cawwin08 [E-9 ] [E-10]^c^ceawin07 [E-11] [E-12]^c^cesdoor07 [E-13]^c^cesdoor08 [E-14] [E-15] [E-16] [E-17]^c^ctoilet [E-18]^c^csymbolpl [E-19]^c^ctextun1 [E-20]^c^ctextpl1 [E-21]^c^cinsert mdoorh int \ ; [E-22]^c^csymbolse [E-23]^c^cgobble [E-24]^c^ctextst01 [E-25]^c^ctextsi1 [F-1 ]^c^cwdoor09 [F-2 ]^c^cwdoor10 [F-3 ] [F-4 ] [F-5 ]^c^ctdoor09 [F-6 ]^c^ctdoor10 [F-7 ]^c^ctdoor11 [F-8 ] [F-9 ] [F-10] [F-11] [F-12] [F-13] [F-14] [F-15] [F-16] [F-17]^c^cINSERT *unitarea \ ; [F-18]^c^crnameu [F-19]^c^crnamep [F-20]^c^crnames [F-21]^c^cfl [F-22]^c^cwallbi [F-23]^c^cwallbo [F-24]^c^cleaders [F-25]^C^Cparking [G-1 ]$S=ARRAY ^C^CARRAY [G-2 ]^c^cbound [G-3 ]$S=COPY ^C^CCOPY [G-4 ]$S=ERASE ^C^CERASE [G-5 ]^c^ceraseall [G-6 ]^c^cexplode [G-7 ]^c^cexplodel [G-8 ]$S=EXTEND ^C^CEXTEND [G-9 ]^c^cextendl [G-10]^C^Cjoins [G-11]$S=MIRROR ^C^CMIRROR [G-12]$S=MOVE ^C^CMOVE [G-13]$S=SCALE ^C^CSCALE [G-14]^C^Cddmodify [G-15]^C^Ctrim1 [G-16]^C^Ctrim2 [G-17]^c^ctype1 [G-18]^c^ctype2 [G-19]^c^cwdu [G-20]^c^cwdp [G-21]^c^cphouse [G-22] [G-23] [G-24]^c^cleaderw [G-25] [H-1 ]^c^cBREAK1 [H-2 ]^c^cbreak2 [H-3 ]^C^Ccopym [H-4 ]^c^cerasecol [H-5 ]^c^ceraselin [H-6 ]^c^cexplodem [H-7 ]^c^c^P(if (not c:texplode) (load"jin2"))+ (princ) texplode [H-8 ]^c^cextendc [H-9 ]^c^cextendm [H-10]^C^Cjoinc [H-11]$S=OFFSET ^C^COFFSET [H-12]^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? "));+(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 [H-13]^C^Cscalexy [H-14]$S=TRIM ^C^CTRIM [H-15]^C^Ctrimm [H-16]^C^Ctrim3 [H-17]^C^Clevel [H-18]^C^Clevel [H-19]^c^c$I=title $I=* [H-20]^c^cwallopen [H-21] [H-22]^C^Cs-detail [H-23] [H-24]^c^cbar1ea [H-25]^c^cbar4ea [I-1 ]^c^cbreakl [I-2 ]^c^cbreaki [I-3 ]$S=DIVIDE ^C^CDIVIDE [I-4 ]^c^ceraselay [I-5 ]^c^ceraseent [I-6 ]^C^CFILLET0 [I-7 ]^c^cfillet? [I-8 ]^c^cCHAMFER [I-9 ]$S=MEASURE ^C^CMEASURE [I-10]^C^Cjoinarc [I-11]^C^Coffsetm [I-12]$S=ROTATE ^C^CROTATE [I-13]^C^Cstret [I-14]^C^Ctrime [I-15]^C^Ctriml [I-16]^C^Ctrim4 [I-17]^C^Cwall1 [I-18]^C^Cwall2 [I-19]^C^Cwall3 [I-20]^C^Cwall4 [I-21] [I-22] [I-23] [I-24]^c^cbeam1 [I-25]^c^cbeam2 ***TABLET2 [J-1 ] [J-2 ] [J-3 ] [J-4 ] [J-5 ] [J-6 ] [J-7 ] [J-8 ] [J-9 ] [J-10] [J-11] [J-12] [J-13] [J-14] [K-1 ]^C^Cstarts [K-2 ]^C^Cstarts [K-3 ]$S=X $S=LINE ^C^CLINE [K-4 ]^C^Clineeed [K-5 ]^C^Clinemmd [K-6 ] [K-7 ]^C^Cchgtext [K-8 ]^C^Cchgtext [K-9 ]^C^Cchange [K-10] [K-11]^C^Clayer [K-12]^C^Clayer [K-13]$S=X $S=ZOOM 'ZOOM W [K-14]$S=X $S=ZOOM 'ZOOM W [L-1 ]^C^Cstarts [L-2 ]^C^Cstarts [L-3 ]$S=X $S=PLINE ^C^CPLINE [L-4 ]^C^Clineepd [L-5 ]^C^Clinempd [L-6 ] [L-7 ]^C^Cchgtexts [L-8 ]^C^Cchgtextd [L-9 ]^C^Cddchprop [L-10] [L-11]^C^Cddlmodes [L-12]^C^Cddlmodes [L-13]$S=X $S=ZOOM 'ZOOM W [L-14]$S=X $S=ZOOM 'ZOOM W [M-1 ]$S=X $S=ARC ^C^CARC [M-2 ]$S=X $S=CIRCLE ^C^CCIRCLE [M-3 ]^C^CDETAIL [M-4 ]^C^CBOX1 [M-5 ]^C^Cbox3 [M-6 ] [M-7 ]^C^Cchgwidth [M-8 ]^C^Cchgtexth [M-9 ]^C^Cchgall [M-10] [M-11]^C^Ccurlay [M-12]^C^Cworklay [M-13]$S=X $S=ZOOM 'ZOOM P [M-14]$S=X $S=ZOOM 'ZOOM P [N-1 ]$S=X $S=ELLIPSE ^C^CELLIPSE [N-2 ]$S=X $S=POLYGON ^C^CPOLYGON [N-3 ]^C^Ccent [N-4 ]^C^Cbox2 [N-5 ]^C^Cbox4 [N-6 ] [N-7 ]^C^Cchgangle [N-8 ]^C^Cchgstyle [N-9 ]^C^Cchglayer [N-10] [N-11]^C^Cfrzenlay [N-12]^C^Cthawlay [N-13]$S=X $S=ZOOM 'ZOOM D [N-14]$S=X $S=ZOOM 'ZOOM V [O-1 ]^C^Ccut [O-2 ]^C^Cext [O-3 ]^C^Carce [O-4 ]^C^Cbubblex [O-5 ]^C^Cbubblexx [O-6 ] [O-7 ]^C^Cchglarge [O-8 ]^C^Cchgsmall [O-9 ]^C^Cchglastl [O-10] [O-11]^C^Cthawaw [O-12]^C^Cthawbw [O-13]$S=X $S=ZOOM 'ZOOM E [O-14]^C^Czi [P-1 ]$S=X $S=POINT ^C^CPOINT [P-2 ]^C^CDONUT [P-3 ]^C^Cdot [P-4 ]^C^Cbubbley [P-5 ]^C^Cbubbleyy [P-6 ] [P-7 ]^C^Cchgpyung [P-8 ]^C^Cchgmatch [P-9 ]^C^Cchgcolor [P-10] [P-11]^C^Cfrzens [P-12]^C^Cthawall [P-13]$S=X $S=ZOOM 'ZOOM A [P-14]^C^Czo [Q-1 ]^C^Cchgdate [Q-2 ]^C^Cpara1 [Q-3 ]^C^Cpara2 [Q-4 ]^C^Chasal1 [Q-5 ]^C^Chasal2 [Q-6 ] [Q-7 ]^C^Cchgtotal [Q-8 ]^C^Cchg- [Q-9 ]^C^Cchgltype [Q-10] [Q-11]^C^Cfrzenall [Q-12]^C^Cthawall [Q-13]^C^Czm [Q-14]^C^Czm [R-1 ]^C^Cchgdate [R-2 ] [R-3 ] [R-4 ]^C^Chasal3 [R-5 ]^C^Chasal4 [R-6 ] [R-7 ]^C^Cchg* [R-8 ]^C^Cchg/ [R-9 ]^C^Cchgjoin [R-10] [R-11]'redraw [R-12]'redraw [R-13]'PAN [R-14]'VIEW W PLOT 0.000,0.000 INTERSEC \layer s 0 f board ; ***T3 [1-1](ref) int \@.02,-.02 [1-2](ref) per \@0,-.02 [1-3](ref) int \@-.02,-.02 [2-1](ref) per \@.02,0 [2-2]nea [2-3](ref) per \@-.02,0 [3-1](ref) int \@.02,.02 [3-2](ref) per \@0,.02 [3-3](ref) int \@-.02,.02 ***TABLET3 [S-1 ] [S-2 ] [S-3 ] [S-4 ] [S-5 ] [S-6 ] [S-7 ] [S-8 ] [S-9 ] [S-10] [S-11] [S-12] [S-13] [S-14] [S-15] [S-16] [S-17] [S-18] [S-19] [S-20] [S-21] [S-22] [S-23] [S-24] [S-25] [T-1 ]^C^C$I=jinhangl $I=* [T-2 ]^C^C$I=jinhangl $I=* [T-3 ]^C^C$I=cadfont $I=* [T-4 ]^C^C$I=cadutil $I=* [T-5 ]^C^C$I=fonts1 $I=* [T-6 ] [T-7 ]^c^chdtext [T-8 ]^c^cmtext [T-9 ]$S=X $S=DTEXT ^C^CDTEXT [T-10]$S=X $S=DTEXT ^C^CDTEXT C [T-11]$S=X $S=DTEXT ^C^CDTEXT R [T-12] [T-13]^C^Cwalls01 [T-14]^C^Cwalls02 [T-15]^C^Cwalls03 [T-16]^C^Cwalls04 [T-17]^C^Cwalls05 [T-18]^C^Cwalls06 [T-19]^C^Cwalls07 [T-20]^C^Cwalls08 [T-21]^C^Cwalls09 [T-22]^C^Cwalls10 [T-23]^C^Cwalls11 [T-24]^C^Cwalls12 [T-25]^C^Cwalls13 [U-1 ]^C^C^P(command "style" "standard" "romans,hs" "" "" "" "" "" "")+ (princ) ^Pdtext [U-2 ]^C^C^P(command "style" "hd" "helved,hd" "" "" "" "" "" "")+ (princ) ^Pdtext [U-3 ]^c^cstyle cadsg romans,cadsg 0 1 0 n n ^P(c:hdtext) ^P [U-4 ]^c^cstyle cadhd outline,cadhd 0 1 0 n n ^P(c:hdtext) ^P [U-5 ]^C^Cstyle [U-6 ] [U-7 ]^c^c^P(if (not c:dhtext) (xload"hangul.exp"))(princ) dhtext [U-8 ]^C^Cdimin [U-9 ]$S=X $S=DTEXT ^C^CDTEXT A [U-10]$S=X $S=DTEXT ^C^CDTEXT M [U-11]$S=X $S=DTEXT ^C^CDTEXT F [U-12] [U-13] [U-14] [U-15] [U-16] [U-17] [U-18] [U-19] [U-20] [U-21] [U-22] [U-23] [U-24] [U-25] [V-1 ]^C^Chatchs [V-2 ]^C^Chatchs [V-3 ]^C^Chatchs [V-4 ]^C^Chatch [V-5 ]^C^C$i=hatch1 $i=* [V-6 ] [V-7 ]^c^cdimout [V-8 ]^c^cdimout [V-9 ]^c^cleader1 [V-10]^c^cleader2 [V-11]^c^cleader3 [V-12] [V-13]^C^CDIST [V-14]^C^Cdistee [V-15]$S=X $S=LIST ^C^CLIST [V-16]^C^Csnapan [V-17]$S=AREA ^C^CAREA [V-18](ref) [V-19]'setvar [V-20]'ddselect [V-21]'ddptype [V-22]^c^cconvertd [V-23] [V-24]^C^Cpurge a [V-25]^C^Ctablet cfg [W-1 ]^C^Chatconc [W-2 ]^C^Chatbrick [W-3 ]^C^Chatbrock [W-4 ]^C^Chatti [W-5 ]^C^Chattixy [W-6 ] [W-7 ]^c^cdiminw [W-8 ]^c^cdimoutw [W-9 ]$S=DIM ^C^CDIM LEADER [W-10]$S=DIM ^C^CDIM1 [W-11]^C^CDIM1 STATUS [W-12] [W-13]^C^Cdistnp [W-14]^C^Cdistep [W-15]^C^Carclist [W-16]$S=ID ^C^CID [W-17]^C^Careab [W-18]^c^cxref [W-19]^C^Cshort [W-20]'ddosnap [W-21]'ddemodes [W-22]^c^cconvertd [W-23] [W-24]$S=X $S=INSERT ^C^CINSERT [W-25]^C^Cev [X-1 ]^C^Chatti100 [X-2 ]^C^Chatti150 [X-3 ]^C^Chatti200 [X-4 ]^C^Chatti300 [X-5 ]^C^Chatconcm [X-6 ] [X-7 ]$S=DIM ^C^CDIM CENTER [X-8 ]$S=DIMLINEAR BASELINE [X-9 ]$S=DIMLINEAR CONTIN [X-10]$S=DIMLINEAR ^C^CDIM VERT [X-11]$S=DIMLINEAR ^C^CDIM HORIZ [X-12] [X-13]'setvar osmode 0 [X-14]'setvar osmode 32 [X-15]'setvar osmode 1 [X-16]'setvar osmode 512 [X-17]'setvar osmode 128 [X-18]'setvar osmode 2 [X-19]'setvar osmode 4 [X-20]'setvar osmode 8 [X-21]'setvar osmode 16 [X-22]'setvar osmode 256 [X-23] [X-24]$S=MINSERT ^C^CMINSERT [X-25]'ddinsert [Y-1 ]^C^Chatform [Y-2 ]^C^Chatslope [Y-3 ]^C^Chatgl1 [Y-4 ]^C^Chatgl2 [Y-5 ]^C^Chatdots [Y-6 ] [Y-7 ]$S=DIM ^C^CDIM RADIUS [Y-8 ]$S=DIM ^C^CDIM DIAMETER [Y-9 ]$S=DIM ^C^CDIM ANGULAR [Y-10]$S=DIM ^C^CDIM ROTATED [Y-11]$S=DIMLINEAR ^C^CDIM ALIGNED [Y-12] [Y-13]^C^C [Y-14]^C^CU [Y-15]^C^CREDO [Y-16]MULTIPLE [Y-17]WINDOW [Y-18]LAST [Y-19]PREVIOUS [Y-20]CROSSING [Y-21]REMOVE [Y-22]ADD [Y-23] [Y-24]$S=X $S=BLOCK ^C^CBLOCK [Y-25]$S=WBLOCK ^C^CWBLOCK **DTEXT1 33 {B} $S=DTEXT ^C^CDTEXT {B} $S=DTEXT ^C^CDTEXT C {B} $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 CDTEXT A $S=X $S=DTEXT ^C^CDTEXT M $S=X $S=DTEXT ^C^CDTEXT F