mirror of
https://git.code.sf.net/p/quake/quakeforge
synced 2024-11-07 13:41:32 +00:00
4518e6af91
It's probably nowhere near right, but probably ok for now (I need to study the GNUStep code). I'm unhappy with the menu code hook, but it will have to do for now.
596 lines
13 KiB
C++
596 lines
13 KiB
C++
#include "AutoreleasePool.h"
|
|
#include "menu.h"
|
|
#include "file.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 "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 [6] dot_name = {
|
|
"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");
|
|
}
|
|
|
|
integer (integer key, integer unicode, integer 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 (integer x, integer y) spinner =
|
|
{
|
|
local integer i = (integer) (time * 10) % 6;
|
|
local qpic_t p = Draw_CachePic (dot_name[i], 1);
|
|
|
|
Draw_Pic (x, y, p);
|
|
};
|
|
|
|
integer do_single_player;
|
|
|
|
string [32] quitMessage = {
|
|
/* .........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! ",
|
|
" "
|
|
};
|
|
integer quit_index;
|
|
|
|
// ********* LOAD / SAVE
|
|
|
|
#define MAX_SAVEGAMES 12
|
|
string [MAX_SAVEGAMES] filenames;
|
|
integer [MAX_SAVEGAMES] loadable;
|
|
integer load_cursor;
|
|
integer save_cursor;
|
|
|
|
string (QFile f) get_comment =
|
|
{
|
|
local string line;
|
|
local string plist_data;
|
|
local PLItem plist;
|
|
local integer pos = Qtell (f);
|
|
|
|
plist_data = Qreadstring (f, Qfilesize (f) - pos);
|
|
plist = [PLItem newFromString:plist_data];
|
|
str_free (plist_data);
|
|
line = [(PLString) [plist getObjectForKey:"comment"] string];
|
|
[plist release];
|
|
return line;
|
|
}
|
|
|
|
void () scan_saves =
|
|
{
|
|
local integer i;
|
|
local QFile f;
|
|
local string line;
|
|
for (i = 0; i < MAX_SAVEGAMES; i++) {
|
|
if (!filenames[i])
|
|
filenames[i] = str_new ();
|
|
loadable[i] = 0;
|
|
f = File_Open (sprintf ("s%i.sav", i), "rz");
|
|
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);
|
|
}
|
|
};
|
|
|
|
integer (string text, integer key) load_f =
|
|
{
|
|
scan_saves ();
|
|
Menu_SelectMenu ("load");
|
|
return 0;
|
|
};
|
|
|
|
integer (string text, integer key) save_f =
|
|
{
|
|
scan_saves ();
|
|
Menu_SelectMenu ("save");
|
|
return 0;
|
|
};
|
|
|
|
void () load_save_f =
|
|
{
|
|
scan_saves ();
|
|
if (Cmd_Argv (0) == "menu_load")
|
|
Menu_SelectMenu ("load");
|
|
else
|
|
Menu_SelectMenu ("save");
|
|
};
|
|
|
|
integer (integer x, integer y) load_draw =
|
|
{
|
|
local integer 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_Character (x + 8, y + 32 + load_cursor * 8,
|
|
12 + ((integer) (time * 4) & 1));
|
|
return 1;
|
|
};
|
|
|
|
integer (integer x, integer y) save_draw =
|
|
{
|
|
local integer 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 + ((integer) (time * 4) & 1));
|
|
return 1;
|
|
};
|
|
|
|
integer (integer key, integer unicode, integer down) load_keyevent =
|
|
{
|
|
switch (key) {
|
|
case QFK_DOWN:
|
|
case QFM_WHEEL_DOWN:
|
|
S_LocalSound ("misc/menu1.wav");
|
|
load_cursor++;
|
|
load_cursor %= MAX_SAVEGAMES;
|
|
return 1;
|
|
case QFK_UP:
|
|
case QFM_WHEEL_UP:
|
|
S_LocalSound ("misc/menu1.wav");
|
|
load_cursor += MAX_SAVEGAMES - 1;
|
|
load_cursor %= MAX_SAVEGAMES;
|
|
return 1;
|
|
case QFK_RETURN:
|
|
case QFM_BUTTON1:
|
|
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;
|
|
};
|
|
|
|
integer (integer key, integer unicode, integer 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_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
|
|
|
|
integer () quit =
|
|
{
|
|
Menu_SelectMenu ("quit");
|
|
quit_index = (integer) (random () * 8);
|
|
quit_index &= 7;
|
|
return 0;
|
|
};
|
|
|
|
integer (string text, integer key) quit_f =
|
|
{
|
|
quit ();
|
|
return 0;
|
|
};
|
|
|
|
integer (integer key, integer unicode, integer down) quit_keyevent =
|
|
{
|
|
if (key == 'y') {
|
|
Menu_Quit ();
|
|
return 1;
|
|
}
|
|
if (key == 'n') {
|
|
Menu_SelectMenu (NIL);
|
|
return 1;
|
|
}
|
|
return 0;
|
|
};
|
|
|
|
integer (integer x, integer 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 ();
|
|
};
|
|
|
|
integer (string text, integer 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
|
|
|
|
integer JoiningGame;
|
|
integer lanConfig_cursor;
|
|
string my_tcpip_address;
|
|
string lanConfig_portname;
|
|
string lanConfig_joinname;
|
|
#define NUM_LANCONFIG_CMDS 3
|
|
integer [NUM_LANCONFIG_CMDS] lanConfig_cursor_table = { 72, 92, 124 };
|
|
InputLine lanConfig_port_il;
|
|
InputLine lanConfig_join_il;
|
|
InputLine input_active;
|
|
|
|
integer (integer x, integer y) join_draw =
|
|
{
|
|
local integer 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;
|
|
};
|
|
|
|
integer (integer x, integer y) lanconfig_draw =
|
|
{
|
|
local integer 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 + ((integer) (time * 4) & 1));
|
|
|
|
return 0;
|
|
};
|
|
|
|
integer (integer key, integer unicode, integer 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;
|
|
}
|
|
break;
|
|
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;
|
|
}
|
|
break;
|
|
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;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
return 1;
|
|
};
|
|
|
|
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 ();
|
|
};
|
|
|
|
integer (integer key, integer unicode, integer 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 ();
|
|
save_menu ();
|
|
|
|
Menu_TopMenu ("main");
|
|
Menu_SetQuit (quit);
|
|
|
|
};
|
|
|
|
void () menu_draw_hud =
|
|
{
|
|
};
|
|
|
|
void menu_post ()
|
|
{
|
|
[AutoreleasePool release];
|
|
}
|