[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/Client.xs

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.47 by root, Mon Apr 17 21:52:42 2006 UTC vs.
Revision 1.53 by root, Wed Apr 19 21:38:04 2006 UTC

…		…
		1	#ifdef _WIN32
		2	# include <malloc.h>
		3	#endif
		4
1	#include "EXTERN.h"	5	#include "EXTERN.h"
2	#include "perl.h"	6	#include "perl.h"
3	#include "XSUB.h"	7	#include "XSUB.h"
4		8
5	#include <string.h>	9	#include <string.h>
6	#include <stdio.h>	10	#include <stdio.h>
7		11
8	#include <SDL.h>	12	#include <SDL.h>
9	#include <SDL_image.h>	13	#include <SDL_image.h>
		14	#include <SDL_mixer.h>
10	#include <SDL_opengl.h>	15	#include <SDL_opengl.h>
11		16
12	#include <glib/gmacros.h>	17	#include <glib/gmacros.h>
13		18
14	#include <pango/pango.h>	19	#include <pango/pango.h>
15	#include <pango/pangofc-fontmap.h>	20	#include <pango/pangofc-fontmap.h>
16	#include <pango/pangoft2.h>	21	#include <pango/pangoft2.h>
17		22
		23	#ifndef _WIN32
18	#include <sys/types.h>	24	# include <sys/types.h>
19	#include <sys/socket.h>	25	# include <sys/socket.h>
20	#include <netinet/in.h>	26	# include <netinet/in.h>
21	#include <netinet/tcp.h>	27	# include <netinet/tcp.h>
22
23	#include <inttypes.h>	28	# include <inttypes.h>
		29	#else
		30	typedef unsigned char uint8_t;
		31	typedef unsigned short uint16_t;
		32	typedef unsigned int uint32_t;
		33	typedef signed char int8_t;
		34	typedef signed short int16_t;
		35	typedef signed int int32_t;
		36	#endif
24		37
25	#define FOW_DARKNESS 32	38	#define FOW_DARKNESS 32
26		39
27	#define MAP_EXTEND_X 32	40	#define MAP_EXTEND_X 32
28	#define MAP_EXTEND_Y 512	41	#define MAP_EXTEND_Y 512
		42
		43	typedef Mix_Chunk *CFClient__MixChunk;
		44	typedef Mix_Music *CFClient__MixMusic;
29		45
30	static PangoContext *context;	46	static PangoContext *context;
31	static PangoFontMap *fontmap;	47	static PangoFontMap *fontmap;
32		48
33	typedef struct cf_layout {	49	typedef struct cf_layout {
97	mapface *face;	113	mapface *face;
98		114
99	int texs;	115	int texs;
100	maptex *tex;	116	maptex *tex;
101		117
102	uint32_t rows;	118	int32_t rows;
103	maprow *row;	119	maprow *row;
104	} *CFClient__Map;	120	} *CFClient__Map;
105		121
106	static char *	122	static char *
107	prepend (char *ptr, int sze, int inc)	123	prepend (char *ptr, int sze, int inc)
…		…
202		218
203	static void	219	static void
204	map_blank (CFClient__Map self, int x0, int y0, int w, int h)	220	map_blank (CFClient__Map self, int x0, int y0, int w, int h)
205	{	221	{
206	int x, y;	222	int x, y;
		223	maprow *row;
207		224
208	for (y = y0; y < y0 + h; y++)	225	for (y = y0; y < y0 + h; y++)
209	if (y >= 0)	226	if (y >= 0)
210	{	227	{
211	if (y >= self->rows)	228	if (y >= self->rows)
212	break;	229	break;
213		230
214	maprow *row = self->row + y;	231	row = self->row + y;
215		232
216	for (x = x0; x < x0 + w; x++)	233	for (x = x0; x < x0 + w; x++)
217	if (x >= row->c0)	234	if (x >= row->c0)
218	{	235	{
219	if (x >= row->c1)	236	if (x >= row->c1)
…		…
228		245
229	PROTOTYPES: ENABLE	246	PROTOTYPES: ENABLE
230		247
231	BOOT:	248	BOOT:
232	{	249	{
		250	HV *stash = gv_stashpv ("CFClient", 1);
		251	static const struct {
		252	const char *name;
		253	IV iv;
		254	} *civ, const_iv[] = {
		255	# define const_iv(name) { # name, (IV)name }
		256	const_iv (SDL_ACTIVEEVENT),
		257	const_iv (SDL_KEYDOWN),
		258	const_iv (SDL_KEYUP),
		259	const_iv (SDL_MOUSEMOTION),
		260	const_iv (SDL_MOUSEBUTTONDOWN),
		261	const_iv (SDL_MOUSEBUTTONUP),
		262	const_iv (SDL_JOYAXISMOTION),
		263	const_iv (SDL_JOYBALLMOTION),
		264	const_iv (SDL_JOYHATMOTION),
		265	const_iv (SDL_JOYBUTTONDOWN),
		266	const_iv (SDL_JOYBUTTONUP),
		267	const_iv (SDL_QUIT),
		268	const_iv (SDL_SYSWMEVENT),
		269	const_iv (SDL_EVENT_RESERVEDA),
		270	const_iv (SDL_EVENT_RESERVEDB),
		271	const_iv (SDL_VIDEORESIZE),
		272	const_iv (SDL_VIDEOEXPOSE),
		273	const_iv (SDL_USEREVENT),
		274	const_iv (SDLK_KP0),
		275	const_iv (SDLK_KP1),
		276	const_iv (SDLK_KP2),
		277	const_iv (SDLK_KP3),
		278	const_iv (SDLK_KP4),
		279	const_iv (SDLK_KP5),
		280	const_iv (SDLK_KP6),
		281	const_iv (SDLK_KP7),
		282	const_iv (SDLK_KP8),
		283	const_iv (SDLK_KP9),
		284	const_iv (SDLK_KP_PERIOD),
		285	const_iv (SDLK_KP_DIVIDE),
		286	const_iv (SDLK_KP_MULTIPLY),
		287	const_iv (SDLK_KP_MINUS),
		288	const_iv (SDLK_KP_PLUS),
		289	const_iv (SDLK_KP_ENTER),
		290	const_iv (SDLK_KP_EQUALS),
		291	const_iv (SDLK_UP),
		292	const_iv (SDLK_DOWN),
		293	const_iv (SDLK_RIGHT),
		294	const_iv (SDLK_LEFT),
		295	const_iv (SDLK_INSERT),
		296	const_iv (SDLK_HOME),
		297	const_iv (SDLK_END),
		298	const_iv (SDLK_PAGEUP),
		299	const_iv (SDLK_PAGEDOWN),
		300	const_iv (SDLK_F1),
		301	const_iv (SDLK_F2),
		302	const_iv (SDLK_F3),
		303	const_iv (SDLK_F4),
		304	const_iv (SDLK_F5),
		305	const_iv (SDLK_F6),
		306	const_iv (SDLK_F7),
		307	const_iv (SDLK_F8),
		308	const_iv (SDLK_F9),
		309	const_iv (SDLK_F10),
		310	const_iv (SDLK_F11),
		311	const_iv (SDLK_F12),
		312	const_iv (SDLK_F13),
		313	const_iv (SDLK_F14),
		314	const_iv (SDLK_F15),
		315	const_iv (SDLK_NUMLOCK),
		316	const_iv (SDLK_CAPSLOCK),
		317	const_iv (SDLK_SCROLLOCK),
		318	const_iv (SDLK_RSHIFT),
		319	const_iv (SDLK_LSHIFT),
		320	const_iv (SDLK_RCTRL),
		321	const_iv (SDLK_LCTRL),
		322	const_iv (SDLK_RALT),
		323	const_iv (SDLK_LALT),
		324	const_iv (SDLK_RMETA),
		325	const_iv (SDLK_LMETA),
		326	const_iv (SDLK_LSUPER),
		327	const_iv (SDLK_RSUPER),
		328	const_iv (SDLK_MODE),
		329	const_iv (SDLK_COMPOSE),
		330	const_iv (SDLK_HELP),
		331	const_iv (SDLK_PRINT),
		332	const_iv (SDLK_SYSREQ),
		333	const_iv (SDLK_BREAK),
		334	const_iv (SDLK_MENU),
		335	const_iv (SDLK_POWER),
		336	const_iv (SDLK_EURO),
		337	const_iv (SDLK_UNDO),
		338	const_iv (KMOD_NONE),
		339	const_iv (KMOD_LSHIFT),
		340	const_iv (KMOD_RSHIFT),
		341	const_iv (KMOD_LCTRL),
		342	const_iv (KMOD_RCTRL),
		343	const_iv (KMOD_LALT),
		344	const_iv (KMOD_RALT),
		345	const_iv (KMOD_LMETA),
		346	const_iv (KMOD_RMETA),
		347	const_iv (KMOD_NUM),
		348	const_iv (KMOD_CAPS),
		349	const_iv (KMOD_MODE),
		350	const_iv (KMOD_CTRL),
		351	const_iv (KMOD_SHIFT),
		352	const_iv (KMOD_ALT),
		353	const_iv (KMOD_META)
		354	# undef const_iv
		355	};
		356
		357	for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; )
		358	newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv));
		359
233	fontmap = pango_ft2_font_map_new ();	360	fontmap = pango_ft2_font_map_new ();
234	pango_ft2_font_map_set_default_substitute ((PangoFT2FontMap *)fontmap, substitute_func, 0, 0);	361	pango_ft2_font_map_set_default_substitute ((PangoFT2FontMap *)fontmap, substitute_func, 0, 0);
235	context = pango_ft2_font_map_create_context ((PangoFT2FontMap *)fontmap);	362	context = pango_ft2_font_map_create_context ((PangoFT2FontMap *)fontmap);
236	}	363	}
		364
		365	int
		366	SDL_Init (U32 flags = SDL_INIT_VIDEO \| SDL_INIT_AUDIO)
		367
		368	void
		369	SDL_Quit ()
		370
		371	void
		372	SDL_ListModes ()
		373	PPCODE:
		374	{
		375	SDL_Rect **m;
		376
		377	SDL_GL_SetAttribute (SDL_GL_RED_SIZE, 5);
		378	SDL_GL_SetAttribute (SDL_GL_GREEN_SIZE, 5);
		379	SDL_GL_SetAttribute (SDL_GL_BLUE_SIZE, 5);
		380	SDL_GL_SetAttribute (SDL_GL_ALPHA_SIZE, 1);
		381
		382	SDL_GL_SetAttribute (SDL_GL_ACCUM_RED_SIZE, 0);
		383	SDL_GL_SetAttribute (SDL_GL_ACCUM_GREEN_SIZE, 0);
		384	SDL_GL_SetAttribute (SDL_GL_ACCUM_BLUE_SIZE, 0);
		385	SDL_GL_SetAttribute (SDL_GL_ACCUM_ALPHA_SIZE, 0);
		386
		387	SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1);
		388	SDL_GL_SetAttribute (SDL_GL_BUFFER_SIZE, 15);
		389	SDL_GL_SetAttribute (SDL_GL_DEPTH_SIZE, 0);
		390
		391	SDL_EnableUNICODE (1);
		392	SDL_EnableKeyRepeat (SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
		393
		394	m = SDL_ListModes (0, SDL_FULLSCREEN \| SDL_OPENGL);
		395
		396	if (m && m != (SDL_Rect **)-1)
		397	while (*m)
		398	{
		399	AV *av = newAV ();
		400	av_push (av, newSViv ((*m)->w));
		401	av_push (av, newSViv ((*m)->h));
		402	XPUSHs (sv_2mortal (newRV_noinc ((SV *)av)));
		403
		404	++m;
		405	}
		406	}
		407
		408	int
		409	SDL_SetVideoMode (int w, int h, int fullscreen)
		410	CODE:
		411	RETVAL = !!SDL_SetVideoMode (
		412	w, h, 0, SDL_OPENGL \| (fullscreen ? SDL_FULLSCREEN : 0)
		413	);
		414	SDL_WM_SetCaption ("Crossfire+ Client " VERSION, "Crossfire+");
		415	OUTPUT:
		416	RETVAL
		417
		418	void
		419	SDL_PollEvent ()
		420	PPCODE:
		421	{
		422	SDL_Event ev;
		423
		424	while (SDL_PollEvent (&ev))
		425	{
		426	HV *hv = newHV ();
		427	hv_store (hv, "type", 4, newSViv (ev.type), 0);
		428	switch (ev.type)
		429	{
		430	case SDL_KEYDOWN:
		431	case SDL_KEYUP:
		432	hv_store (hv, "state", 5, newSViv (ev.key.state), 0);
		433	hv_store (hv, "sym", 3, newSViv (ev.key.keysym.sym), 0);
		434	hv_store (hv, "mod", 3, newSViv (ev.key.keysym.mod), 0);
		435	hv_store (hv, "unicode", 7, newSViv (ev.key.keysym.unicode), 0);
		436	break;
		437
		438	case SDL_ACTIVEEVENT:
		439	hv_store (hv, "gain", 4, newSViv (ev.active.gain), 0);
		440	hv_store (hv, "state", 5, newSViv (ev.active.state), 0);
		441	break;
		442
		443	case SDL_MOUSEMOTION:
		444	hv_store (hv, "state", 5, newSViv (ev.motion.state), 0);
		445	hv_store (hv, "x", 1, newSViv (ev.motion.x), 0);
		446	hv_store (hv, "y", 1, newSViv (ev.motion.y), 0);
		447	hv_store (hv, "xrel", 4, newSViv (ev.motion.xrel), 0);
		448	hv_store (hv, "yrel", 4, newSViv (ev.motion.yrel), 0);
		449	break;
		450
		451	case SDL_MOUSEBUTTONDOWN:
		452	case SDL_MOUSEBUTTONUP:
		453	hv_store (hv, "button", 6, newSViv (ev.button.button), 0);
		454	hv_store (hv, "state", 5, newSViv (ev.button.state), 0);
		455	hv_store (hv, "x", 1, newSViv (ev.button.x), 0);
		456	hv_store (hv, "y", 1, newSViv (ev.button.y), 0);
		457	}
		458
		459	XPUSHs (sv_2mortal (newRV_noinc ((SV *)hv)));
		460	}
		461	}
		462
		463	int
		464	Mix_OpenAudio (int frequency = 22050, int format = MIX_DEFAULT_FORMAT, int channels = 1, int chunksize = 512)
		465
		466	void
		467	Mix_CloseAudio ()
		468
		469	int
		470	Mix_AllocateChannels (int numchans = -1)
237		471
238	void	472	void
239	lowdelay (int fd, int val = 1)	473	lowdelay (int fd, int val = 1)
240	CODE:	474	CODE:
		475	#ifndef _WIN32
241	setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val));	476	setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val));
		477	#endif
242		478
243	char *	479	char *
244	gl_version ()	480	gl_version ()
245	CODE:	481	CODE:
246	RETVAL = (char *)glGetString (GL_VERSION);	482	RETVAL = (char *)glGetString (GL_VERSION);
…		…
292	croak ("load_image: %s", SDL_GetError ());	528	croak ("load_image: %s", SDL_GetError ());
293		529
294	fmt.palette = NULL;	530	fmt.palette = NULL;
295	fmt.BitsPerPixel = 32;	531	fmt.BitsPerPixel = 32;
296	fmt.BytesPerPixel = 4;	532	fmt.BytesPerPixel = 4;
		533	#if SDL_BYTEORDER == SDL_LIL_ENDIAN
297	fmt.Rmask = 0x000000ff;	534	fmt.Rmask = 0x000000ff;
298	fmt.Gmask = 0x0000ff00;	535	fmt.Gmask = 0x0000ff00;
299	fmt.Bmask = 0x00ff0000;	536	fmt.Bmask = 0x00ff0000;
300	fmt.Amask = 0xff000000;	537	fmt.Amask = 0xff000000;
		538	#else
		539	fmt.Rmask = 0xff000000;
		540	fmt.Gmask = 0x00ff0000;
		541	fmt.Bmask = 0x0000ff00;
		542	fmt.Amask = 0x000000ff;
		543	#endif
301	fmt.Rloss = 0;	544	fmt.Rloss = 0;
302	fmt.Gloss = 0;	545	fmt.Gloss = 0;
303	fmt.Bloss = 0;	546	fmt.Bloss = 0;
304	fmt.Aloss = 0;	547	fmt.Aloss = 0;
305	fmt.Rshift = 0;	548	fmt.Rshift = 0;
…		…
319	SDL_LockSurface (surface2);	562	SDL_LockSurface (surface2);
320	PUSHs (sv_2mortal (newSVpvn (surface2->pixels, surface2->h * surface2->pitch)));	563	PUSHs (sv_2mortal (newSVpvn (surface2->pixels, surface2->h * surface2->pitch)));
321	SDL_UnlockSurface (surface2);	564	SDL_UnlockSurface (surface2);
322	PUSHs (sv_2mortal (newSViv (surface->flags & (SDL_SRCCOLORKEY \| SDL_SRCALPHA) ? GL_RGBA : GL_RGB)));	565	PUSHs (sv_2mortal (newSViv (surface->flags & (SDL_SRCCOLORKEY \| SDL_SRCALPHA) ? GL_RGBA : GL_RGB)));
323	PUSHs (sv_2mortal (newSViv (GL_RGBA)));	566	PUSHs (sv_2mortal (newSViv (GL_RGBA)));
324	PUSHs (sv_2mortal (newSViv (GL_UNSIGNED_INT_8_8_8_8_REV)));	567	PUSHs (sv_2mortal (newSViv (GL_UNSIGNED_BYTE)));
325		568
326	SDL_FreeSurface (surface);	569	SDL_FreeSurface (surface);
327	SDL_FreeSurface (surface2);	570	SDL_FreeSurface (surface2);
328	}	571	}
329		572
…		…
353	}	596	}
354		597
355	void	598	void
356	fatal (char *message)	599	fatal (char *message)
357	CODE:	600	CODE:
358	#ifdef WIN32	601	#ifdef _WIN32
359	MessageBox (0, message, "Crossfire+ Fatal Error", MB_OK \| MB_ICONERROR \| MB_SETFOREGROUND);	602	MessageBox (0, message, "Crossfire+ Fatal Error", MB_OK \| MB_ICONERROR \| MB_SETFOREGROUND);
360	#else	603	#else
361	fprintf (stderr, "FATAL: %s\n", message);	604	fprintf (stderr, "FATAL: %s\n", message);
362	#endif	605	#endif
363	exit (1);	606	exit (1);
…		…
580	{	823	{
581	Append (maptex, self->tex, self->texs, self->texs);	824	Append (maptex, self->tex, self->texs, self->texs);
582	self->texs *= 2;	825	self->texs *= 2;
583	}	826	}
584		827
		828	{
585	maptex *tex = self->tex + texid;	829	maptex *tex = self->tex + texid;
586		830
587	tex->name = name;	831	tex->name = name;
588	tex->w = w;	832	tex->w = w;
589	tex->h = h;	833	tex->h = h;
590	tex->s = s;	834	tex->s = s;
591	tex->t = t;	835	tex->t = t;
592	tex->r = r;	836	tex->r = r;
593	tex->g = g;	837	tex->g = g;
594	tex->b = b;	838	tex->b = b;
595	tex->a = a;	839	tex->a = a;
		840	}
596	}	841	}
597		842
598	int	843	int
599	ox (CFClient::Map self)	844	ox (CFClient::Map self)
600	ALIAS:	845	ALIAS:
…		…
638	map1a_update (CFClient::Map self, SV *data_)	883	map1a_update (CFClient::Map self, SV *data_)
639	CODE:	884	CODE:
640	{	885	{
641	uint8_t data = (uint8_t )SvPVbyte_nolen (data_);	886	uint8_t data = (uint8_t )SvPVbyte_nolen (data_);
642	uint8_t data_end = (uint8_t )SvEND (data_);	887	uint8_t data_end = (uint8_t )SvEND (data_);
		888	mapcell *cell;
		889	int x, y, flags;
643		890
644	while (data < data_end)	891	while (data < data_end)
645	{	892	{
646	int flags = (data [0] << 8) + data [1]; data += 2;	893	flags = (data [0] << 8) + data [1]; data += 2;
647		894
648	int x = ((flags >> 10) & 63) + self->x;	895	x = ((flags >> 10) & 63) + self->x;
649	int y = ((flags >> 4) & 63) + self->y;	896	y = ((flags >> 4) & 63) + self->y;
650		897
651	mapcell *cell = map_get_cell (self, x, y);	898	cell = map_get_cell (self, x, y);
652		899
653	if (flags & 15)	900	if (flags & 15)
654	{	901	{
655	if (cell->darkness < 0)	902	if (cell->darkness < 0)
656	{	903	{
…		…
746		993
747	void	994	void
748	draw (CFClient::Map self, int shift_x, int shift_y, int x0, int y0, int sw, int sh)	995	draw (CFClient::Map self, int shift_x, int shift_y, int x0, int y0, int sw, int sh)
749	PPCODE:	996	PPCODE:
750	{	997	{
		998	int vx, vy;
		999	int x, y, z;
		1000	int last_name;
		1001	mapface face;
751	int sw4 = (sw + 3) & ~3;	1002	int sw4 = (sw + 3) & ~3;
752	SV darkness_sv = sv_2mortal (newSV (sw4 sh));	1003	SV darkness_sv = sv_2mortal (newSV (sw4 sh));
753	uint8_t darkness = (uint8_t )SvPVX (darkness_sv);	1004	uint8_t darkness = (uint8_t )SvPVX (darkness_sv);
		1005
754	memset (darkness, 255, sw4 * sh);	1006	memset (darkness, 255, sw4 * sh);
755	SvPOK_only (darkness_sv);	1007	SvPOK_only (darkness_sv);
756	SvCUR_set (darkness_sv, sw4 * sh);	1008	SvCUR_set (darkness_sv, sw4 * sh);
757		1009
758	int vx = self->x + (self->w - sw) / 2 - shift_x;	1010	vx = self->x + (self->w - sw) / 2 - shift_x;
759	int vy = self->y + (self->h - sh) / 2 - shift_y;	1011	vy = self->y + (self->h - sh) / 2 - shift_y;
760		1012
761	/*	1013	/*
762	int vx = self->vx = self->w >= sw	1014	int vx = self->vx = self->w >= sw
763	? self->x + (self->w - sw) / 2	1015	? self->x + (self->w - sw) / 2
764	: MIN (self->x, MAX (self->x + self->w - sw + 1, self->vx));	1016	: MIN (self->x, MAX (self->x + self->w - sw + 1, self->vx));
…		…
773	glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);	1025	glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
774	glEnable (GL_BLEND);	1026	glEnable (GL_BLEND);
775	glEnable (GL_TEXTURE_2D);	1027	glEnable (GL_TEXTURE_2D);
776	glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE);	1028	glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE);
777		1029
778	int x, y, z;
779
780	int last_name = 0;
781
782	glBegin (GL_QUADS);	1030	glBegin (GL_QUADS);
		1031
		1032	last_name = 0;
783		1033
784	for (z = 0; z < 3; z++)	1034	for (z = 0; z < 3; z++)
785	for (y = 0; y < sh; y++)	1035	for (y = 0; y < sh; y++)
786	if (0 <= y + vy && y + vy < self->rows)	1036	if (0 <= y + vy && y + vy < self->rows)
787	{	1037	{
…		…
794		1044
795	darkness[y * sw4 + x] = cell->darkness < 0	1045	darkness[y * sw4 + x] = cell->darkness < 0
796	? 255 - FOW_DARKNESS	1046	? 255 - FOW_DARKNESS
797	: 255 - cell->darkness;	1047	: 255 - cell->darkness;
798		1048
799	mapface face = cell->face [z];	1049	face = cell->face [z];
800		1050
801	if (face)	1051	if (face)
802	{	1052	{
803	maptex tex = self->tex [face];	1053	maptex tex = self->tex [face];
804		1054
…		…
864	for (x = x0; x < x1; x++)	1114	for (x = x0; x < x1; x++)
865	{	1115	{
866	if (row && row->c0 <= x && x < row->c1)	1116	if (row && row->c0 <= x && x < row->c1)
867	{	1117	{
868	mapcell *cell = row->col + (x - row->c0);	1118	mapcell *cell = row->col + (x - row->c0);
869
870	uint8_t flags = 0;	1119	uint8_t flags = 0;
871		1120
872	if (cell->face [0]) flags \|= 1;	1121	if (cell->face [0]) flags \|= 1;
873	if (cell->face [1]) flags \|= 2;	1122	if (cell->face [1]) flags \|= 2;
874	if (cell->face [2]) flags \|= 4;	1123	if (cell->face [2]) flags \|= 4;
…		…
908	void	1157	void
909	set_rect (CFClient::Map self, int x0, int y0, uint8_t *data)	1158	set_rect (CFClient::Map self, int x0, int y0, uint8_t *data)
910	PPCODE:	1159	PPCODE:
911	{	1160	{
912	int x, y, z;	1161	int x, y, z;
		1162	int w, h;
913	int x1, y1;	1163	int x1, y1;
914		1164
915	if (*data++ != 0)	1165	if (*data++ != 0)
916	return; /* version mismatch */	1166	return; /* version mismatch */
917		1167
918	int w = data++ << 8; w \|= data++;	1168	w = data++ << 8; w \|= data++;
919	int h = data++ << 8; h \|= data++;	1169	h = data++ << 8; h \|= data++;
920		1170
921	// we need to do this 'cause we don't keep an absolute coord system for rows	1171	// we need to do this 'cause we don't keep an absolute coord system for rows
922	// TODO: treat rows as we treat	1172	// TODO: treat rows as we treat
923	map_get_row (self, y0 + self->y - self->oy);//D	1173	map_get_row (self, y0 + self->y - self->oy);//D
924	map_get_row (self, y0 + self->y - self->oy + h - 1);//D	1174	map_get_row (self, y0 + self->y - self->oy + h - 1);//D
…		…
962	}	1212	}
963	}	1213	}
964	}	1214	}
965	}	1215	}
966		1216
		1217	MODULE = CFClient PACKAGE = CFClient::MixChunk
		1218
		1219	CFClient::MixChunk
		1220	new_from_file (SV class, char path)
		1221	CODE:
		1222	RETVAL = Mix_LoadWAV (path);
		1223	OUTPUT:
		1224	RETVAL
		1225
		1226	void
		1227	DESTROY (CFClient::MixChunk self)
		1228	CODE:
		1229	Mix_FreeChunk (self);
		1230
		1231	int
		1232	volume (CFClient::MixChunk self, int volume = -1)
		1233	CODE:
		1234	RETVAL = Mix_VolumeChunk (self, volume);
		1235	OUTPUT:
		1236	RETVAL
		1237
		1238	int
		1239	play (CFClient::MixChunk self, int channel = -1, int loops = 0, int ticks = -1)
		1240	CODE:
		1241	RETVAL = Mix_PlayChannelTimed (channel, self, loops, ticks);
		1242	OUTPUT:
		1243	RETVAL
		1244
		1245	MODULE = CFClient PACKAGE = CFClient::MixMusic
		1246
		1247	int
		1248	volume (int volume = -1)
		1249	CODE:
		1250	RETVAL = Mix_VolumeMusic (volume);
		1251	OUTPUT:
		1252	RETVAL
		1253
		1254	CFClient::MixMusic
		1255	new_from_file (SV class, char path)
		1256	CODE:
		1257	RETVAL = Mix_LoadMUS (path);
		1258	OUTPUT:
		1259	RETVAL
		1260
		1261	void
		1262	DESTROY (CFClient::MixMusic self)
		1263	CODE:
		1264	Mix_FreeMusic (self);
		1265
		1266	int
		1267	play (CFClient::MixMusic self, int loops = -1)
		1268	CODE:
		1269	RETVAL = Mix_PlayMusic (self, loops);
		1270	OUTPUT:
		1271	RETVAL
		1272

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/Deliantra-Client/Client.xs (file contents): Revision 1.47 by root, Mon Apr 17 21:52:42 2006 UTC vs. Revision 1.53 by root, Wed Apr 19 21:38:04 2006 UTC

Diff Legend

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.47 by root, Mon Apr 17 21:52:42 2006 UTC vs.
Revision 1.53 by root, Wed Apr 19 21:38:04 2006 UTC