X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_main.pas;h=48f0bb5648c73f18825364e46b4e8b93c99bf4bf;hb=844441154d1220d6c83f75043300c2851ec87109;hp=d78c84e12b669971c3928b638ab4e8625f9ecb31;hpb=0968d19494ddf24230a822c02acbe3a3334bc3ad;p=d2df-sdl.git diff --git a/src/game/g_main.pas b/src/game/g_main.pas index d78c84e..48f0bb5 100644 --- a/src/game/g_main.pas +++ b/src/game/g_main.pas @@ -20,11 +20,11 @@ var implementation uses - SDL2, GL, GLExt, WADEDITOR, e_log, g_window, + SDL2, GL, GLExt, wadreader, e_log, g_window, e_graphics, e_input, g_game, g_console, g_gui, e_sound, g_options, g_sound, g_player, g_weapons, SysUtils, g_triggers, MAPDEF, g_map, - MAPSTRUCT, g_menu, g_language, g_net, sfs; + MAPSTRUCT, g_menu, g_language, g_net, utils; var charbuff: Array [0..15] of Char; @@ -494,7 +494,7 @@ begin else begin for a := 0 to 14 do charbuff[a] := charbuff[a+1]; - charbuff[15] := SFSUpCase(C); + charbuff[15] := UpCase1251(C); Cheat(); end; end;