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.34 by root, Thu Mar 16 23:43:58 2006 UTC vs.
Revision 1.37 by root, Fri Mar 17 01:23:48 2006 UTC

1335 1335
1336void cf_object_free (object *op) 1336void cf_object_free (object *op)
1337 1337
1338object *cf_object_present_archname_inside (object *op, char *whatstr) 1338object *cf_object_present_archname_inside (object *op, char *whatstr)
1339 1339
1340int cf_object_transfer (object *op, int x, int y, int r, object *orig) 1340int cf_object_transfer (object *op, int x, int y, int r = 0, object_ornull *orig = 0)
1341 1341
1342int cf_object_change_map (object *op, int x, int y, mapstruct *map) 1342int cf_object_change_map (object *op, int x, int y, mapstruct *map)
1343 1343
1344object *cf_object_clone (object *op, int clonetype = 0) 1344object *cf_object_clone (object *op, int clonetype = 0)
1345 1345
1588 ALIAS: map = 0 1588 ALIAS: map = 0
1589 1589
1590mapstruct *cf_map_get_first () 1590mapstruct *cf_map_get_first ()
1591 PROTOTYPE: 1591 PROTOTYPE:
1592 ALIAS: first = 0 1592 ALIAS: first = 0
1593
1594# whoever "designed" the plug-in api should have wasted
1595# his/her time with staying away form the project - would have
1596# saved others a lot of time, without doubt.
1597void set_path (mapstruct *where, char *path)
1598 CODE:
1599 strcpy (where->path, path);
1600
1601bool unique (mapstruct *map)
1602 CODE:
1603 RETVAL = map->unique;
1604 OUTPUT:
1605 RETVAL
1606
1607void set_unique (mapstruct *map, bool unique)
1608 CODE:
1609 map->unique = unique;
1593 1610
1594object *cf_map_insert_object_there (mapstruct *where, object *op, object *originator, int flags) 1611object *cf_map_insert_object_there (mapstruct *where, object *op, object *originator, int flags)
1595 1612
1596object *cf_map_insert_object (mapstruct *where, object* op, int x, int y) 1613object *cf_map_insert_object (mapstruct *where, object* op, int x, int y)
1597 1614
1711 } 1728 }
1712 } 1729 }
1713 } 1730 }
1714} 1731}
1715 1732
1733
1716MODULE = cf PACKAGE = cf::arch PREFIX = cf_archetype_ 1734MODULE = cf PACKAGE = cf::arch PREFIX = cf_archetype_
1717 1735
1718archetype *cf_archetype_get_first() 1736archetype *cf_archetype_get_first()
1719 PROTOTYPE: 1737 PROTOTYPE:
1720 ALIAS: first = 0 1738 ALIAS: first = 0
1797 maxgrace = 15 1815 maxgrace = 15
1798 food = 16 1816 food = 16
1799 dam = 17 1817 dam = 17
1800 luck = 18 1818 luck = 18
1801 CODE: 1819 CODE:
1802# define LIVING_ACC(acc,idx) case idx: RETVAL = liv->acc; if (ix > 1) liv->acc = new_val; break 1820# define LIVING_ACC(acc,idx) case idx: RETVAL = liv->acc; if (items > 1) liv->acc = new_val; break
1803 switch (ix) 1821 switch (ix)
1804 { 1822 {
1805 LIVING_ACC (exp , 0); 1823 LIVING_ACC (exp , 0);
1806 LIVING_ACC (Str , 1); 1824 LIVING_ACC (Str , 1);
1807 LIVING_ACC (Dex , 2); 1825 LIVING_ACC (Dex , 2);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines