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.204 by root, Mon Apr 30 04:25:30 2007 UTC vs.
Revision 1.205 by root, Mon May 7 03:05:58 2007 UTC

1134 const_iv (Map0Cmd) const_iv (Map1Cmd) const_iv (Map1aCmd) 1134 const_iv (Map0Cmd) const_iv (Map1Cmd) const_iv (Map1aCmd)
1135 1135
1136 const_iv (MAP_CLIENT_X) const_iv (MAP_CLIENT_Y) 1136 const_iv (MAP_CLIENT_X) const_iv (MAP_CLIENT_Y)
1137 1137
1138 const_iv (MAX_TIME) 1138 const_iv (MAX_TIME)
1139
1140 const_iv (NUM_BODY_LOCATIONS) const_iv (BODY_ARMS)
1139 1141
1140 const_iv (PLAYER) const_iv (TRANSPORT) const_iv (ROD) const_iv (TREASURE) 1142 const_iv (PLAYER) const_iv (TRANSPORT) const_iv (ROD) const_iv (TREASURE)
1141 const_iv (POTION) const_iv (FOOD) const_iv (POISON) const_iv (BOOK) 1143 const_iv (POTION) const_iv (FOOD) const_iv (POISON) const_iv (BOOK)
1142 const_iv (CLOCK) const_iv (ARROW) const_iv (BOW) const_iv (WEAPON) 1144 const_iv (CLOCK) const_iv (ARROW) const_iv (BOW) const_iv (WEAPON)
1143 const_iv (ARMOUR) const_iv (PEDESTAL) const_iv (ALTAR) const_iv (LOCKED_DOOR) 1145 const_iv (ARMOUR) const_iv (PEDESTAL) const_iv (ALTAR) const_iv (LOCKED_DOOR)
1606object *actives (U32 index) 1608object *actives (U32 index)
1607 CODE: 1609 CODE:
1608 RETVAL = index < actives.size () ? actives [index] : 0; 1610 RETVAL = index < actives.size () ? actives [index] : 0;
1609 OUTPUT: RETVAL 1611 OUTPUT: RETVAL
1610 1612
1613const char *slot_save_name (U32 slot)
1614 ALIAS:
1615 slot_use_name = 1
1616 slot_nonuse_name = 2
1617 CODE:
1618{
1619 if (slot >= NUM_BODY_LOCATIONS)
1620 croak ("body slot index out of range");
1621
1622 switch (ix)
1623 {
1624 case 0: RETVAL = body_locations[slot].save_name; break;
1625 case 1: RETVAL = body_locations[slot].use_name; break;
1626 case 2: RETVAL = body_locations[slot].nonuse_name; break;
1627 }
1628}
1629 OUTPUT:
1630 RETVAL
1631
1611# missing properties 1632# missing properties
1612 1633
1613object *head (object *op) 1634object *head (object *op)
1614 PROTOTYPE: $ 1635 PROTOTYPE: $
1615 CODE: 1636 CODE:
1640int 1661int
1641num_animations (object *op) 1662num_animations (object *op)
1642 CODE: 1663 CODE:
1643 RETVAL = NUM_ANIMATIONS (op); 1664 RETVAL = NUM_ANIMATIONS (op);
1644 OUTPUT: RETVAL 1665 OUTPUT: RETVAL
1666
1667int slot_info (object *op, UV slot, int value = 0)
1668 ALIAS:
1669 slot_used = 1
1670 CODE:
1671{
1672 if (slot >= NUM_BODY_LOCATIONS)
1673 croak ("body slot index out of range");
1674
1675 RETVAL = ix ? op->slot[slot].info : op->slot[slot].used;
1676
1677 if (items > 2)
1678 if (ix)
1679 op->slot[slot].info = value;
1680 else
1681 op->slot[slot].used = value;
1682}
1683 OUTPUT:
1684 RETVAL
1645 1685
1646object *find_best_object_match (object *op, utf8_string match) 1686object *find_best_object_match (object *op, utf8_string match)
1647 1687
1648object *find_marked_object (object *op) 1688object *find_marked_object (object *op)
1649 1689

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines