504 lines
41 KiB
Plaintext
504 lines
41 KiB
Plaintext
[->Status / Info]
|
|
[$(eval," Zeit: "$(edtime,$(getvar,date),HH:MM))]
|
|
[$(eval," Datum: "$(edtime,$(getvar,date),D.M.YYYY))]
|
|
[$(eval,"Z-Name: "$(getvar,dwgname)".DWG")]
|
|
[--]
|
|
[$(eval,"Sicherung alle "$(getvar,savetime)" min")]^c^c_SAVETIME
|
|
[--]
|
|
[$(eval,"Konstruktionspkt: "$(if,$(=,$(getvar,blipmode),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar BLIPMODE ^p(- 1 (getvar "BLIPMODE"))
|
|
[$(eval,"Text mitspiegeln: "$(if,$(=,$(getvar,mirrtext),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar MIRRTEXT ^p(- 1 (getvar "MIRRTEXT"))
|
|
[$(eval,"Obj. ausleuchten: "$(if,$(=,$(getvar,highlight),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar HIGHLIGHT ^p(- 1 (getvar "HIGHLIGHT"))
|
|
[$(eval," Solids f�llen: "$(if,$(=,$(getvar,fillmode),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar FILLMODE ^p(- 1 (getvar "FILLMODE"))
|
|
[$(eval," 3D Kanten: "$(if,$(=,$(getvar,splframe),1),$(eval,"SICHTBAR"),$(eval,"UNSICHTB.")))]'_setvar SPLFRAME ^p(- 1 (getvar "SPLFRAME"))
|
|
[$(eval," Tilemode: "$(if,$(=,$(getvar,tilemode),1),$(eval,"EIN"),$(eval,"AUS")))]'_setvar tilemode ^p(- 1 (getvar "tilemode"))
|
|
[--]
|
|
[$(eval," Farbe: "$(getvar,cecolor))]^c^c_CECOLOR
|
|
[$(eval," Linientyp: "$(getvar,celtype))]^c^c_CELTYPE
|
|
[$(eval," Textstil: "$(getvar,textstyle))]^c^c_TEXTSTYLE
|
|
[$(eval," TextgrӇe: "$(getvar,textsize))]^c^c_TEXTSIZE
|
|
[$(eval," Schraffurmuster: "$(getvar,hpname))]^c^c_HPNAME
|
|
[$(eval,"Punktdarstellung: "$(getvar,pdmode))]^c^c_PDMODE
|
|
[$(eval," Punkt-GrӇe: "$(getvar,pdsize))]^c^c_PDSIZE
|
|
[$(eval," Abrundenradius: "$(getvar,filletrad))]^c^c_FILLETRAD
|
|
[$(eval," Fasenbreite: "$(getvar,chamferb))]^c^c_CHAMFERB
|
|
[$(eval," Limitenfaktor: "$(getvar,ltscale))]^c^c_LTSCALE
|
|
[--]
|
|
[$(eval," 3D-Netzdichte 1: "$(getvar,surftab1))]^c^c_SURFTAB1
|
|
[$(eval," 3D-Netzdichte 2: "$(getvar,surftab2))]^c^c_SURFTAB2
|
|
[$(eval," Erhebung: "$(getvar,elevation))]^c^c_ELEVATION
|
|
[$(eval," Objekth”he: "$(getvar,thickness))]^c^c_THICKNESS
|
|
[$(eval," Shade-Edge: "$(getvar,shadedge))]^c^c_SHADEDGE
|
|
[<-$(eval," Shade-Dif: "$(getvar,shadedif))]^c^c_SHADEDIF
|
|
[->Befehle]
|
|
|
|
***POP2
|
|
[HAASCAD]
|
|
[--]
|
|
[->Grundriá]
|
|
[->Darstellung]
|
|
[nur 2D ]^c^c^p(progn(setvar "USERI1" 2)(prin1))
|
|
[nur 3D ]^c^c^p(progn(setvar "USERI1" 3)(prin1))
|
|
[<-2D + 3D (default)]^c^c^P(progn(setvar "USERI1" 1)(prin1))
|
|
[--]
|
|
[->Mauerwerk]
|
|
[Auáenwand ]^C^C^P(progn (setq DO_ARGS '("wall" "c:wall" "Aussen" "Neu")) (prin1)) DO_FAME12
|
|
[Auáenwand anschlieáen]^C^C^P(progn (setq DO_ARGS '("wall" "c:wall" "Aussen" "Alt")) (prin1)) DO_FAME12
|
|
[Innenwand ]^C^C^P(progn (setq DO_ARGS '("wall" "c:wall" "Innen" "Neu")) (prin1)) DO_FAME12
|
|
[Innenwand anschlieáen]^C^C^P(progn (setq DO_ARGS '("wall" "c:wall" "Innen" "Alt")) (prin1)) DO_FAME12
|
|
[B�rowand/Rasterwand ]^C^C^P(progn (setq DO_ARGS '("cg6107_0" "c:mwb" "cg6107_0.vor")) (prin1)) DO_FAME12
|
|
[--]
|
|
[Aussparungen ]^C^C^P(progn (setq DO_ARGS '("cg6206_0" "c:asp" "cg6206.vor" "cg6206.vor")) (prin1)) DO_FAME12
|
|
[Wandausbruch ]^p^c^c(cond ((null c:ausb) (load (strcat hc_lsppath "HAAS822"))) ((prin1)));ausb
|
|
[St�tzen ]^C^C^P(progn (setq DO_ARGS '("cg6104_0" "c:stu" "cg6104.vor" "cg6104.vor")) (prin1)) DO_FAME12
|
|
[Pfeiler und S„ulen ]$i=grund_stuez $i=*
|
|
[--]
|
|
[Innenwand l”schen ]^C^C^P(progn (setq DO_ARGS '("cg6108_0" "c:cg6108" "dummy")) (prin1)) DO_FAME12
|
|
[Wand heilen ]^p^c^c(cond ((null c:heile) (load (strcat hc_lsppath "HAAS821"))) ((prin1)));heile
|
|
[--]
|
|
[Plinie --> Wand ]^C^C^P(progn (if (not c:gp) (progn (load (strcat Ppath "WPOLY"))+
|
|
(xload (strcat Ppath "cg6100_0")) )) (prin1)) gp
|
|
[<-Linie --> Fl„che ]^C^C^P(progn (setq DO_ARGS '("c:l2f" "cg6103_0" "dummy")) (prin1)) DO_FAME
|
|
[->Fenster]
|
|
[Konfigurieren ]^C^C^P(progn (setq DO_ARGS '("cg6214_0" "c:handle_cfg_cg6214" "cg6201.vor" "cg6205.vor" "cg6210.vor" "cg6211.vor")) (prin1)) DO_FAME12
|
|
[--]
|
|
[Standard ]^C^C^P(progn (setq DO_ARGS '("c:oms" "cg6201_0" "cg6201" "c:fen" "cg6205_0" "cg6205")) (prin1)) DO_FAME
|
|
[F�r runde W„nde ]^C^C^P(progn (setq DO_ARGS '("window" "c:window")) (prin1)) DO_FAME12
|
|
[™ffnung „ndern ]^C^C^P(progn (setq DO_ARGS '("cg6213_0" "c:cg6213" "dummy")) (prin1)) DO_FAME12
|
|
[<-™ffnung entfernen ]^C^C^P(progn (setq DO_ARGS '("cg6105_0" "c:obck" "dummy")) (prin1)) DO_FAME12
|
|
[->T�ren]
|
|
[Konfigurieren ]^C^C^P(progn (setq DO_ARGS '("cg6214_0" "c:handle_cfg_cg6214" "cg6201_t.vor" "cg6205.vor" "cg6210.vor" "cg6211.vor")) (prin1)) DO_FAME12
|
|
[--]
|
|
[Standard ]^C^C^P(progn (setq DO_ARGS '("c:oms" "cg6201_0" "cg6201_t" "c:tuer" "cg6210_0" "cg6210")) (prin1)) DO_FAME
|
|
[Schiebet�r ]^C^C^P(progn (setq DO_ARGS '("c:oms" "cg6201_0" "cg6201_t" "c:schtuer" "cg6211_0" "cg6211")) (prin1)) DO_FAME
|
|
[T�ranschlag „ndern ]^C^C^P(progn (setq DO_ARGS '("cg6212_0" "c:cg6212" "dummy")) (prin1)) DO_FAME12
|
|
[™ffnung „ndern ]^C^C^P(progn (setq DO_ARGS '("cg6213_0" "c:cg6213" "dummy")) (prin1)) DO_FAME12
|
|
[<-™ffnung entfernen ]^C^C^P(progn (setq DO_ARGS '("cg6105_0" "c:obck" "dummy")) (prin1)) DO_FAME12
|
|
[--]
|
|
[->Treppen]
|
|
[Konfigurieren ]^C^C^P(progn (setq DO_ARGS '("ck31_130" "c:handle_dbox_ck31_130" "ck31_130.dcl")) (prin1)) DO_FAME12
|
|
[--]
|
|
[Gerade ]^C^C^P(progn (setq DO_ARGS '("ck4000_0" "c:gpt" "ck4000_0.vor")) (prin1)) DO_FAME12
|
|
[1/4 gewendelt ]^C^C^P(progn (setq DO_ARGS '("ck4001_0" "c:vt" "ck4001_0.vor")) (prin1)) DO_FAME12
|
|
[1/2 gewendelt ]^C^C^P(progn (setq DO_ARGS '("ck4002_0" "c:ht" "ck4002_0.vor")) (prin1)) DO_FAME12
|
|
[Gewendelt ]^C^C^P(progn (setq DO_ARGS '("ck4003_0" "c:wt" "ck4003_0.vor")) (prin1)) DO_FAME12
|
|
[Podest 1/2 Richtungsw.]^C^C^P(progn (setq DO_ARGS '("ck4005_0" "c:ptv" "ck4005_0.vor")) (prin1)) DO_FAME12
|
|
[<-Podest mit Richtungsw.]^C^C^P(progn (setq DO_ARGS '("ck4004_0" "c:pth" "ck4004_0.vor")) (prin1)) DO_FAME12
|
|
[->D„cher]
|
|
[Konfigurieren ]^C^C^P(progn (setq DO_ARGS '("ck31_140" "c:handle_dbox_ck31_140")) (prin1)) DO_FAME12
|
|
[--]
|
|
[Flachdach ]^C^C^P(progn (setq DO_ARGS '("ck2001_0" "c:fd" "ck2001_0.vor")) (prin1)) DO_FAME12
|
|
[Satteldach ]^C^C^P(progn (setq DO_ARGS '("ck2000_0" "c:sd" "ck2000_0.vor")) (prin1)) DO_FAME12
|
|
[Walmdach ]^C^C^P(progn (setq DO_ARGS '("ck2002_0" "c:wd" "ck2002_0.vor")) (prin1)) DO_FAME12
|
|
[Krueppelwalmdach ]^C^C^P(progn (setq DO_ARGS '("ck2004_0" "c:kw" "ck2004_0.vor")) (prin1)) DO_FAME12
|
|
[<-Pyramidendach ]^C^C^P(progn (setq DO_ARGS '("ck2003_0" "c:pyra" "ck2003_0.vor")) (prin1)) DO_FAME12
|
|
[->Bemaáung]
|
|
[Konfiguration ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:handle_cfg_mec")) (prin1)) DO_FAME12
|
|
[--]
|
|
[Eingabe ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:input_mec")) (prin1)) DO_FAME12
|
|
[Update ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:update_mec")) (prin1)) DO_FAME12
|
|
[Gesamtupdate ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:update_all_mec")) (prin1)) DO_FAME12
|
|
[Masspunkte ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:add_mecpoints_mec")) (prin1)) DO_FAME12
|
|
[Kreuzen ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:crossing_mec")) (prin1)) DO_FAME12
|
|
[Skalieren ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:scale_mec")) (prin1)) DO_FAME12
|
|
[Wand bemaáen ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:auto_walls_mec")) (prin1)) DO_FAME12
|
|
[--]
|
|
[Fixieren ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:fix_numbers_mec")) (prin1)) DO_FAME12
|
|
[L”sen ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:unfix_numbers_mec")) (prin1)) DO_FAME12
|
|
[--]
|
|
[<-L”schen ]^C^C^P(progn (setq DO_ARGS '("ck31_80" "c:erase_mec")) (prin1)) DO_FAME12
|
|
[->Schnitte]
|
|
[H”henschnitt ]^C^C^P(progn (setq DO_ARGS '("ck3012_0" "c:ck3012_4" "ck3012_4.vor")) (prin1)) DO_FAME12
|
|
[Dachverschneidung]^C^C^P(progn (setq DO_ARGS '("ck3012_0" "c:ck3012_5" "ck3012_5.vor")) (prin1)) DO_FAME12
|
|
[Schnitt gerade ]^C^C^P(progn (setq DO_ARGS '("ck3012_0" "c:ck3012_3" "ck3012_3.vor")) (prin1)) DO_FAME12
|
|
[<-Schnitt versetzt ]^C^C^P(progn (setq DO_ARGS '("ck3012_0" "c:ck3012_6" "ck3012_6.vor")) (prin1)) DO_FAME12
|
|
[<-Schraffur ]^C^C^P(progn (setq DO_ARGS '("ck31_70" "c:hatch_update" "ck31_70.tab")) (prin1)) DO_FAME12
|
|
[->Innenarchitektur]
|
|
[Utensilien... ]$i=inn_ute1 $i=*
|
|
[EDV-Ger„te... ]$i=inn_pcmo $i=*
|
|
[Bilder... ]$i=inn_bild $i=*
|
|
[--]
|
|
[Wohnen/Schlafen... ]$i=famea_1 $i=*
|
|
[K�che/Bad/WC... ]$i=famea_2 $i=*
|
|
[--]
|
|
[Heizk”rper... ]$i=inn_heiz $i=*
|
|
[B”den, Decken... ]$i=inn_bode $i=*
|
|
[--]
|
|
[Jalousien ]^p^c^c(progn (load (strcat hc_lsppath "haas300")) (c:haas300))
|
|
[Lamellen ]^p^c^c(progn (load (strcat hc_lsppath "haas301")) (c:haas301))
|
|
[--]
|
|
[Personen... ]$i=famea_3 $i=*
|
|
[Fahrzeuge... ]$i=famea_5 $i=*
|
|
[<-B„ume... ]$i=famea_4 $i=*
|
|
[->Anzeige (Layerkontrolle)]
|
|
[->Artikelnummern 03]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 10 "ARTNR")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 11 "ARTNR")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "ARTNR")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "ARTNR")
|
|
[->Symbole 02]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 10 "SYMBOL")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 11 "SYMBOL")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "SYMBOL")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "SYMBOL")
|
|
[->Fangpunkte 07]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 10 "FANGPUNKT")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 11 "FANGPUNKT")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "FANGPUNKT")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "FANGPUNKT")
|
|
[->Bewegungs-/Arbeitsfl„chen 04]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 10 "BEWEGFL")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 11 "BEWEGFL")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "BEWEGFL")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "BEWEGFL")
|
|
[--]
|
|
[->Innenarchitektur]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "INNENARCH")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 13 "INNENARCH")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "INNENARCH")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "INNENARCH")
|
|
[->Bemaáung]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "BEMASSUNG")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 13 "BEMASSUNG")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "BEMASSUNG")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "BEMASSUNG")
|
|
[->Raumbuch]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "RAUMBUCH")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 13 "RAUMBUCH")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "RAUMBUCH")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "RAUMBUCH")
|
|
[->Positionsnummern]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "POSNR")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 13 "POSNR")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "POSNR")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "POSNR")
|
|
[--]
|
|
[->2D-Darstellung]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "2D")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 13 "2D")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "2D")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "2D")
|
|
[->3D-Darstellung]
|
|
[aus ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "3D")
|
|
[ein ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 13 "3D")
|
|
[--]
|
|
[sperren ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 14 "3D")
|
|
[<-entsperren]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 15 "3D")
|
|
[2D ein <=> 3D aus]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "3D");(hcly_main 13 "2D")
|
|
[3D ein <=> 2D aus]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "2D");(hcly_main 13 "3D")
|
|
[--]
|
|
[<-*** ALLES EIN *** ]^c^c._layer _th *;_on *;_fr FRZ_AME*;;
|
|
[->Auswertung]
|
|
[St�ckliste generieren]^p^c^c(cond ((null c:ca_mo_02) (load"/garb_sys/prg/ca_mo_02")) ((prin1)));(c:ca_mo_02 "PF");
|
|
[--]
|
|
[HPOS-UPOS bilden ]^p^c^c(cond ((null c:ca_mo_01) (load"/garb_sys/prg/ca_mo_01")) ((prin1)));ca_mo_01;
|
|
[--]
|
|
[Austausch Systeme ]^p^C^C(progn (princ) (princ "*** HERSTELLER-Programm - Bitte Men�punkt bei jeweiligem Hersteller aufrufen ***") (princ))
|
|
[Globales Nachtragen der Varianten]^p^C^C(progn (princ) (princ "*** HERSTELLER-Programm - Bitte Men�punkt bei jeweiligem Hersteller aufrufen ***") (princ))
|
|
[--]
|
|
[->Auswertung mit Parameter]
|
|
[Raumbegrenzung einzeichnen ]^c^c._pline \_wi 0.02 0.02;
|
|
[Raumkennung einf�gen ]^p^c^c(cond ((null c:ca_mo_04) (load"/garb_sys/prg/ca_mo_04")) ((prin1)));ca_mo_04;
|
|
[<-Auswertung ]^p^c^c(cond ((null c:ca_mo_02) (load"/garb_sys/prg/ca_mo_02")) ((prin1)));(c:ca_mo_02in "PF");
|
|
[--]
|
|
[<-St�ckliste -> WWS kopieren ]^p^c^c(cond ((null c:stcopy) (load (strcat hc_lsppath "haas818"))) ((prin1)));stcopy
|
|
[->3D-Darstellung]
|
|
[M”bel austauschen (2D => 3D) ]^p^c^c(cond ((null c:ca_mo_03) (load"/garb_sys/prg/ca_mo_03")) ((prin1)));ca_mo_03;
|
|
[--]
|
|
[3D-M”bel l”schen ]^p^c^c(cond ((null c:haas819) (load (strcat hc_lsppath "haas819"))) ((prin1)));haas819;
|
|
[3D-Optimierung ]^p^c^c(cond ((null c:pre_hide) (load (strcat hc_lsppath "pre_hide"))) ((prin1)));pre_hide;
|
|
[--]
|
|
[->Perspektive]
|
|
[Perspektivblock einsetzen]^p^c^c(cond ((null c:pers_a) (load (strcat hc_lsppath "haas310"))) ((prin1)));pers_a;
|
|
[--]
|
|
[Perspektive]$i=dar_pers $i=*
|
|
[Perspektive f�r Draufsicht ]^p^c^c(load (strcat hc_lsppath "haas310"));(c:pers nil);
|
|
[--]
|
|
[<-Perspektive via Dialog]^c^cfm_pers
|
|
[->Bildschirmfoto]
|
|
[erstellen ]^p^c^c(cond ((null c:sld2dxf) (load (strcat hc_lsppath "haas815"))) ((prin1)));sld2dxf;
|
|
[einlesen ]^p^c^c(cond ((null c:ladedxf) (load (strcat hc_lsppath "haas815"))) ((prin1)));ladedxf;
|
|
[--]
|
|
[ausschalten ]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 12 "DIA_ANSICHT")
|
|
[<-einschalten]^p^c^c(cond ((null c:hcly) (load (strcat hc_lsppath "haas820"))) ((prin1)));(hcly_main 13 "DIA_ANSICHT")
|
|
[--]
|
|
[->3D-W„nde einzeichnen]
|
|
[unsichtbar]^p^c^c(cond ((null c:haas813_u) (load (strcat hc_lsppath "haas813"))) ((prin1)));haas813_u;
|
|
[<-sichtbar]^p^c^c(cond ((null c:haas813_s) (load (strcat hc_lsppath "haas813"))) ((prin1)));haas813_s;
|
|
[--]
|
|
[->Farbgebung]
|
|
[nach Varianten ]^p^c^c(cond ((null c:ca_mo_05 ) (load"/garb_sys/prg/ca_mo_05")) ((prin1)));ca_mo_05;
|
|
[durch Vorgabedatei ]^p^c^c(cond ((null c:haas809 ) (load (strcat hc_lsppath "haas809"))) ((prin1)));(c:haas809 "hc_cstan.dat")
|
|
[<-durch Anpicken (Pickbox)]^p^c^c(cond ((null c:haas809 ) (load (strcat hc_lsppath "haas809"))) ((prin1)));(c:haas809 "")
|
|
[->HAASCAD-AutoShade]
|
|
[Stehlampe ]^p^c^c(cond ((null shade ) (load (strcat hc_lsppath "shade" ))) ((prin1)));LICHT \S;
|
|
[Deckenlampe ]^p^c^c(cond ((null shade ) (load (strcat hc_lsppath "shade" ))) ((prin1)));LICHT \D;
|
|
[~--]
|
|
[Kamera setzen ]^p^c^c(cond ((null shade ) (load (strcat hc_lsppath "shade" ))) ((prin1)));KAMERA;
|
|
[Szene einsetzen]^p^c^c(cond ((null shade ) (load (strcat hc_lsppath "shade" ))) ((prin1)));SZENE;
|
|
[~--]
|
|
[Kamerasicht ]^p^c^c(cond ((null shade ) (load (strcat hc_lsppath "shade" ))) ((prin1)));KAMSICHT;
|
|
[~--]
|
|
[Filmrolle erstellen ]^p^c^c(cond ((null shade ) (load (strcat hc_lsppath "shade" ))) ((prin1)));FILMROLL;
|
|
[<-AutoShade]^p^c^c(command "SHELL" "SHADE");
|
|
[<-RenderStar-šbergabe]^p^c^c(cond ((null c:haas814 ) (load (strcat hc_lsppath "haas814"))) ((prin1)));haas814;
|
|
[->HAASCAD-Tools]
|
|
[Drehen/Schieben/Kopieren DS]^p^c^c(cond ((null c:ds) (load (strcat hc_lsppath "haas801"))) ((prin1)));DS;
|
|
[Elemente um Basispunkt drehen DB]^p^c^c(cond ((null c:db) (load (strcat hc_lsppath "haas806"))) ((prin1)));DB;
|
|
[Text global „ndern TG]^p^c^c(cond ((null c:tg) (load (strcat hc_lsppath "haas805"))) ((prin1)));TG;
|
|
[Element spiegeln mit Bst.-Nr. ]^p^c^c(cond ((null c:ca_mo_06) (load"/garb_sys/prg/ca_mo_06"))) ((prin1)));ca_mo_06;
|
|
[->Stanzen]
|
|
[Stanzlinie einzeichnen]^c^cplinie \b 0.02 0.02;
|
|
[--]
|
|
[Stanzen -> l”schen ]^p^C^C(cond ((null c:stanz) (load (strcat hc_lsppath "haas203"))) ((princ)));stanz;
|
|
[<-Stanzen -> schieben]^p^C^C(cond ((null c:mschieb)(load (strcat hc_lsppath "haas203"))) ((princ)));mschieb;
|
|
[--]
|
|
[->Elementlayer]
|
|
[aus EA ]^p^c^c(cond ((null c:ea) (load (strcat hc_lsppath "haas804"))) ((prin1)));EA;
|
|
[frieren ELF]^p^c^c(cond ((null c:ea) (load (strcat hc_lsppath "haas804"))) ((prin1)));EA;
|
|
[durch Element setz. ELS]^p^c^c(cond ((null c:els)(load (strcat hc_lsppath "haas804"))) ((prin1)));ELS;
|
|
[<-auf akt. Layer setz. ELA]^p^c^c(cond ((null c:ela)(load (strcat hc_lsppath "haas804"))) ((prin1)));ELA;
|
|
[->Werte setzen durch Anpicken]
|
|
[Layer EL]^p^c^c(cond ((null c:el) (load (strcat hc_lsppath "haas804"))) ((prin1)));EL;
|
|
[Linientyp ET]^p^c^c(cond ((null c:et) (load (strcat hc_lsppath "haas804"))) ((prin1)));ET;
|
|
[Farbe EF]^p^c^c(cond ((null c:ef) (load (strcat hc_lsppath "haas804"))) ((prin1)));EF;
|
|
[Textstil und Gr”sse ES]^p^c^c(cond ((null c:es) (load (strcat hc_lsppath "haas804"))) ((prin1)));ES;
|
|
[--]
|
|
[<-<-Alle Werte EP]^p^c^c(cond ((null c:ep) (load (strcat hc_lsppath "haas804"))) ((prin1)));EP;
|
|
[->HAASCAD-Vorgaben]
|
|
[Zeichnungsrahmen einf�gen ]^p^c^c(cond ((null c:haas800) (load (strcat hc_lsppath "haas800"))) ((prin1)));haas800;
|
|
[->Benutzermakros]
|
|
[definieren ]^p^c^c(cond ((null c:bmdef) (load (strcat hc_lsppath "haas811"))) ((prin1)));bmdef;
|
|
[<-einf�gen ]^p^c^c(cond ((null c:bmcall) (load (strcat hc_lsppath "haas811"))) ((prin1)));bmcall;
|
|
[HAASCAD-Zeichens„tze... ]$i=div_stil $i=*
|
|
[--]
|
|
[->Bibliothek-Verwaltung]
|
|
[Bibliothek ausw„hlen ]^p^c^c(if (null c:XX_ma_01) (progn(load"/garb/XX/prg/XX_ma_01")(prin1)) (prin1)) XX_ma_01
|
|
[Makro definieren ]^p^c^c(if (null c:XX_ma_02) (progn(load"/garb/XX/prg/XX_ma_01")(prin1)) (prin1)) XX_ma_02
|
|
[--]
|
|
[Makro plazieren ]^p^c^c(if (null c:XX_ma_03) (progn(load"/garb/XX/prg/XX_ma_01")(prin1)) (prin1)) XX_ma_03
|
|
[Makro plazieren MATCH ]^p^c^c(if (null c:XX_ma_04) (progn(load"/garb/XX/prg/XX_ma_01")(prin1)) (prin1)) XX_ma_04
|
|
[--]
|
|
[Makrodaten „ndern ]^p^c^c(if (null c:XX_ma_05) (progn(load"/garb/XX/prg/XX_ma_01")(prin1)) (prin1)) XX_ma_05
|
|
[<-Makro l”schen ]^p^c^c(if (null c:XX_ma_06) (progn(load"/garb/XX/prg/XX_ma_01")(prin1)) (prin1)) XX_ma_06
|
|
[--]
|
|
[->Initialisieren/Konfigurieren]
|
|
[Herstellertablettmen�s anpassen ]^p^c^c(cond ((null c:haas816) (load (strcat hc_lsppath "haas816"))) ((prin1)));haas816;
|
|
[Tablett/Maus-Tasten konfigurieren]^p^c^c(cond ((null c:haas817) (load (strcat hc_lsppath "haas817"))) ((prin1)));haas817;
|
|
[--]
|
|
[Vorgabewerte einstellen]^p^c^c(cond ((null haas850) (load (strcat hc_lsppath "haas850"))) ((prin1)));xunload_all;(HAAS850 0);
|
|
[*** GRUNDEINSTELLUNG ***]^p^c^c(cond ((null haas850) (load (strcat hc_lsppath "haas850"))) ((prin1)));xunload_all;(HAAS850 1);
|
|
[--]
|
|
[->Tablett konfigurieren]
|
|
[--]
|
|
[Neukonfigurieren ]^p^c^c(progn (princ "Tablettbereiche 1-4 anpicken (linke-obere, linke-untere, rechte-untere Ecke).") (prin1));_TABLET;_CFG;4;\\\36;9;\\\11;9;\\\14;9;\\\36;7;_Y
|
|
[Rekonfigurieren ]^p^c^c(progn (princ "Tablettbereiche 1-4 anpicken (linke-obere, linke-untere, rechte-untere Ecke).") (prin1));_TABLET;_CFG;4;_Y;\\\36;9;\\\11;9;\\\14;9;\\\36;7;_Y
|
|
[Kalibrieren ]^c^cTABLETT KAL
|
|
[<-<-<---]
|
|
[->Status / Info]
|
|
[$(eval," Zeit: "$(edtime,$(getvar,date),HH:MM))]
|
|
[$(eval," Datum: "$(edtime,$(getvar,date),D.M.YYYY))]
|
|
[$(eval,"Z-Name: "$(getvar,dwgname)".DWG")]
|
|
[--]
|
|
[$(eval,"Sicherung alle "$(getvar,savetime)" min")]^c^c_SAVETIME
|
|
[--]
|
|
[$(eval,"Konstruktionspkt: "$(if,$(=,$(getvar,blipmode),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar BLIPMODE ^p(- 1 (getvar "BLIPMODE"))
|
|
[$(eval,"Text mitspiegeln: "$(if,$(=,$(getvar,mirrtext),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar MIRRTEXT ^p(- 1 (getvar "MIRRTEXT"))
|
|
[$(eval,"Obj. ausleuchten: "$(if,$(=,$(getvar,highlight),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar HIGHLIGHT ^p(- 1 (getvar "HIGHLIGHT"))
|
|
[$(eval," Solids f�llen: "$(if,$(=,$(getvar,fillmode),1),$(eval,"JA"),$(eval,"NEIN")))]'_setvar FILLMODE ^p(- 1 (getvar "FILLMODE"))
|
|
[$(eval," 3D Kanten: "$(if,$(=,$(getvar,splframe),1),$(eval,"SICHTBAR"),$(eval,"UNSICHTB.")))]'_setvar SPLFRAME ^p(- 1 (getvar "SPLFRAME"))
|
|
[$(eval," Tilemode: "$(if,$(=,$(getvar,tilemode),1),$(eval,"EIN"),$(eval,"AUS")))]'_setvar tilemode ^p(- 1 (getvar "tilemode"))
|
|
[--]
|
|
[$(eval," Farbe: "$(getvar,cecolor))]^c^c_CECOLOR
|
|
[$(eval," Linientyp: "$(getvar,celtype))]^c^c_CELTYPE
|
|
[$(eval," Textstil: "$(getvar,textstyle))]^c^c_TEXTSTYLE
|
|
[$(eval," TextgrӇe: "$(getvar,textsize))]^c^c_TEXTSIZE
|
|
[$(eval," Schraffurmuster: "$(getvar,hpname))]^c^c_HPNAME
|
|
[$(eval,"Punktdarstellung: "$(getvar,pdmode))]^c^c_PDMODE
|
|
[$(eval," Punkt-GrӇe: "$(getvar,pdsize))]^c^c_PDSIZE
|
|
[$(eval," Abrundenradius: "$(getvar,filletrad))]^c^c_FILLETRAD
|
|
[$(eval," Fasenbreite: "$(getvar,chamferb))]^c^c_CHAMFERB
|
|
[$(eval," Limitenfaktor: "$(getvar,ltscale))]^c^c_LTSCALE
|
|
[--]
|
|
[$(eval," 3D-Netzdichte 1: "$(getvar,surftab1))]^c^c_SURFTAB1
|
|
[$(eval," 3D-Netzdichte 2: "$(getvar,surftab2))]^c^c_SURFTAB2
|
|
[$(eval," Erhebung: "$(getvar,elevation))]^c^c_ELEVATION
|
|
[$(eval," Objekth”he: "$(getvar,thickness))]^c^c_THICKNESS
|
|
[$(eval," Shade-Edge: "$(getvar,shadedge))]^c^c_SHADEDGE
|
|
[<-$(eval," Shade-Dif: "$(getvar,shadedif))]^c^c_SHADEDIF
|
|
|
|
***icon
|
|
**grund_stuez
|
|
[Pfeiler, S„ulen]
|
|
[haascad(hcstu01,Pfeiler 1)]^p^C^C(cond ((null haas808) (load (strcat hc_lsppath "haas808"))) (princ));(c:haas808 1);
|
|
[haascad(hcstu02,Pfeiler 2)]^p^C^C(cond ((null haas808) (load (strcat hc_lsppath "haas808"))) (princ));(c:haas808 2);
|
|
[haascad(hcstu03,S„ule 1)]^p^C^C(cond ((null haas808) (load (strcat hc_lsppath "haas808"))) (princ));(c:haas808 4);
|
|
[haascad(hcstu04,S„ule 2)]^p^C^C(cond ((null haas808) (load (strcat hc_lsppath "haas808"))) (princ));(c:haas808 3);
|
|
|
|
**inn_bild
|
|
[Bilder]
|
|
[haascad(hcbild1,Linien )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2BILD1__" )
|
|
[haascad(hcbild3,Dreieck )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2BILD3__" )
|
|
[haascad(hcbild2,Umsatz )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2BILD2__" )
|
|
[haascad(hcbild4,Bl„tter )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2BILD4__" )
|
|
|
|
**div_stil
|
|
[Zeichens„tze]
|
|
[HAASCAD(HCSTILN,Normschrift )]^C^CSTIL norm haas-n 0.00;;;;;
|
|
[HAASCAD(HCSTILB,Blockschrift )]^C^CSTIL block haas-b 0.00;;;;;
|
|
[HAASCAD(HCSTILD,Doppelschrift )]^C^CSTIL doppel haas-d 0.00;;;;;
|
|
|
|
**inn_pcmo
|
|
[PC, Monitore, Drucker]
|
|
[haascad(hcpc07,Workstation #1 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCWORK1" )
|
|
[haascad(hcpc01,PC-Geh„use )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCTISCH" )
|
|
[haascad(hcpc02,PC-Geh„use klein)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCTISC2" )
|
|
[haascad(hcpc03,Towergeh„use )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCTOWER" )
|
|
[haascad(hcpc04,Laptop )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCLAPTP" )
|
|
[haascad(hcpc09,Tastatur )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCTAST_" )
|
|
[haascad(hcpc05,Monitor 12" )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCMON12" )
|
|
[haascad(hcpc06,Monitor 20" )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCMON20" )
|
|
[haascad(hcpc14,Laserdrucker )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCLASER" )
|
|
[haascad(hcpc13,Matrixrucker )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCDRUCK" )
|
|
[haascad(hcpc15,A3-Plotter )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCPLOT3" )
|
|
[haascad(hcpc16,A0-Plotter )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCPLOT0" )
|
|
[haascad(hcpc10,Digitizer )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCTABLT" )
|
|
[haascad(hcpc11,Streamer )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PCSTREA" )
|
|
|
|
**inn_ute1
|
|
[Utensilien]
|
|
[haascad(hcut01,Ordner )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2ORDNER1" )
|
|
[haascad(hcut05,x-Ordner )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2ORDNERX" )
|
|
[haascad(hcut06,Lampe )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2LAMPE1_" )
|
|
[haascad(hcut13,Globus )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2GLOBUS_" )
|
|
[haascad(hcut02,Telefon )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2TELEFON" )
|
|
[haascad(hcut14,Tablett )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2TTABLET" )
|
|
[haascad(hcut15,Tassen/Teller )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2TTABLTT" )
|
|
[haascad(hcut03,Blume )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2BLUME1_" )
|
|
[haascad(hcut07,M�lleimer )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2MUELL1_" )
|
|
[haascad(hcut08,Aktenkoffer )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2KOFFER_" )
|
|
[haascad(hcut12,Schreibmaschine )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2SMASCH_" )
|
|
[haascad(hcut04,Projektor )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2PROJEKT" )
|
|
[haascad(hcut09,Kopierer )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2KOPIER_" )
|
|
[haascad(hcut10,Ventilator kl. )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2VENTILA" )
|
|
[haascad(hcut11,Ventilator gr. )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2VENTIL2" )
|
|
[haascad(hcut16,Wanduhr )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2WANDUHR" )
|
|
[haascad(hcut17,Nordenpfeil 1 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2NORD1__" )
|
|
[haascad(hcut18,Nordenpfeil 2 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2NORD2__" )
|
|
[haascad(hcut19,Nordenpfeil 3 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2NORD3__" )
|
|
|
|
**inn_bode
|
|
[Fussboden, Decken]
|
|
[haascad(hcbode01,FB kariert )]^p^c^c(cond ((null haas302) (load (strcat hc_lsppath "haas302"))) (princ));haas302;
|
|
[haascad(hcbode04,DE kariert )]^p^c^c(cond ((null haas307) (load (strcat hc_lsppath "haas307"))) (princ));haas307;
|
|
[haascad(hcbode02,FB L„ngsmuster)]^p^c^c(cond ((null haas303) (load (strcat hc_lsppath "haas303"))) (princ));haas303;
|
|
[haascad(hcbode05,DE L„ngsmuster)]^p^c^c(cond ((null haas306) (load (strcat hc_lsppath "haas306"))) (princ));haas306;
|
|
[haascad(hcbode07,DE mit Lampen )]^p^c^c(cond ((null haas308) (load (strcat hc_lsppath "haas308"))) (princ));haas308;
|
|
[haascad(hcbode08,DE mit Lampen )]^p^c^c(cond ((null haas309) (load (strcat hc_lsppath "haas309"))) (princ));haas309;
|
|
[haascad(hcbode03,Fuáboden var. )]^p^c^c(cond ((null haas304) (load (strcat hc_lsppath "haas304"))) (princ));haas304;
|
|
[haascad(hcbode06,Decke var. )]^p^c^c(cond ((null haas305) (load (strcat hc_lsppath "haas304"))) (princ));haas305;
|
|
|
|
**inn_heiz
|
|
[Heizk”rper]
|
|
[haascad(hchei08,Breite 800 mm)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) )(haas802 "2heiz08_" )
|
|
[haascad(hchei13,Breite 1300 mm)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) )(haas802 "2heiz13_" )
|
|
[haascad(hchei15,Breite 1500 mm)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) )(haas802 "2heiz15_" )
|
|
[haascad(hchei18,Breite 1800 mm)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) )(haas802 "2heiz18_" )
|
|
|
|
**dar_pers
|
|
[Ansichtsh”he w„hlen]
|
|
[haascad(hcpers1,Augenh”he ca. 2 m )]^p^c^c(load (strcat hc_lsppath "haas310"));(c:pers "1");
|
|
[haascad(hcpers2,Augenh”he ca. 3 m )]^p^c^c(load (strcat hc_lsppath "haas310"));(c:pers "2");
|
|
[haascad(hcpers3,Augenh”he ca. 6 m )]^p^c^c(load (strcat hc_lsppath "haas310"));(c:pers "3");
|
|
[haascad( Augenh”he variabel )]^p^c^c(load (strcat hc_lsppath "haas310"));(c:pers "D");
|
|
|
|
**famea_1
|
|
[Wohnen/Schlafen]
|
|
[famea(ach001a,Einzelbett )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH001A" )
|
|
[famea(ach002a,Doppelbett )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH002A" )
|
|
[famea(ach003a,Tisch )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH003A" )
|
|
[famea(ach004a,Schreibtisch )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH004A" )
|
|
[famea(ach005a,Wohnzimmertisch )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH005A" )
|
|
[famea(ach006a,Rundtisch )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH006A" )
|
|
[famea(ach010a,Sitzgruppe )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH010A" )
|
|
[famea(ach009a,2er Sofa )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH009A" )
|
|
[famea(ach008a,3er Sofa )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH008A" )
|
|
[famea(ach007a,Sessel #1 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH007A" )
|
|
[famea(ach012a,Sessel #2 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH012A" )
|
|
[famea(ach016a,Garderobe )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH016A" )
|
|
[famea(ach011a,Eátisch 8 Personen)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH011A" )
|
|
[famea(ach013a,Eátisch 4 Personen)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH013A" )
|
|
[famea(ach014a,Eátisch 3 Personen)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH014A" )
|
|
[famea(ach022a,Fernseher )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH022A" )
|
|
|
|
**famea_2
|
|
[K�che/Bad/WC]
|
|
[famea(ach015a,Eckbank )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH015A" )
|
|
[famea(ach017a,Sp�le klein )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH017A" )
|
|
[famea(ach018a,Sp�le groá )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH018A" )
|
|
[famea(ach019a,E-Herd )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH019A" )
|
|
[fameb(ach023a,Schrank 1 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH023A" )
|
|
[fameb(ach024a,Schrank 2 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH024A" )
|
|
[fameb(ach020a,Schrank 3 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH020A" )
|
|
[fameb(ach021a,Schrank 4 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH021A" )
|
|
[famea(ach026a,Badewanne )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH026A" )
|
|
[famea(ach027a,Duschwanne )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH027A" )
|
|
[famea(ach028a,Waschbecken #1 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH028A" )
|
|
[famea(ach029a,Waschbecken #2 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH029A" )
|
|
[famea(ach030a,Waschbecken #3 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH030A" )
|
|
[famea(ach035a,Doppelwaschbecken)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH035A" )
|
|
[famea(ach031a,WC #1 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH031A" )
|
|
[famea(ach032a,WC #2 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH032A" )
|
|
[famea(ach033a,WC #3 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH033A" )
|
|
[famea(ach034a,WC #4 )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH034A" )
|
|
|
|
**famea_3
|
|
[Personen]
|
|
[famea(ach031c,Mann mit Koffer )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH031C" )
|
|
[famea(ach029c,Mann mit Mantel )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH029C" )
|
|
[famea(ach033c,Mann mit Tasche )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH033C" )
|
|
[famea(ach032c,Frau mit Tasche )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH032C" )
|
|
[famea(ach028c,Mann mit Junge )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH028C" )
|
|
[famea(ach030c,Frau mit M„dchen )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH030C" )
|
|
[famea(ach034c,Kinder )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH034C" )
|
|
[famea(ach035c,Ehepaar )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH035C" )
|
|
|
|
**famea_4
|
|
[B„ume]
|
|
[famea(ach040a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH040A" )
|
|
[famea(ach040c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH040C" )
|
|
[famea(ach041a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH041A" )
|
|
[famea(ach041c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH041C" )
|
|
[famea(ach042a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH042A" )
|
|
[famea(ach042c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH042C" )
|
|
[famea(ach043a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH043A" )
|
|
[famea(ach043c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH043C" )
|
|
[famea(ach044a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH044A" )
|
|
[famea(ach044c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH044C" )
|
|
[famea(ach045a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH045A" )
|
|
[famea(ach045c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH045C" )
|
|
|
|
**famea_5
|
|
[Fahrzeuge]
|
|
[famea(ach050a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH050A" )
|
|
[famea(ach050c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH050C" )
|
|
[famea(ach050f,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH050F" )
|
|
[famea(ach050r,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH050R" )
|
|
[famea(ach052a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH052A" )
|
|
[famea(ach052c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH052C" )
|
|
[famea(ach052f,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH052F" )
|
|
[famea(ach052r,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH052R" )
|
|
[famea(ach055a,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH055A" )
|
|
[famea(ach055c,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH055C" )
|
|
[famea(ach055f,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH055F" )
|
|
[famea(ach055r,)]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH055R" )
|
|
|
|
|