522 lines
17 KiB
C++
522 lines
17 KiB
C++
//maxclients is a QW thing. NQ engines use maxplayers (which requires a disconnect to apply)
|
|
#include "../menusys/mitem_grid.qc"
|
|
|
|
static string newgameinfo;
|
|
|
|
nonstatic void(mitem_desktop desktop) M_Dir =
|
|
{ //implementing this primarily so its available in QSS. :P
|
|
string path = argv(1);
|
|
string pack = argv(2);
|
|
searchhandle h;
|
|
if (path == "")
|
|
{
|
|
print("m_dir <FILEPATH> [PACKAGE]\n");
|
|
return;
|
|
}
|
|
if (pack)
|
|
h = search_begin(path, SB_FULLPACKAGEPATH|SB_FORCESEARCH|16, 0, argv(2));
|
|
else
|
|
h = search_begin(path, SB_FULLPACKAGEPATH|16|32, 0);
|
|
print(sprintf("Directory listing of %S (%g files)\n", path, search_getsize(h)));
|
|
for (float i = 0; i < search_getsize(h); i++)
|
|
{
|
|
float sz = search_getfilesize(h,i);
|
|
string szfmt = "b";
|
|
if (sz > 512*1024*1024)
|
|
sz /= 1024*1024*1024, szfmt = "gb";
|
|
else if (sz > 512*1024)
|
|
sz /= 1024*1024, szfmt = "mb";
|
|
else if (sz > 512)
|
|
sz /= 1024, szfmt = "kb";
|
|
|
|
print(sprintf(" %S (%.4g %s, %s, %S)\n",
|
|
search_getfilename(h,i),
|
|
sz,szfmt,
|
|
search_getfilemtime(h,i),
|
|
search_getpackagename(h,i)
|
|
));
|
|
|
|
#if 1
|
|
float f = search_fopen(h,i);
|
|
if (f>=0)
|
|
{
|
|
print(sprintf("^`u8:" "\t%S\n", substring(fgets(f), 0, 64)));
|
|
fclose(f);
|
|
}
|
|
else
|
|
print("\tsearch_fopen failure\n");
|
|
#endif
|
|
}
|
|
search_end(h);
|
|
};
|
|
nonstatic void(mitem_desktop desktop) M_FOpen =
|
|
{
|
|
float f = fopen(argv(1), FILE_READ);
|
|
string s;
|
|
if (f>=0)
|
|
{
|
|
while ((s=fgets(f)))
|
|
print(sprintf("^`u8:" "%s\n", s));
|
|
fclose(f);
|
|
print("<EOF>\n");
|
|
}
|
|
else
|
|
print("fopen failure\n");
|
|
};
|
|
|
|
static string(string name) basemapname =
|
|
{
|
|
if (!strncmp(name, "maps/", 5))
|
|
name = substring(name, 5, -1);
|
|
if (substring(name, -4, -1) == ".bsp")
|
|
name = substring(name, 0, -5);
|
|
return name;
|
|
};
|
|
static string(string name) enginemapname =
|
|
{
|
|
float ofs = strstrofs(name, ":");
|
|
if (ofs<0)
|
|
{
|
|
if (!strncmp(name, "maps/", 5))
|
|
name = substring(name, 5, -1);
|
|
if (substring(name, -8, -1) == ".bsp.gz")
|
|
name = strcat(substring(name, 0, -9),"^8.gz"); //fiddle a little with its display
|
|
if (substring(name, -4, -1) == ".bsp")
|
|
name = substring(name, 0, -5);
|
|
}
|
|
else
|
|
{ //faff with the cullers to try to make it more readable.
|
|
name = sprintf("^8%s:^7%s", substring(name, 0, ofs), substring(name, ofs, -1));
|
|
}
|
|
return name;
|
|
};
|
|
|
|
#define FOURCC(a,b,c,d) ((int)(a)<<0i)|((int)(b)<<8i)|((int)(c)<<16i)|((int)(d)<<24i)
|
|
static string(string name) getmapdesc =
|
|
{
|
|
if (strstrofs(name, ":")>=0)
|
|
{ //FIXME: look up the package's title?
|
|
return strcat("^8", basemapname(name));
|
|
}
|
|
if (checkbuiltin(fread) && checkbuiltin(fseek) && checkbuiltin(memalloc) && checkbuiltin(memfree) && checkbuiltin(memgetval) && checkbuiltin(itof) && checkbuiltin(ftoi))
|
|
{ //we can do it, so do it.
|
|
filestream f = fopen(name, FILE_READ);
|
|
if (f < 0)
|
|
print(sprintf("Unable to read %s\n", name));
|
|
|
|
name = basemapname(name);
|
|
if (f < 0)
|
|
return name;
|
|
|
|
int *header = memalloc(sizeof(int)*4);
|
|
int bspver = 0, entofs, entlen;
|
|
if (fread(f, (void*)header, sizeof(int)*4) == sizeof(int)*4 && ((bspver=header[0]),(
|
|
bspver == FOURCC('I','B','S','P') || //IBSP (q2/q3)
|
|
bspver == FOURCC('R','B','S','P') || //RBSP (jk2o etc)
|
|
bspver == FOURCC('F','B','S','P') || //IBSP (qfusion/warsow)
|
|
bspver == 29i || //q1
|
|
bspver == 30i || //hl
|
|
bspver == FOURCC('B','S','P','2')))) //bsp2
|
|
{
|
|
if (bspver == FOURCC('I','B','S','P'))
|
|
{ //has an actual version number! ooo...
|
|
entofs = header[2];
|
|
entlen = header[3];
|
|
}
|
|
else
|
|
{
|
|
entofs = header[1];
|
|
entlen = header[2];
|
|
}
|
|
fseek(f, entofs);
|
|
string s = (string)memalloc(entlen+1);
|
|
fread(f, (void*)s, entlen);
|
|
float argc = tokenize(s);
|
|
if (argv(0) == "{")
|
|
{
|
|
for (float p = 1; p < argc; p+=2)
|
|
{
|
|
string t = argv(p);
|
|
if (t == "message")
|
|
{ //finally found the human-readable name of the map. woo.
|
|
name = argv(p+1);
|
|
break;
|
|
}
|
|
if (t == "}") //don't read the message from some kind of trigger
|
|
break;
|
|
if (t == "{") //some sort of corruption
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
name = "ERROR";
|
|
memfree((void*)s);
|
|
}
|
|
else
|
|
name = sprintf("UNSUPPORTED %i", bspver);
|
|
memfree(header);
|
|
fclose(f);
|
|
return name;
|
|
}
|
|
return ""; //we can't do that in this engine... don't show anything, because its pointless showing the same thing twice.
|
|
};
|
|
|
|
static string(string name) packagetogamedir =
|
|
{
|
|
float so = strstrofs(name, "/");
|
|
if (so>=0)
|
|
name = substring(name, 0, so);
|
|
|
|
//don't hide id1/dm4 etc just because the user previously auto-downloaded eg qw/aerowalk
|
|
name = strtolower(name);
|
|
if (name == "qw" || name == "fte")
|
|
name = "id1";
|
|
|
|
return name;
|
|
};
|
|
class mitem_maplist : mitem_grid
|
|
{
|
|
strbuf names;
|
|
strbuf descs;
|
|
virtual void() item_remove =
|
|
{
|
|
buf_del(names);
|
|
buf_del(descs);
|
|
super::item_remove();
|
|
};
|
|
void() mitem_maplist =
|
|
{
|
|
searchhandle searchtable;
|
|
searchtable = search_begin("maps/*.bsp:maps/*.bsp.gz", SB_FULLPACKAGEPATH|SB_MULTISEARCH, 0);
|
|
float files = search_getsize(searchtable);
|
|
if (files && checkbuiltin(search_getpackagename))
|
|
{ //find which gamedir the first entry is in (highest-priority is first)
|
|
string gd = packagetogamedir(search_getpackagename(searchtable,0));
|
|
|
|
for (float count = 1; count < files; count++)
|
|
{
|
|
string mgd = packagetogamedir(search_getpackagename(searchtable,count));
|
|
if (mgd != gd)
|
|
{ //the gamedir changed... truncate the list here.
|
|
files = count;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
grid_numchildren = 0;
|
|
names = buf_create();
|
|
for (float count = 0; count < files; count++)
|
|
{
|
|
string n = search_getfilename(searchtable, count);
|
|
if (!strncmp(n, "maps/_", 6) || !strncmp(n, "maps/b_", 7))
|
|
continue; //don't add b_* names nor _*
|
|
bufstr_add(names, n, TRUE);
|
|
}
|
|
search_end(searchtable);
|
|
|
|
for (float pkg = 0; ; pkg++)
|
|
{
|
|
string n = getpackagemanagerinfo(pkg, GPMI_NAME);
|
|
if not(n)
|
|
break; //end of list.
|
|
string maps = getpackagemanagerinfo(pkg, GPMI_MAPS);
|
|
if not(maps)
|
|
continue; //none? not a mappack? don't waste time on the tokenizing.
|
|
float eq = strstrofs(n, "=");
|
|
if (eq >= 0)
|
|
n = substring(n, 0, eq);
|
|
float c = tokenize_console(maps);
|
|
for (float i = 0; i < c; i++)
|
|
bufstr_add(names, sprintf("%s:%s", n, argv(i)), TRUE);
|
|
}
|
|
|
|
buf_sort(names, 0, FALSE); //make sure they're sorted now.
|
|
grid_numchildren = buf_getsize(names);
|
|
descs = buf_create();
|
|
|
|
item_resized(); //FIXME: is this needed?
|
|
grid_kactive = grid_numchildren?0:-1;
|
|
grid_selectionchanged(-1,grid_kactive);
|
|
};
|
|
virtual void(vector pos, float idx) grid_draw =
|
|
{
|
|
string map = bufstr_get(names, idx);
|
|
string desc = bufstr_get(descs, idx);
|
|
if not(desc)
|
|
{
|
|
desc = map;
|
|
static float lasttime;
|
|
if (time != lasttime)
|
|
{ //fix up the name and cache it.
|
|
lasttime = time;
|
|
desc = getmapdesc(map);
|
|
bufstr_set(descs, idx, desc);
|
|
}
|
|
}
|
|
map = basemapname(map);
|
|
|
|
vector col = (map == get("map"))?[1.16, 0.54, 0.41]:'1 1 1';
|
|
if (item_flags & IF_MFOCUSED && idx == grid_mactive)
|
|
col_z = 0;
|
|
if (item_flags & IF_KFOCUSED && idx == grid_kactive)
|
|
col_x = 0;
|
|
|
|
vector valuepos = [pos_x+item_size_x/2, pos_y];
|
|
pos_x = valuepos_x - stringwidth(map, TRUE, '1 1 0'*this.item_scale) - 8;
|
|
valuepos_x += 1;
|
|
ui.drawstring(pos, map, '1 1 0' * item_scale, col, item_alpha, 0);
|
|
ui.drawstring(valuepos, desc, '1 1 0' * item_scale, col, item_alpha, 0);
|
|
};
|
|
virtual float(vector pos, float scan, float chr, float down, float idx) grid_keypress =
|
|
{
|
|
if (down)
|
|
if (ISCONFIRMKEY(scan) || ((scan == K_MOUSE1 || scan == K_TOUCHTAP) && mouseinbox(pos, this.item_size)))
|
|
{
|
|
string map = bufstr_get(names, idx);
|
|
map = enginemapname(map);
|
|
set("map", map);
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
};
|
|
// virtual void(float olditem, float newitem) grid_selectionchanged;
|
|
};
|
|
|
|
class mitem_newgame : mitem_exmenu
|
|
{
|
|
virtual float(string key) isvalid =
|
|
{
|
|
return TRUE;
|
|
};
|
|
virtual string(string key) get =
|
|
{
|
|
return infoget(newgameinfo, key);
|
|
};
|
|
virtual void(string key, string newval) set =
|
|
{
|
|
string old = newgameinfo;
|
|
newgameinfo = strzone(infoadd(newgameinfo, key, newval));
|
|
if (old)
|
|
strunzone(old);
|
|
};
|
|
};
|
|
|
|
nonstatic void(mitem_desktop desktop) M_NewGame =
|
|
{
|
|
mitem_pic banner;
|
|
string gametype = argv(1);
|
|
local float pos;
|
|
mitem_exmenu m;
|
|
if (gametype == "sp")
|
|
{
|
|
//single player has no options. the start map itself gives skill+episode options.
|
|
//use 0 for maxplayers. this allows splitscreen to allocate more.
|
|
localcmd("\ndisconnect; deathmatch 0; coop 0; maxplayers 0; timelimit 0; fraglimit 0; teamplay 0; samelevel 0; startmap_sp\n");
|
|
return;
|
|
}
|
|
if (gametype == "begin")
|
|
{
|
|
cvar_set("hostname", infoget(newgameinfo, "hostname"));
|
|
cvar_set("deathmatch", infoget(newgameinfo, "deathmatch"));
|
|
cvar_set("coop", infoget(newgameinfo, "coop"));
|
|
cvar_set("teamplay", infoget(newgameinfo, "teamplay"));
|
|
cvar_set("sv_public", infoget(newgameinfo, "sv_public"));
|
|
cvar_set("timelimit", infoget(newgameinfo, "timelimit"));
|
|
cvar_set("fraglimit", infoget(newgameinfo, "fraglimit"));
|
|
string map = infoget(newgameinfo, "map");
|
|
if (map == "")
|
|
{
|
|
if (infoget(newgameinfo, "deathmatch"))
|
|
map = sprintf("dm%g", floor(random(1, 6)));
|
|
else
|
|
map = "start";
|
|
}
|
|
|
|
if (engine == E_QSS)
|
|
{
|
|
if (stof(infoget(newgameinfo, "maxclients")) != cvar("maxplayers"))
|
|
localcmd(sprintf("\ndisconnect; maxplayers %S\n", infoget(newgameinfo, "maxclients")?:"0"));
|
|
}
|
|
else
|
|
cvar_set("maxclients", infoget(newgameinfo, "maxclients"));
|
|
|
|
//'map' acts slightly differently in different engines.
|
|
//qss: kicks everyone, resets all parms
|
|
//fte: just resets parms.
|
|
//whereas 'changelevel' works more predictably, but does mean you might get more weapons than were really intended.
|
|
if (engine == E_QSS && gametype == "warp")
|
|
localcmd(sprintf("\nchangelevel %S\n", map));
|
|
else
|
|
localcmd(sprintf("\nmap %S\n", map));
|
|
return;
|
|
}
|
|
|
|
if (newgameinfo)
|
|
strunzone(newgameinfo);
|
|
newgameinfo = "";
|
|
newgameinfo = infoadd(newgameinfo, "hostname", cvar_string("hostname"));
|
|
newgameinfo = infoadd(newgameinfo, "deathmatch", cvar_string("deathmatch"));
|
|
newgameinfo = infoadd(newgameinfo, "teamplay", cvar_string("teamplay"));
|
|
newgameinfo = infoadd(newgameinfo, "sv_public", cvar_string("sv_public"));
|
|
newgameinfo = infoadd(newgameinfo, "maxclients", cvar_string((engine == E_QSS)?"maxplayers":"maxclients"));
|
|
newgameinfo = infoadd(newgameinfo, "timelimit", cvar_string("timelimit"));
|
|
newgameinfo = infoadd(newgameinfo, "fraglimit", cvar_string("fraglimit"));
|
|
newgameinfo = strzone(newgameinfo);
|
|
|
|
//create the menu
|
|
m = spawn(mitem_newgame, item_text:_("New Game"), item_flags:IF_SELECTABLE, item_command:"m_main");
|
|
desktop.add(m, RS_X_MIN_PARENT_MIN|RS_Y_MIN_PARENT_MIN | RS_X_MAX_PARENT_MAX|RS_Y_MAX_PARENT_MAX, '0 0', '0 0');
|
|
desktop.item_focuschange(m, IF_KFOCUSED);
|
|
m.totop();
|
|
|
|
#if 1
|
|
mitem_frame fr = m;
|
|
#else
|
|
//create a frame for its scrollbar.
|
|
float h = 100;
|
|
mitem_frame fr = spawn(mitem_frame, item_flags: IF_SELECTABLE, frame_hasscroll:TRUE);
|
|
m.add(fr, RS_X_MIN_PARENT_MID|RS_Y_MIN_PARENT_MID | RS_X_MAX_PARENT_MID|RS_Y_MAX_OWN_MIN, [-160, -h], [160, h*2]);
|
|
#endif
|
|
|
|
switch(gametype)
|
|
{
|
|
case "tdm":
|
|
case "dm":
|
|
case "coop":
|
|
case "sp":
|
|
case "warp":
|
|
break;
|
|
default:
|
|
//show game type selection
|
|
pos = (16/-2)*(4);
|
|
banner = spawn(mitem_pic, item_text:"gfx/p_option.lmp", item_size_y:24, item_flags:IF_CENTERALIGN);
|
|
m.addm(banner, [(160-banner.item_size_x)*0.5, pos-32], [(160+banner.item_size_x)*0.5, pos-8]);
|
|
m.addm(spawn(mitem_text, item_text:"Single Player", item_command:"m_pop;m_newgame sp", item_scale:16, item_flags:IF_CENTERALIGN), [0, pos], [160, pos+16]); pos += 16;
|
|
m.addm(spawn(mitem_text, item_text:"Cooperative", item_command:"m_pop;m_newgame coop", item_scale:16, item_flags:IF_CENTERALIGN), [0, pos], [160, pos+16]); pos += 16;
|
|
m.addm(spawn(mitem_text, item_text:"Deathmatch", item_command:"m_pop;m_newgame dm", item_scale:16, item_flags:IF_CENTERALIGN), [0, pos], [160, pos+16]); pos += 16;
|
|
m.addm(spawn(mitem_text, item_text:"Team Deathmatch", item_command:"m_pop;m_newgame tdm", item_scale:16, item_flags:IF_CENTERALIGN), [0, pos], [160, pos+16]); pos += 16;
|
|
|
|
m.addm(spawn(mitem_text, item_text:"Map Selection", item_command:"m_pop;m_newgame warp", item_scale:16, item_flags:IF_CENTERALIGN), [0, pos], [160, pos+16]); pos += 16;
|
|
|
|
m.add(spawn (mitem_spinnymodel, item_text: "progs/soldier.mdl",firstframe:73, framecount:8, shootframe:81, shootframes:9), RS_X_MIN_PARENT_MID|RS_Y_MIN_PARENT_MID | RS_X_MAX_PARENT_MID|RS_Y_MAX_PARENT_MID, [-160, 12*-16/2], [0, 12*16/2]);
|
|
return;
|
|
}
|
|
|
|
pos = -100;
|
|
|
|
banner = spawn(mitem_pic, item_text:"gfx/p_multi.lmp", item_size_y:24, item_flags:IF_CENTERALIGN);
|
|
m.addm(banner, [(0-banner.item_size_x)*0.5, pos-32], [(0+banner.item_size_x)*0.5, pos-8]);
|
|
|
|
if (gametype != "warp")
|
|
{
|
|
fr.addm(menuitemeditt_spawn(_("Hostname"), "hostname", '280 8'), [-160, pos], [160, pos+8]); pos += 8;
|
|
fr.addm(menuitemcombo_spawn(_("Public"), "sv_public", '280 8', (engine == E_QSS)?_( "0 \"LAN\" "
|
|
"1 \"Internet\" "
|
|
):_( "-1 \"Reject All (Splitscreen)\" "
|
|
"0 \"Private (Manual IP Sharing)\" "
|
|
"1 \"Public (Manual Config)\" "
|
|
"2 \"Public (Holepunch)\" "
|
|
)), [-160, pos], [160, pos+8]); pos += 8;
|
|
fr.addm(menuitemcombo_spawn(_("Max Clients"), "maxclients", '280 8', _(
|
|
"2 \"Two\" "
|
|
"3 \"Three\" "
|
|
"4 \"Four\" "
|
|
"8 \"Eight\" "
|
|
"16 \"Sixteen\" "
|
|
"32 \"Thirty Two\" "
|
|
)), [-160, pos], [160, pos+8]); pos += 8;
|
|
}
|
|
|
|
if (gametype == "dm" || gametype == "tdm")
|
|
{
|
|
if (m.get("deathmatch") == "0")
|
|
{
|
|
m.set("deathmatch", "1");
|
|
m.set("coop", "0");
|
|
}
|
|
fr.addm(menuitemcombo_spawn(_("Deathmatch Mode"), "deathmatch", '280 8', _(
|
|
"1 \"Weapons Respawn\" "
|
|
"2 \"Weapons Stay\" "
|
|
"3 \"Powerups Respawn\" "
|
|
"4 \"Start With Weapons\" "
|
|
)), [-160, pos], [160, pos+8]); pos += 8;
|
|
}
|
|
else
|
|
{
|
|
if (m.get("coop") == "0")
|
|
{
|
|
m.set("deathmatch", "0");
|
|
m.set("coop", "1");
|
|
}
|
|
}
|
|
if (gametype == "tdm")
|
|
{
|
|
if (m.get("teamplay") == "0")
|
|
m.set("teamplay", "1");
|
|
}
|
|
if (gametype == "dm")
|
|
{
|
|
if (m.get("teamplay") != "0")
|
|
m.set("teamplay", "0");
|
|
}
|
|
if (gametype == "coop")
|
|
fr.addm(menuitemcheck_spawn(_("No Friendly Fire"), "teamplay", '280 8'), [-160, pos], [160, pos+8]), pos += 8;
|
|
// if (gametype == "dm" || gametype == "tdm")
|
|
|
|
if (gametype == "coop")
|
|
m.set("map", "start");
|
|
else
|
|
{
|
|
m.set("map", "");
|
|
|
|
if (gametype != "warp")
|
|
{
|
|
fr.addm(menuitemcombo_spawn(_("Time Limit"), "timelimit", '280 8', _(
|
|
"0 \"No Limit\" "
|
|
"5 \"5 minutes\" "
|
|
"10 \"10 minutes\" "
|
|
"15 \"15 minutes\" "
|
|
"20 \"20 minutes\" "
|
|
"25 \"25 minutes\" "
|
|
"30 \"30 minutes\" "
|
|
"35 \"35 minutes\" "
|
|
"40 \"40 minutes\" "
|
|
"45 \"45 minutes\" "
|
|
"50 \"50 minutes\" "
|
|
"55 \"55 minutes\" "
|
|
"60 \"1 hour\" "
|
|
)), [-160, pos], [160, pos+8]); pos += 8;
|
|
fr.addm(menuitemcombo_spawn(_("Frag Limit"), "fraglimit", '280 8', _(
|
|
"0 \"No Limit\" "
|
|
"10 \"10 frags\" "
|
|
"20 \"20 frags\" "
|
|
"30 \"30 frags\" "
|
|
"40 \"40 frags\" "
|
|
"50 \"50 frags\" "
|
|
"60 \"60 frags\" "
|
|
"70 \"70 frags\" "
|
|
"80 \"80 frags\" "
|
|
"90 \"90 frags\" "
|
|
"100 \"100 frags\" "
|
|
)), [-160, pos], [160, pos+8]); pos += 8;
|
|
}
|
|
|
|
pos += 8;
|
|
fr.addm(spawn(mitem_maplist, item_scale:8, item_flags:IF_CENTERALIGN|IF_SELECTABLE), [-160, pos], [150, 100-16-8]), pos = 100-16;
|
|
}
|
|
|
|
fr.addm(spawn(mitem_text, item_text:"BEGIN!", item_command:"m_pop;m_newgame begin", item_scale:16, item_flags:IF_CENTERALIGN), [-160, pos], [160, pos+16]);pos += 16;
|
|
|
|
|
|
//random art for style
|
|
if (gametype == "coop")
|
|
{
|
|
m.add(spawn (mitem_spinnymodel, item_text: "progs/soldier.mdl", firstframe:73, framecount:8, shootframe:81, shootframes:9), RS_X_MIN_PARENT_MID|RS_Y_MIN_PARENT_MID | RS_X_MAX_PARENT_MID|RS_Y_MAX_PARENT_MID, [-160, -240/2], [0, 240/2]);
|
|
}
|
|
else
|
|
{
|
|
m.add(spawn (mitem_spinnymodel, item_text: "progs/player.mdl", firstframe:0, framecount:6, shootframe:119, shootframes:6), RS_X_MIN_PARENT_MID|RS_Y_MIN_PARENT_MID | RS_X_MAX_PARENT_MID|RS_Y_MAX_PARENT_MID, [-160, 12*-16/2], [0, 12*16/2]);
|
|
}
|
|
|
|
addmenuback(m);
|
|
};
|