Download - Odeon

will produce five surface, the first one containing the numbers given in the ListOfPointNumbers the
next surface with 1 added to all the corners in the list etc.. Of course all the points referred to
need to be defined, typically this is done using a CountPt definition for each of the corners
referred to in the corner list of the CountSurf statement. In the above example the points 1000-
1004, 1100-1104, 1200-1204 and 1300-1304 need to be defined.
Sample room files:
Beams.Par
BeamBox.Par
BeamBoxWithWindows.Par
Revolution surface RevSurf
RevSurf must follow the syntax:
RevSurf
The RevSurf command is typical used together with two CountPt statements to create a revolution
surface using two ‘curves' of points. The curves must contain the same number of points. The
RevSurf command will always create a number of surfaces each build from four points.
A unique number from 1 to 2.147.483647 for identification of first surface in the revolution
surface. Using the same number, but with negative sign, defines the surface and its counter
part mirrored in the XZ-plane (Y = 0).
First point number in the first revolution curve. The ‘curve of points' is typically created using
the CountPt statement and the curve must contain one more point than number of sections in
the RevSurf.
First point number in the second revolution curve. The curve of points is typically created
using the CountPt statement and the curve must contain one more point than the number of
sections in the RevSurf. The second curve must always contain the same number of points as
the first curve.
The number of surfaces to be created by the RevSurf statement. If creating a cylinder a number
between 12 and 24 is suggested. Although it is easy to create many surfaces in a revolution
surface, too many small surfaces should be avoided. If the FirstSurfaceNumber is 100 and
SectionsInRevSurf is 3, surface 100, 101 and 102 will be created.
Optional user defined name for easy identification of the surface, e.g. cylindric wall'.
Example:
RevSurf 1000 100 200 6 Cylinder
creates a revolution surface divided in 6 surfaces (surface 1000 - 1005). This call requires two
curves of each 6+1 points to be defined, namely point 100 to 106 and point 200 to 206. If the
two curves of points define corners in the lower and upper edge of a cylinder, a cylinder of 6
sections is created (see example room: RevSurfCylinder.Par)
Loops using the FOR....END construct
The For statement must follow the syntaks:
For
App-28