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 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (©) 2002 Mark Wedel & Crossfire Development Team |
5 | * Copyright (©) 2002 Mark Wedel & Crossfire Development Team |
6 | * Copyright (©) 1992 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 |
… | |
… | |
77 | * Returns true if the monster specified has any innate abilities. |
77 | * Returns true if the monster specified has any innate abilities. |
78 | */ |
78 | */ |
79 | static int |
79 | static int |
80 | has_ability (const object *ob) |
80 | has_ability (const object *ob) |
81 | { |
81 | { |
82 | object *tmp; |
|
|
83 | |
|
|
84 | for (tmp = ob->inv; tmp != NULL; tmp = tmp->below) |
82 | for (object *tmp = ob->inv; tmp; tmp = tmp->below) |
85 | if (tmp->type == SPELL || tmp->type == SPELLBOOK) |
83 | if (tmp->type == SPELL || tmp->type == SPELLBOOK) |
86 | return true; |
84 | return true; |
|
|
85 | |
87 | return false; |
86 | return false; |
88 | } |
87 | } |
89 | |
88 | |
90 | /* |
89 | /* |
91 | * new_exp() is an alternative way to calculate experience based |
90 | * new_exp() is an alternative way to calculate experience based |
… | |
… | |
113 | * are lower than they once were. |
112 | * are lower than they once were. |
114 | */ |
113 | */ |
115 | prot_mult += (exp_prot_mult[i] * 200 * ob->resist[i]) / 100.0; |
114 | prot_mult += (exp_prot_mult[i] * 200 * ob->resist[i]) / 100.0; |
116 | } |
115 | } |
117 | |
116 | |
118 | spec_mult += (0.3 * (QUERY_FLAG (ob, FLAG_SEE_INVISIBLE) != 0)) + |
117 | spec_mult += (0.3 * (ob->flag [FLAG_SEE_INVISIBLE] != 0)) + |
119 | (0.5 * (QUERY_FLAG (ob, FLAG_SPLITTING) != 0)) + |
118 | (0.5 * (ob->flag [FLAG_SPLITTING] != 0)) + |
120 | (0.3 * (QUERY_FLAG (ob, FLAG_HITBACK) != 0)) + |
119 | (0.3 * (ob->flag [FLAG_HITBACK] != 0)) + |
121 | (0.1 * (QUERY_FLAG (ob, FLAG_REFL_MISSILE) != 0)) + |
120 | (0.1 * (ob->flag [FLAG_REFL_MISSILE] != 0)) + |
122 | (0.3 * (QUERY_FLAG (ob, FLAG_REFL_SPELL) != 0)) + |
121 | (0.3 * (ob->flag [FLAG_REFL_SPELL] != 0)) + |
123 | (1.0 * (QUERY_FLAG (ob, FLAG_NO_MAGIC) != 0)) + |
122 | (1.0 * (ob->flag [FLAG_NO_MAGIC] != 0)) + |
124 | (0.1 * (QUERY_FLAG (ob, FLAG_PICK_UP) != 0)) + |
123 | (0.1 * (ob->flag [FLAG_PICK_UP] != 0)) + |
125 | (0.1 * (QUERY_FLAG (ob, FLAG_USE_SCROLL) != 0)) + |
124 | (0.1 * (ob->flag [FLAG_USE_SCROLL] != 0)) + |
126 | (0.2 * (QUERY_FLAG (ob, FLAG_USE_RANGE) != 0)) + (0.1 * (QUERY_FLAG (ob, FLAG_USE_BOW) != 0)); |
125 | (0.2 * (ob->flag [FLAG_USE_RANGE] != 0)) + (0.1 * (ob->flag [FLAG_USE_BOW] != 0)); |
127 | |
126 | |
128 | exp = (ob->stats.maxhp < 5) ? 5 : ob->stats.maxhp; |
127 | exp = (ob->stats.maxhp < 5) ? 5 : ob->stats.maxhp; |
129 | exp *= (QUERY_FLAG (ob, FLAG_CAST_SPELL) && has_ability (ob)) ? (40 + (ob->stats.maxsp > 80 ? 80 : ob->stats.maxsp)) / 40 : 1; |
128 | exp *= (ob->flag [FLAG_CAST_SPELL] && has_ability (ob)) ? (40 + (ob->stats.maxsp > 80 ? 80 : ob->stats.maxsp)) / 40 : 1; |
130 | exp *= (80.0 / (70.0 + ob->stats.wc)) * (80.0 / (70.0 + ob->stats.ac)) * (50.0 + ob->stats.dam) / 50.0; |
129 | exp *= (80.0 / (70.0 + ob->stats.wc)) * (80.0 / (70.0 + ob->stats.ac)) * (50.0 + ob->stats.dam) / 50.0; |
131 | exp *= att_mult * prot_mult * spec_mult; |
130 | exp *= att_mult * prot_mult * spec_mult; |
132 | exp *= 2.0 / (2.0 - min (ob->speed, 0.95)); |
131 | exp *= 2.0 / (2.0 - min (ob->speed, 0.95)); |
133 | exp *= (20.0 + ob->stats.Con) / 20.0; |
132 | exp *= (20.0 + ob->stats.Con) / 20.0; |
134 | if (QUERY_FLAG (ob, FLAG_STAND_STILL)) |
133 | if (ob->flag [FLAG_STAND_STILL]) |
135 | exp /= 2; |
134 | exp /= 2; |
136 | |
135 | |
137 | return exp; |
136 | return exp; |
138 | } |
137 | } |
139 | |
138 | |