The parser is used for ...
This article describes the general syntax and behavior of the text parser.
The complete source is read in 2 passes.
The first pass (global variable
The
REVISION = numberThis numeric value is used to decide, how the following sections are read and handled. This may be important if the tools change the syntax and/or semantics. Any section may have a parameter
@REVISION = numberto change the revision number only for the current section.
If an external tool add some sections at the end, they should first declare
Example:
[NAME] # Use syntax and semantics of tools revision 1234 for this section @REVISION = 1234 # Calculated check points ...→ Define and calculate global values in the
The local name space is cleared every time when a new section begins. Variables of the global name space are held until the complete scanning and parsing is done.
Predefined constants are definition set by the parser.
The user can add user constants by using the command line option
»--const name1=val1,name2=val2,...« (or
Some sections define automatically global variables for cross section links.
The user can define private, local and global variables.
Syntax:
@DEF NAME [['?']'=' EXPRESSION] [, NAME= ...]... @PDEF NAME [['?']'=' EXPRESSION] [, NAME= ...]... @LDEF NAME [['?']'=' EXPRESSION] [, NAME= ...]... @GDEF NAME [['?']'=' EXPRESSION] [, NAME= ...]...
An extension immediately behind the DEF command force the storing type:
It's also possible to define enumerated and shifted values with:
The old commands @NUM, @GNUM, @INT, @GINT, @FLOAT and @GFLOAT are still allowed for compatibility reasons as alternatives for @DEF, @GDEF, @DEF.I, @GDEF.I, @DEF.F and @GDEF.F.
Examples:
@def.i my_item = 0x0a + 3 @gdef.f origin ?= 123.4, origin2 = origin/2 @ldef $a.num = -12.3
If a vector with name
If decoding a text file the scanned index names may be used for the new output.
Syntax:
VALUE := [SIGN]... OPERAND SIGN := '+' | '-' | '!' | '^' OPERAND := INTEGER | BITFIELD | FLOAT | NAME | FUNCTION | '(' EXPRESSION ')' BITFIELD := '<' [BITPARAM] '>' BITPARAM := VALUE [ ':' VALUE ] [ ',' BITPARAM ] FUNCTION := FUNCNAME '(' [PARAMLIST] ')'
Signs are calculated from right to left:
sign | description |
---|---|
Don't change the value. | |
Mathematical negation. | |
Logical negation. The result is either 0 (FALSE) or 1 (TRUE). | |
Bitwise negation. The result is always an integer. |
A Bitfield is an easy way to set bits in an integer. For example value <2,4:6> is an integer with bits 2 and 4..6 set (=0x74).
Syntax:
EXPRESSION := VALUE | EXPRESSION2 | EXPRESSION3 EXPRESSION2 := EXPRESSION OPERATOR EXPRESSION EXPRESSION3 := EXPRESSION '?' EXPRESSION ':' EXPRESSION OPERATOR := '**' | '*' | '/' | '%' | '+' | ...
The following operators are supported:
operator | prio | description |
---|---|---|
1 | Power of | |
2 | Multiplication | |
2 | Division | |
2 | Modulo | |
3 | Addition | |
3 | Subtraction | |
4 | Shift left | |
4 | Shift right | |
5 | Greater than | |
5 | Greater than or equal | |
5 | Less than | |
5 | Less than or equal | |
6 | Equal value | |
6 | Non equal value | |
6 | Equal type AND equal value | |
6 | Non equal type OR non equal value | |
7 | Bitwise AND (parameters are converted to INT) | |
8 | Bitwise OR (parameters are converted to INT) | |
9 | Bitwise EOR (parameters are converted to INT) | |
10 | Logical AND (all non null values are TRUE) | |
11 | Logical OR (all non null values are TRUE) | |
12 | Logical EOR (all non null values are TRUE) | |
13 | Alternation Syntax: EXPRESSION '?' EXPRESSION ':' EXPRESSION |
Syntax:
FUNCTION := FUNCNAME '(' [PARAMLIST] ')' FUNCNAME := Any combination of a-z (case ignored), 0-9, '.', '_' and '$'. PARAMLIST := EXPRESSION [ ',' PARAMLIST ]
Function Reference | ||
---|---|---|
File Type |
Return Value & Function Name & Parameters |
Description |
* | int $ (...) |
This debug function returns the number of parameters. |
* | * abs (val) |
Returns the absolute value of 'val'. If 'val' is a vector, the absolute value of each component is calculated. The return type is identical to the type of 'val'. |
* | flt|vec acos (val) |
Returns the arc cosine of 'val' in degree. If 'val' is a vector, the arc cosine of each component is calculated. |
KMP | int area$dest (area_idx) |
Returns the destination index (e.g. camera index) of an area. |
KMP | int area$mode (area_idx) |
Returns the mode of an area. |
KMP | int area$n () |
Returns the number of areas. |
KMP | vector area$pos (area_idx) |
Returns the position of an area. |
KMP | vector area$rot (area_idx) |
Returns the rotation of an area. |
KMP | vector area$scale (area_idx) |
Returns the scale of an area. |
KMP | int area$set (area_idx,val_idx) |
Returns setting 0..3 of an area. |
KMP | int area$type (area_idx) |
Returns the type of an area. Cameras are type 0. |
KMP | int area$unknown (area_idx) |
Returns the unknown value of an area. |
* | flt|vec asin (val) |
Returns the arc sine of 'val' in degree. If 'val' is a vector, the arc sine of each component is calculated. |
* | flt|vec atan (val) |
Returns the arc tangent of 'val' in degree. If 'val' is a vector, the arc tangent of each component is calculated. |
* | float atan2 (x,z) |
Returns the arc tangent of 'z/x' in degree, using the signs of the two arguments to determine the quadrant of the result. Both arguments are converted to a float before operation. If 'x' is a vector, its x component is used. If 'z' is a vector, its z component is used. |
* | vector axisRot (pt,deg,axis1,axis2) |
The point 'pt' is rotated around the axis 'axis1->axis2' by 'deg' degree, which is a scalar. The other 3 parameters are converted to vectors before operation. |
* | flt|vec bezier (pos,v1,va[,vb],v2) |
Calculate the position 'pos' on a bezier curve going from 'v1' to 'v2'. 'va' and 'vb' are helper points. If 'vb' is not set, a quadratic bezier curve is calculated. Otherwise 'va' and 'vb' are set and a cubic bezier curve is calculated. Position 0.0 returns 'v1' and position 1.0 'v2'. All position values between 0.0 and 1.0 return a point of the calculated bezier curve between points 'v1' and 'v2'. If 'pos' is a vector, different positions for each coordinate are used.
If any parameter is a vector, all parameters are converted to vectors and the result is a vector. Otherwise all parameters are converted to floats and the result is a float. |
* | float calcNormals (p1,p2[,helper][,r]]) |
This function calculates 3 right-angled normals (index 0..2) for the vector 'p1..p2', 'normal[0]' is the direction of this vector. Is 'helper' is set, it is used to determine the direction of normal[1]. All 3 normals are multiplied by the factor 'r'. The function returns the distance between 'p1' and 'p2'. To get the normals, use function getNormal(). |
KMP | int came$n () |
Returns the number of cameras. |
KMP | int came$next (came_idx) |
Returns -1 or the link to the next camera. |
KMP | int came$ocam () |
Returns the index of the opening camera. |
KMP | vector came$pos (came_idx) |
Returns the position of a camera. |
KMP | int came$route (came_idx) |
Returns -1 or the link to the related route. |
KMP | int came$scam () |
Returns the index of the selection camera. |
KMP | float came$time (came_idx) |
Returns the run time of a camera in 1/60 sec. |
KMP | int came$type (came_idx) |
Returns the type of a camera. |
KMP | int came$unknown_02 (came_idx) |
Returns the unknown value at offser 0x02 of a camera. |
KMP | int came$unknown_04 (came_idx) |
Returns the unknown value at offser 0x04 of a camera. |
KMP | int came$unknown_0a (came_idx) |
Returns the unknown value at offser 0x0a of a camera. |
KMP | vector came$unknown_18 (came_idx) |
Returns the unknown value at offser 0x18 of a camera. |
KMP | vector came$viewpt_begin (came_idx) |
Returns the start position of the view point. |
KMP | vector came$viewpt_end (came_idx) |
Returns the end position of the view point. |
KMP | int came$viewpt_speed (came_idx) |
Returns the view point speed in units per 100/60 sec. |
KMP | float came$zoom_begin (came_idx) |
Returns the zoom beginning angle of a camera. |
KMP | float came$zoom_end (came_idx) |
Returns the zoom ending angle of a camera. |
KMP | int came$zoom_speed (came_idx) |
Returns the zoom speed in units per 100/60 sec. |
* | * ceil (val) |
Returns the smallest integral value that is not less than 'val'. If 'val' is a vector, the calculation is done for each component. The return type is identical to the type of 'val'. |
KMP | int ckph$len (ckph_idx) |
Returns the number of check points of a check point group. |
KMP | int ckph$n () |
Returns the number of check point groups. |
KMP | int ckph$next (ckph_idx,val_idx) |
Returns link 0..5 to the next check point group. |
KMP | int ckph$prev (ckph_idx,val_idx) |
Returns link 0..5 to the previous check point group. |
KMP | int ckph$start (ckph_idx) |
Returns the check point start index of a check point group. |
KMP | int ckph$unknown (ckph_idx) |
Returns the unknown value of a check point group. |
KMP | vector ckpt$left (ckpt_idx) |
Returns the left position of a check point. |
KMP | int ckpt$mode (ckpt_idx) |
Returns the mode of check point. |
KMP | int ckpt$n () |
Returns the number of check points. |
KMP | int ckpt$next (ckpt_idx) |
Returns the index of the next check point. |
KMP | int ckpt$prev (ckpt_idx) |
Returns the index of the previous check point. |
KMP | int ckpt$respawn (ckpt_idx) |
Returns the respawn index of a check point. |
KMP | vector ckpt$right (ckpt_idx) |
Returns the right position of a check point. |
KMP | int cnpt$effect (cnpt_idx) |
Returns the efffect value of a canon point. |
KMP | int cnpt$id (cnpt_idx) |
Returns the ID of a canon point. |
KMP | int cnpt$n () |
Returns the number of canon point points. |
KMP | vector cnpt$pos (cnpt_idx) |
Returns the position of a canon point. |
KMP | vector cnpt$rot (cnpt_idx) |
Returns the rotation of a canon point. |
* | flt|vec cos (val) |
Returns the cosine of 'val', where 'val' is given in degree. If 'val' is a vector, the cosine of each component is calculated. |
* | vector cross (v1,v2) |
Returns the cross product of the 2 vectors 'v1' and 'v2'. |
* | float dir ([v1,]v2) |
The 3D direction in degree from position 'v1' to 'v2' is calculated. If 'v1' is not set, v(0,0,0) is used. The Z coordiante of the result is always 0.0. |
* | float dot (v1,v2) |
Returns the dot product of the 2 vectors 'v1' and 'v2'. |
* | * echo (p1,...) |
This debug function prints all parameters, each in a separate line, and returns the first parameter. |
KMP | int enph$len (enph_idx) |
Returns the number of enemy points of an enemy point group. |
KMP | int enph$n () |
Returns the number of enemy point groups. |
KMP | int enph$next (enph_idx,val_idx) |
Returns link 0..5 to the next enemy point group. |
KMP | int enph$prev (enph_idx,val_idx) |
Returns link 0..5 to the previous enemy point group. |
KMP | int enph$start (enph_idx) |
Returns the enemy point start index of an enemy point group. |
KMP | int enph$unknown (enph_idx) |
Returns the unknown value of an enemy point group. |
KMP | float enpt$hDir (enpt_index[,next_index]) |
Calculate the horizontal direction in degree of an enemy point. The 'next_index' is only used, if multiple links are available. |
KMP | int enpt$n () |
Returns the number of enemy points. |
KMP | int enpt$next (enpt_index[,next_index]) |
Returns the index of the next enemy point. The 'next_index' is only used, if multiple links are available. |
KMP | vector enpt$pos (enpt_idx) |
Returns the position of an enemy point. |
KMP | int enpt$prop (enpt_idx,val_idx) |
Returns property 0 or 1 of an enemy point. |
KMP | float enpt$scale (enpt_idx) |
Returns the scale of an enemy point. |
* | flt|vec exp (val) |
Returns the value of e (the base of natural logarithms) raised to the power of 'val'. If 'val' is a vector, the calculation is done for each component. |
* | float float (val) |
Converts 'val' to a float value. |
* | * floor (val) |
Returns the largest integral value that is not greater than 'val'. If 'val' is a vector, the calculation is done for each component. The return type is identical to the type of 'val'. |
* | vector getNormal (index) |
This function returns the normal 'index' (0..2) of the last call of function calcNormals(). If 'index' is invalid, $NONE is returned. |
KMP | int gobj$id (gobj_idx) |
Returns the object ID of a global object. |
KMP | int gobj$n () |
Returns the number of global objects. |
KMP | int gobj$pflags (gobj_idx) |
Returns the presence flags of a global object. |
KMP | vector gobj$pos (gobj_idx) |
Returns the position of a global object. |
KMP | vector gobj$rot (gobj_idx) |
Returns the rotation of a global object. |
KMP | int gobj$route (gobj_idx) |
Returns -1 or the index of a related route of a global object. |
KMP | vector gobj$scale (gobj_idx) |
Returns the scale of a global object. |
KMP | int gobj$set (gobj_idx,val_idx) |
Returns setting 0..7 of a global object. |
KMP | int gobj$unknown (gobj_idx) |
Returns the unknown value of a global object. |
* | float hDir ([v1,]v2) |
'hDir()' is the old name for 'yDir()'. The horizontal direction in degree from position 'v1' to 'v2' is calculated. If 'v1' is not set, v(0,0,0) is used. |
* | float hLen (v1[,v2]) |
Returns the horizontal length of the vector 'v1' (ignoring the y component). If 'v2' is set, the horizontal distance of both points is returned. |
* | float hLen2 (v1[,v2]) |
Returns the square of the horizontal length of the vector 'v1' (ignoring the y component). If 'v2' is set, the horizontal square distance of both points is returned. |
* | vector hRot (pt,deg[,origin]) |
'hRot()' is the old name for 'yRot()'. The point 'pt' is horizontal rotated around 'origin' by 'deg' degree. If 'pt' is a scalar, 'vz(pt)' is used. If 'origin' is not set, v(0,0,0) is used. |
* | int ifLevel () |
This debug function returns the current IF..ENDIF level (number of active '@if's). |
* | int int (val) |
Converts 'val' to an integer value. |
* | int isDef (name) |
Returns 2, if variable 'name' is defined, or 1, if a variable with the base name is defined as vector, or 0, if it is not defined. |
* | int isFloat (name) |
Returns 2, if variable 'name' is defined as float with a value >0, or 1, if it is a float with a value <=0. Otherwise it returns 0. |
* | int isFunction (name) |
Returns 1, if 'name' is defined as system function, or 2, if 'name' is defined as user function, or 3, if 'name' is defined as system and as user function. Otherwise it's not a function and 0 is returned. |
* | int isInt (name) |
Returns 2, if variable 'name' is defined as an integer with a value >0, or 1, if it is an integer with a value <=0. Otherwise it returns 0. |
* | int isKCL () |
Returns 2, if the source is a KCL or OBJ named 'course.kcl' or 'course.txt' or 'course.txt.kcl', 1 if the source is any other KCL or OBJ, and 0 else. |
* | int isKMP () |
Returns 2, if the source is a KMP (binary or text) named 'course.kmp' or 'course.txt' or 'course.txt.kmp', 1 if the source is any other KMP (binary or text), and 0 else. |
* | int isMacro (name) |
Returns 2, if 'name' is defined as user function, or 1, if 'name' is defined as simple macro. Otherwise it's not a macro or user function and 0 is returned. |
* | int isNumeric (name) |
Returns 1, if variable 'name' is an integer, float or vector. Otherwise it returns 0. |
* | int isScalar (name) |
Returns 2, if variable 'name' is an integer or float with a value >0, or 1, if it is an integer or float with a value <=0. Otherwise it returns 0. |
* | int isVector (name) |
Returns 1, if variable 'name' is defined as vector. Otherwise it returns 0. |
KMP | int itph$len (itph_idx) |
Returns the number of item points of an item point group. |
KMP | int itph$n () |
Returns the number of item point groups. |
KMP | int itph$next (itph_idx,val_idx) |
Returns link 0..5 to the next item point group. |
KMP | int itph$prev (itph_idx,val_idx) |
Returns link 0..5 to the previous item point group. |
KMP | int itph$start (itph_idx) |
Returns the item point start index of an item point group. |
KMP | int itph$unknown (itph_idx) |
Returns the unknown value of an item point group. |
KMP | float itpt$hDir (itpt_index[,next_index]) |
Calculate the horizontal direction in degree of an item point. The 'next_index' is only used, if multiple links are available. |
KMP | int itpt$n () |
Returns the number of item points. |
KMP | int itpt$next (itpt_index[,next_index]) |
Returns the index of the next item point. The 'next_index' is only used, if multiple links are available. |
KMP | vector itpt$pos (itpt_idx) |
Returns the position of an item point. |
KMP | int itpt$prop (itpt_idx,val_idx) |
Returns property 0 or 1 of an item point. |
KMP | float itpt$scale (itpt_idx) |
Returns the scale of an item point. |
KMP | int jgpt$effect (jgpt_idx) |
Returns the effect value of a respawn point. |
KMP | int jgpt$id (jgpt_idx) |
Returns the ID of a respawn point. |
KMP | int jgpt$n () |
Returns the number of respan points. |
KMP | vector jgpt$pos (jgpt_idx) |
Returns the position of a respawn point. |
KMP | vector jgpt$rot (jgpt_idx) |
Returns the rotation of a respawn point. |
* | vector kcl$fall (pt,width[,typemask]) |
If a reference KCL is defined, search the lowest point below 'pt', that can be reached without collision. The point is expanded to a cube with edge length 'width' for the collision tests. If 'typemask' is set, only KCL types with related bit number set are recognized. Use kcl$fallFlag() to get the corespondent KCL flag. |
* | int kcl$fallFlag () |
This functions returns the corespondent KCL flag of the last call of kcl$fall(). The return value is the KCL flag of the colliding triangle, or -1 if no collision was found. |
KMP | int ktpt$id (ktpt_idx) |
Returns a start point ID. |
KMP | int ktpt$n () |
Returns the number of start points. |
KMP | vector ktpt$pos (ktpt_idx) |
Returns a start point position. |
KMP | vector ktpt$rot (ktpt_idx) |
Returns a start point rotation. |
KMP | int ktpt$unknown (ktpt_idx) |
Returns the unknown value of a start point. |
* | float len (v1[,v2]) |
Returns the length of the vector 'v1'. If 'v2' is set, the distance of both points is returned. |
* | float len2 (v1[,v2]) |
Returns the square od the length of the vector 'v1'. If 'v2' is set, the square distance of both points is returned. |
* | int line () |
This debug function returns the current line number. |
* | flt|vec log (val[,base]) |
If base is not set or invalid, the function returns the natural logarithm of 'val'. Otherwise base is converted to a float and logarithm with the entered base is returned (=log(val)/log(base)). If 'val' is a vector, the calculation is done for each component. |
* | int loopCount ([level]) |
This debug function returns the loop counter of the specified loop level. If 'level' is omitted, the loop count of the current loop is returned. |
* | int loopLevel () |
This debug function returns the current loop level (number of active loops). |
* | * max (p1,...) |
Returns the maximum value of all parameters. If at least one parameter is a vector, the result is a vector too and the maximum value of each component is calculated. |
* | * mean (p1,...) |
Returns the arithmetic mean of all parameters. If at least one parameter is a vector, the result is a vector too and the maximum value of each component is calculated. The result type is UNSET, FLOAT or VECTOR, but never INT. |
* | * min (p1,...) |
Returns the minimum value of all parameters. If at least one parameter is a vector, the result is a vector too and the minimum value of each component is calculated. |
* | * minMax (val,minval,maxval) |
Returns 'max(min(val,minval),maxval)': Limit the value 'val' by 'minval' and 'maxval'. The return type is identical to the type of 'val'. |
* | int mSec () |
Returns the number of milliseconds since an unspecific timer start. Use differences between 2 calls to get the elapsed time. The 3 functions sec(), mSec() and uSec() use the same time base. |
KMP | int mspt$effect (mspt_idx) |
Returns the efffect value of a battle point. |
KMP | int mspt$id (mspt_idx) |
Returns the ID of a battle point. |
KMP | int mspt$n () |
Returns the number of battle points. |
KMP | vector mspt$pos (mspt_idx) |
Returns the position of a battle point. |
KMP | vector mspt$rot (mspt_idx) |
Returns the rotation of a battle point. |
* | * param (index) |
Returns the value of the macro or function parameter with the entered 1-based index. Therefor the private variable '$N' and one of '$1', '$2', ... are read. |
* | flt|vec pos (pos,p1,p2) |
This function returns the relative position 'pos' on the axis 'p1' to 'p2' by calculating 'p1+pos*(p2-p1)'. If one of the 3 arguments is a vector, the result is also a vector. |
KMP | int poti$back (route_idx) |
Returns the forward+backward value of a route (route header byte at offset 0x03). |
KMP | int poti$n () |
Returns the number of routes. |
KMP | int poti$nn () |
Returns the total number of points of all routes. |
KMP | int poti$np (route_idx) |
Returns the number of points of a route. |
KMP | vector poti$pos (route_idx,pt_idx) |
Returns the position of a point of a route. The point index is relative to the route. |
KMP | int poti$set (route_idx,pt_idx,val_idx) |
Returns setting 0 or 1 of a point of a route. The point index is relative to the route. |
KMP | int poti$smooth (route_idx) |
Returns the smooth value of a route (route header byte at offset 0x02). |
* | flt|vec pow (a,b) |
Returns the value of 'a' raised to the power of 'b'. If 'a' is a vector, each component is raised by 'b'. The operator ** does the same, but have integer support. |
* | int ptInConvexPolygon (pt,p1,..,pN) |
All parameters are converted into vectors, but only the x and z coordinates are used. 'p1..pN' are up to 100 vertices of a convex polygon. The function returns 1, if the point 'pt' is inside the polygon (including the lines), and 0 otherwise.
Function status() will return the direction of the polygon: -1 for counterclockwise, +1 for clockwise and 0 for unknown. |
* | int ptsInConvexQuad (q1,q2,q3,q4,pt1,...,ptN) |
All parameters are converted into vectors, but only the x and z coordinates are used. 'q1..q4' define a convex quadrilateral, and 'pt1..ptN' is a list of up to 100 points. The functions returns the number of points, that are inside the quadrilateral. Points on the line are counted as inside too.
Function status() will return the direction of the quadrilateral: -1 for counterclockwise, +1 for clockwise and 0 for unknown. |
* | int ptsInConvexTri (t1,t2,t3,pt1,...,ptN) |
All parameters are converted into vectors, but only the x and z coordinates are used. 't1..t3' define a convex triangle, and 'pt1..ptN' is a list of up to 100 points. The functions returns the number of points, that are inside the triangle. Points on the line are counted as inside too.
Function status() will return the direction of the triangle: -1 for counterclockwise, +1 for clockwise and 0 for unknown. |
* | int ptsInCuboid (cube_min,cube_max,pt1,...) |
All parameters are converted to vectors. 'cube_*' describe 2 diagonal corners of a rectangular cuboid, assuming that 'cube_min<=cube_max' is true for each coordinate. The functions returns the number of points ('pt1', 'pt2', ...) that are inside of the cube including the border. |
* | int ptsInCuboidS (cube1,cube2,pt1,...) |
This is the sloppy version of ptInCuboid(): All parameters are converted to vectors. 'cube*' describe any 2 diagonal corners of a rectangular cuboid. The functions returns the number of points ('pt1', 'pt2', ...) that are inside of the cube including the border. |
* | * random ([max]) |
Returns a random number between 0 and 'max', but never equal 'max'. The return type is identical to the type of 'max'. If 'max' is not set, 1.0 is assumed. If 'max' is a vector, a vector with three random numbers will be returned. |
* | * result () |
Returns the last include, macro or function result. The value is usually '$NONE', unless the command '@RETURN' is used. |
* | vector rot (pt,deg_vector[,origin]) |
The point 'pt' is rotated around 'origin'. The rotation is done for the x-, y- and z-axis in this order. All parameters are converted to vectors before the operation. If 'origin' is not set, v(0,0,0) is used. |
* | * round (val) |
Returns the rounded integer value of 'val'. If 'val' is a vector, the calculation is done for each component. The return type is identical to the type of 'val'. |
* | scalar scalar (val) |
If 'val' is a float or a vector, a float value is returned. Otherwise an integer value is returned. |
* | int sec () |
Returns the number of seconds since an unspecific timer start. Use differences between 2 calls to get the elapsed time. The 3 functions sec(), mSec() and uSec() use the same time base. |
* | * select (sel,p0,p1,...,pN) |
First the selector 'sel' is converted to an integer. If 'sel' is less or equal 0, 'p0' is returned. If 'sel' is greater or equal N, 'pN' is returned. Otherwise 'sel' is between 0 and N and 'p(sel)' is returned. |
* | int sideOfLine (a,b,pt) |
All parameters are converted into vectors, but only the x and z coordinates are used. Vectors 'a' and 'b' define a line (from a to b). The function returns -1, if the point 'pt' is on the left side of the line, or +1, if the point is on the right side, or 0 if the point is on the line. |
* | * sign (val) |
Returns the sign of 'val': -1 if 'val<0'; 0, if 'val==0'; +1 if 'val>0'. If 'val' is a vector, the sign of each component is calculated. The return type is identical to the type of 'val'. |
* | flt|vec sin (val) |
Returns the sine of 'val', where 'val' is given in degree. If 'val' is a vector, the sine of each component is calculated. |
* | int sourceLevel () |
This debug function returns the current source level (number of open files and macros). |
* | flt|vec sqrt (val) |
Returns the nonnegative square root of 'abs(val)'. If 'val' is a vector, the square root of each component is calculated. |
* | int status () |
Some function support a return value and an additionally status. This function will return the last set status. |
KMP | int stgi$byte (stgi_idx,val_idx) |
Returns setting byte 0..11 of a stage info. |
KMP | int stgi$n () |
Returns the number of stage infos. |
* | flt|vec tan (val) |
Returns the tangent of 'val', where 'val' is given in degree. If 'val' is a vector, the tangent of each component is calculated. |
KCL | int tri$create (kcl_flag,pt0,pt1,pt2,...) |
This function appends new triangles at the end of the triangle list with the entered parameters. If more than 3 points are entered, all points must be in the same plane and the polygon is split into multiple (N-2) triangles. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createAntiArrow (flag,pt1,pt2,ptX,r,n,a_flag[,a_size][,b_flag][,b_ht]) |
This function creates an antiprism based arrow with radius 'r' and N faces from 'pt1' to 'pt2', where 'pt2' is the place of the arrowhead. The point 'ptX' is used for the orientation (direction of first edge). 'flag', 'a_flag' and 'b_flag' are KCL flags to define the color. 'a_size' is the addition size factor of the arrowhead, the default is 1.0. If 'b_flag' is not set or @-1@, no base is drawn. If 'base_height' is set, a pyramid is drawn as base. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createAntiPrism (kcl_flag,pt1,pt2,ptX,r,n[,base_flag][,base_height]) |
This function creates an antiprism with radius 'r' and N faces from 'pt1' to 'pt2' by adding 2*N triangles. The point 'ptX' is used for the orientation (direction of first edge). If 'base_flag' is set and not @-1@, the base is printed with ths kcl flag value. If 'base_height' is set, a pyramid is drawn as base. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createArrow (flag,pt1,pt2,ptX,r,n,a_flag[,a_size][,b_flag][,b_ht]) |
This function creates a prism based arrow with radius 'r' and N faces from 'pt1' to 'pt2', where 'pt2' is the place of the arrowhead. The point 'ptX' is used for the orientation (direction of first edge). 'flag', 'a_flag' and 'b_flag' are KCL flags to define the color. 'a_size' is the addition size factor of the arrowhead, the default is 1.0. If 'b_flag' is not set or @-1@, no base is drawn. If 'base_height' is set, a pyramid is drawn as base. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createCuboid (kcl_flag,pos,size[,rot]) |
This function creates a cuboid by adding 12 triangles. If 'size' is a scalar, a cube with the entered edge length is created. If 'rot' is set, the cube is rotated. As last operation the center (origin) of the cube is shifted to 'pos'. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createJoist (kcl_flag,length,pt1,pt2,pt_dir[,n_marker][,mark5_flag]) |
This function appends a triangular joist from 'p1' to 'p2' to at the end of the triangle list. 'length' the length of the body and 'pt_dir' is a helper point for its direction. If 'n_marker' is >0, markers representing the number are added. If 'mark5_flag' is >0, every 5 markers are replaced by one of the entered flag. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createOctahedron (kcl_flag,pos,radius[,rot]) |
This function creates a octahedron by adding 8 triangles. If 'radius' is a scalar, a regular octahedron created. Otherwise it is a vector and define different radiuses for each axis. If 'rot' is set, the octahedron is rotated. As last operation the center (origin) of the cube is shifted to 'pos'. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createPrism (kcl_flag,pt1,pt2,ptX,r,n[,base_flag][,base_height]) |
This function creates a prism with radius 'r' and N faces from 'pt1' to 'pt2' by adding 2*N triangles. The point 'ptX' is used for the orientation (direction of first edge). If 'base_flag' is set and not @-1@, the base is printed with ths kcl flag value. If 'base_height' is set, a pyramid is drawn as base. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$createPyramid (kcl_flag,apex,pt1,pt2,...) |
This function creates a pyramid by adding N triangles. 'pt1'..'ptN' descibribes the base polygon, which is not created. The function returns the index of the first new triangle or -1 if failed. |
KCL | int tri$defColor (argb[,alpha]) |
Define a new color. 'ARGB' is a bytes coded color: alpha,red,green,blue. If 'ALPHA' is not set, the highest byte of 'ARGB' is used. If this highest byte is null, 0xff (no transparency) is used. The function returns -1, if already 200 colors defined. Otherwise it returns the virtual KCL flag for the user defined color. |
KCL | int tri$defColor (red,green,blue[,alpha]) |
Define a new color. If ALPHA is not set, 0xff (no transparency) is used. For the 3 colors, values between 0x00 and 0xff are expected. The function returns -1, if already 200 colors defined. Otherwise it returns the virtual KCL flag for the user defined color. |
KCL | int tri$flag (tri_index[,mode]) |
This function returns the KCL flag of the triangle 'tri_index' (0..). If mode is '1', the original source value is returned. If mode is '2', the original source value transformed by --kcl-flag is returned; if --kcl-flag is not set, it is the same as mode '1'. Otherwise the current value is returned. The current value is initialized by the value of mode '2'. Values >0xffff are possible and represent internal drawings. |
KCL | int tri$getColor (index) |
This function returns the color defined by a previous tri$defColor() call. INDEX is the virtual KCL flag for the user defined color. On error, the value NONE (type 'undefined') is returned. |
KCL | int tri$hRot (tri_index,degree[,origin]) |
This function rotates the triangle 'tri_index' (0..) horizontal counterclockwise by the angle 'degree' around the point 'origin'. If the origin is not set, v(0,0,0) is used instead. |
KCL | int tri$isRemoved (tri_index) |
This returns the status of the 'REMOVED' marker of the triangle 'tri_index' (0..). The return value is -1 for an invalid index, 1 if the triangle is marked as removed or 0 if not. |
KCL | float tri$length (tri_index) |
This function returns the length of triangle 'tri_index' (0..). |
KCL | vector tri$n () |
This function returns the number of triangles. |
KCL | vector tri$normal (tri_index,norm_index) |
This function returns the normal with index 'norm_index' (0..3) of triangle 'tri_index' (0..). |
KCL | vector tri$pt (tri_index,pt_index) |
This function returns the point with index 'pt_index' (0..2) of triangle 'tri_index' (0..). |
KCL | int tri$ptsInCuboid (tri_index,cube_min,cube_max) |
Parameters 'cube_*' are converted to vectors. They describe 2 diagonal corners of a rectangular cuboid, assuming that 'cube_min<=cube_max' is true for each coordinate. The functions returns the number of points of the triangle 'tri_index' (0..), that are inside of the cube including the border. If 'tri_index' is invalid, -1 is returned. |
KCL | int tri$remove (tri_index) |
This function marks the triangle 'tri_index' (0..) as 'REMOVED'. The return value is -1 for an invalid index, 1 if the triangle was already removed or 0 if not. |
KCL | int tri$scale (tri_index,scale[,origin]) |
This function scales the triangle 'tri_index' (0..) by the vector 'scale' relative to point 'origin'. If the origin is not set, v(0,0,0) is used instead. |
KCL | int tri$setFlag (tri_index,new_flag) |
This function sets the new KCL flag of triangle 'tri_index' (0..). The function returns -1 for an invalid index or the previous value of the KCL flag. |
KCL | int tri$setPt (tri_index,pt0,pt1,pt2) |
This function sets the coordinates of all 3 points of the triangle 'tri_index' (0..) to the vectors 'pt*'. |
KCL | int tri$setPt (tri_index,pt_index,pt) |
This function sets the coordinates of the single point with index 'pt_index' (0..2) of triangle 'tri_index' (0..). to the vector 'pt'. |
KCL | int tri$shift (tri_index,shift) |
This function adds the vector 'shift' to all 3 points of the triangle 'tri_index' (0..). |
KCL | int tri$type (tri_index[,mode]) |
This function returns the KCL type of the triangle 'tri_index' (0..). It works like tri$flag(), but the flag is transformed to a type. The return value is in the range of 0x00..0x1f (5 lowest bits of the flag), if it is a real KCL flag (<0x10000), or -1 otherwise (special type). |
KCL | int tri$unremove (tri_index) |
This function clears the 'REMOVED' marker of the triangle 'tri_index' (0..). The return value is -1 for an invalid index, 1 if the triangle was removed or 0 if not. |
* | * trunc (val) |
Returns the nearest integer not larger in absolute value than 'val' (rounding towards zero). If 'val' is a vector, the calculation is done for each component. The return type is identical to the type of 'val'. |
* | int type (name) |
Returns the type of the variable 'name' (TYPE$UNSET, TYPE$INT, TYPE$FLOAT, TYPE$VECTOR, TYPE$X, TYPE$Y, TYPE$Z) or value 'TYPE$UNDEF', if it is not defined. It is guaranteed, that 'TYPE$UNDEF < TYPE$UNSET < all_others'. |
* | vector unit (v1[,v2]) |
Returns the unit vector of the vector 'v1'. If 'v2' is set, then the unit vector for the difference 'v2-v1' is returned. |
* | int uSec () |
Returns the number of microseconds since an unspecific timer start. Use differences between 2 calls to get the elapsed time. This timer has an overflow at about 35 minutes. The 3 functions sec(), mSec() and uSec() use the same time base. |
* | vector v ([val]) |
Defines a vector. If 'val' is a vector, it is copied. Otherwise 'val' is used for the x coordinate and y and z are set to 0.0. If 'val' is not set, 0.0 is used.
This function is used if an internal conversion to a vector is needed. |
* | vector v (x[,y],z) |
Defines a vector by using the entered coordinates. If 'y' is not set, 0.0 is assumed. If 'x', 'y' or 'z' is a vector itself, the corespondent coordinate is used. |
* | vector v3 (val) |
Create a vector with all 3 components equal to 'val' |
* | * var (name,val) |
If variable 'name' is defined and valid, return its value. Otherwise return 'val'. |
* | vector vd (len,deg[,y]) |
Creates a vector of length 'len' and horizontal angle 'deg' (degree). Value 'y' (if not set: 0.0) is used for the height. |
* | vector vx (x[,v]) |
Read the vector 'v' and replace the x component by 'x'. If 'x' is a vector, the x component of 'x' is used. If 'v' is not entered, use v(0,0,0) as source. |
* | vector vy (y[,v]) |
Read the vector 'v' and replace the y component by 'y'. If 'y' is a vector, the y component of 'y' is used. If 'v' is not entered, use v(0,0,0) as source. |
* | vector vz (z[,v]) |
Read the vector 'v' and replace the z component by 'z'. If 'z' is a vector, the z component of 'z' is used. If 'v' is not entered, use v(0,0,0) as source. |
* | float x (val_1,...,val_n) |
Scan all parameters (at least 1 must exist) and find the first vector. If found, return its x component. If no vector exists, return the last value 'val_n'.
Confirming the rules above, 'x(val)' means: If 'val' is a vector, return its x component. Otherwise convert 'val' to a float and return it. |
* | float xDir ([v1,]v2) |
The functions returns the direction in degree of point 'v2' relative to the x-axis of point 'v1'. If 'v1' is not set, v(0,0,0) is used. |
* | vector xRot (pt,deg[,origin]) |
The point 'pt' is rotated around the x-axis of 'origin' by 'deg' degree. If 'pt' is a scalar, 'vy(pt)' is used. If 'origin' is not set, v(0,0,0) is used. |
* | float y (val_1,...,val_n) |
Scan all parameters (at least 1 must exist) and find the first vector. If found, return its y component. If no vector exists, return the last value 'val_n'.
Confirming the rules above, 'y(val)' means: If 'val' is a vector, return its y component. Otherwise convert 'val' to a float and return it. |
* | float yDir ([v1,]v2) |
The functions returns the direction in degree of point 'v2' relative to the y-axis of point 'v1'. If 'v1' is not set, v(0,0,0) is used. |
* | vector yRot (pt,deg[,origin]) |
The point 'pt' is rotated around the y-axis of 'origin' by 'deg' degree. If 'pt' is a scalar, 'vz(pt)' is used. If 'origin' is not set, v(0,0,0) is used. This is the classical horizontal rotation. |
* | float z (val_1,...,val_n) |
Scan all parameters (at least 1 must exist) and find the first vector. If found, return its z component. If no vector exists, return the last value 'val_n'.
Confirming the rules above, 'z(val)' means: If 'val' is a vector, return its z component. Otherwise convert 'val' to a float and return it. |
* | float zDir ([v1,]v2) |
The functions returns the direction in degree of point 'v2' relative to the z-axis of point 'v1'. If 'v1' is not set, v(0,0,0) is used. |
* | vector zRot (pt,deg[,origin]) |
The point 'pt' is rotated around the z-axis of 'origin' by 'deg' degree. If 'pt' is a scalar, 'vx(pt)' is used. If 'origin' is not set, v(0,0,0) is used. |
Syntax:
INCLUDE := '@INCLUDE' '"' path/to/filename '"' RETURN := '@RETURN' [ EXRESSION ] EXIT := '@EXIT' ASSERT := '@ASSERT' EXRESSION
If the source file exists, then its content is virtually inserted into the current source file instead of the include command.
The result of the expression is stored and can be accessed
by the function
Syntax:
MACRO_DEF := '@MACRO' NAME ... '@ENDMACRO' FUNCTION_DEF := '@FUNCTION' NAME ... '@ENDFUNCTION' CALL := CALL_LITERAL NAME [ PARAMETER ] CALL_LITERAL := '@CALL' | '@:' PARAMETER := '(' [ expression [ ',' expression ]... ] ')' PARAM_CMD := '@PARAM' VARNAME [ [','] VARNAME ]...
Example 1:
@macro item_point # (x,z) @assert $n >= 2 0 $1 2000.0 $2 10.0 0 0 @endmacro @call item_point(100,200) @:item_point(300,400)
Example 2:
@macro sum @pdef sum = 0 @for i=1;$n @pdef sum = sum + param(i) @endfor @return sum @endmacro @:sum(1,2,3,4) @assert result() == 10
The new function takes precedence over already defined user and system functions with the same name.
Example:
@function sum @pdef sum = 0 @for i=1;$n @pdef sum = sum + param(i) @endfor @return sum @endfunction @def sum2 = sum(1,2,3,4) * 2 @assert sum2 == 20
It is possible to give parameters to the macro.
Just enclose a comma separated list of expressions
in parenthesis like
Instead of
@call name # $N == 0 : no parameters @call name() # $N == 0 : no parameters @call name(a) # $N == 1 : 1 parameter stored in $1 @call name(a,b,c) # $N == 3 : 3 parameters stored in $1, $2 and $3 @:name # $N == 0 : no parameters @:name() # $N == 0 : no parameters @:name(a) # $N == 1 : 1 parameter stored in $1 @:name(a,b,c) # $N == 3 : 3 parameters stored in $1, $2 and $3
Example:
@macro test @param pos, width # line above is equivalent to: @pdef pos = $1, width = $2 ... @endmacro
Syntax:
IF := '@IF' EXRESSION ELIF := '@ELIF' EXRESSION ELSE := '@ELSE' ENDIF := '@ENDIF' | '@FI'
There is also an one line alternative:
If
The
This command is optional.
If used it must be the last command before the
Syntax:
DO := '@DOIF' '(' EXRESSION ')' ANYTEXT ANYTEXT := COMMAND_LINE | TEXT_TO_SCAN
The parentheses around the expression are mandatory to separate
the
Examples:
@doif ( a < 4 ) @def b = 10 # conditional command @doif(a<4)@def b=10 # same command, but compact @doif ( a < 4 ) 0 position scale 0 0 # conditional text (item route point) @doif (a<4) @doif (b<5) @def c = 10 # two '@doif' in a row @doif ( a<4 && b<5 ) @def c = 10 # ... same impact as line above @doif ( isKCL() < 2 ) @return 0 # abort scanning, if not a course.* KCL
Syntax:
LOOP := '@LOOP' -> '@ENDLOOP' REPEAT := '@REPEAT' COUNT -> '@ENDREPEAT' FOR := '@FOR' VARNAME '=' START ';' END [ ';' STEP ] -> '@ENDREPEAT' FOREACH := '@FOR' VARNAME '=' EXPRESSION [ [';'] EXPRESSION ]... -> '@ENDEACH' WHILE := '@WHILE' CONDITION -> '@ENDWHILE' BREAK := '@BREAK' [ NUMBER ] [ '@IF' CONDITION ] CONT := '@CONTINUE' [ NUMBER ] [ '@IF' CONDITION ]
@REPEAT count @ENDREPEATExecute the loop
@FOR varname = start_val ';' end_val [ ';' step ] @ENDFORExecute the loop multiple times. The variable
The loop terminates
@FOREACH varname = [EXPR [';' EXPR_LIST[... ]] @ENDEACHThe loop is executed
@WHILE condition @ENDWHILEThe loop is executed until the condition becomes false (null). If the condition is initially false, the loop is not executed at all.
@BREAK [ num ] [ '@IF' condition ]The current loop is aborted. If
@CONTINUE [ num ] [ '@IF' condition ]The current loop is restarted with the next iteration value. If
The strings of a message are:
Syntax:
ECHO_CMD := '@ECHO' STRING_LIST WARN_CMD := '@WARN' STRING_LIST STRING_LIST := [STRING]... STRING := QUOTED | EXPRESSION QUOTED = '"' any_printable_character_but_not_the_quote '"'Examples:
@ECHO "Test mode: " mode$test @WARN "Slot " mode$slot " defined, but not supported."
@DUMP-PRIVATE @DUMP-LOCAL @DUMP-GLOBAL @DUMP-CONST @DUMP-PREDEF @DUMP-VARThe first 5 commands (all except
If using the command