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.58 by root, Thu Oct 15 21:40:42 2009 UTC vs.
Revision 1.72 by root, Wed Nov 16 23:41:59 2016 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,2012,2013,2014,2015,2016 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.
12 * 12 *
13 * This program is distributed in the hope that it will be useful, 13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details. 16 * GNU General Public License for more details.
17 * 17 *
18 * You should have received a copy of the Affero GNU General Public License 18 * You should have received a copy of the Affero GNU General Public License
19 * and the GNU General Public License along with this program. If not, see 19 * and the GNU General Public License along with this program. If not, see
20 * <http://www.gnu.org/licenses/>. 20 * <http://www.gnu.org/licenses/>.
21 * 21 *
22 * The authors can be reached via e-mail to <support@deliantra.net> 22 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 23 */
24 24
25#include <global.h> 25#include <global.h>
26 26
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);
231 236
232 object *tmp = ol->ob; 237 object *tmp = ol->ob;
233 238
234 if (tmp->type == BUTTON) 239 if (tmp->type == BUTTON)
235 { 240 {
236 sint32 total = 0; 241 weight_t total = 0;
237 242
238 for (object *ab = tmp->above; ab; ab = ab->above) 243 for (object *ab = tmp->above; ab; ab = ab->above)
239 /* Basically, if the move_type matches that on what the 244 /* Basically, if the move_type matches that on what the
240 * button wants, we count it. The second check is so that 245 * button wants, we count it. The second check is so that
241 * objects who don't move (swords, etc) will count. Note that 246 * objects who don't move (swords, etc) will count. Note that
271 } 276 }
272 } 277 }
273 278
274 any_down = any_down || tmp->value; 279 any_down = any_down || tmp->value;
275 } 280 }
281 else if (tmp->type == T_MATCH)
282 {
283 tmp->value = 0;
284
285 for (object *ab = tmp->above; ab; ab = ab->above)
286 {
287 object *head = ab->head_ ();
288
289 /* Same note regarding move_type for buttons above apply here. */
290 if (((ab->move_type & tmp->move_on) || ab->move_type == 0))
291 if (match (tmp->slaying, head, tmp, originator))
292 {
293 tmp->value = 1;
294 break;
295 }
296 }
297
298 any_down = any_down || tmp->value;
299 }
276 } 300 }
277 301
278 if (any_down) /* If any other buttons were down, force this to remain down */ 302 if (any_down) /* If any other buttons were down, force this to remain down */
279 op->value = 1; 303 op->value = 1;
280 304
322 * 346 *
323 * 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
324 * 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
325 * objects on the same space that take the same sacrifice. 349 * objects on the same space that take the same sacrifice.
326 */ 350 */
327
328int 351int
329check_altar_sacrifice (object *altar, object *sacrifice, object *originator) 352check_altar_sacrifice (object *altar, object *sacrifice, object *originator)
330{ 353{
331 if (sacrifice->flag [FLAG_UNPAID]) 354 if (sacrifice->flag [FLAG_UNPAID]
355 || sacrifice->flag [FLAG_IS_LINKED]
356 || sacrifice->is_player ())
332 return 0; 357 return 0;
333 358
334 if (is_match_expr (ARCH_SACRIFICE (altar))) 359 if (is_match_expr (ARCH_SACRIFICE (altar)))
335 return match (ARCH_SACRIFICE (altar), altar, originator); 360 return match (ARCH_SACRIFICE (altar), sacrifice, altar, originator);
336 361
337 if (!QUERY_FLAG (sacrifice, FLAG_ALIVE) 362 if (!sacrifice->flag [FLAG_ALIVE])
338 && !QUERY_FLAG (sacrifice, FLAG_IS_LINKED)
339 && sacrifice->type != PLAYER)
340 { 363 {
341 if (ARCH_SACRIFICE (altar) == shstr_money 364 if (ARCH_SACRIFICE (altar) == shstr_money
342 && sacrifice->type == MONEY 365 && sacrifice->type == MONEY
343 && sacrifice->nrof * sacrifice->value >= NROF_SACRIFICE (altar)) 366 && sacrifice->nrof * sacrifice->value >= NROF_SACRIFICE (altar))
344 return 1; 367 return 1;
400 new_info_map (NDI_BLACK, altar->map, altar->msg); 423 new_info_map (NDI_BLACK, altar->map, altar->msg);
401 424
402 return 1; 425 return 1;
403} 426}
404 427
405void 428static void
406trigger_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 */
407{ 430{
408 op->stats.wc = state; 431 op->stats.wc = state;
409 432
410 if (state) 433 if (state)
436int 459int
437check_trigger (object *op, object *cause, object *originator) 460check_trigger (object *op, object *cause, object *originator)
438{ 461{
439 object *tmp; 462 object *tmp;
440 int push = 0, tot = 0; 463 int push = 0, tot = 0;
441 int in_movement = op->stats.wc || op->speed; 464 int in_movement = op->stats.wc || op->has_active_speed ();
442 465
443 switch (op->type) 466 switch (op->type)
444 { 467 {
445 case TRIGGER_BUTTON: 468 case TRIGGER_BUTTON:
446 if (op->weight > 0) 469 if (op->weight > 0)
737 return; 760 return;
738 761
739 object *tmp; 762 object *tmp;
740 763
741 for (tmp = ms.top; tmp; tmp = tmp->below) 764 for (tmp = ms.top; tmp; tmp = tmp->below)
742 if (QUERY_FLAG (tmp, FLAG_MONSTER)) 765 if (tmp->flag [FLAG_MONSTER])
743 break; 766 break;
744 767
745 /* 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
746 * be a monster here. 769 * be a monster here.
747 */ 770 */
750 return; 773 return;
751 774
752 switch (op->last_sp) 775 switch (op->last_sp)
753 { 776 {
754 case 0: /* furious--make all monsters mad */ 777 case 0: /* furious--make all monsters mad */
755 if (QUERY_FLAG (tmp, FLAG_UNAGGRESSIVE)) 778 if (tmp->flag [FLAG_UNAGGRESSIVE])
756 CLEAR_FLAG (tmp, FLAG_UNAGGRESSIVE); 779 tmp->clr_flag (FLAG_UNAGGRESSIVE);
757 780
758 if (QUERY_FLAG (tmp, FLAG_FRIENDLY)) 781 if (tmp->flag [FLAG_FRIENDLY])
759 { 782 {
760 tmp->attack_movement = 0; 783 tmp->attack_movement = 0;
761 /* 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
762 * dereference a null value 785 * dereference a null value
763 */ 786 */
772 remove_friendly_object (tmp); 795 remove_friendly_object (tmp);
773 } 796 }
774 break; 797 break;
775 798
776 case 1: /* angry -- get neutral monsters mad */ 799 case 1: /* angry -- get neutral monsters mad */
777 if (QUERY_FLAG (tmp, FLAG_UNAGGRESSIVE) && !QUERY_FLAG (tmp, FLAG_FRIENDLY)) 800 if (tmp->flag [FLAG_UNAGGRESSIVE] && !tmp->flag [FLAG_FRIENDLY])
778 CLEAR_FLAG (tmp, FLAG_UNAGGRESSIVE); 801 tmp->clr_flag (FLAG_UNAGGRESSIVE);
779 break; 802 break;
780 803
781 case 2: /* calm -- pacify unfriendly monsters */ 804 case 2: /* calm -- pacify unfriendly monsters */
782 SET_FLAG (tmp, FLAG_UNAGGRESSIVE); 805 tmp->set_flag (FLAG_UNAGGRESSIVE);
783 break; 806 break;
784 807
785 case 3: /* make all monsters fall asleep */ 808 case 3: /* make all monsters fall asleep */
786 SET_FLAG (tmp, FLAG_SLEEP); 809 tmp->set_flag (FLAG_SLEEP);
787 break; 810 break;
788 811
789 case 4: /* charm all monsters */ 812 case 4: /* charm all monsters */
790 if (op == source) 813 if (op == source)
791 break; /* only if 'connected' */ 814 break; /* only if 'connected' */
792 815
793 if (object *pl = source->ms ().player ()) 816 if (object *pl = source->ms ().player ())
794 { 817 {
795 tmp->set_owner (pl); 818 tmp->set_owner (pl);
796 SET_FLAG (tmp, FLAG_MONSTER); 819 tmp->set_flag (FLAG_MONSTER);
797 820
798 tmp->stats.exp = 0; 821 tmp->stats.exp = 0;
799 822
800 add_friendly_object (tmp); 823 add_friendly_object (tmp);
801 tmp->attack_movement = PETMOVE; 824 tmp->attack_movement = PETMOVE;
802 } 825 }
803 break; 826 break;
804 827
805 case 6: // kill monsters 828 case 6: // kill monsters
806 if (!QUERY_FLAG (tmp, FLAG_FRIENDLY)) 829 if (!tmp->flag [FLAG_FRIENDLY])
807 break; 830 break;
808 831
809 // FALL THROUGH 832 // FALL THROUGH
810 case 5: // kill all alives 833 case 5: // kill all alives
811 if (!tmp->flag [FLAG_PRECIOUS]) 834 if (!tmp->flag [FLAG_PRECIOUS])

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines