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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
|
/*
* The Mana World
* Copyright 2004 The Mana World Development Team
*
* This file is part of The Mana World.
*
* The Mana World is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* any later version.
*
* The Mana World is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with The Mana World; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
#include "map.h"
#include "log.h"
#include "being.h"
#include <stdio.h>
#ifdef WIN32
#include <windows.h>
#else
#include "./net/win2linux.h"
#endif
MAP tiled_map;
/** Loads a map file */
bool load_map(char *map_file) {
PACKFILE *file = pack_fopen(map_file, "rp");
if(!file) {
warning(map_file);
return false;
}
pack_fread(&tiled_map, sizeof(MAP), file);
pack_fclose(file);
return true;
}
/** Set walkability flag for a tile */
void set_walk(short x_c, short y_c, bool walkable) {
if(walkable==true)tiled_map.tiles[x_c][y_c].data[3] |= 0x0002;
else tiled_map.tiles[x_c][y_c].data[3] &= 0x00fd;
}
/** Tell if a tile is walkable or not */
bool get_walk(short x_c, short y_c) {
bool ret = (tiled_map.tiles[x_c][y_c].data[3] & 0x0002)>0;
if(ret==true) {
NODE *node = get_head();
while(node && ret==true) {
if(get_x(node->coordinates)==x_c && get_y(node->coordinates)==y_c)
ret = false;
node = node->next;
}
return ret;
} else return false;
}
/** Tell if a tile is walkable or not (0=walkable,1=not walkable) */
unsigned char get_path_walk(unsigned short x, unsigned short y) {
if(get_walk(x, y))return 0;
else return 1;
}
/** Tell if a tile is animated or not */
bool get_anim(short x_c, short y_c, char layer) {
char temp = tiled_map.tiles[x_c][y_c].flags & 0x00C0;
temp>>=6;
if(abs(temp)==layer)return (tiled_map.tiles[x_c][y_c].data[3] & 0x0001)>0;
else return false;
}
/** Set tile ID */
void set_tile(short x_c, short y_c, char layer, unsigned short id) {
if(layer==0) {
id <<= 6;
tiled_map.tiles[x_c][y_c].data[0] = HIBYTE(id);
tiled_map.tiles[x_c][y_c].data[1] &= 0x003f;
tiled_map.tiles[x_c][y_c].data[1] |= LOBYTE(id);
} else if(layer==1) {
id <<= 4;
tiled_map.tiles[x_c][y_c].data[1] &= 0x00c0;
tiled_map.tiles[x_c][y_c].data[1] |= HIBYTE(id);
tiled_map.tiles[x_c][y_c].data[2] &= 0x000f;
tiled_map.tiles[x_c][y_c].data[2] |= LOBYTE(id);
} else if(layer==2) {
id <<= 2;
tiled_map.tiles[x_c][y_c].data[2] &= 0x00f0;
tiled_map.tiles[x_c][y_c].data[2] |= HIBYTE(id);
tiled_map.tiles[x_c][y_c].data[3] &= 0x0003;
tiled_map.tiles[x_c][y_c].data[3] |= LOBYTE(id);
}
}
/** Return tile ID */
unsigned short get_tile(short x_c, short y_c, char layer) {
unsigned short id;
if(layer==0) {
id = MAKEWORD(tiled_map.tiles[x_c][y_c].data[1] & 0x00c0,
tiled_map.tiles[x_c][y_c].data[0]);
id >>= 6;
} else if(layer==1) {
id = MAKEWORD(tiled_map.tiles[x_c][y_c].data[2] & 0x00f0,
tiled_map.tiles[x_c][y_c].data[1] & 0x003f);
id >>= 4;
} else if(layer==2) {
id = MAKEWORD(tiled_map.tiles[x_c][y_c].data[3] & 0x00fc,
tiled_map.tiles[x_c][y_c].data[2] & 0x000f);
id >>=2;
}
return id;
}
|
