| … | |
… | |
| 2047 | if (meal->type != FLESH || !is_dragon_pl (op)) |
2047 | if (meal->type != FLESH || !is_dragon_pl (op)) |
| 2048 | return 0; |
2048 | return 0; |
| 2049 | |
2049 | |
| 2050 | /* now grab the 'dragon_skin'- and 'dragon_ability'-forces |
2050 | /* now grab the 'dragon_skin'- and 'dragon_ability'-forces |
| 2051 | from the player's inventory */ |
2051 | from the player's inventory */ |
| 2052 | shstr_cmp dragon_ability_force ("dragon_ability_force"); |
|
|
| 2053 | shstr_cmp dragon_skin_force ("dragon_skin_force"); |
|
|
| 2054 | |
|
|
| 2055 | for (tmp = op->inv; tmp; tmp = tmp->below) |
2052 | for (tmp = op->inv; tmp; tmp = tmp->below) |
| 2056 | if (tmp->type == FORCE) |
2053 | if (tmp->type == FORCE) |
| 2057 | if (tmp->arch->archname == dragon_skin_force) |
2054 | if (tmp->arch->archname == shstr_dragon_skin_force) |
| 2058 | skin = tmp; |
2055 | skin = tmp; |
| 2059 | else if (tmp->arch->archname == dragon_ability_force) |
2056 | else if (tmp->arch->archname == shstr_dragon_ability_force) |
| 2060 | abil = tmp; |
2057 | abil = tmp; |
| 2061 | |
2058 | |
| 2062 | /* if either skin or ability are missing, this is an old player |
2059 | /* if either skin or ability are missing, this is an old player |
| 2063 | which is not to be considered a dragon -> bail out */ |
2060 | which is not to be considered a dragon -> bail out */ |
| 2064 | if (skin == NULL || abil == NULL) |
2061 | if (skin == NULL || abil == NULL) |
