mirror of
https://git.code.sf.net/p/quake/quakeforge
synced 2024-11-23 21:02:50 +00:00
c7c646a53f
Allow our makefiles to build with non-GNU 'make' implementations. Required some renaming of not-really-QuakeC source to .r to get it right.
599 lines
13 KiB
R
599 lines
13 KiB
R
#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 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
|
|
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 () scan_saves =
|
|
{
|
|
local int 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);
|
|
}
|
|
};
|
|
|
|
int (string text, int key) load_f =
|
|
{
|
|
scan_saves ();
|
|
Menu_SelectMenu ("load");
|
|
return 0;
|
|
};
|
|
|
|
int (string text, int 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");
|
|
};
|
|
|
|
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_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_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;
|
|
};
|
|
|
|
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_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 ();
|
|
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 ()
|
|
{
|
|
[autorelease_pool release];
|
|
autorelease_pool = nil;
|
|
}
|