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.19 by root, Sun Apr 29 21:44:35 2007 UTC vs.
Revision 1.35 by root, Mon May 12 18:27:08 2008 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
9 * it under the terms of the GNU General Public License as published by 9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or 10 * the Free Software Foundation, either version 3 of the License, or
11 * (at your option) any later version. 11 * (at your 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 GNU General Public License
19 * along with this program; if not, write to the Free Software 19 * along with this program. If not, see <http://www.gnu.org/licenses/>.
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 * 20 *
22 * The authors can be reached via e-mail at <crossfire@schmorp.de> 21 * The authors can be reached via e-mail to <support@deliantra.net>
23 */ 22 */
24 23
25/* This file deals with range related commands (casting, shooting, 24/* This file deals with range related commands (casting, shooting,
26 * throwing, etc. 25 * throwing, etc.
27 */ 26 */
137 136
138 if (command == 'i') 137 if (command == 'i')
139 castnow = 1; 138 castnow = 1;
140 139
141 /* Remove control of the golem */ 140 /* Remove control of the golem */
142 if (object *golem = op->contr->ranges[range_golem]) 141 if (object *golem = op->contr->golem)
143 golem->destroy (); 142 golem->destroy ();
144 143
145 if (params) 144 if (params)
146 { 145 {
147 int spellnumber = 0; 146 int spellnumber = 0;
166 cp++; 165 cp++;
167 if (!strncmp (cp, "of ", 3)) 166 if (!strncmp (cp, "of ", 3))
168 cp += 3; 167 cp += 3;
169 } 168 }
170 } 169 }
171 else if (strlen (params) > (size_t) strlen (spob->name)) 170 else if (strlen (params) > strlen (spob->name))
172 { 171 {
173 cp = params + strlen (spob->name); 172 cp = params + strlen (spob->name);
174 *cp = 0; 173 *cp = 0;
175 cp++; 174 cp++;
176 if (!strncmp (cp, "of ", 3)) 175 if (!strncmp (cp, "of ", 3))
177 cp += 3; 176 cp += 3;
178 } 177 }
179 else 178 else
180 cp = NULL; 179 cp = NULL;
181 180
182 if (spob->skill && !find_skill_by_name (op, spob->skill)) 181 if (!spob->skill)
183 { 182 {
184 new_draw_info_format (NDI_UNIQUE, 0, op, "You need the skill %s to cast %s!", &spob->skill, &spob->name); 183 new_draw_info_format (NDI_UNIQUE, 0, op, "%s is a weird spell, please report it to the dungeon master!", &spob->name);
184 LOG (llevError, "spell without skill found: %s", spob->debug_desc ());
185 return 1; 185 return 1;
186 } 186 }
187
188 object *skill = find_skill_by_name (op, spob->skill);
189
190 if (!skill)
191 {
192 op->failmsg (format ("You need the skill %s to cast %s!", &spob->skill, &spob->name));
193 return 1;
194 }
195
196 splay (spob);
187 197
188 if (castnow) 198 if (castnow)
189 cast_spell (op, op, op->facing, spob, cp); 199 cast_spell (op, op, op->facing, spob, cp);
190 else 200 else
191 { 201 {
192 op->contr->ranges[range_magic] = spob; 202 if (op->contr->ranged_ob) LOG (llevError, "%s", op->contr->ranged_ob->debug_desc ());//D
193 op->contr->shoottype = range_magic; 203 if (op->contr->ranged_ob)
204 if (op->contr->ranged_ob->flag [FLAG_APPLIED])
205 apply_special (op, op->contr->ranged_ob, AP_UNAPPLY);
206 else
207 op->contr->ranged_ob = 0;
208
209 if (op->contr->ranged_ob) LOG (llevError, "%s", op->contr->ranged_ob->debug_desc ());//D
210
211 if (op->contr->ranged_ob)
212 op->failmsg (format ("You have to unapply the %s first to ready a spell.", &op->contr->ranged_ob->name));
213 else
214 {
215 op->change_weapon (op->contr->ranged_ob = spob);
216
194 assign (op->contr->spellparam, cp ? cp : ""); 217 assign (op->contr->spellparam, cp ? cp : "");
195 new_draw_info_format (NDI_UNIQUE, 0, op, "You ready the spell %s", &spob->name); 218 op->statusmsg (format ("You ready the spell %s", &spob->name));
219 }
196 } 220 }
197 221
198 return 0; 222 return 0;
199 } /* else fall through to below and print spells */ 223 } /* else fall through to below and print spells */
200 } /* params supplied */ 224 } /* params supplied */
201 225
202 /* We get here if cast was given without options or we could not find 226 /* We get here if cast was given without options or we could not find
203 * the requested spell. List all the spells the player knows. 227 * the requested spell. List all the spells the player knows.
204 */ 228 */
205 new_draw_info (NDI_UNIQUE, 0, op, "Cast what spell? Choose one of:"); 229 new_draw_info (NDI_UNIQUE, 0, op, "Cast what spell? Choose one of:");
206 show_matching_spells (op, params); 230 show_matching_spells (op, params);
231
207 return 1; 232 return 1;
208} 233}
209 234
210/**************************************************************************/ 235/**************************************************************************/
211 236
212void 237void
213change_spell (object *op, char k) 238change_spell (object *op, char k)
214{ 239{
215 int r = op->contr->shoottype; 240 if (op->contr->combat_ob == op->current_weapon)
216
217 do
218 r = (r + ((k == '+') ? 1 : -1) + range_size) % range_size;
219 while (!op->contr->legal_range ((rangetype) r));
220
221 op->contr->set_range ((rangetype) r);
222
223 /* Legal range has already checked that we have an appropriate item
224 * that uses the slot, so we don't need to be too careful about
225 * checking the status of the object.
226 */
227 switch (op->contr->shoottype)
228 {
229 case range_none:
230 new_draw_info (NDI_UNIQUE, 0, op, "No ranged attack chosen.");
231 break;
232
233 case range_golem:
234 new_draw_info (NDI_UNIQUE, 0, op, "You regain control of your golem.");
235 break;
236
237 case range_bow:
238 new_draw_info_format (NDI_UNIQUE, 0, op, "Switched to %s and %s.", query_name (op->contr->ranges[range_bow]),
239 op->contr->ranges[range_bow]->race ? &op->contr->ranges[range_bow]->race : "nothing");
240 break;
241
242 case range_magic:
243 new_draw_info_format (NDI_UNIQUE, 0, op, "Switched to spells (%s).", &op->contr->ranges[range_magic]->name);
244 break;
245
246 case range_misc:
247 new_draw_info_format (NDI_UNIQUE, 0, op, "Switched to %s.", query_base_name (op->contr->ranges[range_misc], 0));
248 break;
249
250 case range_skill:
251 new_draw_info_format (NDI_UNIQUE, 0, op, "Switched to skill: %s", &op->chosen_skill->name);
252 break;
253 } 241 {
242 if (op->contr->ranged_ob)
243 op->change_weapon (op->contr->ranged_ob);
244 }
245 else if (op->contr->ranged_ob == op->current_weapon)
246 {
247 if (op->contr->combat_ob)
248 op->change_weapon (op->contr->combat_ob);
249 }
250
251 //TODO: maybe switch to golem, if any?
254} 252}
255 253
256int 254int
257command_rotateshoottype (object *op, char *params) 255command_rotateshoottype (object *op, char *params)
258{ 256{

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines