File: test_script_matrix.kscript

package info (click to toggle)
castle-game-engine 5.0.0-3
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 164,776 kB
  • ctags: 30,841
  • sloc: pascal: 168,882; cpp: 1,340; objc: 730; makefile: 492; sh: 477; xml: 434; php: 1
file content (33 lines) | stat: -rw-r--r-- 755 bytes parent folder | download | duplicates (5)
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
function main()
  my_float := 5;

  my_mat3 := matrix(
    vector(my_float, 0, 0),
    vector(0, 3, 0),
    vector(0, 0, 1));
  my_mat3 := my_mat3 * 2;
  my_vec3 := my_mat3 * vector(11, 22, 33);

  my_mat4 := matrix(
    vector(my_float, 0, 0, 0),
    vector(0, 13, 0, 0),
    vector(0, 0, 1, 0),
    vector(0, 0, 0, 1));

  my_mat4 := my_mat4 +
    matrix(
      vector(0, 0, 0, 0),
      vector(0, 20, 0, 0),
      vector(0, 0, 0, 0),
      vector(0, 0, 0, 0));

  my_mat4 := my_mat4 -
    matrix(
      vector(0, 0, 0, 0),
      vector(0, 30, 0, 0),
      vector(0, 0, 0, 0),
      vector(0, 0, 0, 0));

  my_mat4 := my_mat4 * 2;
  matrix_set(my_mat4, matrix_get_count(my_mat4) - 1, vector(0, 0, 0, 666));
  my_vec4 := my_mat4 * vector(11, 22, 33, 44)