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.314 by root, Thu Jan 1 20:49:48 2009 UTC vs.
Revision 1.315 by root, Thu Jan 8 03:03:24 2009 UTC

… …
1027 CALL_CALL ("cf::_can_merge", G_SCALAR); 1027 CALL_CALL ("cf::_can_merge", G_SCALAR);
1028 can = count && SvTRUE (TOPs); 1028 can = count && SvTRUE (TOPs);
1029 CALL_END; 1029 CALL_END;
1030 1030
1031 return can; 1031 return can;
1032}
1033
1034void
1035cfperl_mapscript_activate (object *ob, object *activator, int state)
1036{
1037 CALL_BEGIN (3);
1038 CALL_ARG (ob);
1039 CALL_ARG (activator);
1040 CALL_ARG (state);
1041 CALL_CALL ("cf::mapscript::activate", G_VOID);
1042 CALL_END;
1032} 1043}
1033 1044
1034player * 1045player *
1035player::find (const char *name) 1046player::find (const char *name)
1036{ 1047{
… …
1316 const_iv (FORCE) const_iv (POTION_EFFECT) const_iv (EVENT_CONNECTOR) const_iv (CLOSE_CON) 1327 const_iv (FORCE) const_iv (POTION_EFFECT) const_iv (EVENT_CONNECTOR) const_iv (CLOSE_CON)
1317 const_iv (CONTAINER) const_iv (ARMOUR_IMPROVER) const_iv (WEAPON_IMPROVER) const_iv (SKILLSCROLL) 1328 const_iv (CONTAINER) const_iv (ARMOUR_IMPROVER) const_iv (WEAPON_IMPROVER) const_iv (SKILLSCROLL)
1318 const_iv (DEEP_SWAMP) const_iv (IDENTIFY_ALTAR) const_iv (MENU) const_iv (RUNE) 1329 const_iv (DEEP_SWAMP) const_iv (IDENTIFY_ALTAR) const_iv (MENU) const_iv (RUNE)
1319 const_iv (TRAP) const_iv (POWER_CRYSTAL) const_iv (CORPSE) const_iv (DISEASE) 1330 const_iv (TRAP) const_iv (POWER_CRYSTAL) const_iv (CORPSE) const_iv (DISEASE)
1320 const_iv (SYMPTOM) const_iv (BUILDER) const_iv (MATERIAL) const_iv (ITEM_TRANSFORMER) 1331 const_iv (SYMPTOM) const_iv (BUILDER) const_iv (MATERIAL) const_iv (ITEM_TRANSFORMER)
1332 const_iv (MAPSCRIPT) const_iv (SAFE_GROUND)
1321 1333
1322 const_iv (NUM_TYPES) const_iv (NUM_SUBTYPES) 1334 const_iv (NUM_TYPES) const_iv (NUM_SUBTYPES)
1323 1335
1324 const_iv (ST_BD_BUILD) const_iv (ST_BD_REMOVE) 1336 const_iv (ST_BD_BUILD) const_iv (ST_BD_REMOVE)
1325 const_iv (ST_MAT_FLOOR) const_iv (ST_MAT_WALL) const_iv (ST_MAT_ITEM) 1337 const_iv (ST_MAT_FLOOR) const_iv (ST_MAT_WALL) const_iv (ST_MAT_ITEM)
… …
2135 2147
2136void push_button (object *op); 2148void push_button (object *op);
2137 2149
2138void use_trigger (object *op); 2150void use_trigger (object *op);
2139 2151
2140void add_button_link (object *button, maptile *map, int connected);
2141
2142void remove_button_link (object *op);
2143
2144void handle_apply_yield (object *op); 2152void handle_apply_yield (object *op);
2145 2153
2146 2154
2147MODULE = cf PACKAGE = cf::object PREFIX = cf_ 2155MODULE = cf PACKAGE = cf::object PREFIX = cf_
2148 2156
… …
2472 } 2480 }
2473 2481
2474int out_of_map (maptile *map, int x, int y) 2482int out_of_map (maptile *map, int x, int y)
2475 2483
2476void 2484void
2477trigger (maptile *map, long connection, bool state = true) 2485find_link (maptile *map, shstr_tmp connection)
2478 CODE:
2479 activate_connection (map, connection, state);
2480
2481void
2482get_connection (maptile *map, long connection)
2483 PPCODE: 2486 PPCODE:
2484 oblinkpt *obp = get_connection_links (map, connection); 2487 if (oblinkpt *obp = map->find_link (connection))
2485 if (obp)
2486 for (objectlink *ol = obp->link; ol; ol = ol->next) 2488 for (objectlink *ol = obp->link; ol; ol = ol->next)
2487 XPUSHs (sv_2mortal (to_sv ((object *)ol->ob))); 2489 XPUSHs (sv_2mortal (to_sv ((object *)ol->ob)));
2488 2490
2489void 2491void
2490get_map_flags (maptile *map, int x, int y) 2492get_map_flags (maptile *map, int x, int y)

Diff Legend

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