Add some tests for ported cel/celx methods

scripts/tests/goto.cel

@@ -0,0 +1,17 @@
+{
+    timerate { rate 0.0 }
+    time { jd 2451545 }
+
+    select { object "Sol/Mars" }
+    goto {}
+
+    wait { duration 5.0 }
+
+    select { object "Sol/Mars" }
+    goto { up [ 0.5 0.5 0.5 ] }
+
+    wait { duration 5.0 }
+
+    select { object "Sol/Earth" }
+    gotolonglat { up [ 0.5 0.5 0.5 ] longitude 52.357715 latitude 30.983344 }
+}

scripts/tests/gotoloc.cel

@@ -0,0 +1,23 @@
+{
+    timerate  { rate 0.0 }
+    time      { jd 2451545 }
+
+    select    { object "Sol/Mars" }
+    center    { }
+    follow    { }
+    gotoloc   { time 2
+                position [0 106378.1 0]
+                xrot 90
+                yrot 0
+                zrot 0 }
+    wait      { duration 5 }
+
+    gotoloc   { time 2
+                x "wJjebddBM3XLDA"
+                y "Z2/b0Q34Pw"
+                z "GShiyVOKuxUI"
+                ow 0.954531
+                ox 0.112769
+                oy -0.272262
+                oz -0.045019 }
+}

scripts/tests/move.cel

@@ -0,0 +1,8 @@
+{
+    timerate { rate 0.0 }
+    time { jd 2451545 }
+
+    select { object "Sol/Mars" }
+
+    move { duration 5.0 velocity [543 -543 123] }
+}

scripts/tests/orbit.cel

@@ -0,0 +1,8 @@
+{
+    timerate { rate 0.0 }
+    time { jd 2451545 }
+
+    select { object "Sol/Mars" }
+    goto { }
+    orbit { axis [0.5 -0.5 0.5] rate 5 duration 10}
+}

scripts/tests/setorientation.cel

@@ -0,0 +1,22 @@
+{
+    timerate { rate 0.0 }
+    time { jd 2451545 }
+
+    select { object "Sol/Earth" }
+
+    setorientation {
+        ow 0.090610
+        ox -0.494683
+        oy 0.860207
+        oz -0.084397
+    }
+
+    wait { duration 5.0 }
+
+# this shows different result because the original code
+# does not normalize axises
+    setorientation {
+        angle 10.0
+        axis [0.5 -0.5 0.5]
+    }
+}