[fix] Ticket #41081

[fix] Ticket #41081

calc_num_fireの関数内でcreature_ptr->num_fire = 100;としてしまっている。
calc_bonusesでは戻り値をcreature_ptr->num_fireに代入しているので問題ないが、
別の関数（具体的にはdescribe_bow）から呼び出されるとnum_fireが100に固定されてしまう。
その結果、アイテムおよび職業による射撃回数ボーナスがすべて無効となってしまっている。
該当部分を削除することで修正する。