static int key_dialog_handler(UI_DIALOG *dlg, d_event *event, key_dialog *k)
{
int keypress = 0;
int rval = 0;
if (event->type == EVENT_KEY_COMMAND)
keypress = event_key_get(event);
else if (event->type == EVENT_UI_DIALOG_DRAW)
{
ui_dprintf_at( dlg, 10, 100, "%s ", k->text );
return 1;
}
if (keypress > 0)
{
GetKeyDescription( k->text, keypress );
rval = 1;
}
if (GADGET_PRESSED(k->DoneButton))
{
ui_close_dialog(dlg);
rval = 1;
}
return rval;
}
void close_trigger_window()
{
if ( MainWindow!=NULL ) {
ui_close_dialog( MainWindow );
MainWindow = NULL;
}
}
void close_wall_window()
{
if ( MainWindow!=NULL ) {
ui_close_dialog( MainWindow );
MainWindow = NULL;
}
}
void hostage_close_window()
{
if ( MainWindow!=NULL ) {
ui_close_dialog( MainWindow );
MainWindow = NULL;
}
}
void close_centers_window()
{
if ( MainWindow!=NULL ) {
ui_close_dialog( MainWindow );
MainWindow = NULL;
}
}
void robot_close_window()
{
if ( MainWindow!=NULL ) {
ui_close_dialog( MainWindow );
MainWindow = NULL;
}
}
static void object_close_window()
{
if ( MattWindow!=NULL ) {
ui_close_dialog( MattWindow );
MattWindow = NULL;
}
}
int MenuX( int x, int y, int NumButtons, char * text[] )
{
UI_DIALOG * dlg;
menu *m;
int button_width, button_height, width, height;
int i;
int w, h;
int choice;
MALLOC(m, menu, 1);
m->num_buttons = NumButtons;
m->button_g = (UI_GADGET_BUTTON **) d_malloc(sizeof(UI_GADGET_BUTTON *)*NumButtons);
MALLOC(m->button, char *, NumButtons);
m->choice = &choice;
button_width = button_height = 0;
for (i=0; i<NumButtons; i++ )
{
m->button[i] = text[i];
ui_get_button_size( m->button[i], &width, &height );
if ( width > button_width ) button_width = width;
if ( height > button_height ) button_height = height;
}
width = button_width + 2*(MENU_BORDER+3);
height = (button_height*NumButtons) + (MENU_VERT_SPACING*(NumButtons-1)) ;
height += (MENU_BORDER+3) * 2;
w = grd_curscreen->sc_w;
h = grd_curscreen->sc_h;
{
int mx, my, mz;
mouse_get_pos(&mx, &my, &mz);
if ( x == -1 ) x = mx - width/2;
if ( y == -1 ) y = my;
}
if (x < 0 ) {
x = 0;
}
if ( (x+width-1) >= w ) {
x = w - width;
}
if (y < 0 ) {
y = 0;
}
if ( (y+height-1) >= h ) {
y = h - height;
}
dlg = ui_create_dialog( x, y, width, height, DF_FILLED | DF_SAVE_BG | DF_MODAL, (int (*)(UI_DIALOG *, d_event *, void *))menu_handler, m );
x = MENU_BORDER+3;
y = MENU_BORDER+3;
for (i=0; i<NumButtons; i++ )
{
m->button_g[i] = ui_add_gadget_button( dlg, x, y, button_width, button_height, m->button[i], NULL );
y += button_height+MENU_VERT_SPACING;
}
choice = 0;
while(choice==0)
event_process();
ui_close_dialog(dlg);
d_free(m->button);
d_free(m->button_g);
d_free(m);
return choice;
}
// Handler for the main editor dialog
int editor_handler(UI_DIALOG *dlg, d_event *event, void *data)
{
editor_view *new_cv;
int keypress = 0;
int rval = 0;
if (event->type == EVENT_KEY_COMMAND)
keypress = event_key_get(event);
else if (event->type == EVENT_WINDOW_CLOSE)
{
close_editor();
EditorWindow = NULL;
return 0;
}
// Update the windows
if (event->type == EVENT_UI_DIALOG_DRAW)
{
gr_set_curfont(editor_font);
// Draw status box
gr_set_current_canvas( NULL );
gr_setcolor( CGREY );
gr_rect(STATUS_X,STATUS_Y,STATUS_X+STATUS_W-1,STATUS_Y+STATUS_H-1); //0, 582, 799, 599 );
medlisp_update_screen();
calc_frame_time();
texpage_do(event);
objpage_do(event);
ui_pad_draw(EditorWindow, PAD_X, PAD_Y);
print_status_bar(status_line);
TimedAutosave(mine_filename); // shows the time, hence here
set_editor_time_of_day();
return 1;
}
if ((selected_gadget == (UI_GADGET *)GameViewBox && !render_3d_in_big_window) ||
(selected_gadget == (UI_GADGET *)LargeViewBox && render_3d_in_big_window))
switch (event->type)
{
case EVENT_MOUSE_BUTTON_UP:
case EVENT_MOUSE_BUTTON_DOWN:
break;
case EVENT_MOUSE_MOVED:
if (!keyd_pressed[ KEY_LCTRL ] && !keyd_pressed[ KEY_RCTRL ])
break;
case EVENT_JOYSTICK_BUTTON_UP:
case EVENT_JOYSTICK_BUTTON_DOWN:
case EVENT_JOYSTICK_MOVED:
case EVENT_KEY_COMMAND:
case EVENT_KEY_RELEASE:
case EVENT_IDLE:
kconfig_read_controls(event, 1);
if (slew_frame(0))
{ //do movement and check keys
Update_flags |= UF_GAME_VIEW_CHANGED;
if (Gameview_lockstep)
{
Cursegp = &Segments[ConsoleObject->segnum];
med_create_new_segment_from_cursegp();
Update_flags |= UF_ED_STATE_CHANGED;
}
rval = 1;
}
break;
default:
break;
}
//do non-essential stuff in idle event
if (event->type == EVENT_IDLE)
{
check_wall_validity();
Assert(Num_walls>=0);
if (Gameview_lockstep) {
static segment *old_cursegp=NULL;
static int old_curside=-1;
if (old_cursegp!=Cursegp || old_curside!=Curside) {
SetPlayerFromCursegMinusOne();
old_cursegp = Cursegp;
old_curside = Curside;
}
}
if ( event_get_idle_seconds() > COMPRESS_INTERVAL )
{
med_compress_mine();
event_reset_idle_seconds();
}
// Commented out because it occupies about 25% of time in twirling the mine.
// Removes some Asserts....
// med_check_all_vertices();
clear_editor_status(); // if enough time elapsed, clear editor status message
}
gr_set_current_canvas( GameViewBox->canvas );
// Remove keys used for slew
switch(keypress)
{
case KEY_PAD9:
case KEY_PAD7:
case KEY_PADPLUS:
case KEY_PADMINUS:
case KEY_PAD8:
case KEY_PAD2:
case KEY_LBRACKET:
case KEY_RBRACKET:
case KEY_PAD1:
case KEY_PAD3:
case KEY_PAD6:
case KEY_PAD4:
keypress = 0;
}
if ((keypress&0xff)==KEY_LSHIFT) keypress=0;
if ((keypress&0xff)==KEY_RSHIFT) keypress=0;
if ((keypress&0xff)==KEY_LCTRL) keypress=0;
if ((keypress&0xff)==KEY_RCTRL) keypress=0;
// if ((keypress&0xff)==KEY_LALT) keypress=0;
// if ((keypress&0xff)==KEY_RALT) keypress=0;
//=================== DO FUNCTIONS ====================
if ( KeyFunction[ keypress ] != NULL )
{
KeyFunction[keypress]();
keypress = 0;
rval = 1;
}
switch (keypress)
{
case 0:
case KEY_Z:
case KEY_G:
case KEY_LALT:
case KEY_RALT:
case KEY_LCTRL:
case KEY_RCTRL:
case KEY_LSHIFT:
case KEY_RSHIFT:
case KEY_LAPOSTRO:
break;
case KEY_SHIFTED + KEY_L:
ToggleLighting();
rval = 1;
break;
case KEY_F1:
render_3d_in_big_window = !render_3d_in_big_window;
Update_flags |= UF_ALL;
rval = 1;
break;
default:
if (!rval)
{
char kdesc[100];
GetKeyDescription( kdesc, keypress );
editor_status_fmt("Error: %s isn't bound to anything.", kdesc );
}
}
//================================================================
if (ModeFlag)
{
ui_close_dialog(EditorWindow);
return 0;
}
// if (EditorWindow->keyboard_focus_gadget == (UI_GADGET *)GameViewBox) current_view=NULL;
// if (EditorWindow->keyboard_focus_gadget == (UI_GADGET *)GroupViewBox) current_view=NULL;
new_cv = current_view;
#if ORTHO_VIEWS
if (EditorWindow->keyboard_focus_gadget == (UI_GADGET *)LargeViewBox) new_cv=&LargeView;
if (EditorWindow->keyboard_focus_gadget == (UI_GADGET *)TopViewBox) new_cv=&TopView;
if (EditorWindow->keyboard_focus_gadget == (UI_GADGET *)FrontViewBox) new_cv=&FrontView;
if (EditorWindow->keyboard_focus_gadget == (UI_GADGET *)RightViewBox) new_cv=&RightView;
#endif
if (new_cv != current_view ) {
current_view->ev_changed = 1;
new_cv->ev_changed = 1;
current_view = new_cv;
}
// DO TEXTURE STUFF
if (texpage_do(event))
rval = 1;
if (objpage_do(event))
rval = 1;
// Process selection of Cursegp using mouse.
if (GADGET_PRESSED(LargeViewBox) && !render_3d_in_big_window)
{
int xcrd,ycrd;
xcrd = LargeViewBox->b1_drag_x1;
ycrd = LargeViewBox->b1_drag_y1;
find_segments(xcrd,ycrd,LargeViewBox->canvas,&LargeView,Cursegp,Big_depth); // Sets globals N_found_segs, Found_segs
// If shift is down, then add segment to found list
if (keyd_pressed[ KEY_LSHIFT ] || keyd_pressed[ KEY_RSHIFT ])
subtract_found_segments_from_selected_list();
else
add_found_segments_to_selected_list();
Found_seg_index = 0;
if (N_found_segs > 0) {
sort_seg_list(N_found_segs,Found_segs,&ConsoleObject->pos);
Cursegp = &Segments[Found_segs[0]];
med_create_new_segment_from_cursegp();
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
}
Update_flags |= UF_ED_STATE_CHANGED | UF_VIEWPOINT_MOVED;
}
if ((event->type == EVENT_UI_USERBOX_DRAGGED) && (ui_event_get_gadget(event) == (UI_GADGET *)GameViewBox))
{
int x, y;
x = GameViewBox->b1_drag_x2;
y = GameViewBox->b1_drag_y2;
gr_set_current_canvas( GameViewBox->canvas );
gr_setcolor( 15 );
gr_rect( x-1, y-1, x+1, y+1 );
}
// Set current segment and side by clicking on a polygon in game window.
// If ctrl pressed, also assign current texture map to that side.
//if (GameViewBox->mouse_onme && (GameViewBox->b1_done_dragging || GameViewBox->b1_clicked)) {
if ((GADGET_PRESSED(GameViewBox) && !render_3d_in_big_window) ||
(GADGET_PRESSED(LargeViewBox) && render_3d_in_big_window))
{
int xcrd,ycrd;
int seg,side,face,poly,tmap;
if (render_3d_in_big_window) {
xcrd = LargeViewBox->b1_drag_x1;
ycrd = LargeViewBox->b1_drag_y1;
}
else {
xcrd = GameViewBox->b1_drag_x1;
ycrd = GameViewBox->b1_drag_y1;
}
//Int3();
if (find_seg_side_face(xcrd,ycrd,&seg,&side,&face,&poly)) {
if (seg<0) { //found an object
Cur_object_index = -seg-1;
editor_status_fmt("Object %d selected.",Cur_object_index);
Update_flags |= UF_ED_STATE_CHANGED;
}
else {
// See if either shift key is down and, if so, assign texture map
if (keyd_pressed[KEY_LSHIFT] || keyd_pressed[KEY_RSHIFT]) {
Cursegp = &Segments[seg];
Curside = side;
AssignTexture();
med_create_new_segment_from_cursegp();
editor_status("Texture assigned");
} else if (keyd_pressed[KEY_G]) {
tmap = Segments[seg].sides[side].tmap_num;
texpage_grab_current(tmap);
editor_status( "Texture grabbed." );
} else if (keyd_pressed[ KEY_LAPOSTRO] ) {
move_object_to_mouse_click();
} else {
Cursegp = &Segments[seg];
Curside = side;
med_create_new_segment_from_cursegp();
editor_status("Curseg and curside selected");
}
}
Update_flags |= UF_ED_STATE_CHANGED;
}
else
editor_status("Click on non-texture ingored");
}
// Allow specification of LargeView using mouse
if (event->type == EVENT_MOUSE_MOVED && (keyd_pressed[ KEY_LCTRL ] || keyd_pressed[ KEY_RCTRL ]))
{
int dx, dy, dz;
event_mouse_get_delta(event, &dx, &dy, &dz);
if ((dx != 0) && (dy != 0))
{
vms_matrix MouseRotMat,tempm;
GetMouseRotation( dx, dy, &MouseRotMat );
vm_matrix_x_matrix(&tempm,&LargeView.ev_matrix,&MouseRotMat);
LargeView.ev_matrix = tempm;
LargeView.ev_changed = 1;
Large_view_index = -1; // say not one of the orthogonal views
rval = 1;
}
}
if (event->type == EVENT_MOUSE_MOVED)
{
int dx, dy, dz;
event_mouse_get_delta(event, &dx, &dy, &dz);
if (dz != 0)
{
current_view->ev_dist += dz*10000;
current_view->ev_changed = 1;
}
}
return rval;
}
// Use: Left button (button 0) goes down, then up, then this is called
// as opposed to straight after the button goes down, holding down
// until an option is chosen.
// This is like the 'modern' behaviour of popup menus and also happens
// to be easier to implement because of the button code.
// Recommended for use in conjunction with a button gadget,
// i.e. when that button is pressed, call PopupMenu,
// update the button's text then the value in question.
int PopupMenu( int NumButtons, char * text[] )
{
UI_DIALOG * dlg;
popup *p;
char * Button[10];
int button_width, button_height, width, height;
short i, x, y;
short w, h;
int choice;
MALLOC(p, popup, 1);
p->num_buttons = NumButtons;
p->choice = &choice;
if ((NumButtons < 1) || (NumButtons>10))
{
d_free(p);
return -1;
}
button_width = button_height = 0;
gr_set_current_canvas( &grd_curscreen->sc_canvas );
for (i=0; i<NumButtons; i++ )
{
Button[i] = text[i];
ui_get_button_size( Button[i], &width, &height );
if ( width > button_width ) button_width = width;
if ( height > button_height ) button_height = height;
}
width = button_width + 2*(MENU_BORDER+3);
height = (button_height*NumButtons) + (MENU_VERT_SPACING*(NumButtons-1)) ;
height += (MENU_BORDER+3) * 2;
{
int mx, my, mz;
mouse_get_pos(&mx, &my, &mz);
x = mx - width/2;
y = my - (MENU_BORDER+3) - button_height/2;
}
w = grd_curscreen->sc_w;
h = grd_curscreen->sc_h;
if (x < 0 ) {
x = 0;
//Mouse.x = x + width / 2;
}
if ( (x+width-1) >= w ) {
x = w - width;
//Mouse.x = x + width / 2;
}
if (y < 0 ) {
y = 0;
//Mouse.y = y + (MENU_BORDER+3) + button_height/2;
}
if ( (y+height-1) >= h ) {
y = h - height;
//Mouse.y = y + (MENU_BORDER+3) + button_height/2;
}
dlg = ui_create_dialog( x, y, width, height, DF_DIALOG | DF_MODAL, (int (*)(UI_DIALOG *, d_event *, void *))popup_handler, p );
//mouse_set_pos(Mouse.x, Mouse.y);
x = MENU_BORDER+3;
y = MENU_BORDER+3;
for (i=0; i<NumButtons; i++ )
{
p->button_g[i] = ui_add_gadget_button( dlg, x, y, button_width, button_height, Button[i], NULL );
y += button_height+MENU_VERT_SPACING;
}
choice = 0;
while(choice==0)
event_process();
ui_close_dialog(dlg);
d_free(p);
return choice;
}
static int browser_handler(UI_DIALOG *dlg, d_event *event, file_browser *b)
{
int rval = 0;
if (event->type == EVENT_UI_DIALOG_DRAW)
{
ui_dprintf_at( dlg, 10, 5, "%s", b->message );
ui_dprintf_at( dlg, 20, 32,"N&ame" );
ui_dprintf_at( dlg, 20, 86,"&Files" );
ui_dprintf_at( dlg, 210, 86,"&Dirs" );
ui_dprintf_at( dlg, 20, 60, "%s", b->spaces );
ui_dprintf_at( dlg, 20, 60, "%s", b->view_dir );
return 1;
}
if (GADGET_PRESSED(b->button2))
{
PHYSFS_freeList(b->filename_list);
b->filename_list = NULL;
PHYSFS_freeList(b->directory_list);
b->directory_list = NULL;
ui_close_dialog(dlg);
return 1;
}
if (GADGET_PRESSED(b->help_button))
{
ui_messagebox( -1, -1, 1, "Sorry, no help is available!", "Ok" );
rval = 1;
}
if (event->type == EVENT_UI_LISTBOX_MOVED)
{
if ((ui_event_get_gadget(event) == (UI_GADGET *)b->listbox1) && (b->listbox1->current_item >= 0) && b->filename_list[b->listbox1->current_item])
ui_inputbox_set_text(b->user_file, b->filename_list[b->listbox1->current_item]);
if ((ui_event_get_gadget(event) == (UI_GADGET *)b->listbox2) && (b->listbox2->current_item >= 0) && b->directory_list[b->listbox2->current_item])
ui_inputbox_set_text(b->user_file, b->directory_list[b->listbox2->current_item]);
rval = 1;
}
if (GADGET_PRESSED(b->button1) || GADGET_PRESSED(b->user_file) || (event->type == EVENT_UI_LISTBOX_SELECTED))
{
char *p;
if (ui_event_get_gadget(event) == (UI_GADGET *)b->listbox2)
strcpy(b->user_file->text, b->directory_list[b->listbox2->current_item]);
strncpy(b->filename, b->view_dir, PATH_MAX);
p = b->user_file->text;
while (!strncmp(p, "..", 2)) // shorten the path manually
{
char *sep = strrchr(b->filename, '/');
if (sep)
*sep = 0;
else
*b->filename = 0; // look directly in search paths
p += 2;
if (*p == '/')
p++;
}
if (*b->filename && *p)
strncat(b->filename, "/", PATH_MAX - strlen(b->filename));
strncat(b->filename, p, PATH_MAX - strlen(b->filename));
if (!PHYSFS_isDirectory(b->filename))
{
PHYSFS_file *TempFile;
TempFile = PHYSFS_openRead(b->filename);
if (TempFile)
{
// Looks like a valid filename that already exists!
PHYSFS_close(TempFile);
ui_close_dialog(dlg);
return 1;
}
// File doesn't exist, but can we create it?
TempFile = PHYSFS_openWrite(b->filename);
if (TempFile)
{
// Looks like a valid filename!
PHYSFS_close(TempFile);
PHYSFS_delete(b->filename);
ui_close_dialog(dlg);
return 1;
}
}
else
{
if (b->filename[strlen(b->filename) - 1] == '/') // user typed a separator on the end
b->filename[strlen(b->filename) - 1] = 0;
strcpy(b->view_dir, b->filename);
PHYSFS_freeList(b->filename_list);
b->filename_list = file_getfilelist(&b->num_files, b->filespec, b->view_dir);
if (!b->filename_list)
{
PHYSFS_freeList(b->directory_list);
b->directory_list = NULL;
ui_close_dialog(dlg);
return 1;
}
ui_inputbox_set_text(b->user_file, b->filespec);
PHYSFS_freeList(b->directory_list);
b->directory_list = file_getdirlist(&b->num_dirs, b->view_dir);
if (!b->directory_list)
{
PHYSFS_freeList(b->filename_list);
b->filename_list = NULL;
ui_close_dialog(dlg);
return 1;
}
ui_listbox_change(dlg, b->listbox1, b->num_files, b->filename_list);
ui_listbox_change(dlg, b->listbox2, b->num_dirs, b->directory_list);
//i = TICKER;
//while ( TICKER < i+2 );
}
rval = 1;
}
return rval;
}
int MenuX( int x, int y, int NumButtons, const char *const text[] )
{
UI_DIALOG * dlg;
int button_width, button_height;
int w, h;
int choice;
auto m = make_unique<menu>();
m->num_buttons = NumButtons;
m->button_g = make_unique<std::unique_ptr<UI_GADGET_BUTTON>[]>(NumButtons);
m->button = make_unique<const char *[]>(NumButtons);
m->choice = &choice;
button_width = button_height = 0;
for (int i=0; i<NumButtons; i++ )
{
m->button[i] = text[i];
int width, height;
ui_get_button_size(*grd_curcanv->cv_font, m->button[i], width, height);
if ( width > button_width ) button_width = width;
if ( height > button_height ) button_height = height;
}
unsigned width, height;
width = button_width + 2*(MENU_BORDER+3);
height = (button_height*NumButtons) + (MENU_VERT_SPACING*(NumButtons-1)) ;
height += (MENU_BORDER+3) * 2;
w = grd_curscreen->get_screen_width();
h = grd_curscreen->get_screen_height();
{
int mx, my, mz;
mouse_get_pos(&mx, &my, &mz);
if ( x == -1 ) x = mx - width/2;
if ( y == -1 ) y = my;
}
if (x < 0 ) {
x = 0;
}
if ( (x+width-1) >= w ) {
x = w - width;
}
if (y < 0 ) {
y = 0;
}
if ( (y+height-1) >= h ) {
y = h - height;
}
dlg = ui_create_dialog(x, y, width, height, static_cast<dialog_flags>(DF_FILLED | DF_SAVE_BG | DF_MODAL), menu_handler, m.get());
x = MENU_BORDER+3;
y = MENU_BORDER+3;
for (int i=0; i<NumButtons; i++ )
{
m->button_g[i] = ui_add_gadget_button( dlg, x, y, button_width, button_height, m->button[i], NULL );
y += button_height+MENU_VERT_SPACING;
}
choice = 0;
while(choice==0)
event_process();
ui_close_dialog(dlg);
return choice;
}
