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.346 by root, Sat Jan 16 17:41:01 2010 UTC vs.
Revision 1.353 by root, Fri Mar 26 00:53:26 2010 UTC

… …
1520 const_iv (NDI_NOCREATE) const_iv (NDI_CLEAR) const_iv (NDI_VERBATIM) 1520 const_iv (NDI_NOCREATE) const_iv (NDI_CLEAR) const_iv (NDI_VERBATIM)
1521 1521
1522 const_iv (UPD_LOCATION) const_iv (UPD_FLAGS) const_iv (UPD_WEIGHT) const_iv (UPD_FACE) 1522 const_iv (UPD_LOCATION) const_iv (UPD_FLAGS) const_iv (UPD_WEIGHT) const_iv (UPD_FACE)
1523 const_iv (UPD_NAME) const_iv (UPD_ANIM) const_iv (UPD_ANIMSPEED) const_iv (UPD_NROF) 1523 const_iv (UPD_NAME) const_iv (UPD_ANIM) const_iv (UPD_ANIMSPEED) const_iv (UPD_NROF)
1524 1524
1525 const_iv (UPD_SP_MANA) const_iv (UPD_SP_GRACE) const_iv (UPD_SP_DAMAGE) 1525 const_iv (UPD_SP_MANA) const_iv (UPD_SP_GRACE) const_iv (UPD_SP_LEVEL)
1526 1526
1527 const_iv (SP_RAISE_DEAD) 1527 const_iv (SP_RAISE_DEAD)
1528 const_iv (SP_RUNE) 1528 const_iv (SP_RUNE)
1529 const_iv (SP_MAKE_MARK) 1529 const_iv (SP_MAKE_MARK)
1530 const_iv (SP_BOLT) 1530 const_iv (SP_BOLT)
… …
1822 } 1822 }
1823 1823
1824void server_tick () 1824void server_tick ()
1825 CODE: 1825 CODE:
1826{ 1826{
1827 ev_now_update (EV_DEFAULT);
1827 NOW = ev_now (EV_DEFAULT); 1828 NOW = ev_now (EV_DEFAULT);
1828 SvNV_set (sv_now, NOW); SvNOK_only (sv_now); 1829 SvNV_set (sv_now, NOW); SvNOK_only (sv_now);
1829 SvNV_set (sv_tick_start, NOW); SvNOK_only (sv_tick_start); 1830 SvNV_set (sv_tick_start, NOW); SvNOK_only (sv_tick_start);
1830 runtime = SvNVX (sv_runtime); 1831 runtime = SvNVX (sv_runtime);
1831 1832
1832 server_tick (); 1833 server_tick ();
1833 1834
1834 NOW = ev_time (); 1835 ev_now_update (EV_DEFAULT);
1836 NOW = ev_now (EV_DEFAULT);
1835 SvNV_set (sv_now, NOW); SvNOK_only (sv_now); 1837 SvNV_set (sv_now, NOW); SvNOK_only (sv_now);
1836 runtime += TICK; 1838 runtime += TICK;
1837 SvNV_set (sv_runtime, runtime); SvNOK_only (sv_runtime); 1839 SvNV_set (sv_runtime, runtime); SvNOK_only (sv_runtime);
1838} 1840}
1839 1841
… …
2218 2220
2219int apply_shop_mat (object *shop_mat, object *op); 2221int apply_shop_mat (object *shop_mat, object *op);
2220 2222
2221int move (object *op, int dir, object *originator = op) 2223int move (object *op, int dir, object *originator = op)
2222 CODE: 2224 CODE:
2223 RETVAL = move_ob (op, dir, originator); 2225 RETVAL = op->move (dir, originator);
2224 OUTPUT: 2226 OUTPUT:
2225 RETVAL 2227 RETVAL
2226 2228
2227void apply (object *applier, object *applied, int flags = 0) 2229void apply (object *applier, object *applied, int flags = 0)
2228 CODE: 2230 CODE:
… …
2295 2297
2296void handle_apply_yield (object *op) 2298void handle_apply_yield (object *op)
2297 2299
2298int convert_item (object *item, object *converter) 2300int convert_item (object *item, object *converter)
2299 2301
2302void fix_generated_item (object *op, object *creator, int difficulty, int max_magic, int flags);
2300 2303
2301MODULE = cf PACKAGE = cf::object PREFIX = cf_ 2304MODULE = cf PACKAGE = cf::object PREFIX = cf_
2302 2305
2303# no clean way to get an object from an archetype - stupid idiotic 2306# no clean way to get an object from an archetype - stupid idiotic
2304# dumb kludgy misdesigned plug-in api slowly gets on my nerves. 2307# dumb kludgy misdesigned plug-in api slowly gets on my nerves.
… …
2308 CODE: 2311 CODE:
2309 RETVAL = archetype ? get_archetype (archetype) : object::create (); 2312 RETVAL = archetype ? get_archetype (archetype) : object::create ();
2310 OUTPUT: 2313 OUTPUT:
2311 RETVAL 2314 RETVAL
2312 2315
2316object *generate (utf8_string arch, object *creator)
2317 CODE:
2318 object *obj = get_archetype (arch);
2319 fix_generated_item (obj, creator, 0, 0, GT_MINIMAL);
2320 RETVAL = obj;
2321 OUTPUT:
2322 RETVAL
2323
2313object *find_object (U32 tag) 2324object *find_object (U32 tag)
2325
2326object *find_object_uuid (UUID i)
2314 2327
2315# TODO: nuke 2328# TODO: nuke
2316object *insert_ob_in_map_at (object *ob, maptile *where, object_ornull *orig, int flag, int x, int y) 2329object *insert_ob_in_map_at (object *ob, maptile *where, object_ornull *orig, int flag, int x, int y)
2317 PROTOTYPE: $$$$$$ 2330 PROTOTYPE: $$$$$$
2318 CODE: 2331 CODE:
… …
2379 CODE: 2392 CODE:
2380 RETVAL = op->contr; 2393 RETVAL = op->contr;
2381 OUTPUT: RETVAL 2394 OUTPUT: RETVAL
2382 2395
2383bool move_player (object *op, int dir) 2396bool move_player (object *op, int dir)
2384
2385void check_score (object *op)
2386 2397
2387void message (object *op, utf8_string txt, int flags = NDI_ORANGE | NDI_UNIQUE) 2398void message (object *op, utf8_string txt, int flags = NDI_ORANGE | NDI_UNIQUE)
2388 CODE: 2399 CODE:
2389 new_draw_info (flags, 0, op, txt); 2400 new_draw_info (flags, 0, op, txt);
2390 2401

Diff Legend

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