int LocalObjectPlaceObject(void)
{
int rval;
Cur_goody_count = 0;
if (Cur_object_type != OBJ_ROBOT)
{
Cur_object_type = OBJ_ROBOT;
Cur_object_id = 3; // class 1 drone
Num_object_subtypes = N_robot_types;
}
rval = ObjectPlaceObject();
if (rval == -1)
return -1;
Objects[Cur_object_index].contains_type = Cur_goody_type;
Objects[Cur_object_index].contains_id = Cur_goody_id;
Objects[Cur_object_index].contains_count = Cur_goody_count;
set_view_target_from_segment(Cursegp);
return rval;
}
static int LocalObjectSelectPrevinMine(void)
{
int rval, first_obj;
rval = ObjectSelectPrevInMine();
first_obj = Cur_object_index;
if (Cur_object_index != object_none) {
while (!is_legal_type_for_this_window(Cur_object_index)) {
ObjectSelectPrevInMine();
if (first_obj == Cur_object_index)
break;
}
const auto &&objp = vobjptr(Cur_object_index);
Cur_goody_type = objp->contains_type;
Cur_goody_id = objp->contains_id;
if (objp->contains_count < 0)
objp->contains_count = 0;
Cur_goody_count = objp->contains_count;
}
if (Cur_object_index != first_obj)
set_view_target_from_segment(Cursegp);
return rval;
}
static int LocalObjectSelectNextinSegment(void)
{
int rval;
objnum_t first_obj;
rval = ObjectSelectNextinSegment();
first_obj = Cur_object_index;
if (Cur_object_index != object_none) {
while (!is_legal_type_for_this_window(Cur_object_index)) {
rval = ObjectSelectNextinSegment();
if (first_obj == Cur_object_index)
break;
}
Cur_goody_type = Objects[Cur_object_index].contains_type;
Cur_goody_id = Objects[Cur_object_index].contains_id;
if (Objects[Cur_object_index].contains_count < 0)
Objects[Cur_object_index].contains_count = 0;
Cur_goody_count = Objects[Cur_object_index].contains_count;
}
if (Cur_object_index != first_obj)
set_view_target_from_segment(Cursegp);
return rval;
}
int LocalObjectSelectPrevinMine(void)
{
int rval, first_obj;
rval = ObjectSelectPrevInMine();
first_obj = Cur_object_index;
if (Cur_object_index != -1) {
while (!is_legal_type_for_this_window(Cur_object_index)) {
ObjectSelectPrevInMine();
if (first_obj == Cur_object_index)
break;
}
Cur_goody_type = Objects[Cur_object_index].contains_type;
Cur_goody_id = Objects[Cur_object_index].contains_id;
if (Objects[Cur_object_index].contains_count < 0)
Objects[Cur_object_index].contains_count = 0;
Cur_goody_count = Objects[Cur_object_index].contains_count;
}
if (Cur_object_index != first_obj)
set_view_target_from_segment(Cursegp);
return rval;
}
int LocalObjectSelectNextinMine(void)
{
int rval, first_obj;
rval = ObjectSelectNextInMine();
first_obj = Cur_object_index;
if (Cur_object_index != -1) {
while (!is_legal_type_for_this_window(Cur_object_index)) {
//mprintf((0, "Skipping object #%i of type %i\n", Cur_object_index, Objects[Cur_object_index].type));
ObjectSelectNextInMine();
if (Cur_object_index == first_obj)
break;
}
Cur_goody_type = Objects[Cur_object_index].contains_type;
Cur_goody_id = Objects[Cur_object_index].contains_id;
if (Objects[Cur_object_index].contains_count < 0)
Objects[Cur_object_index].contains_count = 0;
Cur_goody_count = Objects[Cur_object_index].contains_count;
}
if (Cur_object_index != first_obj)
set_view_target_from_segment(Cursegp);
return rval;
}
int ToggleChaseMode()
{
Funky_chase_mode = !Funky_chase_mode;
set_view_target_from_segment(Cursegp);
if (Funky_chase_mode == 1) {
diagnostic_message("Chase mode ON.");
}
if (Funky_chase_mode == 0) {
diagnostic_message("Chase mode OFF.");
}
return Funky_chase_mode;
}
// -------------------------------------------------------------------------------------
int SelectCurrentSegBackward()
{
const auto &p = get_previous_segment_side(Cursegp,Curside);
Cursegp = p.first;
Curside = p.second;
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
Update_flags |= UF_ED_STATE_CHANGED;
mine_changed = 1;
med_create_new_segment_from_cursegp();
return 1;
}
int DeleteCurSegment()
{
// Delete current segment.
med_delete_segment(Cursegp);
autosave_mine(mine_filename);
strcpy(undo_status[Autosave_count], "Delete segment UNDONE.");
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
Update_flags |= UF_WORLD_CHANGED;
mine_changed = 1;
diagnostic_message("Segment deleted.");
warn_if_concave_segments(); // This could be faster -- just check if deleted segment was concave, warn accordingly
return 1;
}
int LocalObjectDelete(void)
{
int rval;
rval = ObjectDelete();
if (Cur_object_index != -1) {
Cur_goody_type = Objects[Cur_object_index].contains_type;
Cur_goody_id = Objects[Cur_object_index].contains_id;
Cur_goody_count = Objects[Cur_object_index].contains_count;
}
set_view_target_from_segment(Cursegp);
return rval;
}
// -------------------------------------------------------------------------------------
int SelectCurrentSegBackward()
{
int newseg_num,newside;
get_previous_segment(Cursegp-Segments,Curside,&newseg_num,&newside);
Cursegp = &Segments[newseg_num];
Curside = newside;
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
Update_flags |= UF_ED_STATE_CHANGED;
mine_changed = 1;
med_create_new_segment_from_cursegp();
return 1;
}
int SelectNextFoundSeg(void)
{
if (++Found_seg_index >= Found_segs.count())
Found_seg_index = 0;
Cursegp = segptridx(Found_segs[Found_seg_index]);
med_create_new_segment_from_cursegp();
Update_flags |= UF_WORLD_CHANGED;
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
editor_status("Curseg assigned to next found segment.");
return 1;
}
int AttachSegment()
{
if (med_attach_segment(Cursegp, &New_segment, Curside, AttachSide)==4) // Used to be WBACK instead of Curside
diagnostic_message("Cannot attach segment - already a connection on current side.");
else {
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
vm_angvec_make(&Seg_orientation,0,0,0);
Curside = WBACK;
Update_flags |= UF_WORLD_CHANGED;
autosave_mine(mine_filename);
strcpy(undo_status[Autosave_count], "Attach Segment UNDONE.\n");
mine_changed = 1;
warn_if_concave_segment(Cursegp);
}
return 1;
}
static int LocalObjectDelete(void)
{
int rval;
rval = ObjectDelete();
if (Cur_object_index != object_none) {
const auto &&objp = vcobjptr(Cur_object_index);
Cur_goody_type = objp->contains_type;
Cur_goody_id = objp->contains_id;
Cur_goody_count = objp->contains_count;
}
set_view_target_from_segment(Cursegp);
return rval;
}
int ToggleLockViewToCursegp(void)
{
Lock_view_to_cursegp = !Lock_view_to_cursegp;
Update_flags = UF_ED_STATE_CHANGED;
if (Lock_view_to_cursegp) {
if (last_keypress != KEY_V+KEY_CTRLED)
diagnostic_message("[ctrl-V] View locked to Cursegp.");
else
diagnostic_message("View locked to Cursegp.");
set_view_target_from_segment(Cursegp);
} else {
if (last_keypress != KEY_V+KEY_CTRLED)
diagnostic_message("[ctrl-V] View not locked to Cursegp.");
else
diagnostic_message("View not locked to Cursegp.");
}
return Lock_view_to_cursegp;
}
// ---------- select current segment ----------
int SelectCurrentSegForward()
{
int newseg_num,newside;
get_next_segment(Cursegp-Segments,Curside,&newseg_num,&newside);
if (newseg_num != Cursegp-Segments) {
Cursegp = &Segments[newseg_num];
Curside = newside;
Update_flags |= UF_ED_STATE_CHANGED;
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
med_create_new_segment_from_cursegp();
mine_changed = 1;
}
return 1;
}
int SelectPreviousFoundSeg(void)
{
if (Found_seg_index > 0)
Found_seg_index--;
else
Found_seg_index = Found_segs.count()-1;
Cursegp = segptridx(Found_segs[Found_seg_index]);
med_create_new_segment_from_cursegp();
Update_flags |= UF_WORLD_CHANGED;
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
editor_status("Curseg assigned to previous found segment.");
return 1;
}
int UndoCommand()
{ int u;
u = undo();
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
if (u == 0) {
if (Autosave_count==9) diagnostic_message(undo_status[0]);
else
diagnostic_message(undo_status[Autosave_count+1]);
}
else
if (u == 1) diagnostic_message("Can't Undo.");
else
if (u == 2) diagnostic_message("Can't Undo - Autosave OFF");
Update_flags |= UF_WORLD_CHANGED;
mine_changed = 1;
warn_if_concave_segments();
return 1;
}
// ---------- select current segment ----------
int SelectCurrentSegForward()
{
const auto p = get_next_segment_side(Cursegp,Curside);
const auto &newseg_num = p.first;
if (newseg_num != Cursegp)
{
Cursegp = newseg_num;
const auto &newside = p.second;
Curside = newside;
Update_flags |= UF_ED_STATE_CHANGED;
if (Lock_view_to_cursegp)
set_view_target_from_segment(Cursegp);
med_create_new_segment_from_cursegp();
mine_changed = 1;
}
return 1;
}
int ToggleLockstep()
{
Gameview_lockstep = !Gameview_lockstep;
if (Gameview_lockstep == 0) {
if (last_keypress != KEY_L)
diagnostic_message("[L] - Lock mode OFF");
else
diagnostic_message("Lock mode OFF");
}
if (Gameview_lockstep) {
if (last_keypress != KEY_L)
diagnostic_message("[L] Lock mode ON");
else
diagnostic_message("Lock mode ON");
Cursegp = &Segments[ConsoleObject->segnum];
med_create_new_segment_from_cursegp();
set_view_target_from_segment(Cursegp);
Update_flags = UF_ED_STATE_CHANGED;
}
return Gameview_lockstep;
}
int CreateNewMine()
{
if (SafetyCheck()) {
texpage_goto_first();
create_new_mine();
LargeView.ev_matrix = vmd_identity_matrix; //FrontView.ev_matrix;
set_view_target_from_segment(Cursegp);
Seg_scale = {DEFAULT_X_SIZE, DEFAULT_Y_SIZE, DEFAULT_Z_SIZE};
Update_flags = UF_WORLD_CHANGED;
SetPlayerFromCurseg();
SetPlayerPosition(); //say default is permanant position
mine_changed = 0;
Found_segs.clear();
Selected_segs.clear();
med_compress_mine();
gamestate = editor_gamestate::none;
init_info = 1;
ResetFilename();
Game_mode = GM_UNKNOWN;
Current_level_num = 1; // make level 1
}
return 1;
}
int CreateNewMine()
{
if (SafetyCheck()) {
texpage_goto_first();
create_new_mine();
LargeView.ev_matrix = vmd_identity_matrix; //FrontView.ev_matrix;
set_view_target_from_segment(Cursegp);
vm_vec_make(&Seg_scale,DEFAULT_X_SIZE,DEFAULT_Y_SIZE,DEFAULT_Z_SIZE);
Update_flags = UF_WORLD_CHANGED;
SetPlayerFromCurseg();
SetPlayerPosition(); //say default is permanant position
mine_changed = 0;
N_found_segs = 0;
N_selected_segs = 0;
med_compress_mine();
gamestate_not_restored = 0;
init_info = 1;
ResetFilename();
Game_mode = GM_UNKNOWN;
Current_level_num = 0; //0 means not a real game
}
return 1;
}
int LocalObjectPlaceObject(void)
{
int rval;
Cur_goody_count = 0;
while (ObjType[Cur_robot_type] != OL_ROBOT) { // && (ObjType[Cur_robot_type] != OL_POWERUP)) {
Cur_robot_type++;
if (Cur_robot_type >= N_robot_types)
Cur_robot_type = 0;
}
rval = ObjectPlaceObject();
if (rval == -1)
return -1;
Objects[Cur_object_index].contains_type = Cur_goody_type;
Objects[Cur_object_index].contains_id = Cur_goody_id;
Objects[Cur_object_index].contains_count = Cur_goody_count;
set_view_target_from_segment(Cursegp);
return rval;
}
// ---------------------------------------------------------------------------------------------------
//this function is the editor. called when editor mode selected. runs until
//game mode or exit selected
void editor(void)
{
int w,h;
grs_bitmap * savedbitmap;
editor_view *new_cv;
static int padnum=0;
vms_matrix MouseRotMat,tempm;
//@@short camera_objnum; //a camera for viewing
init_editor();
InitCurve();
RestoreEffectBitmapIcons();
if (!SetScreenMode(SCREEN_EDITOR)) {
SetScreenMode(SCREEN_GAME);
gameStates.app.nFunctionMode=FMODE_GAME; //force back into game
return;
}
GrSetCurrentCanvas( NULL );
GrSetCurFont(editor_font);
//Editor renders into full (320x200) game screen
SetWarnFunc(med_show_warning);
keyd_repeat = 1; // Allow repeat in editor
// _MARK_("start of editor");//Nuked to compile -KRB
ui_mouse_hide();
ui_reset_idle_seconds();
gameData.objs.viewer = gameData.objs.console;
slew_init(gameData.objs.console);
Update_flags = UF_ALL;
medlisp_update_screen();
//set the wire-frame window to be the current view
current_view = &LargeView;
if (faded_in==0)
{
faded_in = 1;
//gr_pal_fade_in( grdCurScreen->pal );
}
w = GameViewBox->canvas->cv_bitmap.bm_props.w;
h = GameViewBox->canvas->cv_bitmap.bm_props.h;
savedbitmap = GrCreateBitmap(w, h );
GrBmUBitBlt( w, h, 0, 0, 0, 0, &GameViewBox->canvas->cv_bitmap, savedbitmap );
GrSetCurrentCanvas( GameViewBox->canvas );
GrSetCurFont(editor_font);
//GrSetColor( CBLACK );
//gr_deaccent_canvas();
//gr_grey_canvas();
ui_mouse_show();
GrSetCurFont(editor_font);
ui_pad_goto(padnum);
gamestate_restore_check();
while (gameStates.app.nFunctionMode == FMODE_EDITOR) {
GrSetCurFont(editor_font);
info_display_all(EditorWindow);
ModeFlag = 0;
// Update the windows
// Only update if there is no key waiting and we're not in
// fast play mode.
if (!key_peekkey()) //-- && (MacroStatus != UI_STATUS_FASTPLAY))
medlisp_update_screen();
//do editor stuff
GrSetCurFont(editor_font);
ui_mega_process();
last_keypress &= ~KEY_DEBUGGED; // mask off delete key bit which has no function in editor.
ui_window_do_gadgets(EditorWindow);
do_robot_window();
do_object_window();
do_wall_window();
do_trigger_window();
do_hostage_window();
do_centers_window();
check_wall_validity();
Assert(gameData.walls.nWalls>=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 ( ui_get_idle_seconds() > COMPRESS_INTERVAL )
{
med_compress_mine();
ui_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
TimedAutosave(mine_filename);
set_editor_time_of_day();
GrSetCurrentCanvas( GameViewBox->canvas );
// Remove keys used for slew
switch(last_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:
last_keypress = 0;
}
if ((last_keypress&0xff)==KEY_LSHIFT) last_keypress=0;
if ((last_keypress&0xff)==KEY_RSHIFT) last_keypress=0;
if ((last_keypress&0xff)==KEY_LCTRL) last_keypress=0;
if ((last_keypress&0xff)==KEY_RCTRL) last_keypress=0;
// if ((last_keypress&0xff)==KEY_LALT) last_keypress=0;
// if ((last_keypress&0xff)==KEY_RALT) last_keypress=0;
GrSetCurFont(editor_font);
menubar_do( last_keypress );
//=================== DO FUNCTIONS ====================
if ( KeyFunction[ last_keypress ] != NULL ) {
KeyFunction[last_keypress]();
last_keypress = 0;
}
switch (last_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();
break;
case KEY_F1:
render_3d_in_big_window = !render_3d_in_big_window;
Update_flags |= UF_ALL;
break;
default:
{
char kdesc[100];
GetKeyDescription( kdesc, last_keypress );
editor_status("Error: %s isn't bound to anything.", kdesc );
}
}
//================================================================
if (ModeFlag==1)
{
close_editor_screen();
gameStates.app.nFunctionMode=FMODE_EXIT;
GrFreeBitmap( savedbitmap );
break;
}
if (ModeFlag==2) //-- && MacroStatus==UI_STATUS_NORMAL )
{
ui_mouse_hide();
gameStates.app.nFunctionMode = FMODE_GAME;
GrBmUBitBlt( w, h, 0, 0, 0, 0, savedbitmap, &GameViewBox->canvas->cv_bitmap);
GrFreeBitmap( savedbitmap );
break;
}
if (ModeFlag==3) //-- && MacroStatus==UI_STATUS_NORMAL )
{
// med_compress_mine(); //will be called anyways before game.
close_editor_screen();
gameStates.app.nFunctionMode=FMODE_GAME; //force back into game
SetScreenMode(SCREEN_GAME); //put up game screen
GrFreeBitmap( savedbitmap );
break;
}
// if (CurWindow->keyboard_focus_gadget == (UI_GADGET *)GameViewBox) current_view=NULL;
// if (CurWindow->keyboard_focus_gadget == (UI_GADGET *)GroupViewBox) current_view=NULL;
new_cv = current_view ;
#if ORTHO_VIEWS
if (CurWindow->keyboard_focus_gadget == (UI_GADGET *)LargeViewBox) new_cv=&LargeView;
if (CurWindow->keyboard_focus_gadget == (UI_GADGET *)TopViewBox) new_cv=&TopView;
if (CurWindow->keyboard_focus_gadget == (UI_GADGET *)FrontViewBox) new_cv=&FrontView;
if (CurWindow->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;
}
CalcFrameTime();
if (slew_frame(0)) { //do movement and check keys
Update_flags |= UF_GAME_VIEW_CHANGED;
if (Gameview_lockstep) {
Cursegp = &gameData.segs.segments[gameData.objs.console->segnum];
med_create_new_segment_from_cursegp();
Update_flags |= UF_ED_STATE_CHANGED;
}
}
// DO TEXTURE STUFF
texpage_do();
objpage_do();
// Process selection of Cursegp using mouse.
if (LargeViewBox->mouse_onme && LargeViewBox->b1_clicked && !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,&gameData.objs.console->pos);
Cursegp = &gameData.segs.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 (GameViewBox->mouse_onme && GameViewBox->b1_dragging) {
int x, y;
x = GameViewBox->b1_drag_x2;
y = GameViewBox->b1_drag_y2;
ui_mouse_hide();
GrSetCurrentCanvas( GameViewBox->canvas );
GrSetColor( 15 );
GrRect( x-1, y-1, x+1, y+1 );
ui_mouse_show();
}
// 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 ((GameViewBox->mouse_onme && GameViewBox->b1_clicked && !render_3d_in_big_window) ||
(LargeViewBox->mouse_onme && LargeViewBox->b1_clicked && 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("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 = &gameData.segs.segments[seg];
Curside = side;
AssignTexture();
med_create_new_segment_from_cursegp();
editor_status("Texture assigned");
} else if (keyd_pressed[KEY_G]) {
tmap = gameData.segs.segments[seg].sides[side].tmap_num;
texpage_grab_current(tmap);
editor_status( "Texture grabbed." );
} else if (keyd_pressed[ KEY_LAPOSTRO] ) {
ui_mouse_hide();
move_object_to_mouse_click();
} else {
Cursegp = &gameData.segs.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 (keyd_pressed[ KEY_LCTRL ] || keyd_pressed[ KEY_RCTRL ]) {
ui_mouse_hide();
if ( (Mouse.dx!=0) && (Mouse.dy!=0) ) {
GetMouseRotation( Mouse.dx, Mouse.dy, &MouseRotMat );
VmMatMul(&tempm,&LargeView.ev_matrix,&MouseRotMat);
LargeView.ev_matrix = tempm;
LargeView.ev_changed = 1;
Large_view_index = -1; // say not one of the orthogonal views
}
} else {
ui_mouse_show();
}
if ( keyd_pressed[ KEY_Z ] ) {
ui_mouse_hide();
if ( Mouse.dy!=0 ) {
current_view->ev_dist += Mouse.dy*10000;
current_view->ev_changed = 1;
}
} else {
ui_mouse_show();
}
}
// _MARK_("end of editor");//Nuked to compile -KRB
ClearWarnFunc(med_show_warning);
//kill our camera object
gameData.objs.viewer = gameData.objs.console; //reset viewer
//@@ReleaseObject(camera_objnum);
padnum = ui_pad_get_current();
close_editor();
ui_close();
}
// 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;
}
