explicit license agreement and without paying any license fees or royalties.
To use Tcl/Tk, please refer to the Licensing Terms (http://www.tcl.tk/software/tcltk/license.html).
-**Robert Boehne** has developed **GNU Autoconf**, **Automake** and **Libtool** scripts and makefiles
-for the Open CASCADE project http://sourceforge.net/projects/autoopencas/,
-which became an initial groundwork for the build scripts based on respective GNU tools
-(autoconf, automake and libtool) in Open CASCADE Technology version 4.0.
-These scripts are now maintained by the OPEN CASCADE company.
-
**GL2PS** is developed by Christophe Geuzaine and others. It is optionally used by OCCT to
export content of OpenGL scene to vector graphics formats (PS, PDF, EMF, SVG).
The library is licensed under GL2PS LICENSE http://www.geuz.org/gl2ps/COPYING.GL2PS Version 2, November 2003.
ENABLE_PREPROCESSING = YES
MACRO_EXPANSION = YES
EXPAND_ONLY_PREDEF = YES
-PREDEFINED = Standard_EXPORT __Standard_API __Draw_API Handle(a):=Handle<a> DEFINE_STANDARD_ALLOC DEFINE_NCOLLECTION_ALLOC
+PREDEFINED = Standard_EXPORT Standard_OVERRIDE:=override __Standard_API __Draw_API Handle(a):=Handle<a> DEFINE_STANDARD_ALLOC DEFINE_NCOLLECTION_ALLOC
GENERATE_HTML = YES
GENERATE_LATEX = NO
SEARCH_INCLUDES = YES
set ddir .
if { [info exists env(CSF_OCCTDataPath)] } {
set ddir [file join $env(CSF_OCCTDataPath) occ]
-} else if { [info exists env(CASROOT)] } {
+} elseif { [info exists env(CASROOT)] } {
set ddir [file join $env(CASROOT) data occ]
}
vdisplay bottle
vfit
vsetdispmode 1
+vaspects -isoontriangulation 1
vdisplay res
vsetdispmode 1
vshowfaceboundary res 1 255 255 255
+vaspects -isoontriangulation 1
vfit
vinit Driver1/Viewer1/View1
vclear
vsetdispmode 1
+ vrenderparams -msaa 8
vlight clear
vlight add amb
vsetcolor board_4 0 0.6 0.55
vsetcolor board_5 0 0.6 0.55
vsetcolor board_12 0 0.3 0.33
- vsetcolor board_15 0 0.3 0.33
+ vsetcolor board_14 0 0.3 0.33
vdisplay rpads
vsetcolor rpads 0.7 0.6 0.4
XSetColor D board_4 0 0.6 0.55
XSetColor D board_5 0 0.6 0.55
XSetColor D board_12 0 0.3 0.33
-XSetColor D board_15 0 0.3 0.33
+XSetColor D board_14 0 0.3 0.33
SetName D [XAddShape D case 0] "Case"
XSetColor D case 0.7 0.7 0.7
vlight add amb
vlight add directional direction 1 -1 -2 head 1
vsetdispmode 1
+vrenderparams -msaa 8
vfit
# save to STEP if variable i7_save_xde is defined (specifies file name)
if [info exists i7_save_xde] {
param write.surfacecurve.mode 0
WriteStep D $i7_save_xde
-}
\ No newline at end of file
+}
incmesh cutter 0.01
vdisplay cutter
vsetdispmode cutter 1
+vrenderparams -msaa 8
incmesh profile_1 0.01; vdisplay profile_1
vfit
vrotate -0.3 -0.3 0
vfit
vzoom 1.2
+vrenderparams -msaa 8
puts "Done."
\ No newline at end of file
incmesh drill 0.01
vdisplay drill
vsetdispmode drill 1
+vrenderparams -msaa 8
vfit
# show section and sweep path
vsetgradientbg 180 200 255 180 180 180 2
vlight change 0 pos -1 1 1
vsetdispmode 1
+vrenderparams -msaa 8
# adjust scene bounding box
box bnd 0 0 0 180 210 1
vfit
vsetdispmode 1
+vrenderparams -msaa 8
vsetcolorbg 255 255 255
#param write.iges.brep.mode 1
# display in 3d view
vinit Driver1/Viewer1/View1 w=1024 h=768
vdisplay snowflake lines text
+vrenderparams -msaa 8
vsetcolor snowflake 0 0 0
vsetcolor lines 0 0 0
vsetcolor text 0 0 0