X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_gui.pas;h=3181e6969102e55d77b1be621b7e46ab32158a79;hb=HEAD;hp=2200703437db6be9fc693d2bdfbd83dc76a55b31;hpb=72feb908b627ef4035f6ecabbd7f26c2443d40b1;p=d2df-sdl.git diff --git a/src/game/g_gui.pas b/src/game/g_gui.pas index 2200703..5530268 100644 --- a/src/game/g_gui.pas +++ b/src/game/g_gui.pas @@ -2675,10 +2675,9 @@ begin if FModel = nil then Exit; - if FModel.Weapon < WP_LAST then - FModel.SetWeapon(FModel.Weapon+1) - else - FModel.SetWeapon(WEAPON_KASTET); + if FModel.Weapon < WP_LAST + then FModel.SetWeapon(FModel.Weapon+1) + else FModel.SetWeapon(WEAPON_IRONFIST); end; procedure TGUIModelView.OnMessage(var Msg: TMessage);