TakeV/dxx-rebirth
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity
dxx-rebirth/main/newmenu.c
kreatordxx d698e87960 warning fixes for gcc 4.0
2006-12-24 09:15:37 +00:00

3065 lines
76 KiB
C
Raw Blame History

/* $Id: newmenu.c,v 1.1.1.1 2006/03/17 19:57:33 zicodxx Exp $ */
/*
THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
*/
/*
*
* Routines for menus.
*
*/
#ifdef HAVE_CONFIG_H
#include <conf.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdarg.h>
#include <ctype.h>
#if !defined(_MSC_VER) && !defined(macintosh)
#include <unistd.h>
#endif
#include <limits.h>
#include <physfs.h>
#include "error.h"
#include "pstypes.h"
#include "gr.h"
#include "grdef.h"
#include "mono.h"
#include "songs.h"
#include "key.h"
#include "palette.h"
#include "game.h"
#include "text.h"
#include "menu.h"
#include "newmenu.h"
#include "gamefont.h"
#include "gamepal.h"
#ifdef NETWORK
#include "network.h"
#endif
#include "iff.h"
#include "pcx.h"
#include "u_mem.h"
#include "mouse.h"
#include "joy.h"
#include "digi.h"
#include "multi.h"
#include "endlevel.h"
#include "screens.h"
#include "config.h"
#include "player.h"
#include "newdemo.h"
#include "kconfig.h"
#include "strutil.h"
#include "vers_id.h"
#ifdef MACINTOSH
#include <Events.h>
#endif
#if defined (TACTILE)
#include "tactile.h"
#endif
#ifdef GP2X
#include "gp2x.h"
#endif
#define MAXDISPLAYABLEITEMS 15
#define LHX(x) ((x)*(MenuHires?2:1))
#define LHY(y) ((y)*(MenuHires?2.4:1))
#define TITLE_FONT HUGE_FONT
#define NORMAL_FONT MEDIUM1_FONT //normal, non-highlighted item
#define SELECTED_FONT MEDIUM2_FONT //highlighted item
#define SUBTITLE_FONT MEDIUM3_FONT
int newmenu_do4( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height, int TinyMode );
void show_extra_netgame_info(int choice);
int Newmenu_first_time = 1;
//--unused-- int Newmenu_fade_in = 1;
typedef struct bkg {
grs_canvas * menu_canvas;
grs_bitmap * saved; // The background under the menu.
grs_bitmap * background;
} bkg;
grs_bitmap nm_background,nm_background_save;
#define MESSAGEBOX_TEXT_SIZE 2176 // How many characters in messagebox (changed form 300 (fixes crash from show_game_score and friends) - 2000/01/18 Matt Mueller)
#define MAX_TEXT_WIDTH ((MenuHires)?FONTSCALE_X(200):100) // How many pixels wide a input box can be
#define MENSCALE_X ((MenuHires)?(SWIDTH/640):(SWIDTH/320))
#define MENSCALE_Y ((MenuHires)?(SHEIGHT/480):(SHEIGHT/200))
ubyte MenuReordering=0;
ubyte SurfingNet=0;
char Pauseable_menu=0;
char already_showing_info=0;
void newmenu_close() {
if ( nm_background.bm_data )
d_free(nm_background.bm_data);
if ( nm_background_save.bm_data )
d_free(nm_background_save.bm_data);
Newmenu_first_time = 1;
}
ubyte background_palette[768];
//should be called whenever the palette changes
void nm_remap_background()
{
if (!Newmenu_first_time) {
if (!nm_background.bm_data)
nm_background.bm_data = d_malloc(nm_background.bm_w * nm_background.bm_h);
memcpy(nm_background.bm_data,nm_background_save.bm_data,nm_background.bm_w * nm_background.bm_h);
gr_remap_bitmap_good( &nm_background, background_palette, -1, -1 );
}
}
#include <math.h>
extern char last_palette_loaded[];
void nm_draw_background1(char * filename)
{
int pcx_error;
grs_bitmap *bmp;
ubyte pal[256*3];
int width, height;
//@@//I think this only gets called to fill the whole screen
//@@Assert(grd_curcanv->cv_bitmap.bm_w == 320);
//@@Assert(grd_curcanv->cv_bitmap.bm_h == 200);
pcx_error = pcx_get_dimensions(filename, &width, &height);
if (pcx_error != PCX_ERROR_NONE)
Error("Could not open pcx file <%s>\n", filename);
bmp = gr_create_bitmap(width, height);
pcx_error = pcx_read_bitmap(filename,bmp,bmp->bm_type,pal);
Assert(pcx_error == PCX_ERROR_NONE);
//@@gr_remap_bitmap_good( bmp, pal, -1, -1 );
{ //remap stuff. this code is kindof a hack
//now, before we bring up the menu, we need to
//do some stuff to make sure the palette is ok. First, we need to
//get our current palette into the 2d's array, so the remapping will
//work. Second, we need to remap the fonts. Third, we need to fill
//in part of the fade tables so the darkening of the menu edges works
gr_copy_palette(gr_palette, pal, sizeof(gr_palette));
#ifdef OGL
gr_palette_load(gr_palette);
#endif
remap_fonts_and_menus(1);
}
show_fullscr(bmp);
gr_free_bitmap(bmp);
strcpy(last_palette_loaded,""); //force palette load next time
}
#define MENU_BACKGROUND_BITMAP_HIRES (cfexist("scoresb.pcx")?"scoresb.pcx":"scores.pcx")
#define MENU_BACKGROUND_BITMAP_LORES (cfexist("scores.pcx")?"scores.pcx":"scoresb.pcx") // Mac datafiles only have scoresb.pcx
#define MENU_BACKGROUND_BITMAP (MenuHires?MENU_BACKGROUND_BITMAP_HIRES:MENU_BACKGROUND_BITMAP_LORES)
int Background_hires;
int No_darkening=0;
void nm_draw_background(int x1, int y1, int x2, int y2 )
{
int w,h;
if (Newmenu_first_time || MenuHires!=Background_hires) {
int pcx_error;
if (Newmenu_first_time) {
atexit( newmenu_close );
Newmenu_first_time = 0;
nm_background_save.bm_data=NULL;
}
else {
if (nm_background_save.bm_data)
d_free(nm_background_save.bm_data);
if (nm_background.bm_data)
d_free(nm_background.bm_data);
}
pcx_error = pcx_read_bitmap(MENU_BACKGROUND_BITMAP,&nm_background_save,BM_LINEAR,background_palette);
Assert(pcx_error == PCX_ERROR_NONE);
nm_background = nm_background_save;
nm_background.bm_data=NULL;
nm_remap_background();
Background_hires = MenuHires;
}
if ( x1 < 0 ) x1 = 0;
if ( y1 < 0 ) y1 = 0;
w = x2-x1+1;
h = y2-y1+1;
x2 = x1 + w - 1;
y2 = y1 + h - 1;
if ( GWIDTH > nm_background.bm_w || GHEIGHT > nm_background.bm_h ){//Resize background to fit. Resize so that the original aspect is preserved. -MPM
grs_canvas *tmp,*old;
grs_bitmap bg;
old=grd_curcanv;
tmp=gr_create_sub_canvas(old,x1,y1,w,h);
gr_init_sub_bitmap(&bg,&nm_background,0,0,w/MENSCALE_X,h/MENSCALE_Y);//note that we haven't replaced current_canvas yet, so these macros are still ok.
gr_set_current_canvas(tmp);
show_fullscr( &bg );
gr_set_current_canvas(old);
gr_free_sub_canvas(tmp);
}else{
if (No_darkening)
gr_bm_bitblt(w, h, x1, y1, LHX(10), LHY(10), &nm_background, &(grd_curcanv->cv_bitmap) );
else
gr_bm_bitblt(w, h, x1, y1, 0, 0, &nm_background, &(grd_curcanv->cv_bitmap) );
}
if (!No_darkening) {
Gr_scanline_darkening_level = 2*7;
gr_setcolor( BM_XRGB(0,0,0) );
for (w=5*(GWIDTH/((MenuHires)?640.0:320.0));w>=0;w--)
gr_urect( x2-w, y1+w*((GHEIGHT/((MenuHires)?480.0:200.0))/(GWIDTH/((MenuHires)?640.0:320.0))), x2-w, y2-(GHEIGHT/((MenuHires)?480.0:200.0)) );//right edge
for (h=5*(GHEIGHT/((MenuHires)?480.0:200.0));h>=0;h--)
gr_urect( x1+h*((GWIDTH/((MenuHires)?640.0:320.0))/(GHEIGHT/((MenuHires)?480.0:200.0))), y2-h, x2, y2-h );//bottom edge
}
Gr_scanline_darkening_level = GR_FADE_LEVELS;
}
void nm_restore_background( int x, int y, int w, int h )
{
int x1, x2, y1, y2;
x1 = x; x2 = x+w-1;
y1 = y; y2 = y+h-1;
if ( x1 < 0 ) x1 = 0;
if ( y1 < 0 ) y1 = 0;
if ( x2 >= nm_background.bm_w ) x2=nm_background.bm_w-1;
if ( y2 >= nm_background.bm_h ) y2=nm_background.bm_h-1;
w = x2 - x1 + 1;
h = y2 - y1 + 1;
gr_bm_bitblt(w, h, x1, y1, x1, y1, &nm_background, &(grd_curcanv->cv_bitmap) );
}
// Draw a left justfied string
void nm_string( bkg * b, int w1,int x, int y, char * s)
{
int w,h,aw,tx=0,t=0,i;
char *p,*s1,*s2,measure[2];
int XTabs[]={15,87,124,162,228,253};
p=s1=NULL;
s2 = d_strdup(s);
for (i=0;i<6;i++) {
XTabs[i]=(LHX(XTabs[i]))*MENSCALE_X; // ZICO - we need this to get TABS right in netgames
XTabs[i]+=x;
}
measure[1]=0;
if (!SurfingNet) {
p = strchr( s2, '\t' );
if (p && (w1>0) ) {
*p = '\0';
s1 = p+1;
}
}
gr_get_string_size(s2, &w, &h, &aw );
if (w1 > 0)
w = w1;
// CHANGED
gr_bm_bitblt(b->background->bm_w-(15*MENSCALE_X), h+2, 5, y-1, 5, y-1, b->background, &(grd_curcanv->cv_bitmap) );
//gr_bm_bitblt(w, h, x, y, x, y, b->background, &(grd_curcanv->cv_bitmap) );
if (SurfingNet) {
for (i=0;i<strlen(s2);i++) {
if (s2[i]=='\t' && SurfingNet) {
x=XTabs[t];
t++;
continue;
}
measure[0]=s2[i];
gr_get_string_size(measure,&tx,&h,&aw);
gr_string(x,y,measure);
x+=tx;
}
}
else
gr_string (x,y,s2);
if (!SurfingNet && p && (w1>0) ) {
gr_get_string_size(s1, &w, &h, &aw );
gr_string( x+w1-w, y, s1 );
*p = '\t';
}
d_free(s2);
}
// Draw a slider and it's string
void nm_string_slider( bkg * b, int w1,int x, int y, char * s )
{
int w,h,aw;
char *p,*s1;
s1=NULL;
p = strchr( s, '\t' );
if (p) {
*p = '\0';
s1 = p+1;
}
gr_get_string_size(s, &w, &h, &aw );
// CHANGED
gr_bm_bitblt(b->background->bm_w-(15*MENSCALE_X), h, 5, y, 5, y, b->background, &(grd_curcanv->cv_bitmap) );
//gr_bm_bitblt(w, h, x, y, x, y, b->background, &(grd_curcanv->cv_bitmap) );
gr_string( x, y, s );
if (p) {
gr_get_string_size(s1, &w, &h, &aw );
// CHANGED
gr_bm_bitblt(w, 1, x+w1-w, y, x+w1-w, y, b->background, &(grd_curcanv->cv_bitmap) );
// CHANGED
gr_bm_bitblt(w, 1, x+w1-w, y+h-1, x+w1-w, y, b->background, &(grd_curcanv->cv_bitmap) );
gr_string( x+w1-w, y, s1 );
*p = '\t';
}
}
// Draw a left justfied string with black background.
void nm_string_black( bkg * b, int w1,int x, int y, char * s )
{
int w,h,aw;
gr_get_string_size(s, &w, &h, &aw );
b = b;
if (w1 == 0) w1 = w;
gr_setcolor( BM_XRGB(2,2,2) );
gr_rect( x-1, y-1, x-1, y+h-1 );
gr_rect( x-1, y-1, x+w1-1, y-1 );
gr_setcolor( BM_XRGB(5,5,5) );
gr_rect( x, y+h, x+w1, y+h);
gr_rect( x+w1, y-1, x+w1, y+h );
gr_setcolor( BM_XRGB(0,0,0) );
gr_rect( x, y, x+w1-1, y+h-1 );
gr_string( x+1, y+1, s );
}
// Draw a right justfied string
void nm_rstring( bkg * b,int w1,int x, int y, char * s )
{
int w,h,aw;
gr_get_string_size(s, &w, &h, &aw );
x -= 3;
if (w1 == 0) w1 = w;
//mprintf( 0, "Width = %d, string='%s'\n", w, s );
// CHANGED
gr_bm_bitblt(w1, h, x-w1, y, x-w1, y, b->background, &(grd_curcanv->cv_bitmap) );
gr_string( x-w, y, s );
}
#include "timer.h"
//for text items, constantly redraw cursor (to achieve flash)
void update_cursor( newmenu_item *item)
{
int w,h,aw;
fix time = timer_get_approx_seconds();
int x,y;
char * text = item->text;
Assert(item->type==NM_TYPE_INPUT_MENU || item->type==NM_TYPE_INPUT);
while( *text ) {
gr_get_string_size(text, &w, &h, &aw );
if ( w > item->w-10 )
text++;
else
break;
}
if (*text==0)
w = 0;
x = item->x+w; y = item->y;
if (time & 0x8000)
gr_string( x, y, CURSOR_STRING );
else {
gr_setcolor( BM_XRGB(0,0,0) );
gr_rect( x, y, x+FONTSCALE_X(grd_curcanv->cv_font->ft_w-1), y+FONTSCALE_Y(grd_curcanv->cv_font->ft_h-1) );
}
}
void nm_string_inputbox( bkg *b, int w, int x, int y, char * text, int current )
{
int w1,h1,aw;
while( *text ) {
gr_get_string_size(text, &w1, &h1, &aw );
if ( w1 > w-10 )
text++;
else
break;
}
if ( *text == 0 )
w1 = 0;
nm_string_black( b, w, x, y, text );
if ( current ) {
gr_string( x+w1+1, y, CURSOR_STRING );
}
}
void draw_item( bkg * b, newmenu_item *item, int is_current,int tiny )
{
if (tiny)
{
if (is_current)
gr_set_fontcolor(gr_find_closest_color_current(57,49,20),-1);
else
gr_set_fontcolor(gr_find_closest_color_current(29,29,47),-1);
if (item->text[0]=='\t')
gr_set_fontcolor (gr_find_closest_color_current(63,63,63),-1);
}
else
{
if (is_current)
grd_curcanv->cv_font = SELECTED_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
#ifdef WINDOWS
if (is_current && item->type == NM_TYPE_TEXT)
grd_curcanv->cv_font = NORMAL_FONT;
#endif
}
switch( item->type ) {
case NM_TYPE_TEXT:
// grd_curcanv->cv_font=TEXT_FONT;
// fall through on purpose
case NM_TYPE_MENU:
nm_string( b, item->w, item->x, item->y, item->text );
break;
case NM_TYPE_SLIDER: {
int j;
if (item->value < item->min_value) item->value=item->min_value;
if (item->value > item->max_value) item->value=item->max_value;
sprintf( item->saved_text, "%s\t%s", item->text, SLIDER_LEFT );
for (j=0; j<(item->max_value-item->min_value+1); j++ ) {
sprintf( item->saved_text, "%s%s", item->saved_text,SLIDER_MIDDLE );
}
sprintf( item->saved_text, "%s%s", item->saved_text,SLIDER_RIGHT );
item->saved_text[item->value+1+strlen(item->text)+1] = SLIDER_MARKER[0];
nm_string_slider( b, item->w, item->x, item->y, item->saved_text );
}
break;
case NM_TYPE_INPUT_MENU:
if ( item->group==0 ) {
nm_string( b, item->w, item->x, item->y, item->text );
} else {
nm_string_inputbox( b, item->w, item->x, item->y, item->text, is_current );
}
break;
case NM_TYPE_INPUT:
nm_string_inputbox( b, item->w, item->x, item->y, item->text, is_current );
break;
case NM_TYPE_CHECK:
nm_string( b, item->w, item->x, item->y, item->text );
if (item->value)
nm_rstring( b,item->right_offset,item->x, item->y, CHECKED_CHECK_BOX );
else
nm_rstring( b,item->right_offset,item->x, item->y, NORMAL_CHECK_BOX );
break;
case NM_TYPE_RADIO:
nm_string( b, item->w, item->x, item->y, item->text );
if (item->value)
nm_rstring( b,item->right_offset, item->x, item->y, CHECKED_RADIO_BOX );
else
nm_rstring( b,item->right_offset, item->x, item->y, NORMAL_RADIO_BOX );
break;
case NM_TYPE_NUMBER: {
char text[10];
if (item->value < item->min_value) item->value=item->min_value;
if (item->value > item->max_value) item->value=item->max_value;
nm_string( b, item->w, item->x, item->y, item->text );
sprintf( text, "%d", item->value );
nm_rstring( b,item->right_offset,item->x, item->y, text );
}
break;
}
}
char *Newmenu_allowed_chars=NULL;
//returns true if char is allowed
int char_allowed(char c)
{
char *p = Newmenu_allowed_chars;
if (!p)
return 1;
while (*p) {
Assert(p[1]);
if (c>=p[0] && c<=p[1])
return 1;
p += 2;
}
return 0;
}
void strip_end_whitespace( char * text )
{
int i,l;
l = strlen( text );
for (i=l-1; i>=0; i-- ) {
if ( isspace(text[i]) )
text[i] = 0;
else
return;
}
}
int newmenu_do( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem) )
{
return newmenu_do3( title, subtitle, nitems, item, subfunction, 0, NULL, -1, -1 );
}
int newmenu_dotiny( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem) )
{
return newmenu_do4( title, subtitle, nitems, item, subfunction, 0, NULL, FONTSCALE_X(LHX(310)), -1, 1 );
}
int newmenu_dotiny2( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem) )
{
return newmenu_do4( title, subtitle, nitems, item, subfunction, 0, NULL, -1, -1, 1 );
}
int newmenu_do1( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem )
{
return newmenu_do3( title, subtitle, nitems, item, subfunction, citem, NULL, -1, -1 );
}
int newmenu_do2( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename )
{
return newmenu_do3( title, subtitle, nitems, item, subfunction, citem, filename, -1, -1 );
}
int newmenu_do3( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height )
{
return newmenu_do4( title, subtitle, nitems, item, subfunction, citem, filename, width, height,0 );
}
int newmenu_do_fixedfont( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height){
set_screen_mode(SCREEN_MENU);//hafta set the screen mode before calling or fonts might get changed/freed up if screen res changes
// return newmenu_do3_real( title, subtitle, nitems, item, subfunction, citem, filename, width,height, GAME_FONT, GAME_FONT, GAME_FONT, GAME_FONT);
return newmenu_do4( title, subtitle, nitems, item, subfunction, citem, filename, width,height, 0);
}
//returns 1 if a control device button has been pressed
int check_button_press()
{
int i;
switch (Config_control_type) {
case CONTROL_JOYSTICK:
case CONTROL_FLIGHTSTICK_PRO:
case CONTROL_THRUSTMASTER_FCS:
case CONTROL_GRAVIS_GAMEPAD:
case CONTROL_JOYMOUSE:
for (i=0; i<4; i++ )
if (joy_get_button_down_cnt(i)>0) return 1;
break;
case CONTROL_MOUSE:
case CONTROL_CYBERMAN:
#ifndef NEWMENU_MOUSE // don't allow mouse to continue from menu
for (i=0; i<3; i++ )
if (mouse_button_down_count(i)>0) return 1;
break;
#endif
case CONTROL_WINJOYSTICK:
#ifdef WINDOWS
for (i=0; i<4; i++ )
if (joy_get_button_down_cnt(i)>0) return 1;
#endif
break;
case CONTROL_NONE: //keyboard only
#ifdef APPLE_DEMO
if (key_checkch()) return 1;
#endif
break;
default:
Error("Bad control type (Config_control_type):%i",Config_control_type);
}
return 0;
}
int Menu_Special = 0;
extern int network_request_player_names(int);
extern int RestoringMenu;
#ifdef NEWMENU_MOUSE
ubyte Hack_DblClick_MenuMode=0;
#endif
#ifdef MACINTOSH
extern ubyte joydefs_calibrating;
#else
# define joydefs_calibrating 0
#endif
#define CLOSE_X (MenuHires?(15*(SWIDTH/640)):(7*(SWIDTH/320)))
#define CLOSE_Y (MenuHires?(15*(SHEIGHT/480)):(7*(SHEIGHT/200)))
#define CLOSE_SIZE (MenuHires?FONTSCALE_X(10):5)
void draw_close_box(int x,int y)
{
gr_setcolor( BM_XRGB(0, 0, 0) );
gr_rect(x + CLOSE_X, y + CLOSE_Y, x + CLOSE_X + CLOSE_SIZE, y + CLOSE_Y + CLOSE_SIZE);
gr_setcolor( BM_XRGB(21, 21, 21) );
gr_rect(x + CLOSE_X + LHX(1), y + CLOSE_Y + LHX(1), x + CLOSE_X + CLOSE_SIZE - LHX(1), y + CLOSE_Y + CLOSE_SIZE - LHX(1));
}
int newmenu_do4( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int citem, char * filename, int width, int height, int TinyMode )
{
int old_keyd_repeat, done;
int choice,old_choice,i,j,x,y,w,h,aw, tw, th, twidth,fm,right_offset;
int k, nmenus, nothers,ScrollOffset=0,LastScrollCheck=-1,MaxDisplayable,sx,sy;
grs_font * save_font;
int string_width, string_height, average_width;
int ty;
bkg bg;
int all_text=0; //set true if all text items
int sound_stopped=0,time_stopped=0;
int TopChoice,IsScrollBox=0; // Is this a scrolling box? Set to false at init
char *Temp,TempVal;
int dont_restore=0;
int MaxOnMenu=MAXDISPLAYABLEITEMS;
grs_canvas *save_canvas;
int background_is_sub;
#ifdef NEWMENU_MOUSE
int mouse_state, omouse_state, dblclick_flag=0;
int mx=0, my=0, x1 = 0, x2, y1, y2;
int close_box=0;
#endif
#ifdef MACINTOSH
EventRecord event; // looking for disk inserted events for CD mounts
#endif
WIN(if (!_AppActive) return -1); // Don't draw message if minimized!
newmenu_hide_cursor();
if (nitems < 1 )
{
return -1;
}
MaxDisplayable=nitems;
//set_screen_mode(SCREEN_MENU);
set_popup_screen();
if ( Function_mode == FMODE_GAME && !(Game_mode & GM_MULTI)) {
digi_pause_digi_sounds();
sound_stopped = 1;
}
if (!((Game_mode & GM_MULTI) && (Function_mode == FMODE_GAME) && (!Endlevel_sequence)) )
{
time_stopped = 1;
stop_time();
#ifdef TACTILE
if (TactileStick)
DisableForces();
#endif
}
save_canvas = grd_curcanv;
gr_set_current_canvas(NULL);
save_font = grd_curcanv->cv_font;
tw = th = 0;
if ( title ) {
grd_curcanv->cv_font = TITLE_FONT;
gr_get_string_size(title,&string_width,&string_height,&average_width );
tw = string_width;
th = string_height;
}
if ( subtitle ) {
grd_curcanv->cv_font = SUBTITLE_FONT;
gr_get_string_size(subtitle,&string_width,&string_height,&average_width );
if (string_width > tw )
tw = string_width;
th += string_height;
}
th += LHY(8); //put some space between titles & body
if (TinyMode)
grd_curcanv->cv_font = SMALL_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
w = aw = 0;
h = th;
nmenus = nothers = 0;
// Find menu height & width (store in w,h)
for (i=0; i<nitems; i++ ) {
item[i].redraw=1;
item[i].y = h;
gr_get_string_size(item[i].text,&string_width,&string_height,&average_width );
item[i].right_offset = 0;
if (SurfingNet)
string_height+=LHY(3);
item[i].saved_text[0] = '\0';
if ( item[i].type == NM_TYPE_SLIDER ) {
int w1,h1,aw1;
nothers++;
sprintf( item[i].saved_text, "%s", SLIDER_LEFT );
for (j=0; j<(item[i].max_value-item[i].min_value+1); j++ ) {
sprintf( item[i].saved_text, "%s%s", item[i].saved_text,SLIDER_MIDDLE );
}
sprintf( item[i].saved_text, "%s%s", item[i].saved_text,SLIDER_RIGHT );
gr_get_string_size(item[i].saved_text,&w1,&h1,&aw1 );
string_width += w1 + aw;
}
if ( item[i].type == NM_TYPE_MENU ) {
nmenus++;
}
if ( item[i].type == NM_TYPE_CHECK ) {
int w1,h1,aw1;
nothers++;
gr_get_string_size(NORMAL_CHECK_BOX, &w1, &h1, &aw1 );
item[i].right_offset = w1;
gr_get_string_size(CHECKED_CHECK_BOX, &w1, &h1, &aw1 );
if (w1 > item[i].right_offset)
item[i].right_offset = w1;
}
if (item[i].type == NM_TYPE_RADIO ) {
int w1,h1,aw1;
nothers++;
gr_get_string_size(NORMAL_RADIO_BOX, &w1, &h1, &aw1 );
item[i].right_offset = w1;
gr_get_string_size(CHECKED_RADIO_BOX, &w1, &h1, &aw1 );
if (w1 > item[i].right_offset)
item[i].right_offset = w1;
}
if (item[i].type==NM_TYPE_NUMBER ) {
int w1,h1,aw1;
char test_text[20];
nothers++;
sprintf( test_text, "%d", item[i].max_value );
gr_get_string_size( test_text, &w1, &h1, &aw1 );
item[i].right_offset = w1;
sprintf( test_text, "%d", item[i].min_value );
gr_get_string_size( test_text, &w1, &h1, &aw1 );
if ( w1 > item[i].right_offset)
item[i].right_offset = w1;
}
if ( item[i].type == NM_TYPE_INPUT ) {
Assert( strlen(item[i].text) < NM_MAX_TEXT_LEN );
strcpy(item[i].saved_text, item[i].text );
nothers++;
string_width = item[i].text_len*FONTSCALE_X(grd_curcanv->cv_font->ft_w+((MenuHires?3:1))*item[i].text_len);
if ( string_width > MAX_TEXT_WIDTH )
string_width = MAX_TEXT_WIDTH;
item[i].value = -1;
}
if ( item[i].type == NM_TYPE_INPUT_MENU ) {
Assert( strlen(item[i].text) < NM_MAX_TEXT_LEN );
strcpy(item[i].saved_text, item[i].text );
nmenus++;
string_width = item[i].text_len*FONTSCALE_X(grd_curcanv->cv_font->ft_w+((MenuHires?3:1))*item[i].text_len);
item[i].value = -1;
item[i].group = 0;
}
item[i].w = string_width;
item[i].h = string_height;
if ( string_width > w )
w = string_width; // Save maximum width
if ( average_width > aw )
aw = average_width;
h += string_height+1; // Find the height of all strings
}
// Big hack for allowing the netgame options menu to spill over
MaxOnMenu=MAXDISPLAYABLEITEMS;
if (ExtGameStatus==GAMESTAT_NETGAME_OPTIONS || ExtGameStatus==GAMESTAT_MORE_NETGAME_OPTIONS)
MaxOnMenu++;
if (!TinyMode && (h>((MaxOnMenu+1)*(string_height+1))+(LHY(8))))
{
IsScrollBox=1;
h=(MaxOnMenu*(string_height+1)+LHY(8));
MaxDisplayable=MaxOnMenu;
mprintf ((0,"Hey, this is a scroll box!\n"));
}
else
IsScrollBox=0;
right_offset=0;
if ( width > -1 )
w = width;
if ( height > -1 )
h = height;
for (i=0; i<nitems; i++ ) {
item[i].w = w;
if (item[i].right_offset > right_offset )
right_offset = item[i].right_offset;
}
if (right_offset > 0 )
right_offset += 3;
//gr_get_string_size("",&string_width,&string_height,&average_width );
w += right_offset;
twidth = 0;
if ( tw > w ) {
twidth = ( tw - w )/2;
w = tw;
}
if (RestoringMenu)
{ right_offset=0; twidth=0;}
mprintf(( 0, "Right offset = %d\n", right_offset ));
// Find min point of menu border
w += (MenuHires?60:30)*MENSCALE_X;
h += (MenuHires?60:30)*MENSCALE_Y;
if ( w > grd_curcanv->cv_bitmap.bm_w ) w = grd_curcanv->cv_bitmap.bm_w;
if ( h > grd_curcanv->cv_bitmap.bm_h ) h = grd_curcanv->cv_bitmap.bm_h;
x = (grd_curcanv->cv_bitmap.bm_w-w)/2;
y = (grd_curcanv->cv_bitmap.bm_h-h)/2;
if ( x < 0 ) x = 0;
if ( y < 0 ) y = 0;
if ( filename != NULL ) {
nm_draw_background1( filename );
gr_palette_load(gr_palette);
}
// Save the background of the display
bg.menu_canvas = gr_create_sub_canvas( &grd_curscreen->sc_canvas, x, y, w+MENSCALE_X, h+MENSCALE_Y );
gr_set_current_canvas(bg.menu_canvas);
if ( filename == NULL ) {
// Save the background under the menu...
#ifdef TACTILE
if (TactileStick)
DisableForces();
#endif
bg.saved = gr_create_bitmap( w+MENSCALE_X, h+MENSCALE_Y );
Assert( bg.saved != NULL );
gr_bm_bitblt(w+MENSCALE_X, h+MENSCALE_Y, 0, 0, 0, 0, &grd_curcanv->cv_bitmap, bg.saved );
gr_set_current_canvas( NULL );
nm_draw_background(x,y,x+w-1,y+h-1);
if (GWIDTH > nm_background.bm_w || GHEIGHT > nm_background.bm_h){
grs_bitmap sbg;
gr_init_sub_bitmap(&sbg,&nm_background,0,0,w/MENSCALE_X,h/MENSCALE_Y);//use the correctly resized portion of the background instead of the whole thing -MPM
bg.background=gr_create_bitmap(w,h);
gr_bitmap_scale_to(&sbg,bg.background);
background_is_sub=0;
}else{
bg.background = gr_create_sub_bitmap(&nm_background,0,0,w,h);
background_is_sub=1;
}
gr_set_current_canvas( bg.menu_canvas );
} else {
bg.saved = NULL;
bg.background = gr_create_bitmap( w, h );
Assert( bg.background != NULL );
gr_bm_bitblt(w, h, 0, 0, 0, 0, &grd_curcanv->cv_bitmap, bg.background );
}
ty = (MenuHires?30:15)*MENSCALE_Y;
if(Menu_Special==1)
{
grs_canvas *saved_canvas = grd_curcanv;
grd_curcanv = &grd_curscreen->sc_canvas;
grd_curcanv->cv_font = GAME_FONT;
gr_set_fontcolor( GR_GETCOLOR(25,0,0), -1);
gr_printf(0x8000,GHEIGHT-FONTSCALE_Y(grd_curcanv->cv_font->ft_h*3),DESCENT_VERSION);
grd_curcanv = saved_canvas;
Menu_Special = 0;
}
if ( title ) {
grd_curcanv->cv_font = TITLE_FONT;
gr_set_fontcolor( GR_GETCOLOR(31,31,31), -1 );
gr_get_string_size(title,&string_width,&string_height,&average_width );
tw = string_width;
th = string_height;
gr_printf( 0x8000, ty, title );
ty += th;
}
if ( subtitle ) {
grd_curcanv->cv_font = SUBTITLE_FONT;
gr_set_fontcolor( GR_GETCOLOR(21,21,21), -1 );
gr_get_string_size(subtitle,&string_width,&string_height,&average_width );
tw = string_width;
th = string_height;
gr_printf( 0x8000, ty, subtitle );
ty += th;
}
if (TinyMode)
grd_curcanv->cv_font = SMALL_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
// Update all item's x & y values.
for (i=0; i<nitems; i++ ) {
item[i].x = (MenuHires?30:15)*MENSCALE_X + twidth + right_offset;
item[i].y += (MenuHires?30:15)*MENSCALE_Y;
if ( item[i].type==NM_TYPE_RADIO ) {
fm = -1; // find first marked one
for ( j=0; j<nitems; j++ ) {
if ( item[j].type==NM_TYPE_RADIO && item[j].group==item[i].group ) {
if (fm==-1 && item[j].value)
fm = j;
item[j].value = 0;
}
}
if ( fm>=0 )
item[fm].value=1;
else
item[i].value=1;
}
}
old_keyd_repeat = keyd_repeat;
keyd_repeat = 1;
if (citem==-1) {
choice = -1;
} else {
if (citem < 0 ) citem = 0;
if (citem > nitems-1 ) citem = nitems-1;
choice = citem;
#ifdef NEWMENU_MOUSE
dblclick_flag = 1;
#endif
while ( item[choice].type==NM_TYPE_TEXT ) {
choice++;
if (choice >= nitems ) {
choice=0;
}
if (choice == citem ) {
choice=0;
all_text=1;
break;
}
}
}
done = 0;
TopChoice=choice;
gr_update();
// Clear mouse, joystick to clear button presses.
game_flush_inputs();
#ifdef NEWMENU_MOUSE
mouse_state = omouse_state = 0;
if (filename == NULL && !MenuReordering) {
draw_close_box(0,0);
close_box = 1;
}
if (!MenuReordering && !joydefs_calibrating)
{
newmenu_show_cursor();
# ifdef WINDOWS
SetCursor(LoadCursor(NULL,IDC_ARROW));
# endif
}
#endif
mprintf ((0,"Set to true!\n"));
while(!done) {
#ifdef NEWMENU_MOUSE
if (!joydefs_calibrating)
newmenu_show_cursor(); // possibly hidden
omouse_state = mouse_state;
if (!MenuReordering)
mouse_state = mouse_button_state(0);
//@@ mprintf ((0,"mouse state:%d\n",mouse_state));
#endif
//see if redbook song needs to be restarted
songs_check_redbook_repeat();
//network_listen();
k = key_inkey();
if (subfunction)
(*subfunction)(nitems,item,&k,choice);
#ifdef NETWORK
if (!time_stopped) {
// Save current menu box
if (multi_menu_poll() == -1)
k = -2;
}
#endif
if ( k<-1 ) {
dont_restore = (k == -3); //-3 means don't restore
choice = k;
k = -1;
done = 1;
}
if (check_button_press())
done = 1;
// if ( (nmenus<2) && (k>0) && (nothers==0) )
// done=1;
old_choice = choice;
switch( k ) {
#ifdef NETWORK
case KEY_I:
if (SurfingNet && !already_showing_info)
{
show_extra_netgame_info(choice-2);
}
if (SurfingNet && already_showing_info)
{
done=1;
choice=-1;
}
break;
case KEY_U:
if (SurfingNet && !already_showing_info)
{
network_request_player_names(choice-2);
}
if (SurfingNet && already_showing_info)
{
done=1;
choice=-1;
}
break;
#endif
case KEY_PAUSE:
if (Pauseable_menu)
{
Pauseable_menu=0;
done=1;
choice=-1;
}
break;
case KEY_TAB + KEY_SHIFTED:
case KEY_UP:
case KEY_PAD8:
if (all_text) break;
do {
choice--;
if (IsScrollBox)
{
LastScrollCheck=-1;
mprintf ((0,"Scrolling! Choice=%d\n",choice));
if (choice<TopChoice)
{ choice=TopChoice; break; }
if (choice<ScrollOffset)
{
for (i=0;i<nitems;i++)
item[i].redraw=1;
ScrollOffset--;
mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
}
}
else
{
if (choice >= nitems ) choice=0;
if (choice < 0 ) choice=nitems-1;
}
} while ( item[choice].type==NM_TYPE_TEXT );
if ((item[choice].type==NM_TYPE_INPUT) && (choice!=old_choice))
item[choice].value = -1;
if ((old_choice>-1) && (item[old_choice].type==NM_TYPE_INPUT_MENU) && (old_choice!=choice)) {
item[old_choice].group=0;
strcpy(item[old_choice].text, item[old_choice].saved_text );
item[old_choice].value = -1;
}
if (old_choice>-1)
item[old_choice].redraw = 1;
item[choice].redraw=1;
break;
case KEY_TAB:
case KEY_DOWN:
case KEY_PAD2:
// ((0,"Pressing down! IsScrollBox=%d",IsScrollBox));
if (all_text) break;
do {
choice++;
if (IsScrollBox)
{
LastScrollCheck=-1;
mprintf ((0,"Scrolling! Choice=%d\n",choice));
if (choice==nitems)
{ choice--; break; }
if (choice>=MaxOnMenu+ScrollOffset)
{
for (i=0;i<nitems;i++)
item[i].redraw=1;
ScrollOffset++;
mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
}
}
else
{
if (choice < 0 ) choice=nitems-1;
if (choice >= nitems ) choice=0;
}
} while ( item[choice].type==NM_TYPE_TEXT );
if ((item[choice].type==NM_TYPE_INPUT) && (choice!=old_choice))
item[choice].value = -1;
if ( (old_choice>-1) && (item[old_choice].type==NM_TYPE_INPUT_MENU) && (old_choice!=choice)) {
item[old_choice].group=0;
strcpy(item[old_choice].text, item[old_choice].saved_text );
item[old_choice].value = -1;
}
if (old_choice>-1)
item[old_choice].redraw=1;
item[choice].redraw=1;
break;
case KEY_SPACEBAR:
if ( choice > -1 ) {
switch( item[choice].type ) {
case NM_TYPE_MENU:
case NM_TYPE_INPUT:
case NM_TYPE_INPUT_MENU:
break;
case NM_TYPE_CHECK:
if ( item[choice].value )
item[choice].value = 0;
else
item[choice].value = 1;
mprintf ((0,"ISB=%d MDI=%d SO=%d choice=%d\n",IsScrollBox,MAXDISPLAYABLEITEMS,ScrollOffset,choice));
if (IsScrollBox)
{
if (choice==(MaxOnMenu+ScrollOffset-1) || choice==ScrollOffset)
{
mprintf ((0,"Special redraw!\n"));
LastScrollCheck=-1;
}
}
item[choice].redraw=1;
break;
case NM_TYPE_RADIO:
for (i=0; i<nitems; i++ ) {
if ((i!=choice) && (item[i].type==NM_TYPE_RADIO) && (item[i].group==item[choice].group) && (item[i].value) ) {
item[i].value = 0;
item[i].redraw = 1;
}
}
item[choice].value = 1;
item[choice].redraw = 1;
break;
}
}
break;
case KEY_SHIFTED+KEY_UP:
if (MenuReordering && choice!=TopChoice)
{
Temp=item[choice].text;
TempVal=item[choice].value;
item[choice].text=item[choice-1].text;
item[choice].value=item[choice-1].value;
item[choice-1].text=Temp;
item[choice-1].value=TempVal;
item[choice].redraw=1;
item[choice-1].redraw=1;
choice--;
}
break;
case KEY_SHIFTED+KEY_DOWN:
if (MenuReordering && choice!=(nitems-1))
{
Temp=item[choice].text;
TempVal=item[choice].value;
item[choice].text=item[choice+1].text;
item[choice].value=item[choice+1].value;
item[choice+1].text=Temp;
item[choice+1].value=TempVal;
item[choice].redraw=1;
item[choice+1].redraw=1;
choice++;
}
break;
case KEY_ENTER:
case KEY_PADENTER:
#ifdef GP2X
case GP2X_BUTTON_B:
#endif
if ( (choice>-1) && (item[choice].type==NM_TYPE_INPUT_MENU) && (item[choice].group==0)) {
item[choice].group = 1;
item[choice].redraw = 1;
if ( !strnicmp( item[choice].saved_text, TXT_EMPTY, strlen(TXT_EMPTY) ) ) {
item[choice].text[0] = 0;
item[choice].value = -1;
} else {
strip_end_whitespace(item[choice].text);
}
} else
done = 1;
break;
case KEY_ESC:
if ( (choice>-1) && (item[choice].type==NM_TYPE_INPUT_MENU) && (item[choice].group==1)) {
item[choice].group=0;
strcpy(item[choice].text, item[choice].saved_text );
item[choice].redraw=1;
item[choice].value = -1;
} else {
done = 1;
choice = -1;
}
break;
MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_3:)
case KEY_PRINT_SCREEN:
MAC(newmenu_hide_cursor());
save_screen_shot(0);
for (i=0;i<nitems;i++)
item[i].redraw=1;
MAC(newmenu_show_cursor());
MAC(key_flush());
break;
#ifdef MACINTOSH
case KEY_COMMAND+KEY_RIGHT:
songs_goto_next_song();
break;
case KEY_COMMAND+KEY_LEFT:
songs_goto_prev_song();
break;
case KEY_COMMAND+KEY_UP:
songs_play_level_song(1);
break;
case KEY_COMMAND+KEY_DOWN:
songs_stop_redbook();
break;
case KEY_COMMAND+KEY_M:
k = -1;
#if !defined(SHAREWARE) || defined(APPLE_DEMO)
if ( (Game_mode & GM_MULTI) ) // don't process in multiplayer games
break;
key_close(); // no processing of keys with keyboard handler.. jeez
stop_time();
newmenu_hide_cursor();
show_boxed_message ("Mounting CD\nESC to quit");
RBAMountDisk(); // OS has totaly control of the CD.
if (Function_mode == FMODE_MENU)
songs_play_song(SONG_TITLE,1);
else if (Function_mode == FMODE_GAME)
songs_play_level_song( Current_level_num );
clear_boxed_message();
newmenu_show_cursor();
key_init();
key_flush();
start_time();
#endif
break;
case KEY_COMMAND+KEY_E:
songs_stop_redbook();
RBAEjectDisk();
k = -1; // force key not to register
break;
case KEY_COMMAND+KEY_Q: {
extern void macintosh_quit();
if ( !(Game_mode & GM_MULTI) )
macintosh_quit();
if (!joydefs_calibrating)
newmenu_show_cursor();
k = -1; // force key not to register
break;
}
#endif
#ifndef NDEBUG
case KEY_BACKSP:
if ( (choice>-1) && (item[choice].type!=NM_TYPE_INPUT)&&(item[choice].type!=NM_TYPE_INPUT_MENU))
Int3();
break;
#endif
}
#ifdef NEWMENU_MOUSE // for mouse selection of menu's etc.
if ( !done && mouse_state && !omouse_state && !all_text ) {
mouse_get_pos(&mx, &my);
for (i=0; i<nitems; i++ ) {
x1 = grd_curcanv->cv_bitmap.bm_x + item[i].x - item[i].right_offset - 6;
x2 = x1 + item[i].w;
y1 = grd_curcanv->cv_bitmap.bm_y + item[i].y;
y2 = y1 + item[i].h;
if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2))) {
if (i+ScrollOffset != choice) {
if(Hack_DblClick_MenuMode) dblclick_flag = 0;
}
choice = i + ScrollOffset;
switch( item[choice].type ) {
case NM_TYPE_CHECK:
if ( item[choice].value )
item[choice].value = 0;
else
item[choice].value = 1;
item[choice].redraw=1;
if (IsScrollBox)
LastScrollCheck=-1;
#if 0
if (IsScrollBox)
{
if (choice==(MaxOnMenu+ScrollOffset-1) || choice==ScrollOffset)
{
mprintf ((0,"Special redraw!\n"));
LastScrollCheck=-1;
}
}
#endif
break;
case NM_TYPE_RADIO:
for (i=0; i<nitems; i++ ) {
if ((i!=choice) && (item[i].type==NM_TYPE_RADIO) && (item[i].group==item[choice].group) && (item[i].value) ) {
item[i].value = 0;
item[i].redraw = 1;
}
}
item[choice].value = 1;
item[choice].redraw = 1;
break;
}
item[old_choice].redraw=1;
break;
}
}
}
if (mouse_state && all_text)
done = 1;
if ( !done && mouse_state && !all_text ) {
mouse_get_pos(&mx, &my);
// check possible scrollbar stuff first
if (IsScrollBox) {
int arrow_width, arrow_height, aw;
if (ScrollOffset != 0) {
gr_get_string_size(UP_ARROW_MARKER, &arrow_width, &arrow_height, &aw);
x2 = grd_curcanv->cv_bitmap.bm_x + item[ScrollOffset].x-(MenuHires?24:12);
y1 = grd_curcanv->cv_bitmap.bm_y + item[ScrollOffset].y-((string_height+1)*ScrollOffset);
x1 = x1 - arrow_width;
y2 = y1 + arrow_height;
if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
choice--;
LastScrollCheck=-1;
mprintf ((0,"Scrolling! Choice=%d\n",choice));
if (choice<ScrollOffset)
{
for (i=0;i<nitems;i++)
item[i].redraw=1;
ScrollOffset--;
mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
}
}
}
if (ScrollOffset+MaxDisplayable<nitems) {
gr_get_string_size(DOWN_ARROW_MARKER, &arrow_width, &arrow_height, &aw);
x2 = grd_curcanv->cv_bitmap.bm_x + item[ScrollOffset+MaxDisplayable-1].x-(MenuHires?24:12);
y1 = grd_curcanv->cv_bitmap.bm_y + item[ScrollOffset+MaxDisplayable-1].y-((string_height+1)*ScrollOffset);
x1 = x1 - arrow_width;
y2 = y1 + arrow_height;
if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
choice++;
LastScrollCheck=-1;
mprintf ((0,"Scrolling! Choice=%d\n",choice));
if (choice>=MaxOnMenu+ScrollOffset)
{
for (i=0;i<nitems;i++)
item[i].redraw=1;
ScrollOffset++;
mprintf ((0,"ScrollOffset=%d\n",ScrollOffset));
}
}
}
}
for (i=0; i<nitems; i++ ) {
x1 = grd_curcanv->cv_bitmap.bm_x + item[i].x - item[i].right_offset - 6;
x2 = x1 + item[i].w;
y1 = grd_curcanv->cv_bitmap.bm_y + item[i].y;
y2 = y1 + item[i].h;
if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && (item[i].type != NM_TYPE_TEXT) ) {
if (i+ScrollOffset != choice) {
if(Hack_DblClick_MenuMode) dblclick_flag = 0;
}
choice = i + ScrollOffset;
if ( item[choice].type == NM_TYPE_SLIDER ) {
char slider_text[NM_MAX_TEXT_LEN+1], *p, *s1;
int slider_width, height, aw, sleft_width, sright_width, smiddle_width;
strcpy(slider_text, item[choice].saved_text);
p = strchr(slider_text, '\t');
if (p) {
*p = '\0';
s1 = p+1;
}
if (p) {
gr_get_string_size(s1, &slider_width, &height, &aw);
gr_get_string_size(SLIDER_LEFT, &sleft_width, &height, &aw);
gr_get_string_size(SLIDER_RIGHT, &sright_width, &height, &aw);
gr_get_string_size(SLIDER_MIDDLE, &smiddle_width, &height, &aw);
x1 = grd_curcanv->cv_bitmap.bm_x + item[choice].x + item[choice].w - slider_width;
x2 = x1 + slider_width + sright_width;
if ( (mx > x1) && (mx < (x1 + sleft_width)) && (item[choice].value != item[choice].min_value) ) {
item[choice].value = item[choice].min_value;
item[choice].redraw = 2;
} else if ( (mx < x2) && (mx > (x2 - sright_width)) && (item[choice].value != item[choice].max_value) ) {
item[choice].value = item[choice].max_value;
item[choice].redraw = 2;
} else if ( (mx > (x1 + sleft_width)) && (mx < (x2 - sright_width)) ) {
int num_values, value_width, new_value;
num_values = item[choice].max_value - item[choice].min_value + 1;
value_width = (slider_width - sleft_width - sright_width) / num_values;
new_value = (mx - x1 - sleft_width) / value_width;
if ( item[choice].value != new_value ) {
item[choice].value = new_value;
item[choice].redraw = 2;
}
}
*p = '\t';
}
}
if (choice == old_choice)
break;
if ((item[choice].type==NM_TYPE_INPUT) && (choice!=old_choice))
item[choice].value = -1;
if ((old_choice>-1) && (item[old_choice].type==NM_TYPE_INPUT_MENU) && (old_choice!=choice)) {
item[old_choice].group=0;
strcpy(item[old_choice].text, item[old_choice].saved_text );
item[old_choice].value = -1;
}
if (old_choice>-1)
item[old_choice].redraw = 1;
item[choice].redraw=1;
break;
}
}
}
if ( !done && !mouse_state && omouse_state && !all_text && (choice != -1) && (item[choice].type == NM_TYPE_MENU) ) {
mouse_get_pos(&mx, &my);
x1 = grd_curcanv->cv_bitmap.bm_x + item[choice].x;
x2 = x1 + item[choice].w;
y1 = grd_curcanv->cv_bitmap.bm_y + item[choice].y;
y2 = y1 + item[choice].h;
if (((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2))) {
if (Hack_DblClick_MenuMode) {
if (dblclick_flag) done = 1;
else dblclick_flag = 1;
}
else done = 1;
}
}
if ( !done && !mouse_state && omouse_state && (choice>-1) && (item[choice].type==NM_TYPE_INPUT_MENU) && (item[choice].group==0)) {
item[choice].group = 1;
item[choice].redraw = 1;
if ( !strnicmp( item[choice].saved_text, TXT_EMPTY, strlen(TXT_EMPTY) ) ) {
item[choice].text[0] = 0;
item[choice].value = -1;
} else {
strip_end_whitespace(item[choice].text);
}
}
if ( !done && !mouse_state && omouse_state && close_box ) {
mouse_get_pos(&mx, &my);
x1 = grd_curcanv->cv_bitmap.bm_x + CLOSE_X;
x2 = x1 + CLOSE_SIZE;
y1 = grd_curcanv->cv_bitmap.bm_y + CLOSE_Y;
y2 = y1 + CLOSE_SIZE;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
choice = -1;
done = 1;
}
}
// HACK! Don't redraw loadgame preview
if (RestoringMenu) item[0].redraw = 0;
#endif // NEWMENU_MOUSE
if ( choice > -1 ) {
int ascii;
if ( ((item[choice].type==NM_TYPE_INPUT)||((item[choice].type==NM_TYPE_INPUT_MENU)&&(item[choice].group==1)) )&& (old_choice==choice) ) {
if ( k==KEY_LEFT || k==KEY_BACKSP || k==KEY_PAD4 ) {
if (item[choice].value==-1) item[choice].value = strlen(item[choice].text);
if (item[choice].value > 0)
item[choice].value--;
item[choice].text[item[choice].value] = 0;
item[choice].redraw = 1;
} else {
ascii = key_to_ascii(k);
if ((ascii < 255 ) && (item[choice].value < item[choice].text_len ))
{
int allowed;
if (item[choice].value==-1) {
item[choice].value = 0;
}
allowed = char_allowed(ascii);
if (!allowed && ascii==' ' && char_allowed('_')) {
ascii = '_';
allowed=1;
}
if (allowed) {
item[choice].text[item[choice].value++] = ascii;
item[choice].text[item[choice].value] = 0;
item[choice].redraw=1;
}
}
}
} else if ((item[choice].type!=NM_TYPE_INPUT) && (item[choice].type!=NM_TYPE_INPUT_MENU) ) {
ascii = key_to_ascii(k);
if (ascii < 255 ) {
int choice1 = choice;
ascii = toupper(ascii);
do {
int i,ch;
choice1++;
if (choice1 >= nitems ) choice1=0;
for (i=0;(ch=item[choice1].text[i])!=0 && ch==' ';i++);
if ( ( (item[choice1].type==NM_TYPE_MENU) ||
(item[choice1].type==NM_TYPE_CHECK) ||
(item[choice1].type==NM_TYPE_RADIO) ||
(item[choice1].type==NM_TYPE_NUMBER) ||
(item[choice1].type==NM_TYPE_SLIDER) )
&& (ascii==toupper(ch)) ) {
k = 0;
choice = choice1;
if (old_choice>-1)
item[old_choice].redraw=1;
item[choice].redraw=1;
}
} while (choice1 != choice );
}
}
if ( (item[choice].type==NM_TYPE_NUMBER) || (item[choice].type==NM_TYPE_SLIDER)) {
int ov=item[choice].value;
switch( k ) {
case KEY_PAD4:
case KEY_LEFT:
case KEY_MINUS:
case KEY_MINUS+KEY_SHIFTED:
case KEY_PADMINUS:
item[choice].value -= 1;
break;
case KEY_RIGHT:
case KEY_PAD6:
case KEY_EQUAL:
case KEY_EQUAL+KEY_SHIFTED:
case KEY_PADPLUS:
item[choice].value++;
break;
case KEY_PAGEUP:
case KEY_PAD9:
case KEY_SPACEBAR:
item[choice].value += 10;
break;
case KEY_PAGEDOWN:
case KEY_BACKSP:
case KEY_PAD3:
item[choice].value -= 10;
break;
}
if (ov!=item[choice].value)
item[choice].redraw=1;
}
}
gr_set_current_canvas(bg.menu_canvas);
// Redraw everything...
for (i=ScrollOffset; i<MaxDisplayable+ScrollOffset; i++ )
{
if (item[i].redraw) // warning! ugly hack below
{
item[i].y-=((string_height+1)*ScrollOffset);
newmenu_hide_cursor();
draw_item( &bg, &item[i], (i==choice && !all_text),TinyMode );
item[i].redraw=0;
#ifdef NEWMENU_MOUSE
if (!MenuReordering && !joydefs_calibrating)
newmenu_show_cursor();
#endif
item[i].y+=((string_height+1)*ScrollOffset);
}
if (i==choice && (item[i].type==NM_TYPE_INPUT || (item[i].type==NM_TYPE_INPUT_MENU && item[i].group)))
update_cursor( &item[i]);
}
gr_update();
if (IsScrollBox)
{
//grd_curcanv->cv_font = NORMAL_FONT;
if (LastScrollCheck!=ScrollOffset)
{
LastScrollCheck=ScrollOffset;
grd_curcanv->cv_font = SELECTED_FONT;
sy=item[ScrollOffset].y-((string_height+1)*ScrollOffset);
sx=item[ScrollOffset].x-(MenuHires?24:12);
if (ScrollOffset!=0)
nm_rstring( &bg, (MenuHires?20:10), sx, sy, UP_ARROW_MARKER );
else
nm_rstring( &bg, (MenuHires?20:10), sx, sy, " " );
sy=item[ScrollOffset+MaxDisplayable-1].y-((string_height+1)*ScrollOffset);
sx=item[ScrollOffset+MaxDisplayable-1].x-(MenuHires?24:12);
if (ScrollOffset+MaxDisplayable<nitems)
nm_rstring( &bg, (MenuHires?20:10), sx, sy, DOWN_ARROW_MARKER );
else
nm_rstring( &bg, (MenuHires?20:10), sx, sy, " " );
}
}
if ( !dont_restore && gr_palette_faded_out ) {
gr_palette_fade_in( gr_palette, 32, 0 );
}
}
newmenu_hide_cursor();
// Restore everything...
gr_set_current_canvas(bg.menu_canvas);
if ( filename == NULL ) {
// Save the background under the menu...
gr_bitmap(0, 0, bg.saved);
gr_free_bitmap(bg.saved);
if (background_is_sub)
gr_free_sub_bitmap( bg.background );
else
gr_free_bitmap( bg.background );
// d_free( bg.background );
} else {
if (!dont_restore) //info passed back from subfunction
gr_bitmap(0, 0, bg.background);
gr_free_bitmap(bg.background);
}
gr_free_sub_canvas( bg.menu_canvas );
gr_set_current_canvas(save_canvas);
grd_curcanv->cv_font = save_font;
keyd_repeat = old_keyd_repeat;
game_flush_inputs();
if (time_stopped)
{
start_time();
#ifdef TACTILE
if (TactileStick)
EnableForces();
#endif
}
if ( sound_stopped )
digi_resume_digi_sounds();
return choice;
}
int nm_messagebox1( char *title, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem), int nchoices, ... )
{
int i;
char * format;
va_list args;
char *s;
char nm_text[MESSAGEBOX_TEXT_SIZE];
newmenu_item nm_message_items[5];
va_start(args, nchoices );
Assert( nchoices <= 5 );
for (i=0; i<nchoices; i++ ) {
s = va_arg( args, char * );
nm_message_items[i].type = NM_TYPE_MENU; nm_message_items[i].text = s;
}
format = va_arg( args, char * );
strcpy( nm_text, "" );
vsprintf(nm_text,format,args);
va_end(args);
Assert(strlen(nm_text) < MESSAGEBOX_TEXT_SIZE);
return newmenu_do( title, nm_text, nchoices, nm_message_items, subfunction );
}
int nm_messagebox( char *title, int nchoices, ... )
{
int i;
char * format;
va_list args;
char *s;
char nm_text[MESSAGEBOX_TEXT_SIZE];
newmenu_item nm_message_items[5];
va_start(args, nchoices );
Assert( nchoices <= 5 );
for (i=0; i<nchoices; i++ ) {
s = va_arg( args, char * );
nm_message_items[i].type = NM_TYPE_MENU; nm_message_items[i].text = s;
}
format = va_arg( args, char * );
strcpy( nm_text, "" );
vsprintf(nm_text,format,args);
va_end(args);
Assert(strlen(nm_text) < MESSAGEBOX_TEXT_SIZE );
return newmenu_do( title, nm_text, nchoices, nm_message_items, NULL );
}
void newmenu_file_sort( int n, char *list )
{
int i, j, incr;
char t[14];
incr = n / 2;
while( incr > 0 ) {
for (i=incr; i<n; i++ ) {
j = i - incr;
while (j>=0 ) {
if (strncmp(&list[j*14], &list[(j+incr)*14], 12) > 0){
memcpy( t, &list[j*14], FILENAME_LEN );
memcpy( &list[j*14], &list[(j+incr)*14], FILENAME_LEN );
memcpy( &list[(j+incr)*14], t, FILENAME_LEN );
j -= incr;
}
else
break;
}
}
incr = incr / 2;
}
}
void delete_player_saved_games(char * name)
{
int i;
char filename[16];
for (i=0;i<10; i++) {
#ifndef MACINTOSH
sprintf( filename, "%s.sg%d", name, i );
#else
sprintf(filename, "Players/%s.sg%d", name, i);
#endif
PHYSFS_delete(filename);
}
}
#define MAX_FILES 300
//FIXME: should maybe put globbing ability back?
int newmenu_get_filename(char *title, char *type, char *filename, int allow_abort_flag)
{
int i;
char **find;
char **f;
char *ext;
int NumFiles=0, key,done, citem, ocitem;
char * filenames = NULL;
int NumFiles_displayed = 8;
int first_item = -1, ofirst_item;
int old_keyd_repeat = keyd_repeat;
int player_mode=0;
int demo_mode=0;
int demos_deleted=0;
int initialized = 0;
int exit_value = 0;
int w_x, w_y, w_w, w_h, title_height;
int box_x, box_y, box_w, box_h;
bkg bg; // background under listbox
#ifdef NEWMENU_MOUSE
int mx, my, x1, x2, y1, y2, mouse_state, omouse_state;
int mouse2_state, omouse2_state;
int dblclick_flag=0;
# ifdef WINDOWS
int simukey=0;
int show_up_arrow=0, show_down_arrow=0;
# endif
#endif
w_x=w_y=w_w=w_h=title_height=0;
box_x=box_y=box_w=box_h=0;
filenames = d_malloc( MAX_FILES * 14 );
if (filenames==NULL) return 0;
citem = 0;
keyd_repeat = 1;
if (!stricmp(type, "plr"))
player_mode = 1;
else if (!stricmp(type, "dem"))
demo_mode = 1;
ReadFileNames:
done = 0;
NumFiles=0;
#if !defined(APPLE_DEMO) // no new pilots for special apple oem version
if (player_mode) {
strncpy( &filenames[NumFiles*14], TXT_CREATE_NEW, FILENAME_LEN );
NumFiles++;
}
#endif
find = PHYSFS_enumerateFiles(demo_mode?DEMO_DIR:"");
for (f = find; *f != NULL; f++)
{
if (player_mode)
{
ext = strrchr(*f, '.');
if (!ext || strnicmp(ext, ".plr", 4))
continue;
}
if (NumFiles < MAX_FILES)
{
strncpy(&filenames[NumFiles*14], *f, FILENAME_LEN);
if (player_mode)
{
char *p;
p = strchr(&filenames[NumFiles*14], '.');
if (p)
*p = '\0';
}
NumFiles++;
}
else
break;
}
PHYSFS_freeList(find);
if ( (NumFiles < 1) && demos_deleted ) {
exit_value = 0;
goto ExitFileMenu;
}
if ( (NumFiles < 1) && demo_mode ) {
nm_messagebox( NULL, 1, TXT_OK, "%s %s\n%s", TXT_NO_DEMO_FILES, TXT_USE_F5, TXT_TO_CREATE_ONE);
exit_value = 0;
goto ExitFileMenu;
}
#ifndef APPLE_DEMO
if ( (NumFiles < 2) && player_mode ) {
citem = 0;
goto ExitFileMenuEarly;
}
#endif
if ( NumFiles<1 ) {
#ifndef APPLE_DEMO
nm_messagebox(NULL, 1, "Ok", "%s\n '%s' %s", TXT_NO_FILES_MATCHING, type, TXT_WERE_FOUND);
#endif
exit_value = 0;
goto ExitFileMenu;
}
if (!initialized) {
// set_screen_mode(SCREEN_MENU);
set_popup_screen();
gr_set_current_canvas(NULL);
grd_curcanv->cv_font = SUBTITLE_FONT;
w_w = 0;
w_h = 0;
for (i=0; i<NumFiles; i++ ) {
int w, h, aw;
gr_get_string_size( &filenames[i*14], &w, &h, &aw );
if ( w > w_w )
w_w = w;
}
if ( title ) {
int w, h, aw;
gr_get_string_size( title, &w, &h, &aw );
if ( w > w_w )
w_w = w;
title_height = h + FONTSCALE_Y(grd_curfont->ft_h*2); // add a little space at the bottom of the title
}
box_w = w_w;
box_h = ((FONTSCALE_Y(grd_curfont->ft_h + 2)) * NumFiles_displayed);
w_w += FONTSCALE_X(grd_curfont->ft_w * 4);
w_h = title_height + box_h + FONTSCALE_Y(grd_curfont->ft_h * 2); // more space at bottom
if ( w_w > grd_curcanv->cv_w ) w_w = grd_curcanv->cv_w;
if ( w_h > grd_curcanv->cv_h ) w_h = grd_curcanv->cv_h;
w_x = (grd_curcanv->cv_w-w_w)/2;
w_y = (grd_curcanv->cv_h-w_h)/2;
if ( w_x < 0 ) w_x = 0;
if ( w_y < 0 ) w_y = 0;
box_x = w_x + FONTSCALE_X(grd_curfont->ft_w)*2; // must be in sync with w_w!!!
box_y = w_y + title_height;
// save the screen behind the menu.
bg.saved = NULL;
if ( (VR_offscreen_buffer->cv_w >= w_w) && (VR_offscreen_buffer->cv_h >= w_h) )
bg.background = &VR_offscreen_buffer->cv_bitmap;
else
bg.background = gr_create_bitmap( w_w, w_h );
Assert( bg.background != NULL );
gr_bm_bitblt(w_w, w_h, 0, 0, w_x, w_y, &grd_curcanv->cv_bitmap, bg.background );
#if 0
gr_bm_bitblt(grd_curcanv->cv_w, grd_curcanv->cv_h, 0, 0, 0, 0, &(grd_curcanv->cv_bitmap), &(VR_offscreen_buffer->cv_bitmap) );
#endif
nm_draw_background( w_x,w_y,w_x+w_w-1,w_y+w_h-1 );
gr_string( 0x8000, w_y+(10*MENSCALE_Y), title );
initialized = 1;
}
if ( !player_mode ) {
newmenu_file_sort( NumFiles, filenames );
} else {
#if defined(MACINTOSH) && defined(APPLE_DEMO)
newmenu_file_sort( NumFiles, filenames );
#else
newmenu_file_sort( NumFiles-1, &filenames[14] ); // Don't sort first one!
#endif
for ( i=0; i<NumFiles; i++ ) {
if (!stricmp(Players[Player_num].callsign, &filenames[i*14]) ) {
#ifdef NEWMENU_MOUSE
dblclick_flag = 1;
#endif
citem = i;
}
}
}
#ifdef NEWMENU_MOUSE
mouse_state = omouse_state = 0;
mouse2_state = omouse2_state = 0;
draw_close_box(w_x,w_y);
newmenu_show_cursor();
#endif
while(!done) {
ocitem = citem;
ofirst_item = first_item;
gr_update();
#ifdef NEWMENU_MOUSE
omouse_state = mouse_state;
omouse2_state = mouse2_state;
mouse_state = mouse_button_state(0);
mouse2_state = mouse_button_state(1);
#endif
//see if redbook song needs to be restarted
songs_check_redbook_repeat();
key = key_inkey();
switch(key) {
MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_3:)
case KEY_PRINT_SCREEN:
MAC(newmenu_hide_cursor());
save_screen_shot(0);
MAC(newmenu_show_cursor());
MAC(key_flush());
break;
case KEY_CTRLED+KEY_D:
#if defined(MACINTOSH) && defined(APPLE_DEMO)
break;
#endif
if ( ((player_mode)&&(citem>0)) || ((demo_mode)&&(citem>=0)) ) {
int x = 1;
newmenu_hide_cursor();
if (player_mode)
x = nm_messagebox( NULL, 2, TXT_YES, TXT_NO, "%s %s?", TXT_DELETE_PILOT, &filenames[citem*14]+((player_mode && filenames[citem*14]=='$')?1:0) );
else if (demo_mode)
x = nm_messagebox( NULL, 2, TXT_YES, TXT_NO, "%s %s?", TXT_DELETE_DEMO, &filenames[citem*14]+((demo_mode && filenames[citem*14]=='$')?1:0) );
newmenu_show_cursor();
if (x==0) {
char * p;
char plxfile[PATH_MAX];
int ret;
char name[PATH_MAX];
p = &filenames[(citem*14)+strlen(&filenames[citem*14])];
if (player_mode)
*p = '.';
strcpy(name, demo_mode?DEMO_DIR:"");
strcat(name,&filenames[citem*14]);
#ifdef MACINTOSH
{
int i;
char *p;
if ( !strncmp(name, ".\\", 2) )
for (i = 0; i < strlen(name); i++) // don't subtract 1 from strlen to get the EOS marker
name[i] = name[i+1];
while ( (p = strchr(name, '\\')) )
*p = ':';
}
#endif
ret = !PHYSFS_delete(name);
if (player_mode)
*p = 0;
if ((!ret) && player_mode) {
delete_player_saved_games( &filenames[citem*14] );
// also delete PLX file
sprintf(plxfile,"%.8s.plx",Players[Player_num].callsign);
if (cfexist(plxfile))
PHYSFS_delete(plxfile);
}
if (ret) {
if (player_mode)
nm_messagebox( NULL, 1, TXT_OK, "%s %s %s", TXT_COULDNT, TXT_DELETE_PILOT, &filenames[citem*14]+((player_mode && filenames[citem*14]=='$')?1:0) );
else if (demo_mode)
nm_messagebox( NULL, 1, TXT_OK, "%s %s %s", TXT_COULDNT, TXT_DELETE_DEMO, &filenames[citem*14]+((demo_mode && filenames[citem*14]=='$')?1:0) );
} else if (demo_mode)
demos_deleted = 1;
first_item = -1;
goto ReadFileNames;
}
}
break;
case KEY_HOME:
case KEY_PAD7:
citem = 0;
break;
case KEY_END:
case KEY_PAD1:
citem = NumFiles-1;
break;
case KEY_UP:
case KEY_PAD8:
citem--;
break;
case KEY_DOWN:
case KEY_PAD2:
citem++;
break;
case KEY_PAGEDOWN:
case KEY_PAD3:
citem += NumFiles_displayed;
break;
case KEY_PAGEUP:
case KEY_PAD9:
citem -= NumFiles_displayed;
break;
case KEY_ESC:
if (allow_abort_flag) {
citem = -1;
done = 1;
}
break;
case KEY_ENTER:
case KEY_PADENTER:
#ifdef GP2X
case GP2X_BUTTON_B:
#endif
done = 1;
break;
#ifdef MACINTOSH
case KEY_COMMAND+KEY_Q: {
extern void macintosh_quit();
if ( !(Game_mode & GM_MULTI) )
macintosh_quit();
newmenu_show_cursor();
key_flush();
break;
}
#endif
default:
{
int ascii = key_to_ascii(key);
if ( ascii < 255 ) {
int cc,cc1;
cc=cc1=citem+1;
if (cc1 < 0 ) cc1 = 0;
if (cc1 >= NumFiles ) cc1 = 0;
while(1) {
if ( cc < 0 ) cc = 0;
if ( cc >= NumFiles ) cc = 0;
if ( citem == cc ) break;
if ( toupper(filenames[cc*14]) == toupper(ascii) ) {
citem = cc;
break;
}
cc++;
}
}
}
}
if ( done ) break;
if (citem<0)
citem=0;
if (citem>=NumFiles)
citem = NumFiles-1;
if (citem< first_item)
first_item = citem;
if (citem>=( first_item+NumFiles_displayed))
{
first_item = citem-NumFiles_displayed+1;
}
#ifdef WINDOWS
if (NumFiles>first_item+NumFiles_displayed)
show_down_arrow=1;
else
show_down_arrow=0;
if (first_item>0)
show_up_arrow=1;
else
show_up_arrow=0;
#endif
if (NumFiles <= NumFiles_displayed )
first_item = 0;
if (first_item>NumFiles-NumFiles_displayed)
{
first_item = NumFiles-NumFiles_displayed;
}
if (first_item < 0 ) first_item = 0;
#ifdef NEWMENU_MOUSE
if (mouse_state || mouse2_state) {
int w, h, aw;
mouse_get_pos(&mx, &my);
for (i=first_item; i<first_item+NumFiles_displayed; i++ ) {
gr_get_string_size(&filenames[i*14], &w, &h, &aw );
x1 = box_x;
x2 = box_x + box_w - 1;
y1 = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h + 2) + box_y;
y2 = y1+h+1;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
if (i == citem && !mouse2_state) {
break;
}
citem = i;
dblclick_flag = 0;
break;
}
}
}
if (!mouse_state && omouse_state) {
int w, h, aw;
gr_get_string_size(&filenames[citem*14], &w, &h, &aw );
mouse_get_pos(&mx, &my);
x1 = box_x;
x2 = box_x + box_w - 1;
y1 = (citem-first_item)*FONTSCALE_Y(grd_curfont->ft_h + 2) + box_y;
y2 = y1+h+1;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
if (dblclick_flag) done = 1;
else dblclick_flag = 1;
}
}
if ( !mouse_state && omouse_state ) {
mouse_get_pos(&mx, &my);
x1 = w_x + CLOSE_X + 2;
x2 = x1 + CLOSE_SIZE - 2;
y1 = w_y + CLOSE_Y + 2;
y2 = y1 + CLOSE_SIZE - 2;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
citem = -1;
done = 1;
}
#ifdef WINDOWS
x1 = box_x-LHX(10);
x2 = x1 + LHX(10);
y1 = box_y;
y2 = box_y+LHY(7);
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && show_up_arrow )
simukey = -1;
y1 = box_y+box_h-LHY(7);
y2 = box_y+box_h;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && show_down_arrow)
simukey = 1;
#endif
}
#endif
gr_setcolor( BM_XRGB(2,2,2));
//gr_rect( box_x - 1, box_y-2, box_x + box_w, box_y-2 );
gr_setcolor( BM_XRGB( 0,0,0) );
if (ofirst_item != first_item) {
newmenu_hide_cursor();
gr_setcolor( BM_XRGB( 0,0,0) );
for (i=first_item; i<first_item+NumFiles_displayed; i++ ) {
int w, h, aw, y;
y = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h + 2) + box_y;
if ( i >= NumFiles ) {
gr_setcolor( BM_XRGB(5,5,5));
gr_rect( box_x + box_w, y-1, box_x + box_w, y + FONTSCALE_Y(grd_curfont->ft_h + 1));
//gr_rect( box_x, y + grd_curfont->ft_h + 2, box_x + box_w, y + grd_curfont->ft_h + 2);
gr_setcolor( BM_XRGB(2,2,2));
gr_rect( box_x - 1, y - 1, box_x - 1, y + FONTSCALE_Y(grd_curfont->ft_h + 2) );
gr_setcolor( BM_XRGB(0,0,0));
gr_rect( box_x, y - 1, box_x + box_w - 1, y + FONTSCALE_Y(grd_curfont->ft_h + 1));
} else {
if ( i == citem )
grd_curcanv->cv_font = SELECTED_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
gr_get_string_size(&filenames[i*14], &w, &h, &aw );
gr_setcolor( BM_XRGB(5,5,5));
// gr_rect( box_x, y + h + 2, box_x + box_w, y + h + 2);
gr_rect( box_x + box_w, y - 1, box_x + box_w, y + h + FONTSCALE_Y(1));
gr_setcolor( BM_XRGB(2,2,2));
gr_rect( box_x - 1, y - 1, box_x - 1, y + h + FONTSCALE_Y(1));
gr_setcolor( BM_XRGB(0,0,0));
gr_rect( box_x, y-1, box_x + box_w - 1, y + h + FONTSCALE_Y(1) );
gr_string( box_x + 5, y, (&filenames[i*14])+((player_mode && filenames[i*14]=='$')?1:0) );
}
}
newmenu_show_cursor();
} else if ( citem != ocitem ) {
int w, h, aw, y;
newmenu_hide_cursor();
i = ocitem;
if ( (i>=0) && (i<NumFiles) ) {
y = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h+2)+box_y;
if ( i == citem )
grd_curcanv->cv_font = SELECTED_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
gr_get_string_size(&filenames[i*14], &w, &h, &aw );
gr_rect( box_x, y-1, box_x + box_w - 1, y + h + FONTSCALE_Y(1) );
gr_string( box_x + 5, y, (&filenames[i*14])+((player_mode && filenames[i*14]=='$')?1:0) );
}
i = citem;
if ( (i>=0) && (i<NumFiles) ) {
y = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h+2)+box_y;
if ( i == citem )
grd_curcanv->cv_font = SELECTED_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
gr_get_string_size(&filenames[i*14], &w, &h, &aw );
// gr_rect( box_x, y-1, box_x + box_x - 1, y + h + FONTSCALE_Y(1) );
gr_string( box_x + 5, y, (&filenames[i*14])+((player_mode && filenames[i*14]=='$')?1:0) );
}
newmenu_show_cursor();
}
#ifdef WINDOWS
grd_curcanv->cv_font = NORMAL_FONT;
if (show_up_arrow)
gr_string( box_x-LHX(10), box_y ,UP_ARROW_MARKER );
else
{
No_darkening=1;
nm_draw_background (box_x-LHX(10),box_y,box_x-2,box_y+LHY(7));
No_darkening=0;
}
if (show_down_arrow)
gr_string( box_x-LHX(10), box_y+box_h-LHY(7) ,DOWN_ARROW_MARKER );
else
{
No_darkening=1;
nm_draw_background (box_x-LHX(10),box_y+box_h-LHY(7),box_x-2,box_y+box_h);
No_darkening=0;
}
#endif
}
ExitFileMenuEarly:
MAC(newmenu_hide_cursor());
if ( citem > -1 ) {
strncpy( filename, (&filenames[citem*14])+((player_mode && filenames[citem*14]=='$')?1:0), FILENAME_LEN );
exit_value = 1;
} else {
exit_value = 0;
}
ExitFileMenu:
keyd_repeat = old_keyd_repeat;
if ( initialized ) {
if (Newdemo_state != ND_STATE_PLAYBACK) //horrible hack to prevent restore when screen has been cleared
gr_bm_bitblt(w_w, w_h, w_x, w_y, 0, 0, bg.background, &grd_curcanv->cv_bitmap );
if ( bg.background != &VR_offscreen_buffer->cv_bitmap )
gr_free_bitmap(bg.background);
#if 0
gr_bm_bitblt(grd_curcanv->cv_w, grd_curcanv->cv_h, 0, 0, 0, 0, &(VR_offscreen_buffer->cv_bitmap), &(grd_curcanv->cv_bitmap) )
#endif
}
if ( filenames )
d_free(filenames);
return exit_value;
}
// Example listbox callback function...
// int lb_callback( int * citem, int *nitems, char * items[], int *keypress )
// {
// int i;
//
// if ( *keypress = KEY_CTRLED+KEY_D ) {
// if ( *nitems > 1 ) {
// PHYSFS_delete(items[*citem]); // Delete the file
// for (i=*citem; i<*nitems-1; i++ ) {
// items[i] = items[i+1];
// }
// *nitems = *nitems - 1;
// d_free( items[*nitems] );
// items[*nitems] = NULL;
// return 1; // redraw;
// }
// *keypress = 0;
// }
// return 0;
// }
#define LB_ITEMS_ON_SCREEN 8
int newmenu_listbox( char * title, int nitems, char * items[], int allow_abort_flag, int (*listbox_callback)( int * citem, int *nitems, char * items[], int *keypress ) )
{
return newmenu_listbox1( title, nitems, items, allow_abort_flag, 0, listbox_callback );
}
int newmenu_listbox1( char * title, int nitems, char * items[], int allow_abort_flag, int default_item, int (*listbox_callback)( int * citem, int *nitems, char * items[], int *keypress ) )
{
int i;
int done, ocitem,citem, ofirst_item, first_item, key, redraw;
int old_keyd_repeat = keyd_repeat;
int width, height, wx, wy, title_height, border_size;
int total_width,total_height;
bkg bg;
#ifdef NEWMENU_MOUSE
int mx, my, x1, x2, y1, y2, mouse_state, omouse_state; //, dblclick_flag;
int close_x,close_y;
# ifdef WINDOWS
int simukey=0,show_up_arrow=0,show_down_arrow=0;
# endif
#endif
keyd_repeat = 1;
// set_screen_mode(SCREEN_MENU);
set_popup_screen();
gr_set_current_canvas(NULL);
grd_curcanv->cv_font = SUBTITLE_FONT;
width = 0;
for (i=0; i<nitems; i++ ) {
int w, h, aw;
gr_get_string_size( items[i], &w, &h, &aw );
if ( w > width )
width = w;
}
height = (FONTSCALE_Y(grd_curfont->ft_h + 2)) * LB_ITEMS_ON_SCREEN;
{
int w, h, aw;
gr_get_string_size( title, &w, &h, &aw );
if ( w > width )
width = w;
title_height = h + 5;
}
border_size = (grd_curfont->ft_w);
WIN (border_size=grd_curfont->ft_w*2);
width += FONTSCALE_X(grd_curfont->ft_w);
if ( width > grd_curcanv->cv_w - (FONTSCALE_Y(grd_curfont->ft_w) * 3) )
width = grd_curcanv->cv_w - (FONTSCALE_Y(grd_curfont->ft_w) * 3);
wx = (grd_curcanv->cv_bitmap.bm_w-width)/2;
wy = (grd_curcanv->cv_bitmap.bm_h-(height+title_height))/2 + title_height;
if ( wy < title_height )
wy = title_height;
total_width = width+2*border_size;
total_height = height+2*border_size+title_height;
bg.saved = NULL;
if ( (VR_offscreen_buffer->cv_w >= total_width) && (VR_offscreen_buffer->cv_h >= total_height) )
bg.background = &VR_offscreen_buffer->cv_bitmap;
else
//bg.background = gr_create_bitmap( width, (height + title_height) );
bg.background = gr_create_bitmap(total_width,total_height);
Assert( bg.background != NULL );
//gr_bm_bitblt(wx+width+border_size, wy+height+border_size, 0, 0, wx-border_size, wy-title_height-border_size, &grd_curcanv->cv_bitmap, bg.background );
gr_bm_bitblt(total_width,total_height, 0, 0, wx-border_size, wy-title_height-border_size, &grd_curcanv->cv_bitmap, bg.background );
#if 0
gr_bm_bitblt(grd_curcanv->cv_w, grd_curcanv->cv_h, 0, 0, 0, 0, &(grd_curcanv->cv_bitmap), &(VR_offscreen_buffer->cv_bitmap) );
#endif
nm_draw_background( wx-(border_size*MENSCALE_X),wy-title_height-(border_size*MENSCALE_Y),wx+width+((border_size-1)*MENSCALE_X),wy+height+((border_size-1)*MENSCALE_Y) );
gr_string( 0x8000, wy - title_height, title );
done = 0;
citem = default_item;
if ( citem < 0 ) citem = 0;
if ( citem >= nitems ) citem = 0;
first_item = -1;
#ifdef NEWMENU_MOUSE
mouse_state = omouse_state = 0; //dblclick_flag = 0;
close_x = wx-border_size;
close_y = wy-title_height-border_size;
draw_close_box(close_x,close_y);
newmenu_show_cursor();
#endif
while(!done) {
ocitem = citem;
ofirst_item = first_item;
#ifdef NEWMENU_MOUSE
omouse_state = mouse_state;
mouse_state = mouse_button_state(0);
#endif
//see if redbook song needs to be restarted
songs_check_redbook_repeat();
key = key_inkey();
if ( listbox_callback )
redraw = (*listbox_callback)(&citem, &nitems, items, &key );
else
redraw = 0;
if ( key<-1 ) {
citem = key;
key = -1;
done = 1;
}
#ifdef WINDOWS
if (simukey==-1)
key=KEY_UP;
else if (simukey==1)
key=KEY_DOWN;
simukey=0;
#endif
switch(key) {
MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_3:)
case KEY_PRINT_SCREEN:
MAC(newmenu_hide_cursor());
save_screen_shot(0);
MAC(newmenu_show_cursor());
MAC(key_flush());
break;
case KEY_HOME:
case KEY_PAD7:
citem = 0;
break;
case KEY_END:
case KEY_PAD1:
citem = nitems-1;
break;
case KEY_UP:
case KEY_PAD8:
citem--;
break;
case KEY_DOWN:
case KEY_PAD2:
citem++;
break;
case KEY_PAGEDOWN:
case KEY_PAD3:
citem += LB_ITEMS_ON_SCREEN;
break;
case KEY_PAGEUP:
case KEY_PAD9:
citem -= LB_ITEMS_ON_SCREEN;
break;
case KEY_ESC:
if (allow_abort_flag) {
citem = -1;
done = 1;
}
break;
case KEY_ENTER:
case KEY_PADENTER:
#ifdef GP2X
case GP2X_BUTTON_B:
#endif
done = 1;
break;
#ifdef MACINTOSH
case KEY_COMMAND+KEY_Q: {
extern void macintosh_quit();
if ( !(Game_mode & GM_MULTI) )
macintosh_quit();
newmenu_show_cursor();
key_flush();
break;
}
#endif
default:
if ( key > 0 ) {
int ascii = key_to_ascii(key);
if ( ascii < 255 ) {
int cc,cc1;
cc=cc1=citem+1;
if (cc1 < 0 ) cc1 = 0;
if (cc1 >= nitems ) cc1 = 0;
while(1) {
if ( cc < 0 ) cc = 0;
if ( cc >= nitems ) cc = 0;
if ( citem == cc ) break;
if ( toupper( items[cc][0] ) == toupper(ascii) ) {
citem = cc;
break;
}
cc++;
}
}
}
}
if ( done ) break;
if (citem<0)
citem=0;
if (citem>=nitems)
citem = nitems-1;
if (citem< first_item)
first_item = citem;
if (citem>=( first_item+LB_ITEMS_ON_SCREEN))
first_item = citem-LB_ITEMS_ON_SCREEN+1;
if (nitems <= LB_ITEMS_ON_SCREEN )
first_item = 0;
if (first_item>nitems-LB_ITEMS_ON_SCREEN)
first_item = nitems-LB_ITEMS_ON_SCREEN;
if (first_item < 0 ) first_item = 0;
#ifdef WINDOWS
if (nitems>first_item+LB_ITEMS_ON_SCREEN)
show_down_arrow=1;
else
show_down_arrow=0;
if (first_item>0)
show_up_arrow=1;
else
show_up_arrow=0;
#endif
#ifdef NEWMENU_MOUSE
if (mouse_state) {
int w, h, aw;
mouse_get_pos(&mx, &my);
for (i=first_item; i<first_item+LB_ITEMS_ON_SCREEN; i++ ) {
if (i > nitems)
break;
gr_get_string_size(items[i], &w, &h, &aw );
x1 = wx;
x2 = wx + width;
y1 = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h+2)+wy;
y2 = y1+h+1;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
//if (i == citem) {
// break;
//}
//dblclick_flag= 0;
citem = i;
done = 1;
break;
}
}
}
//check for close box clicked
if ( !mouse_state && omouse_state ) {
mouse_get_pos(&mx, &my);
x1 = close_x + CLOSE_X + 2;
x2 = x1 + CLOSE_SIZE - 2;
y1 = close_y + CLOSE_Y + 2;
y2 = y1 + CLOSE_SIZE - 2;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) ) {
citem = -1;
done = 1;
}
#ifdef WINDOWS
x1 = wx-LHX(10);
x2 = x1 + LHX(10);
y1 = wy;
y2 = wy+LHY(7);
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && show_up_arrow)
simukey = -1;
y1 = total_height-LHY(7);
y2 = total_height;
if ( ((mx > x1) && (mx < x2)) && ((my > y1) && (my < y2)) && show_down_arrow )
simukey = 1;
#endif
}
#endif
if ( (ofirst_item != first_item) || redraw) {
newmenu_hide_cursor();
gr_setcolor( BM_XRGB( 0,0,0) );
for (i=first_item; i<first_item+LB_ITEMS_ON_SCREEN; i++ ) {
int w, h, aw, y;
y = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h+2)+wy;
if ( i >= nitems ) {
gr_setcolor( BM_XRGB(0,0,0));
gr_rect( wx, y-1, wx+width-1, y+FONTSCALE_Y(grd_curfont->ft_h + 1) );
} else {
if ( i == citem )
grd_curcanv->cv_font = SELECTED_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
gr_get_string_size(items[i], &w, &h, &aw );
gr_rect( wx, y-1, wx+width-1, y+h+FONTSCALE_Y(1) );
gr_string( wx+5, y, items[i] );
}
}
// If Win95 port, draw up/down arrows on left side of menu
#ifdef WINDOWS
grd_curcanv->cv_font = NORMAL_FONT;
if (show_up_arrow)
gr_string( wx-LHX(10), wy ,UP_ARROW_MARKER );
else
{
No_darkening=1;
nm_draw_background (wx-LHX(10),wy,wx-2,wy+LHY(7));
No_darkening=0;
}
if (show_down_arrow)
gr_string( wx-LHX(10), wy+total_height-LHY(7) ,DOWN_ARROW_MARKER );
else
{
No_darkening=1;
nm_draw_background (wx-LHX(10),wy+total_height-LHY(7),wx-2,wy+total_height);
No_darkening=0;
}
#endif
newmenu_show_cursor();
gr_update();
} else if ( citem != ocitem ) {
int w, h, aw, y;
newmenu_hide_cursor();
i = ocitem;
if ( (i>=0) && (i<nitems) ) {
y = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h+2)+wy;
if ( i == citem )
grd_curcanv->cv_font = SELECTED_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
gr_get_string_size(items[i], &w, &h, &aw );
gr_rect( wx, y-1, wx+width-1, y+h+1 );
gr_string( wx+5, y, items[i] );
}
i = citem;
if ( (i>=0) && (i<nitems) ) {
y = (i-first_item)*FONTSCALE_Y(grd_curfont->ft_h+2)+wy;
if ( i == citem )
grd_curcanv->cv_font = SELECTED_FONT;
else
grd_curcanv->cv_font = NORMAL_FONT;
gr_get_string_size( items[i], &w, &h, &aw );
gr_rect( wx, y-1, wx+width-1, y+h );
gr_string( wx+5, y, items[i] );
}
newmenu_show_cursor();
gr_update();
}
}
newmenu_hide_cursor();
keyd_repeat = old_keyd_repeat;
// gr_bm_bitblt(total_width,total_height, wx-border_size, wy-title_height-border_size, 0, 0, bg.background, &grd_curcanv->cv_bitmap );
if ( bg.background != &VR_offscreen_buffer->cv_bitmap )
gr_free_bitmap(bg.background);
#if 0
gr_bm_bitblt(grd_curcanv->cv_w, grd_curcanv->cv_h, 0, 0, 0, 0, &(VR_offscreen_buffer->cv_bitmap), &(grd_curcanv->cv_bitmap) );
#endif
return citem;
}
#if 0
int newmenu_filelist( char * title, char * filespec, char * filename )
{
int i, NumFiles;
char * Filenames[MAX_FILES];
char FilenameText[MAX_FILES][14];
FILEFINDSTRUCT find;
NumFiles = 0;
if( !FileFindFirst( filespec, &find ) ) {
do {
if (NumFiles<MAX_FILES) {
strncpy( FilenameText[NumFiles], find.name, FILENAME_LEN);
Filenames[NumFiles] = FilenameText[NumFiles];
NumFiles++;
} else {
break;
}
} while( !FileFindNext( &find ) );
FileFindClose();
}
i = newmenu_listbox( title, NumFiles, Filenames, 1, NULL );
if ( i > -1 ) {
strcpy( filename, Filenames[i] );
return 1;
}
return 0;
}
#endif
//added on 10/14/98 by Victor Rachels to attempt a fixedwidth font messagebox
int nm_messagebox_fixedfont( char *title, int nchoices, ... )
{
int i;
char * format;
va_list args;
char *s;
char nm_text[MESSAGEBOX_TEXT_SIZE];
newmenu_item nm_message_items[5];
va_start(args, nchoices );
Assert( nchoices <= 5 );
for (i=0; i<nchoices; i++ ) {
s = va_arg( args, char * );
nm_message_items[i].type = NM_TYPE_MENU; nm_message_items[i].text = s;
}
format = va_arg( args, char * );
//sprintf( nm_text, "" ); // adb: ?
vsprintf(nm_text,format,args);
va_end(args);
Assert(strlen(nm_text) < MESSAGEBOX_TEXT_SIZE );
return newmenu_do_fixedfont( title, nm_text, nchoices, nm_message_items, NULL, 0, NULL, -1, -1 );
}
//end this section addition - Victor Rachels
#ifdef NETWORK
extern netgame_info Active_games[];
extern int NumActiveNetgames;
void show_extra_netgame_info(int choice)
{
newmenu_item m[5];
char mtext[5][50];
int i,num=0;
if (choice>=NumActiveNetgames)
return;
for (i=0;i<5;i++)
{
m[i].text=(char *)&mtext[i];
m[i].type=NM_TYPE_TEXT;
}
sprintf (mtext[num],"Game: %s",Active_games[choice].game_name); num++;
sprintf (mtext[num],"Mission: %s",Active_games[choice].mission_title); num++;
sprintf (mtext[num],"Current Level: %d",Active_games[choice].levelnum); num++;
sprintf (mtext[num],"Difficulty: %s",MENU_DIFFICULTY_TEXT(Active_games[choice].difficulty)); num++;
already_showing_info=1;
newmenu_dotiny2( NULL, "Netgame Information", num, m, NULL);
already_showing_info=0;
}
#endif // NETWORK
/* Spiffy word wrap string formatting function */
void nm_wrap_text(char *dbuf, char *sbuf, int line_length)
{
int col;
char *wordptr;
char *tbuf;
tbuf = (char *)d_malloc(strlen(sbuf)+1);
strcpy(tbuf, sbuf);
wordptr = strtok(tbuf, " ");
if (!wordptr) return;
col = 0;
dbuf[0] = 0;
while (wordptr)
{
col = col+strlen(wordptr)+1;
if (col >=line_length) {
col = 0;
sprintf(dbuf, "%s\n%s ", dbuf, wordptr);
}
else {
sprintf(dbuf, "%s%s ", dbuf, wordptr);
}
wordptr = strtok(NULL, " ");
}
d_free(tbuf);
}
Reference in a new issue View git blame Copy permalink