Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
4488 leency 1
 
2
{
3
	char page_links[12000];
4
	void Add();
5
	dword GetURL();
6
	void Clear();
7
} PageLinks;
8
9
 
10
{
11
	strcat(#page_links, new_link);
12
	strcat(#page_links, "|");
13
}
14
15
 
16
{
17
	int i, j = 0;
18
	for (i = 0; i <= id - 401; i++)
19
	{
20
		do
21
		{
22
			j++;
23
			if (j>=strlen(#page_links)) return;
24
		}
25
		while (page_links[j] <>'|');
26
	}
27
	page_links[j] = 0x00;
28
	strcpy(#URL, #page_links+strrchr(#page_links, '|'));
29
	return #URL;
30
}
31
32
 
33
{
34
	strcpy(#page_links,"|");
35
}
36