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.101 by root, Fri Dec 22 06:02:29 2006 UTC vs.
Revision 1.102 by root, Fri Dec 22 16:34:00 2006 UTC

… …
1631 const_iv (ST_DEAD) 1631 const_iv (ST_DEAD)
1632 const_iv (ST_SETUP) 1632 const_iv (ST_SETUP)
1633 const_iv (ST_PLAYING) 1633 const_iv (ST_PLAYING)
1634 const_iv (ST_CUSTOM) 1634 const_iv (ST_CUSTOM)
1635 1635
1636 const_iv (ST_PLAY_AGAIN)
1637 const_iv (ST_ROLL_STAT)
1638 const_iv (ST_CHANGE_CLASS) 1636 const_iv (ST_CHANGE_CLASS)
1639 const_iv (ST_CONFIRM_QUIT) 1637 const_iv (ST_CONFIRM_QUIT)
1640 const_iv (ST_CONFIGURE)
1641 const_iv (ST_GET_NAME)
1642 const_iv (ST_GET_PASSWORD)
1643 const_iv (ST_CONFIRM_PASSWORD)
1644 const_iv (ST_GET_PARTY_PASSWORD) 1638 const_iv (ST_GET_PARTY_PASSWORD)
1645 }; 1639 };
1646 1640
1647 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; ) 1641 for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ-- > const_iv; )
1648 newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv)); 1642 newCONSTSUB (stash, (char *)civ->name, newSViv (civ->iv));
… …
1875 object *o; 1869 object *o;
1876 for (o = obj->inv; o; o = o->below) 1870 for (o = obj->inv; o; o = o->below)
1877 XPUSHs (sv_2mortal (to_sv (o))); 1871 XPUSHs (sv_2mortal (to_sv (o)));
1878} 1872}
1879 1873
1874void
1875set_animation (object *op, int idx)
1876 CODE:
1877 SET_ANIMATION (op, idx);
1878
1879void
1880object::drain_stat ()
1881
1882void
1883object::drain_specific_stat (int stat)
1884
1885void
1886object::change_luck (int change)
1887
1888void
1889object::add_statbonus ()
1890
1891void
1892object::remove_statbonus ()
1893
1880object *find_best_object_match (object *op, const char *match) 1894object *find_best_object_match (object *op, const char *match)
1881 1895
1882object *find_marked_object (object *op) 1896object *find_marked_object (object *op)
1883 1897
1884int resistance (object *op, int rtype, int newval = 0) 1898int resistance (object *op, int rtype, int newval = 0)
… …
1984 1998
1985object *cf_object_insert_in_ob (object *ob, object *where) 1999object *cf_object_insert_in_ob (object *ob, object *where)
1986 2000
1987int cf_object_teleport (object *op, maptile *map, int x, int y) 2001int cf_object_teleport (object *op, maptile *map, int x, int y)
1988 2002
1989void update (object *op, int action) 2003void update_object (object *op, int action)
1990 CODE:
1991 update_object (op, action);
1992 2004
1993object *cf_create_object_by_name (const char *name) 2005object *cf_create_object_by_name (const char *name)
1994 2006
1995void change_exp (object *op, uint64 exp, const char *skill_name = 0, int flag = 0) 2007void change_exp (object *op, uint64 exp, const char *skill_name = 0, int flag = 0)
1996 2008
… …
2008 2020
2009void remove_button_link (object *op); 2021void remove_button_link (object *op);
2010 2022
2011 2023
2012MODULE = cf PACKAGE = cf::object PREFIX = cf_ 2024MODULE = cf PACKAGE = cf::object PREFIX = cf_
2013
2014void cf_fix_object (object *pl)
2015 ALIAS: fix = 0
2016 2025
2017object *cf_insert_ob_in_ob (object *ob, object *where) 2026object *cf_insert_ob_in_ob (object *ob, object *where)
2018 2027
2019# no clean way to get an object from an archetype - stupid idiotic 2028# no clean way to get an object from an archetype - stupid idiotic
2020# dumb kludgy misdesigned plug-in api slowly gets on my nerves. 2029# dumb kludgy misdesigned plug-in api slowly gets on my nerves.
… …
2043 2052
2044player *contr (object *op) 2053player *contr (object *op)
2045 CODE: 2054 CODE:
2046 RETVAL = op->contr; 2055 RETVAL = op->contr;
2047 OUTPUT: RETVAL 2056 OUTPUT: RETVAL
2057
2058void
2059object::roll_stats ()
2060
2061void
2062object::update_stats ()
2063
2064void
2065object::swap_stats (int a, int b)
2048 2066
2049const char *get_ob_key_value (object *op, const char *key) 2067const char *get_ob_key_value (object *op, const char *key)
2050 2068
2051bool set_ob_key_value (object *op, const char *key, const char *value = 0, int add_key = 1) 2069bool set_ob_key_value (object *op, const char *key, const char *value = 0, int add_key = 1)
2052 2070
… …
2137 for (int i = 2; i < items; i++) av_push (av, SvREFCNT_inc (ST (i))); 2155 for (int i = 2; i < items; i++) av_push (av, SvREFCNT_inc (ST (i)));
2138 RETVAL = INVOKE_((event_type)event, ARG_PLAYER (pl), ARG_AV (av)); 2156 RETVAL = INVOKE_((event_type)event, ARG_PLAYER (pl), ARG_AV (av));
2139 OUTPUT: RETVAL 2157 OUTPUT: RETVAL
2140 2158
2141SV *registry (player *pl) 2159SV *registry (player *pl)
2160
2161player *
2162create ()
2163 CODE:
2164 RETVAL = player::create ();
2165 OUTPUT:
2166 RETVAL
2167
2168player *
2169load (const char *path)
2170 CODE:
2171 RETVAL = player::load (path);
2172 OUTPUT:
2173 RETVAL
2174
2175void
2176player::save (bool final = false)
2177
2178void
2179player::connect (client *ns)
2180
2181void
2182save_stats (player *pl)
2183 CODE:
2184 pl->ob->stats.hp = pl->ob->stats.maxhp;
2185 pl->ob->stats.sp = pl->ob->stats.maxsp;
2186 pl->ob->stats.grace = pl->ob->stats.maxgrace;
2187 pl->orig_stats = pl->ob->stats;
2142 2188
2143player *cf_player_find (char *name) 2189player *cf_player_find (char *name)
2144 PROTOTYPE: $ 2190 PROTOTYPE: $
2145 2191
2146void cf_player_move (player *pl, int dir) 2192void cf_player_move (player *pl, int dir)

Diff Legend

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