ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/cfperl.xs
(Generate patch)

Comparing deliantra/server/server/cfperl.xs (file contents):
Revision 1.238 by root, Tue Jul 24 04:55:34 2007 UTC vs.
Revision 1.239 by root, Thu Jul 26 00:27:09 2007 UTC

1677 PROTOTYPE: $$ 1677 PROTOTYPE: $$
1678 1678
1679octet_string path_combine_and_normalize (octet_string base, octet_string path) 1679octet_string path_combine_and_normalize (octet_string base, octet_string path)
1680 PROTOTYPE: $$ 1680 PROTOTYPE: $$
1681 1681
1682const_octet_string
1683get_maps_directory (octet_string path)
1684 PROTOTYPE: $
1685 ALIAS: maps_directory = 0
1686 CODE:
1687 RETVAL = create_pathname (path);
1688 OUTPUT: RETVAL
1689
1690void 1682void
1691sub_generation_inc () 1683sub_generation_inc ()
1692 CODE: 1684 CODE:
1693 PL_sub_generation++; 1685 PL_sub_generation++;
1694 1686
2152 2144
2153void clear_los (player *pl) 2145void clear_los (player *pl)
2154 2146
2155void cf_player_move (player *pl, int dir) 2147void cf_player_move (player *pl, int dir)
2156 2148
2157void play_sound_player_only (player *pl, int soundnum, int x = 0, int y = 0);
2158
2159bool 2149bool
2160cell_visible (player *pl, int dx, int dy) 2150cell_visible (player *pl, int dx, int dy)
2161 CODE: 2151 CODE:
2162 RETVAL = FABS (dx) <= pl->ns->mapx / 2 && FABS (dy) <= pl->ns->mapy / 2 2152 RETVAL = FABS (dx) <= pl->ns->mapx / 2 && FABS (dy) <= pl->ns->mapy / 2
2163 && !pl->blocked_los [dx + pl->ns->mapx / 2][dy + pl->ns->mapy / 2]; 2153 && !pl->blocked_los [dx + pl->ns->mapx / 2][dy + pl->ns->mapy / 2];
2341 } 2331 }
2342 } 2332 }
2343 2333
2344 op->destroy (); 2334 op->destroy ();
2345} 2335}
2346
2347void play_sound_map (maptile *map, int x, int y, int sound_num)
2348 2336
2349int out_of_map (maptile *map, int x, int y) 2337int out_of_map (maptile *map, int x, int y)
2350 2338
2351void 2339void
2352trigger (maptile *map, long connection, bool state = true) 2340trigger (maptile *map, long connection, bool state = true)
2650 else 2638 else
2651 RETVAL = 0; 2639 RETVAL = 0;
2652 OUTPUT: 2640 OUTPUT:
2653 RETVAL 2641 RETVAL
2654 2642
2643MODULE = cf PACKAGE = cf::sound PREFIX = sound_
2644
2645faceidx sound_find (utf8_string name)
2646
2655MODULE = cf PACKAGE = cf::face PREFIX = face_ 2647MODULE = cf PACKAGE = cf::face PREFIX = face_
2656 2648
2657#INCLUDE: $PERL $srcdir/genacc faceset ../include/face.h | 2649#INCLUDE: $PERL $srcdir/genacc faceset ../include/face.h |
2658 2650
2659faceidx face_find (utf8_string name, faceidx defidx = 0) 2651faceidx face_find (utf8_string name, faceidx defidx = 0)

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines