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

Comparing deliantra/server/plugins/cfperl/cfperl.xs (file contents):
Revision 1.61 by root, Wed Jul 19 08:50:42 2006 UTC vs.
Revision 1.64 by root, Mon Jul 24 23:25:26 2006 UTC

… …
259 sv = &PL_sv_undef; 259 sv = &PL_sv_undef;
260 else 260 else
261 switch (obj->type) 261 switch (obj->type)
262 { 262 {
263 case MAP: 263 case MAP:
264 sv = newSVptr_cached (obj, "cf::object::map"); 264 sv = newSVptr_cached (obj, "cf::object::map::wrap");
265 break; 265 break;
266 266
267 case PLAYER: 267 case PLAYER:
268 sv = newSVptr_cached (obj, "cf::object::player"); 268 sv = newSVptr_cached (obj, "cf::object::player::wrap");
269 break; 269 break;
270 270
271 default: 271 default:
272 sv = newSVptr_cached (obj, "cf::object"); 272 sv = newSVptr_cached (obj, "cf::object::wrap");
273 break; 273 break;
274 } 274 }
275 } 275 }
276 break; 276 break;
277 277
278 case CFAPI_PMAP: 278 case CFAPI_PMAP:
279 sv = newSVptr (va_arg (args, mapstruct *), "cf::map"); 279 sv = newSVptr (va_arg (args, mapstruct *), "cf::map::wrap");
280 break; 280 break;
281 281
282 case CFAPI_PPLAYER: 282 case CFAPI_PPLAYER:
283 sv = newSVptr (va_arg (args, player *), "cf::player"); 283 sv = newSVptr (va_arg (args, player *), "cf::player::wrap");
284 break; 284 break;
285 285
286 case CFAPI_PARCH: 286 case CFAPI_PARCH:
287 sv = newSVptr (va_arg (args, archetype *), "cf::arch"); 287 sv = newSVptr (va_arg (args, archetype *), "cf::arch::wrap");
288 break; 288 break;
289 289
290 case CFAPI_PPARTY: 290 case CFAPI_PPARTY:
291 sv = newSVptr (va_arg (args, partylist *), "cf::party"); 291 sv = newSVptr (va_arg (args, partylist *), "cf::party::wrap");
292 break; 292 break;
293 293
294 case CFAPI_PREGION: 294 case CFAPI_PREGION:
295 sv = newSVptr (va_arg (args, region *), "cf::region"); 295 sv = newSVptr (va_arg (args, region *), "cf::region::wrap");
296 break; 296 break;
297 297
298 default: 298 default:
299 assert (("unhandled type in newSVcfapi", 0)); 299 assert (("unhandled type in newSVcfapi", 0));
300 } 300 }
… …
1433char * 1433char *
1434cf_get_maps_directory (char *path) 1434cf_get_maps_directory (char *path)
1435 PROTOTYPE: $ 1435 PROTOTYPE: $
1436 ALIAS: maps_directory = 0 1436 ALIAS: maps_directory = 0
1437 1437
1438void
1439sub_generation_inc ()
1440 CODE:
1441 PL_sub_generation++;
1442
1438char * 1443char *
1439mapdir () 1444mapdir ()
1440 PROTOTYPE: 1445 PROTOTYPE:
1441 ALIAS: 1446 ALIAS:
1442 mapdir = 0 1447 mapdir = 0
… …
1603 1608
1604int cf_object_pay_item (object *op, object *buyer) 1609int cf_object_pay_item (object *op, object *buyer)
1605 1610
1606int cf_object_pay_amount (object *op, val64 amount) 1611int cf_object_pay_amount (object *op, val64 amount)
1607 1612
1613void pay_player (object *op, val64 amount)
1614
1615val64 pay_player_arch (object *op, const char *arch, val64 amount)
1616
1608int cf_object_cast_spell (object *caster, object *ctoo, int dir, object *spell_ob, char *stringarg = 0) 1617int cf_object_cast_spell (object *caster, object *ctoo, int dir, object *spell_ob, char *stringarg = 0)
1609 1618
1610int cf_object_cast_ability (object *caster, object *ctoo, int dir, object *sp_, char *stringarg = 0) 1619int cf_object_cast_ability (object *caster, object *ctoo, int dir, object *sp_, char *stringarg = 0)
1611 1620
1612void cf_object_learn_spell (object *op, object *sp) 1621void cf_object_learn_spell (object *op, object *sp)
… …
1650 1659
1651object *cf_create_object_by_name (const char *name) 1660object *cf_create_object_by_name (const char *name)
1652 1661
1653void change_exp (object *op, val64 exp, const char *skill_name = 0, int flag = 0) 1662void change_exp (object *op, val64 exp, const char *skill_name = 0, int flag = 0)
1654 1663
1655void pay_player (object *op, val64 amount)
1656
1657val64 pay_player_arch (object *op, const char *arch, val64 amount)
1658
1659void player_lvl_adj (object *who, object *skill = 0) 1664void player_lvl_adj (object *who, object *skill = 0)
1660 1665
1661int kill_object (object *op, int dam = 0, object *hitter = 0, int type = AT_PHYSICAL) 1666int kill_object (object *op, int dam = 0, object *hitter = 0, int type = AT_PHYSICAL)
1662 1667
1663int calc_skill_exp (object *who, object *op, object *skill); 1668int calc_skill_exp (object *who, object *op, object *skill);
1664 1669
1665void push_button (object *op); 1670void push_button (object *op);
1666 1671
1667void use_trigger (object *op); 1672void use_trigger (object *op);
1673
1674void add_button_link (object *button, mapstruct *map, int connected);
1675
1676void remove_button_link (object *op);
1668 1677
1669void 1678void
1670cf_object_set_resistance (object *op, int rtype, int val) 1679cf_object_set_resistance (object *op, int rtype, int val)
1671 CODE: 1680 CODE:
1672 if (rtype >= 0 && rtype < NROFATTACKS) 1681 if (rtype >= 0 && rtype < NROFATTACKS)
… …
1702const char *options (object *op) 1711const char *options (object *op)
1703 CODE: 1712 CODE:
1704 RETVAL = op->name; 1713 RETVAL = op->name;
1705 OUTPUT: 1714 OUTPUT:
1706 RETVAL 1715 RETVAL
1716
1717player *contr (object *op)
1718 CODE:
1719 RETVAL = op->contr;
1720 OUTPUT: RETVAL
1707 1721
1708const char *get_ob_key_value (object *op, const char *key) 1722const char *get_ob_key_value (object *op, const char *key)
1709 1723
1710bool set_ob_key_value (object *op, const char *key, const char *value = 0, int add_key = 1) 1724bool set_ob_key_value (object *op, const char *key, const char *value = 0, int add_key = 1)
1711 1725
… …
1754 OUTPUT: RETVAL 1768 OUTPUT: RETVAL
1755 1769
1756void cf_player_message (object *obj, char *txt, int flags = NDI_ORANGE | NDI_UNIQUE) 1770void cf_player_message (object *obj, char *txt, int flags = NDI_ORANGE | NDI_UNIQUE)
1757 1771
1758object *cf_player_send_inventory (object *op) 1772object *cf_player_send_inventory (object *op)
1759
1760player *contr (object *op)
1761 CODE:
1762 RETVAL = op->contr;
1763 OUTPUT: RETVAL
1764 1773
1765char *cf_player_get_ip (object *op) 1774char *cf_player_get_ip (object *op)
1766 ALIAS: ip = 0 1775 ALIAS: ip = 0
1767 1776
1768object *cf_player_get_marked_item (object *op) 1777object *cf_player_get_marked_item (object *op)

Diff Legend

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