ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/button.C
(Generate patch)

Comparing deliantra/server/common/button.C (file contents):
Revision 1.59 by root, Wed Oct 21 00:44:39 2009 UTC vs.
Revision 1.68 by root, Sat Apr 23 04:56:45 2011 UTC

1/* 1/*
2 * This file is part of Deliantra, the Roguelike Realtime MMORPG. 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (©) 2005,2006,2007,2008,2009 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 4 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992,2007 Frank Tore Johansen 6 * Copyright (©) 1992 Frank Tore Johansen
7 * 7 *
8 * Deliantra is free software: you can redistribute it and/or modify it under 8 * Deliantra is free software: you can redistribute it and/or modify it under
9 * the terms of the Affero GNU General Public License as published by the 9 * the terms of the Affero GNU General Public License as published by the
10 * Free Software Foundation, either version 3 of the License, or (at your 10 * Free Software Foundation, either version 3 of the License, or (at your
11 * option) any later version. 11 * option) any later version.
52 * is getting moved out of memory, the status of buttons and levers 52 * is getting moved out of memory, the status of buttons and levers
53 * probably isn't important - it will get sorted out when the map is 53 * probably isn't important - it will get sorted out when the map is
54 * re-loaded. As such, just exit this function if that is the case. 54 * re-loaded. As such, just exit this function if that is the case.
55 */ 55 */
56 56
57 if (QUERY_FLAG (ol->ob, FLAG_FREED)) 57 if (ol->ob->flag [FLAG_FREED])
58 return; 58 return;
59 59
60 object *tmp = ol->ob; 60 object *tmp = ol->ob;
61 61
62 /* if the criteria isn't appropriate, don't do anything */ 62 /* if the criteria isn't appropriate, don't do anything */
63 if (state && !QUERY_FLAG (tmp, FLAG_ACTIVATE_ON_PUSH)) 63 if (state && !tmp->flag [FLAG_ACTIVATE_ON_PUSH])
64 continue; 64 continue;
65 65
66 if (!state && !QUERY_FLAG (tmp, FLAG_ACTIVATE_ON_RELEASE)) 66 if (!state && !tmp->flag [FLAG_ACTIVATE_ON_RELEASE])
67 continue; 67 continue;
68 68
69 switch (tmp->type) 69 switch (tmp->type)
70 { 70 {
71 case GATE: 71 case GATE:
84 break; 84 break;
85 85
86 case SIGN: 86 case SIGN:
87 if (!tmp->stats.food || tmp->last_eat < tmp->stats.food) 87 if (!tmp->stats.food || tmp->last_eat < tmp->stats.food)
88 { 88 {
89 tmp->play_sound (tmp->sound ? tmp->sound : sound_find ("trigger_sign")); 89 tmp->play_sound (tmp->sound ? tmp->sound : sound_find ("msg_voice"));
90
91 if (originator && originator->contr)
92 originator->contr->infobox (MSG_CHANNEL ("examine"), format ("T<%s>\n\n%s", &tmp->name, &tmp->msg));
93
90 new_info_map (NDI_UNIQUE | NDI_NAVY, tmp->map, tmp->msg); 94 new_info_map_except (NDI_UNIQUE | NDI_NAVY, tmp->map, originator, tmp->msg);
95
91 if (tmp->stats.food) 96 if (tmp->stats.food)
92 tmp->last_eat++; 97 tmp->last_eat++;
93 } 98 }
94 break; 99 break;
95 100
132 } 137 }
133 break; 138 break;
134 139
135 case DIRECTOR: 140 case DIRECTOR:
136 case FIREWALL: 141 case FIREWALL:
137 if (!QUERY_FLAG (tmp, FLAG_ANIMATE) && tmp->type == FIREWALL) 142 if (!tmp->flag [FLAG_ANIMATE] && tmp->type == FIREWALL)
138 move_firewall (tmp); 143 move_firewall (tmp);
139 else 144 else
140 { 145 {
141 tmp->stats.sp = absdir (tmp->stats.sp + tmp->stats.maxsp); /* next direction */ 146 tmp->stats.sp = absdir (tmp->stats.sp + tmp->stats.maxsp); /* next direction */
142 animate_turning (tmp); 147 animate_turning (tmp);
341 * 346 *
342 * 0.93.4: Linked objects (ie, objects that are connected) can not be 347 * 0.93.4: Linked objects (ie, objects that are connected) can not be
343 * sacrificed. This fixes a bug of trying to put multiple altars/related 348 * sacrificed. This fixes a bug of trying to put multiple altars/related
344 * objects on the same space that take the same sacrifice. 349 * objects on the same space that take the same sacrifice.
345 */ 350 */
346
347int 351int
348check_altar_sacrifice (object *altar, object *sacrifice, object *originator) 352check_altar_sacrifice (object *altar, object *sacrifice, object *originator)
349{ 353{
350 if (sacrifice->flag [FLAG_UNPAID]) 354 if (sacrifice->flag [FLAG_UNPAID]
355 || sacrifice->flag [FLAG_IS_LINKED]
356 || sacrifice->is_player ())
351 return 0; 357 return 0;
352 358
353 if (is_match_expr (ARCH_SACRIFICE (altar))) 359 if (is_match_expr (ARCH_SACRIFICE (altar)))
354 return match (ARCH_SACRIFICE (altar), altar, originator); 360 return match (ARCH_SACRIFICE (altar), sacrifice, altar, originator);
355 361
356 if (!QUERY_FLAG (sacrifice, FLAG_ALIVE) 362 if (!sacrifice->flag [FLAG_ALIVE])
357 && !QUERY_FLAG (sacrifice, FLAG_IS_LINKED)
358 && sacrifice->type != PLAYER)
359 { 363 {
360 if (ARCH_SACRIFICE (altar) == shstr_money 364 if (ARCH_SACRIFICE (altar) == shstr_money
361 && sacrifice->type == MONEY 365 && sacrifice->type == MONEY
362 && sacrifice->nrof * sacrifice->value >= NROF_SACRIFICE (altar)) 366 && sacrifice->nrof * sacrifice->value >= NROF_SACRIFICE (altar))
363 return 1; 367 return 1;
419 new_info_map (NDI_BLACK, altar->map, altar->msg); 423 new_info_map (NDI_BLACK, altar->map, altar->msg);
420 424
421 return 1; 425 return 1;
422} 426}
423 427
424void 428static void
425trigger_move (object *op, int state, object *originator) /* 1 down and 0 up */ 429trigger_move (object *op, int state, object *originator) /* 1 down and 0 up */
426{ 430{
427 op->stats.wc = state; 431 op->stats.wc = state;
428 432
429 if (state) 433 if (state)
455int 459int
456check_trigger (object *op, object *cause, object *originator) 460check_trigger (object *op, object *cause, object *originator)
457{ 461{
458 object *tmp; 462 object *tmp;
459 int push = 0, tot = 0; 463 int push = 0, tot = 0;
460 int in_movement = op->stats.wc || op->speed; 464 int in_movement = op->stats.wc || op->has_active_speed ();
461 465
462 switch (op->type) 466 switch (op->type)
463 { 467 {
464 case TRIGGER_BUTTON: 468 case TRIGGER_BUTTON:
465 if (op->weight > 0) 469 if (op->weight > 0)
756 return; 760 return;
757 761
758 object *tmp; 762 object *tmp;
759 763
760 for (tmp = ms.top; tmp; tmp = tmp->below) 764 for (tmp = ms.top; tmp; tmp = tmp->below)
761 if (QUERY_FLAG (tmp, FLAG_MONSTER)) 765 if (tmp->flag [FLAG_MONSTER])
762 break; 766 break;
763 767
764 /* doesn't effect players, and if there is a player on this space, won't also 768 /* doesn't effect players, and if there is a player on this space, won't also
765 * be a monster here. 769 * be a monster here.
766 */ 770 */
769 return; 773 return;
770 774
771 switch (op->last_sp) 775 switch (op->last_sp)
772 { 776 {
773 case 0: /* furious--make all monsters mad */ 777 case 0: /* furious--make all monsters mad */
774 if (QUERY_FLAG (tmp, FLAG_UNAGGRESSIVE)) 778 if (tmp->flag [FLAG_UNAGGRESSIVE])
775 CLEAR_FLAG (tmp, FLAG_UNAGGRESSIVE); 779 tmp->clr_flag (FLAG_UNAGGRESSIVE);
776 780
777 if (QUERY_FLAG (tmp, FLAG_FRIENDLY)) 781 if (tmp->flag [FLAG_FRIENDLY])
778 { 782 {
779 tmp->attack_movement = 0; 783 tmp->attack_movement = 0;
780 /* lots of checks here, but want to make sure we don't 784 /* lots of checks here, but want to make sure we don't
781 * dereference a null value 785 * dereference a null value
782 */ 786 */
791 remove_friendly_object (tmp); 795 remove_friendly_object (tmp);
792 } 796 }
793 break; 797 break;
794 798
795 case 1: /* angry -- get neutral monsters mad */ 799 case 1: /* angry -- get neutral monsters mad */
796 if (QUERY_FLAG (tmp, FLAG_UNAGGRESSIVE) && !QUERY_FLAG (tmp, FLAG_FRIENDLY)) 800 if (tmp->flag [FLAG_UNAGGRESSIVE] && !tmp->flag [FLAG_FRIENDLY])
797 CLEAR_FLAG (tmp, FLAG_UNAGGRESSIVE); 801 tmp->clr_flag (FLAG_UNAGGRESSIVE);
798 break; 802 break;
799 803
800 case 2: /* calm -- pacify unfriendly monsters */ 804 case 2: /* calm -- pacify unfriendly monsters */
801 SET_FLAG (tmp, FLAG_UNAGGRESSIVE); 805 tmp->set_flag (FLAG_UNAGGRESSIVE);
802 break; 806 break;
803 807
804 case 3: /* make all monsters fall asleep */ 808 case 3: /* make all monsters fall asleep */
805 SET_FLAG (tmp, FLAG_SLEEP); 809 tmp->set_flag (FLAG_SLEEP);
806 break; 810 break;
807 811
808 case 4: /* charm all monsters */ 812 case 4: /* charm all monsters */
809 if (op == source) 813 if (op == source)
810 break; /* only if 'connected' */ 814 break; /* only if 'connected' */
811 815
812 if (object *pl = source->ms ().player ()) 816 if (object *pl = source->ms ().player ())
813 { 817 {
814 tmp->set_owner (pl); 818 tmp->set_owner (pl);
815 SET_FLAG (tmp, FLAG_MONSTER); 819 tmp->set_flag (FLAG_MONSTER);
816 820
817 tmp->stats.exp = 0; 821 tmp->stats.exp = 0;
818 822
819 add_friendly_object (tmp); 823 add_friendly_object (tmp);
820 tmp->attack_movement = PETMOVE; 824 tmp->attack_movement = PETMOVE;
821 } 825 }
822 break; 826 break;
823 827
824 case 6: // kill monsters 828 case 6: // kill monsters
825 if (!QUERY_FLAG (tmp, FLAG_FRIENDLY)) 829 if (!tmp->flag [FLAG_FRIENDLY])
826 break; 830 break;
827 831
828 // FALL THROUGH 832 // FALL THROUGH
829 case 5: // kill all alives 833 case 5: // kill all alives
830 if (!tmp->flag [FLAG_PRECIOUS]) 834 if (!tmp->flag [FLAG_PRECIOUS])

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines