summaryrefslogtreecommitdiffstats
path: root/Kod/scripts/display_bars.m
blob: 2f3fbe8ec03e1665751f25294b487c57613e96f9 (plain) (blame)
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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
addpath display/ClientServerApp/Release
cd display/ClientServerApp/Release
!startServer
cd ../../..

pause(1);

% values1 = [1 1 2 3 4 5 6 7 8];
values1 = [];
values2 = [1 1.5 2 2.5 3 3.5 4 4.5 5];

matlabclient(1, get_smallpackage(put_text(160, 8, 'C', 'Genomsnittlig tid per segment')))
pause(0.2);

% input('');
matlabclient(1, get_smallpackage([ ...
	toggle(0  , 216, 107, 240, 51, 61, 'C', 'Varv'), ...
	toggle(107, 216, 213, 240, 52, 62, 'C', 'Segment'), ...
	toggle(213, 216, 320, 240, 53, 63, 'C', 'Knapp 3'), ...
    get_package('AP', [52 1]) ...
]));
pause(0.2);

matlabclient(1, get_smallpackage([ ...
	draw_line(20, 24, 20, 200), ...   % y-axis
	continue_line(304, 200), ... % x-axis
	draw_line(16, 32, 20, 24), ...    % arrow on y, left part
	continue_line(24, 32), ...   % arrow on y, right part
	draw_line(304, 196, 304, 204) ... % line on x
]));
pause(0.2);

[bars, max_val, min_y, max_height] = get_bars_from_values(values1, values2);

for bar = bars
    matlabclient(1, get_smallpackage(fill_area(bar.x_lo, bar.y_lo, bar.x_hi, bar.y_hi)));
    pause(0.2);
end

matlabclient(1, get_smallpackage(put_text(9, 25, 'C', 's')));
pause(0.2);

% matlabclient(1, get_smallpackage(set_line_pattern(2)))
% pause(0.2);
for i = 1:floor(max_val)
    x = 20;
    y = 200 - round(max_height * (i/max_val));
    matlabclient(1, get_smallpackage([draw_line(x, y, 300, y), ...
        put_text(x-6, y-2, 'C', num2str(i))]))
    pause(0.2);
end
% matlabclient(1, get_smallpackage(set_line_pattern(1)))
% pause(0.2);

for i = 0:8
    x = 16+13 + 10 + 30*i;
    matlabclient(1, get_smallpackage(put_text(x, 204, 'C', num2str(i + 1))));
    pause(0.2);
end

pause(0.8);

matlabclient(3)