menu/mcustom.qc

   1 ///////////////////////////////////////////////
   2 // Custom Menu Source File
   3 ///////////////////////
   4 // This file belongs to dpmod/darkplaces
   5 // AK contains menu specific stuff that is made especially for dpmod
   6 // AK this file is used e.g. for defining some special event functions
   7 ////////////////////////////////////////////////
   8
   9 ////////////////
  10 // global stuff
  11 ///
  12
  13 void() nex_setposition =
  14 {
  15         self.pos_x = 0;
  16         self.pos_y = (self.font_size_y + 5) * self.orderpos;
  17         self.pos_z = 0;
  18
  19         self.origin = self.pos;
  20 };
  21
  22 void(entity item) nex_makeonlyvisible =
  23 {
  24         local entity node;
  25
  26         if( item.flag & FLAG_HIDDEN )
  27                 item.flag = item.flag - FLAG_HIDDEN;
  28         for( node = item._next ; node ; node = node._next )
  29                 node.flag = item.flag | FLAG_HIDDEN;
  30         for( node = item._prev ; node ; node = node._prev )
  31                 node.flag = item.flag | FLAG_HIDDEN;
  32 };
  33
  34 void(void) nex_linkrelhack =
  35 {
  36         self._child._parent = self;
  37 };
  38
  39 void(void) nex_maketextzone =
  40 {
  41         self.text = strzone(self.text);
  42 };
  43
  44 void(void) nex_slidertext =
  45 {
  46         entity ent;
  47         if(self.link == "")
  48         {
  49                 print("No link specified\n");
  50                 eprint(self);
  51                 self.init = null_function;
  52                 return;
  53         }
  54
  55         ent = menu_getitem(self.link);
  56         if(ent == null_entity)
  57         {
  58                 objerror("No link found for ", self.link,"\n");
  59         }
  60
  61         self._link = ent;
  62
  63         self.flag = self.flag | FLAG_DRAWREFRESHONLY;
  64
  65         self.refresh = _nex_slidertext_refresh;
  66 };
  67
  68 void(void) _nex_slidertext_refresh =
  69 {
  70         self.text = ftos(self._link.value);
  71         if(self.maxlen > 0)
  72                 self.text = substring(self.text,0, self.maxlen);
  73         // reset the size, so its set
  74         self.size = '0 0 0';
  75 };
  76
  77 float(float keynr, float ascii) nex_redirect_key =
  78 {
  79         if((ascii>=20 && ascii <= 126) || keynr == K_BACKSPACE || keynr == K_ENTER || keynr == K_LEFTARROW || keynr == K_RIGHTARROW || (keynr >= K_MOUSE1 && keynr <= K_MOUSE10))
  80         {
  81                 raise_key(self._child, keynr, ascii);
  82                 return true;
  83         }
  84         return false;
  85 };
  86
  87 void(void) nex_cvar_slider =
  88 {
  89         self.value = cvar(self.cvarname);
  90         self.slidermove = self.switchchange = _nex_cvar_slider;
  91         self.refresh = _nex_cvar_slider_refresh;
  92 };
  93
  94 void(void) _nex_cvar_slider_refresh =
  95 {
  96         if(self.cvartype == CVAR_INT || self.cvartype == CVAR_FLOAT || self.cvartype == CVAR_STEP)
  97                 self.value = cvar(self.cvarname);
  98 };
  99
 100 void(void) _nex_cvar_slider =
 101 {
 102         if(self.cvarname == "")
 103                 return;
 104         if(self.cvartype == CVAR_INT) // || self.cvartype == CVAR_STRING)
 105                 self.value = rint(self.value);
 106         if(self.cvartype == CVAR_STEP)
 107                 self.value = rint(self.value / self.step) * self.step;
 108         if(self.cvartype == CVAR_INT || self.cvartype == CVAR_FLOAT || self.cvartype == CVAR_STEP)
 109                 cvar_set(self.cvarname, ftos(self.value));
 110         /*if(cvartype == CVAR_STRING)
 111         {
 112                 string s;
 113                 s = getaltstring(self.value, self.cvarvalues);
 114                 cvar_set(self.cvarname, s);
 115         }
 116         */
 117 };
 118
 119 //////////////
 120 // main.menu
 121 ///
 122
 123 void(void) nex_makeselfonlyvisible =
 124 {
 125         nex_makeonlyvisible( self );
 126 };
 127
 128 // quit menu
 129
 130 void(void) nex_quit_choose =
 131 {
 132         entity e;
 133         // because of the missing support for real array, we have to do it the stupid way
 134         // (we also have to use strzone for the text, cause it the temporary strings wont work
 135         // for it)
 136         if(nex_quitrequest == 0)
 137         {
 138                 e = menu_getitem("quit_msg_0");
 139                 e.text = getaltstring(0,nex_quitmsg_0);
 140         }
 141         if(nex_quitrequest == 1)
 142         {
 143                 e = menu_getitem("quit_msg_0");
 144                 e.text = getaltstring(0,nex_quitmsg_1);
 145         }
 146         if(nex_quitrequest == 2)
 147         {
 148                 e = menu_getitem("quit_msg_0");
 149                 e.text = getaltstring(0,nex_quitmsg_2);
 150         }
 151         if(nex_quitrequest == 3)
 152         {
 153                 e = menu_getitem("quit_msg_0");
 154                 e.text = getaltstring(0,nex_quitmsg_3);
 155         }
 156         e.text = strzone(e.text);
 157
 158         if(nex_quitrequest == 0)
 159         {
 160                 e = menu_getitem("quit_msg_1");
 161                 e.text = getaltstring(1,nex_quitmsg_0);
 162         }
 163         if(nex_quitrequest == 1)
 164         {
 165                 e = menu_getitem("quit_msg_1");
 166                 e.text = getaltstring(1,nex_quitmsg_1);
 167         }
 168         if(nex_quitrequest == 2)
 169         {
 170                 e = menu_getitem("quit_msg_1");
 171                 e.text = getaltstring(1,nex_quitmsg_2);
 172         }
 173         if(nex_quitrequest == 3)
 174         {
 175                 e = menu_getitem("quit_msg_1");
 176                 e.text = getaltstring(1,nex_quitmsg_3);
 177         }
 178         e.text = strzone(e.text);
 179
 180         nex_quitrequest = nex_quitrequest + 1;
 181         if(nex_quitrequest == DPMOD_QUIT_MSG_COUNT)
 182                 nex_quitrequest = 0;
 183 };
 184
 185 void(void) nex_quit =
 186 {
 187 /*  entity ent;
 188         // choose a quit message
 189         nex_quit_choose();
 190
 191         // change the flags
 192         ent = menu_getitem("main");
 193         ent.flag = ent.flag | FLAG_CHILDDRAWONLY;
 194         ent = menu_getitem("quit");
 195         ent.flag = FLAG_NOSELECT;
 196         menu_jumptowindow(ent, false);*/
 197         entity ent;
 198
 199         // change the flags
 200         ent = menu_getitem("quitbox_ref");
 201         ent._child = menu_activewindow;
 202         ent = menu_getitem("quitbox");
 203         menu_jumptowindow(ent, true);
 204 };
 205
 206 void(void) nex_quit_yes =
 207 {
 208         cmd("quit\n");
 209 };
 210
 211 void(void) nex_quit_no =
 212 {
 213 /*  entity ent;
 214
 215         ent = menu_getitem("quit_msg_0");
 216         strunzone(ent.text);
 217
 218         ent = menu_getitem("quit_msg_1");
 219         strunzone(ent.text);
 220
 221         ent = menu_getitem("quit");
 222         ent.flag = FLAG_HIDDEN;
 223         ent = menu_getitem("main");
 224         ent.flag = ent.flag - FLAG_CHILDDRAWONLY;
 225         menu_selectup();*/
 226         menu_selectup();
 227 };
 228
 229 float(float keynr, float ascii) nex_quit_key =
 230 {
 231         if(keynr == K_LEFTARROW)
 232                 return false;
 233         if(keynr == K_RIGHTARROW)
 234                 return false;
 235         if(keynr == K_ENTER)
 236                 return false;
 237         if(keynr == K_MOUSE1)
 238                 return false;
 239         if(ascii == 'Y' || ascii == 'y')
 240                 nex_quit_yes();
 241         if(ascii == 'N' || ascii == 'n' || keynr == K_ESCAPE)
 242                 nex_quit_no();
 243         return true;
 244 };
 245
 246 // options menu
 247
 248 void(void) nex_display_options =
 249 {
 250         entity ent;
 251
 252         ent = menu_getitem( "options" );
 253
 254         nex_makeonlyvisible( ent );
 255         menu_jumptowindow( ent, false );
 256 };
 257
 258 /////////////////
 259 // video.menu
 260
 261 void(void) nex_display_video =
 262 {
 263         nex_makeonlyvisible( menu_getitem( "video" ) );
 264         menu_jumptowindow( menu_getitem( "video" ), false );
 265 };
 266
 267 void(void) nex_video_bpp_reinit =
 268 {
 269         if(cvar("vid_bitsperpixel") == 32)
 270                 self.value = 1;
 271         else
 272                 self.value = 0;
 273 };
 274
 275 void(void) nex_video_fullscreen_reinit =
 276 {
 277         self.value = cvar("vid_fullscreen");
 278 };
 279
 280 string nex_video_resolutions;
 281
 282 void(void) nex_video_resolution_switch_reinit =
 283 {
 284         float c, i;
 285         float pos86;
 286
 287         c = getaltstringcount(nex_video_resolutions);
 288         for(i = 0; i < c; i=i+1)
 289         {
 290                 string s;
 291                 vector t;
 292                 s = getaltstring(i,nex_video_resolutions);
 293                 s = strcat("'",s,"'");
 294                 t = stov(s);
 295                 if(t_x == cvar("vid_width") && t_y == cvar("vid_height"))
 296                 {
 297                         self.value = i;
 298                         return;
 299                 }
 300                 if(t == '800 600 0')
 301                         pos86 = i;
 302         }
 303
 304         self.value = pos86;
 305 };
 306
 307 void(void) nex_video_resolution_switch =
 308 {
 309         var float pos86 = 0;
 310         var float counter = 0;
 311         vector t;
 312
 313         nex_video_resolutions = "";
 314         self.text = "";
 315         self.value = -1;
 316
 317         while((t = getresolution(counter)) != '0 0 0')
 318         {
 319                 if(t == '800 600 0')
 320                         pos86 = counter;
 321                 if(t_x == cvar("vid_width") && t_y == cvar("vid_height"))
 322                 {
 323                         self.value = counter;
 324                 }
 325                 counter = counter + 1;
 326                 self.text = strcat(self.text,"'",ftos(t_x),"x");
 327                 self.text = strcat(self.text,ftos(t_y),"'");
 328                 nex_video_resolutions = strcat(nex_video_resolutions,vtos(t));
 329         }
 330
 331         if(self.value == -1)
 332                 self.value = pos86;
 333
 334         self.text = strzone(self.text);
 335         nex_video_resolutions = strzone(nex_video_resolutions);
 336
 337         self.reinit = nex_video_resolution_switch;
 338 };
 339
 340 void(void) nex_video_apply =
 341 {
 342         vector set, res;
 343         float changed;
 344         entity tmp;
 345
 346         changed = false;
 347
 348         // resolution test
 349         res_x = cvar("vid_width");
 350         res_y = cvar("vid_height");
 351         res_z = 0;
 352
 353         tmp = menu_getitem("video_resolution_switch");
 354         set = stov(getaltstring(tmp.value, nex_video_resolutions));
 355         if(set != res)
 356         {
 357                 cvar_set("vid_width",ftos(set_x));
 358                 cvar_set("vid_height",ftos(set_y));
 359                 changed = true;
 360         }
 361         // bpp test
 362         tmp = menu_getitem("video_bpp_switch");
 363         if((tmp.value+1)*16 != cvar("vid_bitsperpixel"))
 364         {
 365                 cvar_set("vid_bitsperpixel",ftos((tmp.value+1)*16));
 366                 changed = true;
 367         }
 368         // fullscreen changed
 369         tmp = menu_getitem("video_fullscreen_switch");
 370         if(tmp.value != cvar("vid_fullscreen"))
 371         {
 372                 cvar_set("vid_fullscreen",ftos(tmp.value));
 373                 changed = true;
 374         }
 375
 376         if(changed)
 377         {
 378                 cmd("vid_restart\n");
 379         }
 380 };
 381
 382 /////////////////
 383 // xplayer.menu
 384 ///
 385
 386 float maxfrags;
 387 float maxtime;
 388 float maxbots;
 389 float skilllevel;
 390 string hostname;
 391 float  maxclients;
 392 float  publicserver;
 393 float  gamemode;
 394
 395 entity maps_list;
 396 entity maps_current;
 397
 398 // text = info text
 399 // picture = picture filename
 400 // name = map name
 401 void(entity node) _nex_xp_remove =
 402 {
 403         strunzone( node.picture );
 404         strunzone( node.text );
 405         strunzone( node.name );
 406         remove( node );
 407 }
 408
 409 void(void) _nex_xp_update =
 410 {
 411         entity item;
 412
 413         item = menu_getitem( "creategame_map_name" );
 414         item.text = maps_current.name;
 415
 416         item = menu_getitem( "creategame_map_picture" );
 417         item.picture = maps_current.picture;
 418
 419         item = menu_getitem( "creategame_map_info" );
 420         item.text = maps_current.text;
 421 };
 422
 423 void(void) nex_xp_enummaps =
 424 {
 425         float count;
 426         float searchhandle;
 427         float counter;
 428
 429         // remove the old list
 430         if( maps_list ) {
 431                 entity node;
 432
 433                 node = maps_list;
 434                 while( node._next ) {
 435                         node = node._next;
 436                         _nex_xp_remove( node._prev );
 437                 }
 438                 _nex_xp_remove( node );
 439         }
 440         maps_list = maps_current = null_entity;
 441
 442         searchhandle = search_begin( "maps/*.bsp", true, true );
 443         if( searchhandle == -1 ) {
 444                 print( "menu: No maps found!\n" );
 445                 return;
 446         } else if( searchhandle == -2)
 447                 return;
 448
 449         maps_list = maps_current = spawn();
 450         count = search_getsize( searchhandle );
 451         for( counter = 0 ; counter < count ; counter = counter + 1 ) {
 452                 float file;
 453                 string fname;
 454
 455                 fname = search_getfilename( searchhandle, counter );
 456                 fname = substring( fname, 0, strlen( fname ) -  4 );
 457                 fname = strzone( fname );
 458
 459                 //try to find the information text
 460                 file = fopen( strcat( fname, ".txt" ), FILE_READ );
 461                 if( file == -1 )
 462                         maps_current.text = strzone( "--NO INFORMATION AVAILABLE--" );
 463                 else {
 464                         string temp, old;
 465                         maps_current.text = strzone( "" );
 466                         do {
 467                                 old = maps_current.text;
 468                                 temp = fgets( file );
 469                                 maps_current.text = strzone( strcat( old, temp, "\n" ) );
 470                                 strunzone( old );
 471                         } while( temp );
 472                         fclose( file );
 473                 }
 474
 475                 //try to find the picture
 476                 file = search_begin( strcat( fname, ".jpg" ), true, true );
 477                 if( file == -1 )
 478                         maps_current.picture = strzone( "gfx/m_nomap" );
 479                 else {
 480                         maps_current.picture = strzone( strcat( fname, ".jpg" ) );
 481                         search_end( file );
 482                 }
 483
 484                 maps_current.name = strzone( substring( fname, 5, strlen( fname ) - 5 ) ); // remove the 'maps/'
 485                 strunzone( fname );
 486
 487                 // create next item and link it with the list
 488                 maps_current._next = spawn();
 489                 maps_current._next._prev = maps_current;
 490                 maps_current = maps_current._next;
 491         }
 492         // remove the last item
 493         maps_current = maps_current._prev;
 494         remove( maps_current._next );
 495         maps_current._next = null_entity;
 496
 497         search_end( searchhandle );
 498
 499         maps_current = maps_list;
 500         _nex_xp_update();
 501 };
 502
 503 void(void) nex_xp_prev =
 504 {
 505         if( maps_current._prev )
 506                 maps_current = maps_current._prev;
 507         _nex_xp_update();
 508 };
 509
 510 void(void) nex_xp_next =
 511 {
 512         if( maps_current._next )
 513                 maps_current = maps_current._next;
 514         _nex_xp_update();
 515 };
 516
 517
 518 void(void) nex_display_creategame =
 519 {
 520         nex_makeonlyvisible( menu_getitem( "creategame" ) );
 521         menu_jumptowindow( menu_getitem( "creategame" ), false );
 522 };
 523
 524 void(void) nex_xp_maxfrags =
 525 {
 526         float x;
 527         x = stof(self.text);
 528         maxfrags = rint(x);
 529
 530         strunzone(self.text);
 531         self.text = ftos(x);
 532         self.text = strzone(self.text);
 533 };
 534
 535 void(void) nex_xp_maxbots =
 536 {
 537         float x;
 538         x = stof(self.text);
 539         maxbots = min( fabs(rint(x)), maxclients - 1, 16 ); // 16 is currently max in frikbot - see below
 540
 541         strunzone(self.text);
 542         self.text = ftos(x);
 543         self.text = strzone(self.text);
 544 };
 545
 546 void(void) nex_xp_maxtime =
 547 {
 548         float x;
 549         x = stof(self.text);
 550         maxtime = rint(x);
 551
 552         strunzone(self.text);
 553         self.text = ftos(maxtime);
 554         self.text = strzone(self.text);
 555 };
 556
 557 void(void) nex_xp_hostname =
 558 {
 559         hostname = self.text;
 560 };
 561
 562 void(void) nex_xp_maxclients =
 563 {
 564         local float i;
 565         i = stof(self.text);
 566         maxclients = rint(i);
 567
 568         strunzone(self.text);
 569         self.text = strzone(ftos(maxclients));
 570 };
 571
 572 void(void) nex_xp_publicserv =
 573 {
 574         publicserver = self.value;
 575 };
 576
 577 void(void) nex_xp_gamemode =
 578 {
 579         gamemode = self.value;
 580 };
 581
 582 void(void) nex_xp_skilllevel =
 583 {
 584         skilllevel = self.value;
 585 }
 586
 587 void(void) nex_xp_start =
 588 {
 589         cvar_set( "fraglimit", ftos( maxfrags ) );
 590         cvar_set( "timelimit", ftos( maxtime ) );
 591         cvar_set( "deathmatch", "1" );
 592
 593         cmd( "maxplayers " );
 594         cmd( ftos( maxclients ) );
 595         cmd( "\n" );
 596
 597         cvar_set( "sv_public", ftos( publicserver ) );
 598         cvar_set( "hostname", hostname );
 599
 600         // see bot/bot.qc: BotInit
 601         cvar_set( "saved1", "1" );
 602         cvar_set( "scratch1", ftos( pow( 2, maxbots ) - 1 ) );
 603         cvar_set( "scratch2", ftos( skilllevel * (pow(4, min(maxbots, 8)) - 1) / 3) );
 604         cvar_set( "scratch3", ftos( skilllevel * (pow(4, min(maxbots - 8, 8)) - 1) / 3) );
 605
 606         cmd( "map " );
 607         cmd( maps_current.name );
 608         cmd( "\n" );
 609         cmd( "togglemenu\n" );
 610 };
 611
 612 void(void) nex_goto_createserver =
 613 {
 614         menu_jumptowindow( menu_getitem( "multiplayer_frame"), false );
 615 }
 616
 617 void(void) nex_draw_text =
 618 {
 619         local vector drawpos;
 620         local float cpos, end;
 621
 622         cpos = 0;
 623         drawpos = self.pos;
 624         drawpos_y = drawpos_y + self.font_size_y;
 625         do {
 626                 local string l;
 627                 local float i;
 628
 629                 end = strlen( self.text );
 630                 i = cpos;
 631                 do {
 632                         l = substring( self.text, i, 1 );
 633
 634                         if( l == "\n" ) {
 635                                 end = i;
 636                                 break;
 637                         }
 638
 639                         i = i + 1;
 640                 } while( l != "" );
 641
 642                 l = substring( self.text, cpos, end - cpos );
 643                 if( l != "" )
 644                         menu_drawstring( drawpos, l, self.font_size, self.color, self.alpha, self.drawflag );
 645                 drawpos_y = drawpos_y + self.font_size_y;
 646
 647                 cpos = end + 1;
 648         } while( end != strlen( self.text ) );
 649 }
 650
 651 // server list
 652 var float slist_selected = 0;
 653 var float slist_start   = 0;
 654 float slist_estimatedsize;
 655
 656 void(void) nex_display_serverlist =
 657 {
 658         if(menu_activewindow.name == "serverlist")
 659                 return;
 660         menu_jumptowindow(menu_getitem("serverlist"),true);
 661         cmd("net_slist\n");
 662 };
 663
 664 // use a ITEM_TEXT as base item for this
 665 // we need another item to clip the slist
 666 // (another reason for a new menu qc!)
 667 void(void) slist_draw =
 668 {
 669         float c;
 670         vector pos;
 671         float listsize;
 672
 673         //print("slist drawing...", ftos(listsize), "\n");
 674
 675         pos = '0 0 0'; // the upper item sets the origin
 676         listsize = gethostcachevalue(SLIST_HOSTCACHECOUNT);
 677         if(!listsize)
 678         {
 679                 menu_drawstring(pos, "No Servers", self.font_size, self.color, self.alpha, self.drawflag);
 680                 return;
 681         }
 682
 683         for(c = 0; c < slist_estimatedsize + 1; c = c + 1)
 684         {
 685                 string line;
 686
 687                 if(listsize <= slist_start + c)
 688                         break;
 689
 690                 //print("drawing ", ftos(c),"\n");
 691
 692                 if(slist_selected - slist_start == c)
 693                 {
 694                         vector s;
 695                         s = self.size;
 696                         s_y = self.font_size_y * 2;
 697
 698                         menu_fillarea(pos, s, self.color_selected, self.alpha_selected * (sin(time * 9) + 1) / 2, self.drawflag_selected);
 699                 }
 700
 701                 line = gethostcachestring(SLIST_LINE1, slist_start + c);
 702
 703                 menu_drawstring(pos, line, self.font_size, self.color, self.alpha, self.drawflag);
 704
 705                 pos_y = pos_y + self.font_size_y;
 706
 707                 line = gethostcachestring(SLIST_LINE2, slist_start + c);
 708
 709                 menu_drawstring(pos, line, self.font_size, self.color, self.alpha, self.drawflag);
 710
 711                 pos_y = pos_y + self.font_size_y;
 712         }
 713 };
 714
 715 void(void) slist_init =
 716 {
 717         self.size = self._parent.size;
 718         slist_estimatedsize = self.size_y / self.font_size_y / 2;
 719 };
 720
 721 void(void) slist_refresh =
 722 {
 723         float hostcachesize;
 724
 725         hostcachesize = gethostcachevalue(SLIST_HOSTCACHECOUNT);
 726         if(slist_start >= hostcachesize)
 727                 slist_start = ceil(hostcachesize - slist_estimatedsize);
 728         if(slist_start < 0)
 729                 slist_start = 0;
 730         if(slist_selected >= hostcachesize)
 731                 slist_selected = hostcachesize;
 732 };
 733
 734 void(void) slist_join =
 735 {
 736         string cname;
 737         cname = gethostcachestring(SLIST_CNAME, slist_selected);
 738
 739         if(cname != "")
 740         {
 741                 cmd("connect ");
 742                 cmd(cname);
 743                 cmd(" ;togglemenu\n");
 744         }
 745 };
 746
 747 float(float keynr, float ascii ) slist_key =
 748 {
 749         float listsize;
 750
 751         if(keynr == K_UPARROW)
 752         {
 753                 if(slist_selected > 0)
 754                         slist_selected = slist_selected - 1;
 755                 if(slist_start > slist_selected)
 756                         slist_start = slist_selected;
 757                 return TRUE;
 758         } else if(keynr == K_DOWNARROW)
 759         {
 760                 listsize = gethostcachevalue(SLIST_HOSTCACHECOUNT);
 761                 if(slist_selected < listsize - 1)
 762                         slist_selected = slist_selected + 1;
 763                 if(slist_start + slist_estimatedsize - 0.5 < slist_selected)
 764                         slist_start = ceil(slist_selected - slist_estimatedsize + 0.5);
 765                 return TRUE;
 766         } else if(keynr == K_ENTER)
 767         {
 768                 slist_join();
 769                 return TRUE;
 770         } else if(keynr == K_SPACE)
 771         {
 772                 cmd("net_slist\n");
 773                 return TRUE;
 774         } else if(keynr == K_MOUSE1)
 775         {
 776                 float pos;
 777
 778                 listsize = gethostcachevalue(SLIST_HOSTCACHECOUNT);
 779                 pos = floor(menu_cursor_y / self.font_size_y / 2);
 780
 781                  if(pos + slist_start == slist_selected)
 782                         slist_join();
 783                 else if(pos + slist_start < listsize)
 784                         slist_selected = pos;
 785                 return TRUE;
 786         }
 787         return FALSE;
 788 };
 789
 790 void(void) slist_info1 =
 791 {
 792         float query, reply;
 793         string temp;
 794
 795         query = gethostcachevalue(SLIST_MASTERQUERYCOUNT);
 796         reply = gethostcachevalue(SLIST_MASTERREPLYCOUNT);
 797
 798         strunzone(self.text);
 799
 800         temp = strcat(ftos(reply), "/");
 801         temp = strcat(temp, ftos(query), " Master Servers");
 802
 803         self.text = strzone(temp);
 804 };
 805
 806 void(void) slist_info2 =
 807 {
 808         float query, reply;
 809         string temp;
 810
 811         query = gethostcachevalue(SLIST_SERVERQUERYCOUNT);
 812         reply = gethostcachevalue(SLIST_SERVERREPLYCOUNT);
 813
 814         strunzone(self.text);
 815
 816         temp = strcat(ftos(reply), "/");
 817         temp = strcat(temp, ftos(query), " Game Servers");
 818
 819         self.text = strzone(temp);
 820 };
 821
 822 /////////////////
 823 // options.menu
 824 ///
 825
 826 // player options
 827 var entity mlist_list = null_entity;
 828 entity mlist_current;
 829 string mlist_saved;
 830 string player_model_cvar = "player_model";
 831 string player_name_cvar = "m_player_name";
 832 string player_skin_cvar = "player_skin";
 833
 834 void(void) nex_player_init =
 835 {
 836         // used by the qc
 837         //registercvar( player_model_cvar, "", CVAR_SAVE );
 838         //registercvar( player_skin_cvar, "", CVAR_SAVE );
 839
 840         if( mlist_saved )
 841                 strunzone( mlist_saved );
 842         mlist_saved = strzone( str_cvar( player_name_cvar ) );
 843         registercvar( player_name_cvar, "", CVAR_SAVE );
 844 }
 845
 846 // name = name
 847 // picture_selected = model name
 848 // picture_pressed = skin name
 849 // picture = picture
 850 // text = desc text
 851 void(entity e) _nex_player_remove =
 852 {
 853         strunzone( e.name );
 854         strunzone( e.picture_selected );
 855         strunzone( e.picture_pressed );
 856         strunzone( e.picture );
 857         strunzone( e.text );
 858
 859         remove( e );
 860 };
 861
 862 void() _nex_player_model_update =
 863 {
 864         entity item;
 865
 866         cvar_set( player_name_cvar, mlist_current.name );
 867         //cvar_set( player_model_cvar, mlist_current.picture_selected );
 868         //cvar_set( player_skin_cvar, mlist_current.picture_pressed );
 869
 870         item = menu_getitem( "options_player_model_name" );
 871         item.text = mlist_current.name;
 872
 873         item = menu_getitem( "options_player_model_picture" );
 874         item.picture = mlist_current.picture;
 875
 876         item = menu_getitem( "options_player_model_info" );
 877         item.text = mlist_current.text;
 878 };
 879
 880 /*
 881 .mdef file format
 882 name
 883 picture\n
 884 skin filename\n
 885 model filename\n
 886 rest text*/
 887 void(void) nex_player_buildlist =
 888 {
 889         float shandle;
 890         float count;
 891         float counter;
 892         entity hit;
 893
 894         // remove the old player list
 895         if( mlist_list ) {
 896                 entity node;
 897
 898                 // save the old selected model
 899                 mlist_saved = strzone( mlist_current.name );
 900
 901                 node = mlist_list;
 902                 while( node._next ) {
 903                         node = node._next;
 904                         _nex_player_remove( node._prev );
 905                 }
 906                 _nex_player_remove( node );
 907
 908                 mlist_list = mlist_current = null_entity;
 909         }
 910
 911         shandle = search_begin( "models/player/*.txt", false, true );
 912         if( shandle < 0 )
 913                 return;
 914
 915         count = search_getsize( shandle );
 916         mlist_list = mlist_current = spawn();
 917         hit = null_entity;
 918         for ( counter = 0 ; counter < count ; counter = counter + 1 ) {
 919                 string dname;
 920                 string dpicture;
 921                 string dskin;
 922                 string dmodel;
 923                 string dtext;
 924
 925                 float handle;
 926
 927                 handle = fopen( search_getfilename( handle, counter ), FILE_READ );
 928
 929                 if( handle < 0 )
 930                         continue;
 931
 932                 dname = strzone( fgets( handle ) );
 933                 dpicture = strzone( fgets( handle ) );
 934                 dskin = strzone( fgets( handle ) );
 935                 dmodel = strzone( fgets( handle ) );
 936                 {
 937                         string temp, old;
 938                         dtext = strzone( "" );
 939                         do {
 940                                 old = dtext;
 941                                 temp = fgets( handle );
 942                                 dtext = strzone( strcat( old, temp, "\n" ) );
 943                                 strunzone( old );
 944                         } while( temp );
 945                 }
 946
 947                 if( !dname || !dpicture || !dskin || !dmodel || !dtext ) {
 948                         print( "Bad model definition file '", search_getfilename( shandle, counter ), "'\n" );
 949
 950                         strunzone( dname );
 951                         strunzone( dpicture );
 952                         strunzone( dskin );
 953                         strunzone( dmodel );
 954
 955                         fclose( handle );
 956                         continue;
 957                 }
 958
 959                 // is this the previous selected model?
 960                 if( dname == mlist_saved )
 961                         hit = mlist_current;
 962
 963                 mlist_current.name = dname;
 964                 mlist_current.picture = dpicture;
 965                 mlist_current.picture_pressed = dskin;
 966                 mlist_current.picture_selected = dmodel;
 967                 mlist_current.text = dtext;
 968
 969                 mlist_current._next = spawn();
 970                 mlist_current._next._prev = mlist_current;
 971                 mlist_current = mlist_current._next;
 972
 973                 fclose( handle );
 974         }
 975         mlist_current._prev._next = null_entity;
 976         remove( mlist_current );
 977
 978         search_end( shandle );
 979
 980         if( hit )
 981                 mlist_current = hit;
 982         else
 983                 mlist_current = mlist_list;
 984
 985         _nex_player_model_update();
 986 };
 987
 988 void(void) nex_player_model_next =
 989 {
 990         if( mlist_current._next )
 991                 mlist_current = mlist_current._next;
 992         _nex_player_model_update();
 993 };
 994
 995 void(void) nex_player_model_prev =
 996 {
 997         if( mlist_current._prev )
 998                 mlist_current = mlist_current._prev;
 999         _nex_player_model_update();
1000 }
1001
1002 void(void) nex_player =
1003 {
1004         entity ent;
1005         ent = menu_getitem("options_player");
1006         nex_makeonlyvisible( ent );
1007         menu_jumptowindow(ent, false);
1008 };
1009
1010 // old/other options
1011
1012 void(void) nex_options_alwaysrun_switchchange =
1013 {
1014         if(self.value)
1015         {
1016                 cvar_set("cl_forwardspeed","400");
1017                 cvar_set("cl_backspeed","400");
1018         }
1019         else
1020         {
1021                 cvar_set("cl_forwardspeed","200");
1022                 cvar_set("cl_backspeed","200");
1023         }
1024 };
1025
1026 void(void) nex_options_alwaysrun_refresh =
1027 {
1028         if(cvar("cl_forwardspeed") > 200)
1029                 self.value = 1;
1030         else
1031                 self.value = 0;
1032 };
1033
1034 void(void) nex_options_invmouse_switchchange =
1035 {
1036         float old;
1037         old = 0 - cvar("m_pitch");
1038         cvar_set("m_pitch",ftos(old));
1039 };
1040
1041 void(void) nex_options_invmouse_refresh =
1042 {
1043         if(cvar("m_pitch") > 0)
1044                 self.value = 0;
1045         else
1046                 self.value = 1;
1047 };
1048
1049 void(void) nex_snd =
1050 {
1051         entity ent;
1052         ent = menu_getitem("options_sound");
1053         nex_makeonlyvisible( ent );
1054         menu_jumptowindow(ent, false);
1055 }
1056
1057 void(void) nex_snd_cd_init =
1058 {
1059         if(cvar("cdaudioinitialized"))
1060         {
1061                 self.flag = FLAG_AUTOSETCLICK;
1062                 self.color = ITEM_TEXT_NORMAL_COLOR;
1063         }
1064         else
1065         {
1066                 self.flag = FLAG_NOSELECT | FLAG_DRAWONLY | FLAG_CHILDDRAWONLY;
1067                 self.color = '0.5 0.5 0.5';
1068         }
1069 };
1070
1071 void(void) nex_snd_snd_init =
1072 {
1073         if(cvar("snd_initialized"))
1074         {
1075                 self.flag = FLAG_AUTOSETCLICK;
1076                 self.color = ITEM_TEXT_NORMAL_COLOR;
1077         }
1078         else
1079         {
1080                 self.flag = FLAG_NOSELECT | FLAG_DRAWONLY | FLAG_CHILDDRAWONLY;
1081                 self.color = '0.5 0.5 0.5';
1082         }
1083 };
1084
1085 void(void) nex_cc =
1086 {
1087         entity ent;
1088         ent = menu_getitem("options_cc");
1089         nex_makeonlyvisible( ent );
1090         menu_jumptowindow(ent, false);
1091 }
1092
1093 void(void) nex_cc_reset =
1094 {
1095         cmd(
1096         "v_hwgamma 1;"
1097         "v_gamma 1;"
1098         "v_contrast 1;"
1099         "v_brightness 0;"
1100         "v_color_enable 0;"
1101         "v_color_black_r 0;"
1102         "v_color_black_g 0;"
1103         "v_color_black_b 0;"
1104         "v_color_grey_r 0;"
1105         "v_color_grey_g 0;"
1106         "v_color_grey_b 0;"
1107         "v_color_white_r 1;"
1108         "v_color_white_g 1;"
1109         "v_color_white_b 1;"
1110         "\n");
1111 };
1112
1113 void(void) nex_cc_check_hwgamma =
1114 {
1115         if(cvar("vid_hardwaregammasupported"))
1116         {
1117                 self.flag = FLAG_AUTOSETCLICK;
1118                 self.color = ITEM_TEXT_NORMAL_COLOR;
1119         }
1120         else
1121         {
1122                 self.flag = FLAG_NOSELECT;
1123                 self.color = '0.5 0.5 0.5';
1124         }
1125 };
1126
1127 void(void) nex_cc_check_gamma = // used in key -- BADBAD HACKHACK
1128 {
1129         if(cvar("v_hwgamma") && cvar("vid_hardwaregammasupported") && !cvar("v_color_enable"))
1130         {
1131                 self.flag = FLAG_AUTOSETCLICK;
1132                 self.color = ITEM_TEXT_NORMAL_COLOR;
1133         }
1134         else
1135         {
1136                 self.flag = FLAG_NOSELECT;
1137                 self.color = '0.5 0.5 0.5';
1138         }
1139 };
1140
1141 void(void) nex_cc_check_grey = // used in key -- BADBAD HACKHACK
1142 {
1143         if(cvar("v_hwgamma") && cvar("vid_hardwaregammasupported") && cvar("v_color_enable"))
1144         {
1145                 self.flag = FLAG_AUTOSETCLICK;
1146                 self.color = ITEM_TEXT_NORMAL_COLOR;
1147         }
1148         else
1149         {
1150                 self.flag = FLAG_NOSELECT;
1151                 self.color = '0.5 0.5 0.5';
1152         }
1153 };
1154
1155 void(void) nex_cc_check_ncolor_enable =
1156 {
1157         if(!cvar("v_color_enable"))
1158         {
1159                 self.flag = FLAG_AUTOSETCLICK;
1160                 self.color = ITEM_TEXT_NORMAL_COLOR;
1161         }
1162         else
1163         {
1164                 self.flag = FLAG_NOSELECT;
1165                 self.color = '0.5 0.5 0.5';
1166         }
1167 };
1168
1169 void(void) nex_cc_check_color_enable =
1170 {
1171         if(cvar("v_color_enable"))
1172         {
1173                 self.flag = FLAG_AUTOSETCLICK;
1174                 self.color = ITEM_TEXT_NORMAL_COLOR;
1175         }
1176         else
1177         {
1178                 self.flag = FLAG_NOSELECT;
1179                 self.color = '0.5 0.5 0.5';
1180         }
1181 };
1182
1183 void(void) nex_cc_color_enable =
1184 {
1185         cvar_set("v_color_enable","1");
1186 };
1187
1188 void(void) nex_cc_ncolor_enable =
1189 {
1190         cvar_set("v_color_enable","0");
1191 };
1192
1193 void(void) nex_cc_grey_refresh =
1194 {
1195         self.value = cvar(strcat(self.cvarname,"_r"));
1196         self.value = self.value + cvar(strcat(self.cvarname,"_g"));
1197         self.value = self.value + cvar(strcat(self.cvarname,"_b"));
1198         self.value = self.value / 3;
1199 };
1200
1201
1202 void(void) nex_cc_grey_move =
1203 {
1204         string tmp;
1205         tmp = ftos(self.value);
1206         cvar_set(strcat(self.cvarname,"_r"), tmp);
1207         cvar_set(strcat(self.cvarname,"_g"), tmp);
1208         cvar_set(strcat(self.cvarname,"_b"), tmp);
1209 };
1210
1211 void(void) nex_cc_grey =
1212 {
1213         self.refresh = nex_cc_grey_refresh;
1214         self.slidermove = nex_cc_grey_move;
1215 };
1216
1217 // key control stuff
1218 void(void) nex_cntrl =
1219 {
1220         entity ent;
1221         ent = menu_getitem("options_control");
1222         nex_makeonlyvisible( ent );
1223         menu_jumptowindow(ent, false);
1224 }
1225
1226 const float NUMKEYS = 2;        // visible key count (first and secondary key)
1227 string bindcommand;
1228
1229 void(float keynr, float ascii) nex_con_keyhook =
1230 {
1231         entity ent;
1232
1233         //dprint("nex_con_keyhook called !\n");
1234
1235         if(keynr != K_ESCAPE)
1236         {
1237                 string tmp;
1238                 tmp = bind_getkeylist(bindcommand);
1239                 // remove the binds if we need more space
1240                 bind_limitbinds(NUMKEYS - 1, bindcommand);
1241                 // bind the new key
1242                 bind_bindkey(bind_getstringforkey(keynr), bindcommand);
1243         }
1244
1245         ent = menu_getitem("options_control_statemsg1");
1246         ent.value = 0;
1247
1248         ent = menu_getitem("options_control_statemsg2");
1249         ent.value = 0;
1250
1251         menu_keyhook = null_function;
1252 };
1253
1254 void(void) nex_con_action_key =
1255 {
1256         entity ent;
1257
1258         bindcommand = self.link;
1259
1260         //dprint("action called");
1261
1262         menu_keyhook = nex_con_keyhook;
1263
1264         ent = menu_getitem("options_control_statemsg1");
1265         ent.value = 1;
1266
1267         ent = menu_getitem("options_control_statemsg2");
1268         ent.value = 1;
1269 };
1270
1271 float(float keynr, float ascii) nex_con_key =
1272 {
1273         if(keynr == K_DEL)
1274         {
1275                 // the user wants to unbind this action
1276                 //dprint("Removing binds for '", self.link,"'\n");
1277                 bind_limitbinds(0, self.link);
1278                 return true;
1279         }
1280
1281         return false;
1282 };
1283
1284 void(void) nex_con_update_keys =
1285 {
1286         entity ent;
1287         string keystr;
1288         float num;
1289
1290         if(!self._child)
1291                 return;
1292
1293         keystr = strzone(bind_getkeylist(self.link));
1294
1295         num = 0;
1296
1297         for(ent = self._child; ent != null_entity; ent = ent._next)
1298         {
1299                 float keynr;
1300
1301                 keynr = stof(getaltstring(num, keystr));
1302
1303                 strunzone(ent.text);
1304
1305                 if(keynr == -1 )
1306                         ent.text = strzone("-");
1307                 else
1308                         ent.text = strzone(bind_getstringforkey(keynr));
1309
1310                 num = num + 1;
1311         }
1312
1313         strunzone(keystr);
1314 };
1315
1316 var float numkey = 0;
1317 void(void) CONTROL_KEY =
1318 {
1319         entity key1, key2, desc;
1320         entity temp_desc, temp_key;
1321
1322         temp_desc = menu_getitem("control_desc_template");
1323         temp_key = menu_getitem("control_key_template");
1324
1325         desc = spawn();
1326         copyentity(temp_desc, desc);
1327
1328         key1 = spawn();
1329         copyentity(temp_key, key1);
1330
1331         key2 = spawn();
1332         copyentity(temp_key, key2);
1333
1334         desc.name = self.text;
1335         key1.name = strzone(strcat(self.text, " key1"));
1336         key2.name = strzone(strcat(self.text, " key2"));
1337
1338         desc.pos_y = key1.pos_y = key2.pos_y = temp_desc.pos_y * numkey;
1339         key2.pos_x = 2 * key2.pos_x;
1340
1341         desc.text = self.text;
1342         desc.link = self.link;
1343
1344         key1.text = strzone("-");
1345         key2.text = strzone("-");
1346
1347         desc.alignment = 0;
1348
1349         // set the parents
1350         desc.parent = "options_control";
1351         desc._parent = menu_getitem("options_control");
1352
1353         key1.parent = key2.parent = desc.name;
1354         key1._parent = key2._parent = desc;
1355
1356         //eprint(key1);
1357         //eprint(key2);
1358         //eprint(desc);
1359
1360         numkey = numkey + 1;
1361 };
1362
1363 ////////////////////////////////////////////////////
1364 // Test Stuff
1365 ///
1366 void(void) initbrightness =
1367 {
1368         self.value = cvar("scr_conbrightness");
1369 };
1370
1371 void(void) setbrightness =
1372 {
1373         cvar_set("scr_conbrightness",ftos(self.value));
1374 };
1375
1376 void(void)  nex_main_exit =
1377 {
1378         entity e;
1379         e = menu_getitem("MAIN_MENU");
1380         e.flag = FLAG_NOSELECT + FLAG_CHILDDRAWONLY;
1381         e = menu_getitem("MAIN_EXIT_MENU");
1382         e.flag = FLAG_NOSELECT;
1383         menu_jumptowindow(e, false);
1384 };
1385
1386 void(void) nex_main_exit_no =
1387 {
1388         entity e;
1389         e = menu_getitem("MAIN_EXIT_MENU");
1390         e.flag = FLAG_NOSELECT + FLAG_HIDDEN;
1391         e = menu_getitem("MAIN_MENU");
1392         e.flag = FLAG_NOSELECT;
1393         menu_selectup();
1394 };
1395
1396 void(void) nex_main_exit_yes =
1397 {
1398         cmd("quit\n");
1399 };
1400
1401 float(float keynr, float ascii) nex_main_exit_key =
1402 {
1403         if(keynr == K_ESCAPE)
1404         {
1405                 nex_main_exit_no();
1406                 return true;
1407         }
1408         return false;
1409 }
1410
1411 void(void)  dorestart =
1412 {
1413         cmd("menu_restart\n");
1414 };
1415
1416 void(void) nex_text_cur_x =
1417 {
1418         self.text = ftos(rint(cursor_x));
1419 };
1420
1421 void(void) nex_text_cur_y =
1422 {
1423         self.text = ftos(rint(cursor_y));
1424 };