x = XSIMath.CreateVector3();
y = XSIMath.CreateVector3();
// Example 1: Perpendicular vectors have 0 dot product
x.Set( 1,0,0 ) ;
y.Set( 0,1,0 ) ;
// Output is 0
Application.LogMessage( x.Dot( y ) ) ;
// Example 2: Commutative nature of dot product
x.Set( 2,0,0 ) ;
y.Set( 1,1,0 ) ;
// Output is 2 for both
Application.LogMessage( x.Dot( y ) ) ;
Application.LogMessage( y.Dot( x ) ) ;
// Example 3: When angle is zero the value
// is equal to the lengths multipled
x.Set( 2,0,0 ) ;
y.Set( 3,0,0 ) ;
//Output is 6 for both
Application.LogMessage( x.Dot( y ) ) ;
Application.LogMessage( x.length() * y.length() ) ;

dim v1, v2
' Create 3D vectors.
set v1 = XSIMath.CreateVector3
set v2 = XSIMath.CreateVector3
v1.Set 1.0, 0.0, 0.0
v2.Set 1.0, 1.0, 0.0
Application.LogMessage v1.Dot( v2 )