{

uint32_t t_left, t_top, t_right, t_bottom;

MCEmscriptenGetWindowRect(p_window_id, &t_left, &t_top, &t_right, &t_bottom);

return MCRectangleMake(t_left, t_top, t_right - t_left, t_bottom - t_top);

{

uint32_t t_left, t_top, t_right, t_bottom;

MCEmscriptenGetDisplayRect(&t_left, &t_top, &t_right, &t_bottom);

return MCRectangleMake(t_left, t_top, t_right - t_left, t_bottom - t_top);

{

if (MCnoui) return false;

MCScreenDC *t_dc = static_cast<MCScreenDC *>(MCscreen);

t_dc->update_mouse_press_state(p_state, p_button);

MCEventQueuePostMousePress(p_stack, p_time, p_modifiers, p_state, p_button);

return true;

{

MCRectangle t_window_rect = p_stack->view_getrect();

return MCPointOffset(p_loc, t_window_rect.x, t_window_rect.y);

{

if (MCnoui) return false;

MCScreenDC *t_dc = static_cast<MCScreenDC *>(MCscreen);

MCPoint t_position = MCPointMake(p_x, p_y);

if (p_stack)

t_position = MCEmscriptenWindowToGlobalLoc(p_stack, t_position);

if (t_dc->update_mouse_position(t_position))

MCEventQueuePostMousePosition(p_stack, p_time, p_modifiers, p_x, p_y);

return true;

: m_main_window(nil), m_mouse_button_state(0)

{

m_mouse_position = MCPointMake(-1,-1);

{

return

MCEmscriptenJSInitialize() &&

MCEmscriptenEventInitialize() &&

MCEmscriptenViewInitialize() &&

MCEmscriptenLibUrlInitialize() &&

MCEmscriptenDCInitialize();

{

MCEmscriptenDCFinalize();

MCEmscriptenViewFinalize();

MCEmscriptenEventFinalize();

MCEmscriptenLibUrlFinalize();

MCEmscriptenJSFinalize();

return true;

Boolean override)

{

uint32_t t_window = reinterpret_cast<uint32_t>(p_window);

MCLog("set window visible");

MCEmscriptenSetWindowVisible(t_window, true);

MCLog("find stack");

MCStack *t_stack = MCdispatcher->findstackd(p_window);

/* Enable drawing */

MCLog("activate tilecache");

t_stack->view_activatetilecache();

t_stack->setextendedstate(false, ECS_DONTDRAW);

/* Set up view to match window, as far as possible */

/* FIXME Implement HiDPI support */

MCEmscriptenSetWindowRect(t_window, t_stack->view_getrect());

t_stack->view_configure(true);

t_stack->dirtyall();

{

MCAssert(p_window);

uint32_t t_window = reinterpret_cast<uint32_t>(p_window);

MCEmscriptenSetWindowVisible(t_window, false);

{

uint32_t t_window = reinterpret_cast<uint32_t>(x_window);

MCEmscriptenDestroyWindow(t_window);

x_window = nil;

{

uint32_t t_window = reinterpret_cast<uint32_t>(p_window);

MCEmscriptenRaiseWindow(t_window);

{

r_window = reinterpret_cast<Window>(p_uint);

return True;

MCRectangle & r_rect)

{

/* FIXME Implement HiDPI support */

uint32_t t_window = reinterpret_cast<uint32_t>(p_window);

r_rect = MCEmscriptenGetWindowRect(t_window);

return true;

{

MCDisplay *t_display = nil;

if (!MCMemoryNew(t_display))

return false;

t_display->viewport = t_display->workarea = MCEmscriptenGetDisplayRect();

r_displays = t_display;

r_count = 1;

return true;

Boolean p_allow_dispatch,

Boolean p_accept_any_event)

{

/* Don't permit inner main loops. They cause amusing "-12" assertion

if (0 < int(MCwaitdepth))

{

return true;

}

p_duration = MCMax(p_duration, 0.0);

/* We allow p_duration to be infinite, but only if

MCAssert(isfinite(p_duration) || p_accept_any_event);

MCDeletedObjectsEnterWait(p_allow_dispatch);

++MCwaitdepth;

real64_t t_current_time = MCS_time();

real64_t t_exit_time = t_current_time + p_duration;

real64_t t_event_time = t_exit_time;

bool t_first = true;

bool t_done = false;

while (!t_done && !MCquit)

{

/* If more than one iteration through the wait loop is needed

if (!t_first)

{

/* Update estimate of time remaining */

t_current_time = MCS_time();

real64_t t_sleep_time = MCMin(t_event_time - t_current_time,

t_exit_time - t_current_time);

/* Check if the requested wait duration has already

if (!t_done)

{

t_done = (t_sleep_time <= 0);

}

/* There's still some waiting required, so give up running the

if (!t_done &&

MCEmscriptenAsyncYield(t_sleep_time))

{

t_done = p_accept_any_event;

}

/* Update the times based on the result of the yield */

t_current_time = MCS_time();

}

if (!t_done)

{

DoRunloopActions();

}

/* Dispatch pending engine messages */

t_event_time = t_exit_time;

if (!t_done &&

handlepending(t_current_time, t_event_time, p_allow_dispatch))

{

t_done = p_accept_any_event;

}

/* Dispatch queued incoming system events */

if (!t_done &&

p_allow_dispatch && MCEventQueueDispatch())

{

t_done = p_accept_any_event;

}

/* Redraw the screen */

MCRedrawUpdateScreen();

t_first = false;

}

--MCwaitdepth;

MCDeletedObjectsLeaveWait(p_allow_dispatch);

return MCquit;

{

// Default to returning an unsuccessful result

int32_t t_result = -1;

// We need to have a UTF-16 string pointer for the message string. The other

// parameters are not supported by the JavaScript built-in dialogues.

MCAutoStringRefAsUTF16String t_message_u16;

t_message_u16.Lock(p_message);

switch (p_button_count)

{

case 0:

// If no buttons specified, assume that an "OK" button is fine

case 1:

// Only one button - treat it as an "OK" button

t_result = MCEmscriptenDialogShowAlert(t_message_u16.Ptr(), t_message_u16.Size());

break;

case 2:

// Two buttons - treat it as an "OK"/"Cancel" button pair

{

int32_t t_ok_button = 0, t_cancel_button = 1;

// check order of ok/cancel

if (MCStringIsEqualToCString(p_buttons[1], "ok", kMCStringOptionCompareCaseless) ||

MCStringIsEqualToCString(p_buttons[0], "cancel", kMCStringOptionCompareCaseless))

{

t_ok_button = 1;

t_cancel_button = 0;

}

if (MCEmscriptenDialogShowConfirm(t_message_u16.Ptr(), t_message_u16.Size()))

t_result = t_ok_button;

else

t_result = t_cancel_button;

}

break;

default:

// Not supported

break;

}

return t_result;

{

MCAutoStringRefAsUTF16String t_message_u16;

MCAutoStringRefAsUTF16String t_default_u16;

t_message_u16.Lock(p_message);

t_default_u16.Lock(p_initial);

unichar_t* t_result;

size_t t_result_length;

if (!MCEmscriptenDialogShowPrompt(t_message_u16.Ptr(), t_message_u16.Size(), t_default_u16.Ptr(), t_default_u16.Size(), &t_result, &t_result_length))

{

return false;

}

MCStringCreateWithBytesAndRelease((byte_t*)t_result, t_result_length, kMCStringEncodingUTF16, false, r_result);

return true;

{

// track mouse button pressed state

/* NOTE - assumes there are no more than 32 mouse buttons */

if (p_button < 32)

{

if (p_state == kMCMousePressStateDown)

m_mouse_button_state |= 1UL << p_button;

else if (p_state == kMCMousePressStateUp)

m_mouse_button_state &= ~(1UL << p_button);

}

{

if (MCPointIsEqual(m_mouse_position, p_position))

return false;

m_mouse_position = p_position;

return true;

{

// return recorded mouse button state

if (p_button < 32)

return (m_mouse_button_state & (1 << p_button)) != 0;

return false;

{

// There is no asynchronous mouse position in Emscripten; just whatever the

// browser has told us about.

r_x = m_mouse_position.x;

r_y = m_mouse_position.y;