quakeforge/ruamoko/cl_menu/client_menu.r
Bill Currie 4898a44263 [console] Hook up new input system
This has smashed the keydest handling for many things, and bindings, but
seems to be a good start with the new input system: the console in
qw-client-x11 is usable (keyboard-only).

The button and axis values have been removed from the knum_t enum as
mouse events are separate from key events, and other button and axis
inputs will be handled separately.

keys.c has been disabled in the build as it is obsolute (thus much of
the breakage).
2021-11-08 11:20:04 +09:00

672 lines
15 KiB
R

#include "AutoreleasePool.h"
#include "menu.h"
#include "cmd.h"
#include "gib.h"
#include "draw.h"
#include "key.h"
#include "string.h"
#include "cbuf.h"
#include "options.h"
#include "servlist.h"
#include "system.h"
#include "qfs.h"
#include "debug.h"
#include "HUD.h"
#include "client_menu.h"
#include "PropertyList.h"
#include "sound.h"
#include "gui/InputLine.h"
#include "gui/Rect.h"
float () random = #7;
string dot_name[6] = {
"gfx/menudot1.lmp",
"gfx/menudot2.lmp",
"gfx/menudot3.lmp",
"gfx/menudot4.lmp",
"gfx/menudot5.lmp",
"gfx/menudot6.lmp",
};
void ()
menu_enter_sound =
{
S_LocalSound ("misc/menu2.wav");
}
void ()
menu_leave_sound =
{
S_LocalSound ("misc/menu2.wav");
}
int (int key, int unicode, int down)
menu_key_sound =
{
switch (key) {
case QFK_DOWN:
//case QFM_WHEEL_DOWN:
S_LocalSound ("misc/menu1.wav");
break;
case QFK_UP:
//case QFM_WHEEL_UP:
S_LocalSound ("misc/menu1.wav");
break;
}
return 0;
}
void (int x, int y) spinner =
{
local int i = (int) (time * 10) % 6;
local qpic_t p = Draw_CachePic (dot_name[i], 1);
Draw_Pic (x, y, p);
};
int do_single_player;
string quitMessage[32] = {
/* .........1.........2.... */
" Are you gonna quit ",
" this game just like ",
" everything else? ",
" ",
" Milord, methinks that ",
" thou art a lowly ",
" quitter. Is this true? ",
" ",
" Do I need to bust your ",
" face open for trying ",
" to quit? ",
" ",
" Man, I oughta smack you",
" for trying to quit! ",
" Press Y to get ",
" smacked out. ",
" Press Y to quit like a ",
" big loser in life. ",
" Press N to stay proud ",
" and successful! ",
" If you press Y to ",
" quit, I will summon ",
" Satan all over your ",
" hard drive! ",
" Um, Asmodeus dislikes ",
" his children trying to ",
" quit. Press Y to return",
" to your Tinkertoys. ",
" If you quit now, I'll ",
" throw a blanket-party ",
" for you next time! ",
" "
};
int quit_index;
// ********* LOAD / SAVE
#define MAX_SAVEGAMES 12
#define MAX_QUICK 5
string filenames[MAX_SAVEGAMES];
int loadable[MAX_SAVEGAMES];
int load_cursor;
int save_cursor;
string (QFile f) get_comment =
{
local string line;
local PLItem *plist;
plist = [PLItem fromFile:f];
line = [(PLString*) [(PLDictionary*) plist getObjectForKey:"comment"] string];
return line;
}
void (int quick) scan_saves =
{
local int i;
local QFile f;
local string line;
local int max = MAX_SAVEGAMES;
string basename = "s";
if (quick) {
max = MAX_QUICK;
basename = "quick";
}
for (i = 0; i < max; i++) {
if (!filenames[i])
filenames[i] = str_new ();
loadable[i] = 0;
string path = sprintf ("%s%i.sav", basename, i);
//dprint(path + "\n");
f = QFS_OpenFile (path);
if (!f) {
str_copy (filenames[i], "--- UNUSED SLOT ---");
continue;
}
line = Qgetline (f);
if (line == "QuakeForge\n") {
str_copy (filenames[i], get_comment (f));
} else {
str_copy (filenames[i], Qgetline (f));
}
loadable[i] = 1;
Qclose (f);
}
for (i = max; i < MAX_SAVEGAMES; i++) {
loadable[i] = 0;
}
};
int (string text, int key) load_f =
{
scan_saves (0);
Menu_SelectMenu ("load");
return 0;
};
int (string text, int key) save_f =
{
scan_saves (0);
Menu_SelectMenu ("save");
return 0;
};
void () load_save_f =
{
scan_saves (0);
if (Cmd_Argv (0) == "menu_load")
Menu_SelectMenu ("load");
else
Menu_SelectMenu ("save");
};
int (int x, int y) load_quickbup_draw =
{
local int i;
Draw_CenterPic (x + 160, y + 4, Draw_CachePic ("gfx/p_load.lmp", 1));
for (i=0 ; i< MAX_QUICK; i++)
Draw_String (x + 16, y + 32 + 8 * i, filenames[i]);
Draw_Character (x + 8, y + 32 + load_cursor * 8,
12 + ((int) (time * 4) & 1));
return 1;
};
int (int x, int y) load_draw =
{
local int i;
Draw_CenterPic (x + 160, y + 4, Draw_CachePic ("gfx/p_load.lmp", 1));
for (i=0 ; i< MAX_SAVEGAMES; i++)
Draw_String (x + 16, y + 32 + 8 * i, filenames[i]);
Draw_String (x + 16, y + 32 + 8 * i, "Quick save backups");
Draw_Character (x + 8, y + 32 + load_cursor * 8,
12 + ((int) (time * 4) & 1));
return 1;
};
int (int x, int y) save_draw =
{
local int i;
Draw_CenterPic (x + 160, y + 4, Draw_CachePic ("gfx/p_save.lmp", 1));
for (i=0 ; i< MAX_SAVEGAMES; i++)
Draw_String (x + 16, y + 32 + 8 * i, filenames[i]);
Draw_Character (x + 8, y + 32 + save_cursor * 8,
12 + ((int) (time * 4) & 1));
return 1;
};
int (int key, int unicode, int down) load_quickbup_keyevent =
{
switch (key) {
case QFK_DOWN:
//case QFM_WHEEL_DOWN:
S_LocalSound ("misc/menu1.wav");
load_cursor++;
load_cursor %= MAX_QUICK;
return 1;
case QFK_UP:
//case QFM_WHEEL_UP:
S_LocalSound ("misc/menu1.wav");
load_cursor += MAX_QUICK - 1;
load_cursor %= MAX_QUICK;
return 1;
case QFK_RETURN:
//case QFM_BUTTON1:
if (loadable[load_cursor]) {
S_LocalSound ("misc/menu2.wav");
Menu_SelectMenu (nil);
Cbuf_AddText (sprintf ("load quick%i.sav\n", load_cursor));
load_cursor = MAX_SAVEGAMES;
}
return 1;
}
return 0;
};
int (int key, int unicode, int down) load_keyevent =
{
switch (key) {
case QFK_DOWN:
//case QFM_WHEEL_DOWN:
S_LocalSound ("misc/menu1.wav");
load_cursor++;
load_cursor %= MAX_SAVEGAMES + 1;
return 1;
case QFK_UP:
//case QFM_WHEEL_UP:
S_LocalSound ("misc/menu1.wav");
load_cursor += MAX_SAVEGAMES;
load_cursor %= MAX_SAVEGAMES + 1;
return 1;
case QFK_RETURN:
//case QFM_BUTTON1:
if (load_cursor == MAX_SAVEGAMES) {
load_cursor = 0;
scan_saves (1);
Menu_SelectMenu ("load_quickbup");
} else if (loadable[load_cursor]) {
S_LocalSound ("misc/menu2.wav");
Menu_SelectMenu (nil);
Cbuf_AddText (sprintf ("load s%i.sav\n", load_cursor));
}
return 1;
}
return 0;
};
int (int key, int unicode, int down) save_keyevent =
{
switch (key) {
case QFK_DOWN:
//case QFM_WHEEL_DOWN:
S_LocalSound ("misc/menu1.wav");
save_cursor++;
save_cursor %= MAX_SAVEGAMES;
return 1;
case QFK_UP:
//case QFM_WHEEL_UP:
S_LocalSound ("misc/menu1.wav");
save_cursor += MAX_SAVEGAMES - 1;
save_cursor %= MAX_SAVEGAMES;
return 1;
case QFK_RETURN:
//case QFM_BUTTON1:
Menu_SelectMenu (nil);
Cbuf_AddText (sprintf ("save s%i.sav\n", save_cursor));
return 1;
}
return 0;
};
void () load_quickbup_menu =
{
Menu_Begin (0, 0, "load_quickbup");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_FadeScreen (1);
Menu_KeyEvent (load_quickbup_keyevent);
Menu_Draw (load_quickbup_draw);
Menu_End ();
};
void () load_menu =
{
Menu_Begin (0, 0, "load");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_FadeScreen (1);
Menu_KeyEvent (load_keyevent);
Menu_Draw (load_draw);
Menu_End ();
Cmd_AddCommand ("menu_load", load_save_f);
};
void () save_menu =
{
Menu_Begin (0, 0, "save");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_FadeScreen (1);
Menu_KeyEvent (save_keyevent);
Menu_Draw (save_draw);
Menu_End ();
Cmd_AddCommand ("menu_save", load_save_f);
};
// ********* QUIT
int () quit =
{
Menu_SelectMenu ("quit");
quit_index = (int) (random () * 8);
quit_index &= 7;
return 0;
};
int (string text, int key) quit_f =
{
quit ();
return 0;
};
int (int key, int unicode, int down) quit_keyevent =
{
if (key == 'y') {
Menu_Quit ();
return 1;
}
if (key == 'n') {
Menu_SelectMenu (nil);
return 1;
}
return 0;
};
int (int x, int y) quit_draw =
{
text_box (x + 56, y + 76, 24, 4);
Draw_String (x + 64, y + 84, quitMessage[quit_index * 4 + 0]);
Draw_String (x + 64, y + 92, quitMessage[quit_index * 4 + 1]);
Draw_String (x + 64, y + 100, quitMessage[quit_index * 4 + 2]);
Draw_String (x + 64, y + 108, quitMessage[quit_index * 4 + 3]);
return 1;
};
void () quit_menu =
{
Menu_Begin (0, 0, "quit");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_FadeScreen (1);
Menu_KeyEvent (quit_keyevent);
Menu_Draw (quit_draw);
Menu_End ();
};
int (string text, int key) sp_start =
{
Menu_SelectMenu (nil);
Cbuf_AddText ("disconnect\n");
Cbuf_AddText ("maxplayers 1\n");
Cbuf_AddText ("coop 0\n");
Cbuf_AddText ("deathmatch 0\n");
Cbuf_AddText ("teamplay 0\n");
Cbuf_AddText ("listen 0\n");
Cbuf_AddText ("noexit 0\n");
Cbuf_AddText ("samelevel 0\n");
Cbuf_AddText ("map start\n");
return 0;
};
void () single_player_menu =
{
Menu_Begin (54, 32, "");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_KeyEvent (menu_key_sound);
Menu_FadeScreen (1);
Menu_Pic (16, 4, "gfx/qplaque.lmp");
Menu_CenterPic (160, 4, "gfx/ttl_sgl.lmp");
Menu_Pic (72, 32, "gfx/sp_menu.lmp");
Menu_Cursor (spinner);
Menu_Item (54, 32, "", sp_start, 0);
Menu_Item (54, 52, "", load_f, 0);
Menu_Item (54, 72, "", save_f, 0);
Menu_End ();
};
// ********* MULTIPLAYER
int JoiningGame;
int lanConfig_cursor;
string my_tcpip_address;
string lanConfig_portname;
string lanConfig_joinname;
#define NUM_LANCONFIG_CMDS 3
int lanConfig_cursor_table[NUM_LANCONFIG_CMDS] = { 72, 92, 124 };
InputLine *lanConfig_port_il;
InputLine *lanConfig_join_il;
InputLine *input_active;
int (int x, int y) join_draw =
{
local int f = x + (320 - 26 * 8) / 2;
text_box (f, y + 134, 24, 4);
Draw_String (f, y + 142, " Commonly used to play ");
Draw_String (f, y + 150, " over the Internet, but ");
Draw_String (f, y + 158, " also used on a Local ");
Draw_String (f, y + 166, " Area Network. ");
return 0;
};
int (int x, int y) lanconfig_draw =
{
local int basex = 54 + x;
local string startJoin = JoiningGame ? "Join Game" : "New Game";
local string protocol = "UDP";
Draw_String (basex, y + 32, sprintf ("%s - %s", startJoin, protocol));
basex += 8;
Draw_String (basex, y + 52, "Address:");
Draw_String (basex + 9 * 8, y + 52, "127.0.0.1");
Draw_String (basex, y + lanConfig_cursor_table[0], "Port");
[lanConfig_port_il setBasePos:x y:y];
[lanConfig_port_il cursor:lanConfig_cursor == 0 && input_active];
[lanConfig_port_il draw];
Draw_String (basex + 9 * 8, y + lanConfig_cursor_table[0],
lanConfig_portname);
if (JoiningGame) {
Draw_String (basex, y + lanConfig_cursor_table[1], "Search for local "
"games...");
Draw_String (basex, y + 108, "Join game at:");
[lanConfig_join_il setBasePos:x y:y];
[lanConfig_join_il cursor:lanConfig_cursor == 2 && input_active];
[lanConfig_join_il draw];
Draw_String (basex + 16, y + lanConfig_cursor_table[2],
lanConfig_joinname);
} else {
text_box (basex, y + lanConfig_cursor_table[1] - 8, 2, 1);
Draw_String (basex + 8, y + lanConfig_cursor_table[1], "OK");
}
if (!input_active)
Draw_Character (basex - 8, y + lanConfig_cursor_table[lanConfig_cursor],
12 + ((int) (time * 4) & 1));
return 0;
};
int (int key, int unicode, int down) lanconfig_keyevent =
{
if (input_active)
[input_active processInput:(key >= 256 ? key : unicode)];
switch (key) {
case QFK_DOWN:
//case QFM_WHEEL_DOWN:
if (!input_active) {
S_LocalSound ("misc/menu2.wav");
lanConfig_cursor ++;
lanConfig_cursor %= NUM_LANCONFIG_CMDS;
}
return 1;
case QFK_UP:
//case QFM_WHEEL_UP:
if (!input_active) {
S_LocalSound ("misc/menu2.wav");
lanConfig_cursor += NUM_LANCONFIG_CMDS - 1;
lanConfig_cursor %= NUM_LANCONFIG_CMDS;
}
return 1;
case QFK_RETURN:
if (input_active) {
input_active = nil;
} else {
if (lanConfig_cursor == 0) {
input_active = lanConfig_port_il;
} else if (JoiningGame) {
if (lanConfig_cursor == 2) {
input_active = lanConfig_join_il;
}
}
}
return 1;
}
return 0;
};
void () lanconfig_menu =
{
Menu_Begin (54, 92, "");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_FadeScreen (1);
Menu_Pic (16, 4, "gfx/qplaque.lmp");
Menu_CenterPic (160, 4, "gfx/p_multi.lmp");
Menu_Draw (lanconfig_draw);
Menu_KeyEvent (lanconfig_keyevent);
Menu_End ();
};
void () join_menu =
{
Menu_Begin (54, 32, "");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_KeyEvent (menu_key_sound);
Menu_FadeScreen (1);
Menu_Pic (16, 4, "gfx/qplaque.lmp");
Menu_CenterPic (160, 4, "gfx/p_multi.lmp");
Menu_Pic (72, 32, "gfx/dim_modm.lmp");
Menu_Pic (72, 51, "gfx/dim_drct.lmp");
Menu_Pic (72, 70, "gfx/dim_ipx.lmp");
Menu_Pic (72, 89, "gfx/netmen4.lmp");
lanconfig_menu ();
Menu_Draw (join_draw);
Menu_Cursor (spinner);
Menu_End ();
};
int (int key, int unicode, int down) multi_player_keyevent =
{
if (key == QFK_RETURN) {
JoiningGame = (Menu_GetIndex () == 0);
}
return 0;
};
void () multi_player_menu =
{
Menu_Begin (54, 52, "");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_FadeScreen (1);
Menu_Pic (16, 4, "gfx/qplaque.lmp");
Menu_CenterPic (160, 4, "gfx/p_multi.lmp");
Menu_Pic (72, 32, "gfx/mp_menu.lmp");
Menu_KeyEvent (multi_player_keyevent);
join_menu ();
if (do_single_player)
Menu_Item (54, 52, "", quit_f, 0);
Menu_Item (54, 72, "", quit_f, 0);
Menu_Cursor (spinner);
Menu_End ();
};
void () help_menu =
{
Menu_Item (54, 92, "", quit_f, 0);
};
void () main_menu =
{
Menu_Begin (0, 0, "main");
Menu_EnterHook (menu_enter_sound);
Menu_LeaveHook (menu_leave_sound);
Menu_KeyEvent (menu_key_sound);
Menu_FadeScreen (1);
Menu_Pic (16, 4, "gfx/qplaque.lmp");
Menu_CenterPic (160, 4, "gfx/ttl_main.lmp");
if (do_single_player)
Menu_Pic (71,32, "gfx/mainmenu.lmp");
else
Menu_SubPic (71,52, "gfx/mainmenu.lmp", 0, 20, 240, 92);
Menu_Cursor (spinner);
if (do_single_player)
single_player_menu ();
switch (gametype ()) {
case "netquake":
multi_player_menu ();
break;
case "quakeworld":
server_list_menu ();
break;
default:
break;
}
MENU_options ();
help_menu ();
Menu_Item (54, 112, "", quit_f, 0);
Menu_End ();
};
void () menu_init =
{
lanConfig_port_il = [[InputLineBox alloc] initWithBounds:makeRect (126, lanConfig_cursor_table[0] - 8, 8, 4) promptCharacter:' '];
[lanConfig_port_il setWidth:10];
lanConfig_join_il = [[InputLineBox alloc] initWithBounds:makeRect (70, lanConfig_cursor_table[2] - 8, 24, 4) promptCharacter:' '];
[lanConfig_join_il setWidth:26];
switch (gametype ()) {
case "netquake":
do_single_player = 1;
break;
case "quakeworld":
do_single_player = 0;
break;
default:
break;
}
main_menu ();
quit_menu ();
load_menu ();
load_quickbup_menu ();
save_menu ();
Menu_TopMenu ("main");
Menu_SetQuit (quit);
};
void () menu_draw_hud =
{
};
@static AutoreleasePool *autorelease_pool;
void menu_pre ()
{
autorelease_pool = [[AutoreleasePool alloc] init];
}
void menu_post ()
{
//FIXME called too often by the engine?
AutoreleasePool *ar;
ar = autorelease_pool;
autorelease_pool = nil;
[ar release];
}