[->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 fllen: "$(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 [Browand/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 [Sttzen ]^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 [Fr 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 [->Tren] [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 [Schiebetr ]^C^C^P(progn (setq DO_ARGS '("c:oms" "cg6201_0" "cg6201_t" "c:schtuer" "cg6211_0" "cg6211")) (prin1)) DO_FAME [Transchlag „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=* [Kche/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] [Stckliste 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 Menpunkt bei jeweiligem Hersteller aufrufen ***") (princ)) [Globales Nachtragen der Varianten]^p^C^C(progn (princ) (princ "*** HERSTELLER-Programm - Bitte Menpunkt bei jeweiligem Hersteller aufrufen ***") (princ)) [--] [->Auswertung mit Parameter] [Raumbegrenzung einzeichnen ]^c^c._pline \_wi 0.02 0.02; [Raumkennung einfgen ]^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"); [--] [<-Stckliste -> 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 fr 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 einfgen ]^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; [<-einfgen ]^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] [Herstellertablettmens 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 fllen: "$(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,Mlleimer )]^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 [Kche/Bad/WC] [famea(ach015a,Eckbank )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH015A" ) [famea(ach017a,Sple klein )]^p^c^c(if (null haas802) (progn(load (strcat hc_lsppath "haas802"))(prin1)) (prin1) ) (haas802 "2CH017A" ) [famea(ach018a,Sple 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" )