1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2011 - Scilab Enterprises - Bruno JOFRET
5 // This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- TEST WITH GRAPHIC -->
10 c_map = graycolormap(512);
11 xset("colormap", c_map);
12 out = xget("colormap");
13 assert_checkequal(out, c_map);
15 xset("mark size", 456);
16 out = xget("mark size");
17 assert_checkequal(out, 456);
21 assert_checkequal(out, [4 5]);
24 assert_checkequal(out, [6 1]);
27 assert_checkequal(out, [8 2]);
29 xset("line style", 8);
30 out = xget("line style");
31 assert_checkequal(out, 8);
33 out = xget("font size");
34 assert_checkequal(out, 2);
35 xset("font size", 42);
36 out = xget("font size");
37 assert_checkequal(out, 42);
40 assert_checkequal(out, "");
43 assert_checkequal(out, "%s.%s");
45 out = xget("auto clear");
46 assert_checkequal(out, "off");
47 xset("auto clear", "on")
48 out = xget("auto clear");
49 assert_checkequal(out, "on");
52 assert_checkequal(out, 8);
55 assert_checkequal(out, 2);
57 out = xget("hidden3d");
58 assert_checkequal(out, 4);
60 out = xget("hidden3d");
61 assert_checkequal(out, 21);
65 assert_checkequal(out, f.figure_id);
67 assert_checkequal(out, f.figure_id);
69 out = xget("thickness");
70 assert_checkequal(out, 1);
72 out = xget("thickness");
73 assert_checkequal(out, 5);
76 assert_checkequal(out, f.figure_size);
78 assert_checkequal(out, f.figure_size);
81 assert_checkequal(out, f.position([1, 2]));
83 out = xget("viewport");
84 assert_checkequal(out, f.viewport);
86 out = xget("background");
87 assert_checkequal(out, -2);
88 // color foreground pattern
90 assert_checkequal(out, -1);
91 out = xget("foreground");
92 assert_checkequal(out, -1);
93 out = xget("pattern");
94 assert_checkequal(out, -1);
96 out = xget("lastpattern");
97 assert_checkequal(out, 512);
99 out = xget("line mode");
100 assert_checkequal(out, 1);
102 out = xget("pixmap");
103 assert_checkequal(out, 0);
106 assert_checkequal(out, 514);
108 out = xget("wresize");
109 assert_checkequal(out, 1);
111 out = xget("clipgrf");
112 assert_checkequal(out, 0);
114 out = xget("clipoff");
115 assert_checkequal(out, 1);
116 // clipping => clip_box + clip_state
117 xset("clipping", 1,2,3,4);
118 out = xget("clipping");
119 assert_checkequal(out, [1,2,3,4]);
122 xset("wdim",1000,500)
123 assert_checkequal(xget("wdim"), [1000,500]);
124 xset("wdim",[1000,500]) // 500 is ignored here
126 assert_checkequal(wdim(1), 1000);