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

Comparing deliantra/server/server/c_range.C (file contents):
Revision 1.25 by root, Sat May 12 16:06:42 2007 UTC vs.
Revision 1.40 by root, Fri Nov 6 12:27:06 2009 UTC

1/* 1/*
2 * CrossFire, A Multiplayer game 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team 4 * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 * Copyright (©) 2002,2007 Mark Wedel & Crossfire Development Team
6 * Copyright (C) 1992 Frank Tore Johansen 6 * Copyright (©) 1992,2007 Frank Tore Johansen
7 * 7 *
8 * This program is free software; you can redistribute it and/or modify 8 * Deliantra is free software: you can redistribute it and/or modify it under
9 * it under the terms of the GNU General Public License as published by 9 * the terms of the Affero GNU General Public License as published by the
10 * the Free Software Foundation; either version 2 of the License, or 10 * Free Software Foundation, either version 3 of the License, or (at your
11 * (at your 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 GNU General Public License 18 * You should have received a copy of the Affero GNU General Public License
19 * along with this program; if not, write to the Free Software 19 * and the GNU General Public License along with this program. If not, see
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 * <http://www.gnu.org/licenses/>.
21 * 21 *
22 * The authors can be reached via e-mail at <crossfire@schmorp.de> 22 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 23 */
24 24
25/* This file deals with range related commands (casting, shooting, 25/* This file deals with range related commands (casting, shooting,
26 * throwing, etc. 26 * throwing, etc.
27 */ 27 */
29#include <global.h> 29#include <global.h>
30#include <sproto.h> 30#include <sproto.h>
31#include <spells.h> 31#include <spells.h>
32#include <skills.h> 32#include <skills.h>
33#include <commands.h> 33#include <commands.h>
34
35int
36command_invoke (object *op, char *params)
37{
38 return command_cast_spell (op, params, 'i');
39}
40
41int
42command_cast (object *op, char *params)
43{
44 return command_cast_spell (op, params, 'c');
45}
46
47int
48command_prepare (object *op, char *params)
49{
50 return command_cast_spell (op, params, 'p');
51}
52 34
53/* Shows all spells that op knows. If params is supplied, the must match 35/* Shows all spells that op knows. If params is supplied, the must match
54 * that. Given there is more than one skill, we can't supply break 36 * that. Given there is more than one skill, we can't supply break
55 * them down to cleric/wizardry. 37 * them down to cleric/wizardry.
56 */ 38 */
138 if (command == 'i') 120 if (command == 'i')
139 castnow = 1; 121 castnow = 1;
140 122
141 /* Remove control of the golem */ 123 /* Remove control of the golem */
142 if (object *golem = op->contr->golem) 124 if (object *golem = op->contr->golem)
143 golem->destroy (); 125 golem->drop_and_destroy ();
144 126
145 if (params) 127 if (params)
146 { 128 {
147 int spellnumber = 0; 129 int spellnumber = 0;
148 130
188 170
189 object *skill = find_skill_by_name (op, spob->skill); 171 object *skill = find_skill_by_name (op, spob->skill);
190 172
191 if (!skill) 173 if (!skill)
192 { 174 {
193 new_draw_info_format (NDI_UNIQUE, 0, op, "You need the skill %s to cast %s!", &spob->skill, &spob->name); 175 op->failmsg (format ("You need the skill %s to cast %s!", &spob->skill, &spob->name));
194 return 1; 176 return 1;
195 } 177 }
178
179 splay (spob);
196 180
197 if (castnow) 181 if (castnow)
198 cast_spell (op, op, op->facing, spob, cp); 182 cast_spell (op, op, op->facing, spob, cp);
199 else 183 else
200 { 184 {
185 if (op->contr->ranged_ob)
186 if (op->contr->ranged_ob->flag [FLAG_APPLIED])
187 apply_special (op, op->contr->ranged_ob, AP_UNAPPLY);
188 else
201 op->contr->ranged_ob = spob; 189 op->contr->ranged_ob = 0;
202 190
191 if (op->contr->ranged_ob)
192 op->failmsg (format ("You have to unapply the %s first to ready a spell.", &op->contr->ranged_ob->name));
193 else
194 {
195 op->change_weapon (op->contr->ranged_ob = spob);
196
203 assign (op->contr->spellparam, cp ? cp : ""); 197 assign (op->contr->spellparam, cp ? cp : "");
204 new_draw_info_format (NDI_UNIQUE, 0, op, "You ready the spell %s", &spob->name); 198 op->statusmsg (format ("You ready the spell %s", &spob->name));
199 }
205 } 200 }
206 201
207 return 0; 202 return 0;
208 } /* else fall through to below and print spells */ 203 } /* else fall through to below and print spells */
209 } /* params supplied */ 204 } /* params supplied */
215 show_matching_spells (op, params); 210 show_matching_spells (op, params);
216 211
217 return 1; 212 return 1;
218} 213}
219 214
215int
216command_invoke (object *op, char *params)
217{
218 return command_cast_spell (op, params, 'i');
219}
220
221int
222command_cast (object *op, char *params)
223{
224 return command_cast_spell (op, params, 'c');
225}
226
227int
228command_prepare (object *op, char *params)
229{
230 return command_cast_spell (op, params, 'p');
231}
232
220/**************************************************************************/ 233/**************************************************************************/
221 234
222void 235void
223change_spell (object *op, char k) 236change_spell (object *op, char k)
224{ 237{

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines