Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
7741 pavelyakov 1
#define MEMSIZE 4096*200
2
 
3
#include "../lib/window.h"
4
#include "../lib/array.h"
5
 
6
window win1=0;
7
void main()
8
{
9
	win1.background = 0xFFFFFF;
10
	win1.left = 200;
11
	win1.top = 200;
12
	win1.caption = "Stress test";
13
	win1.ondraw = #draw_window;
14
	win1.create();
15
}
16
 
17
Array a = {0};
18
Dictionary b = {0};
19
void draw_window()
20
{
21
	dword size = 10000;
22
	dword i = 0;
23
	dword y = 10;
24
	i = size;
25
	/* ints */
26
	a.init(0);
27
	while(i){
28
		a.set(i,i);
29
		i--;
30
	}
31
	a.set(120,222);
32
	a.set(9990,345);
33
	i = size;
34
	while(i){
35
		if (a.get(i) != i)
36
		{
37
			WriteText(15, y, 0x81, 0xFF0000, itoa(i));
38
			WriteText(95, y, 0x81, 0xFF0000, itoa(a.get(i)));
39
			y += 25;
40
		}
41
		i--;
42
	}
43
	/* strs */
44
	b.init(0);
45
	i = size;
46
	while(i){
47
		b.set(itoa(i),i);
48
		i--;
49
	}
50
	b.set("123","Okey");
51
	i = size;
52
	while(i){
53
		if (b.get(itoa(i)) != i)
54
		{
55
			WriteText(15, y, 0x81, 0xFF0000, itoa(i));
56
			WriteText(95, y, 0x81, 0xFF0000, b.get(itoa(i)));
57
			y += 25;
58
		}
59
		i--;
60
	}
61
}