blob: 6b0874ccb947e363e22966458a9bf4b6a26bc786 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
-- File: SWDRAW_ToVRML.cdl
-- Created: Mon Aug 3 18:40:15 1998
-- Author: Christian CAILLET
-- <cky@heliox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 1998
class ToVRML from SWDRAW
---Purpose : Writes a Shape to a File in VRML Format
uses CString, OStream, AsciiString from TCollection, Shape from TopoDS
is
Create returns ToVRML;
EmissiveColorRed (me : in out) returns Real;
---C++ : return &
EmissiveColorGreen (me : in out) returns Real;
---C++ : return &
EmissiveColorBlue (me : in out) returns Real;
---C++ : return &
DiffuseColorRed (me : in out) returns Real;
---C++ : return &
DiffuseColorGreen (me : in out) returns Real;
---C++ : return &
DiffuseColorBlue (me : in out) returns Real;
---C++ : return &
Transparency (me : in out) returns Real;
---C++ : return &
AmbientIntensity (me : in out) returns Real;
---C++ : return &
SpecularColorRed (me : in out) returns Real;
---C++ : return &
SpecularColorGreen (me : in out) returns Real;
---C++ : return &
SpecularColorBlue (me : in out) returns Real;
---C++ : return &
Shininess (me : in out) returns Real;
---C++ : return &
Texture (me : in out) returns AsciiString;
---C++ : return &
CreaseAngle (me : in out) returns Real;
---C++ : return &
Deflection (me : in out) returns Real;
---C++ : return &
Write (me; shape : Shape from TopoDS; filename : CString) returns Boolean;
---Purpose : conversion of a Shape into VRML format for 3d visualisation
fields
myEmissiveColorRed : Real; -- def 0.3
myEmissiveColorGreen : Real; -- def 0.3
myEmissiveColorBlue : Real; -- def 0.3
myDiffuseColorRed : Real; -- def 0.3
myDiffuseColorGreen : Real; -- def 0.3
myDiffuseColorBlue : Real; -- def 0.5
myTransparency : Real; -- def 0.0
myAmbientIntensity : Real; -- def 0.3
mySpecularColorRed : Real; -- def 0.7
mySpecularColorGreen : Real; -- def 0.7
mySpecularColorBlue : Real; -- def 0.8
myShininess : Real; -- def 0.1
myTexture : AsciiString; -- def " [] "
myCreaseAngle : Real; -- def 1.57
myDeflection : Real; -- def 0.005
end ToVRML;
|
