;;-------------------------------------*
;;                                     *
;;  Copyright 2021  Volker Burkert     *
;;                                     *
;; Setzt den Hintergrund Weiss         *
;;                                     *
;;-------------------------------------*

(sd-defdialog 'SD_Hindergrundfarbe_Weiss
:toolbox-button t
:dialog-control :sequential
:dialog-title "SD_Hindergrundfarbe_Weiss"
:ok-action
'(

vp_background
 :vport (oli::sd-inq-current-vp)
 :type :color
 :color1 :color 16777215 :done complete

set_vp_capping (oli::sd-inq-current-vp) :on
set_vp_capping (oli::sd-inq-current-vp) :part-color
 :3DGEO :ON

 :3DGEO_SHADED :ON
 :3DGEO_EDGED :ON
 :3DGEO_WIRE :OFF
 :3DGEO_HIDDEN :ON
 :3DGEO_HIDDEN_DIMMED :OFF
 :3DGEO_MIXED :OFF
 :3DGEO_VERTICES :OFF

 :3DGEO_PART_TRANSPARENCY :ON
 :3DGEO_FACE_TRANSPARENCY :OFF
 :3DGEO_FACE_COLOR :ON
 :3DGEO_PART_REFLECTANCE :ON
 :3DGEO_FACE_REFLECTANCE :OFF
 :3DGEO_EDGE_COLOR :OFF

 :3DGEO_LABEL :OFF
 :DOCU_PLANES :OFF
 :COORD_SYSTEM :OFF
 :CLIP_PLANES :OFF
 :CLIP_LINES :OFF
 :CLIP_HATCHES :ON
 :FEATURE_PTS :ON


 :WORKPLANES :OFF

 :WORKPLANES_BORDER :OFF
 :WORKPLANES_LOCAL_AXIS :OFF
 :WORKPLANES_LABEL :ON
 :WORKPLANES_DIM_INACTIVE :OFF
 :WORKPLANE_SETS_MATCH_LINES :ON
 :WORKPLANES_2DGEO :ON
 :WORKPLANES_2DCONSTRUCTION :OFF
 :WORKPLANES_2DGEO_VERTICES :OFF
 :WORKPLANES_2DGEO_LABEL :OFF
 :WORKPLANES_HIDDEN :ON
 :WORKPLANES_2DGEO_COLOR :ON
 :WORKPLANES_2DGEO_LINE_TYPE :ON
))