static BOOL _queryMouseMove(PGROPDATA pGrop, LONG lX, LONG lY)
{
POINTL pointl;
ULONG ulVAWidth = pGrop->rectlViewArea.xRight -
pGrop->rectlViewArea.xLeft;
ULONG ulVAHeight = pGrop->rectlViewArea.yTop -
pGrop->rectlViewArea.yBottom;
// For compatibility with some SDL-programs simulating the relative mouse
// motion (for ex. OpenTyrian).
pGrop->fCapture = FALSE;
// Restrict the movement of the mouse user work area.
if ( lX < 0 )
lX = 0;
else if ( lX >= pGrop->stUserMode.ulWidth )
lX = pGrop->stUserMode.ulWidth - 1;
if ( lY < 0 )
lY = 0;
else if ( lY >= pGrop->stUserMode.ulHeight )
lY = pGrop->stUserMode.ulHeight - 1;
// Scale coordinates from work area to the view area.
pointl.x = pGrop->rectlViewArea.xLeft +
( ( ulVAWidth * lX ) / pGrop->stUserMode.ulWidth );
pointl.y = pGrop->rectlViewArea.yBottom +
( ulVAHeight * lY ) / pGrop->stUserMode.ulHeight;
WinMapWindowPoints( pGrop->hwnd, pGrop->hwndDT, &pointl, 1 );
pGrop->lSkipMouseMove++;
return WinSetPointerPos( pGrop->hwndDT, pointl.x, pointl.y );
}
/****************************************************************************
* ShowMouse *
* - Hides/shows the mouse depending on the state of the game *
* - No I/O. *
****************************************************************************/
VOID ShowMouse(BOOL bShowMouse)
{
static INT cPointerLvl = 0; /* Pointer level, 0 = visible */
static POINTL ptl; /* Pointer position when hidden */
if (bShowMouse) {
if (cPointerLvl == 1) {
cPointerLvl = 0;
WinSetPointerPos(HWND_DESKTOP, ptl.x, ptl.y);
WinShowPointer(HWND_DESKTOP, TRUE);
}
} else {
if (iGameMode != GAME_MODE_INIT1 && iGameMode != GAME_MODE_INIT2 &&
prfProfile.bMOUSECONTROL && cPointerLvl == 0) {
cPointerLvl = 1;
WinQueryPointerPos(HWND_DESKTOP, &ptl);
WinShowPointer(HWND_DESKTOP, FALSE);
}
}
}
static VOID _captureMouse(PGROPDATA pGrop, BOOL fCapture)
{
SWP swp;
POINTL pointl;
if ( fCapture )
{
WinSetCapture( pGrop->hwndDT, pGrop->hwnd );
WinQueryWindowPos( pGrop->hwnd, &swp );
pointl.x = swp.cx / 2;
pointl.y = swp.cy / 2;
WinMapWindowPoints( pGrop->hwnd, pGrop->hwndDT, &pointl, 1 );
pGrop->lSkipMouseMove++;
WinSetPointerPos( pGrop->hwndDT, pointl.x, pointl.y );
}
else
WinSetCapture( pGrop->hwndDT, NULLHANDLE );
}
VOID _System threadMouMovMgr(ULONG ul) {
ULONG ulPost;
POINTL ptl;
INT i;
ULONG covrd; // numero corrente spostamenti mouse da traiettoria impostata
ULONG cstops; // numero di movimenti volontari mouse necessari per
// cancellare movimento automatico
if (DosCreateEventSem(NULL, &g.mou.hev, DC_SEM_SHARED, 0)) {
stlrlog(IDERR_CREATESERVEVSEM);
return;
} /* endif */
DosSetPriority(PRTYS_THREAD, PRTYC_TIMECRITICAL, 31, 0);
for (;;) {
restart: // label su cui punta quando esce dal loop interno
g.is.mousebtn &= ~MOVEMOUPTR;
covrd = 0;
DosWaitEventSem(g.mou.hev, SEM_INDEFINITE_WAIT);
cstops = (o.mou.moveSteps & 0x2f) >> 3;
for (i = 0; i < o.mou.moveSteps; ++i) {
WinQueryPointerPos(HWND_DESKTOP, &ptl);
// se il mouse Š stato spostato dall'utente x 3 volte
if (memcmp(&ptl, &g.mou.ptc, sizeof(POINTL)) && ++covrd > cstops)
break;
g.mou.wr.cx += g.mou.dp.x;
g.mou.wr.cy += g.mou.dp.y;
g.mou.ptc.x = (LONG)(g.mou.wr.cx >> 16);
g.mou.ptc.y = (LONG)(g.mou.wr.cy >> 16);
WinSetPointerPos(HWND_DESKTOP, g.mou.ptc.x, g.mou.ptc.y);
DosSleep(1);
// se semaforo Š stato resettato perch‚ il puntatore del mouse deve
// essere spostato su una finestra differente ricomincia dall'inizio
DosQueryEventSem(g.mou.hev, &ulPost);
if (!ulPost) goto restart;
} /* endfor */
DosResetEventSem(g.mou.hev, &ulPost);
g.mou.hwndNew = g.mou.hwnd = NULLHANDLE;
} /* endfor */
DosCloseEventSem(g.mou.hev);
}
void Window::setPointer( int type )
{
LONG getPointer = -1;
switch( type )
{
case PTR_ARROW : getPointer = SPTR_ARROW; break;
case PTR_TEXT : getPointer = SPTR_TEXT; break;
case PTR_WAIT : getPointer = SPTR_WAIT; break;
case PTR_MOVE : getPointer = SPTR_SIZENS; break;
case PTR_HAND : getPointer = SPTR_ARROW; break;
}
if( getPointer != -1 )
currentPointer = WinQuerySysPointer( HWND_DESKTOP, getPointer, FALSE );
else
currentPointer = NULLHANDLE;
// Display the new pointer by focring a WM_MOUSEMOVE
POINTL pos;
WinQueryPointerPos( HWND_DESKTOP, &pos );
WinSetPointerPos( HWND_DESKTOP, pos.x, pos.y );
}
/****************************************************************************
* ClientWndProc *
* - Typical PM client window procedure. (see below) *
* - Standard client window I/O *
****************************************************************************/
MRESULT EXPENTRY ClientWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
RECTL rcl;
SWP swp;
HPS hpsPaint;
static HPS hps; /* Permanent HPS */
static INT cx, cy; /* Client window dimensions */
static BOOL bSlowUpdateNow = FALSE; /* Update toggle for asteroids *
* and enemy which are slow. */
static POINTL ptlCenter; /* Center of client window */
switch (msg) {
/* Recieved from WinCreateStdWindow */
case WM_CREATE:
/* Get permanent PS for entire window */
hps = WinGetPS(hwnd);
/* Load private Asteroid fonts from ASTEROID.DLL */
if (GpiLoadFonts(hab, "ASTEROID") != GPI_OK) {
WinReleasePS(hps);
WinAlarm(HWND_DESKTOP, WA_WARNING);
WinMessageBox(HWND_DESKTOP,NULLHANDLE,
"Please put ASTEROID.DLL in a directory in your LIBPATH.",
"Error reading ASTEROID.DLL",
0,MB_ICONHAND|MB_OK|MB_APPLMODAL);
WinPostMsg(hwnd,WM_QUIT,(MPARAM) 0L,(MPARAM) 0L);
return (MRESULT) TRUE;
}
/* Register/create logical fonts for use */
InitFonts(hps);
/* Display About dialoge box */
WinDlgBox(HWND_DESKTOP, hwnd, (PFNWP)AboutDlgProc, NULLHANDLE,
IDD_ABOUT, NULL);
return 0;
/* Recieved during attract mode when user starts game */
case WM_STARTGAME:
/* Determine the number of players */
cPlayers = (INT)LONGFROMMP(mp1);
/* Initialize each player */
for (Player=0;Player<cPlayers;Player++) {
Level[Player] = 1;
Ships[Player] = prfProfile.iSHIPS;
DeletePhotons();
InitAsteroids();
InitEnemy();
}
/* Start with player 1 */
Player = 0;
iGameMode = GAME_MODE_NEXT;
iGameModeCnt = GAME_PAUSE_TIME-1;
/* Hide the pointer if mouse controls are enabled */
ShowMouse(FALSE);
/* Paint everything */
WinSendMsg(hwnd, WM_PAINT, MPVOID, MPVOID);
return 0;
/* Recieved at startup and at the completion of a game */
case WM_INITGAME:
/* Make mouse visible if we hid it before */
ShowMouse(TRUE);
/* Fix menu to reflect attract mode */
EnableMenuItem(hwndMenu, IDM_START, TRUE);
EnableMenuItem(hwndMenu, IDM_STOP, FALSE);
/* Initialize player and enemy data structures */
cPlayers = 0;
Level[0] = 1;
for (Player=0;Player<2;Player++) {
Score[Player] = 0L;
Ships[Player] = 0;
DeletePhotons();
}
Player = 0;
/* Initialize asteroids (and enemy) for attract mode */
InitAsteroids();
InitEnemy();
/* Depending on whether ASTEROID was just started or a game just *
* completed display the "High Score" or "Press 1 or 2" screen. */
if (SHORT1FROMMP(mp1) == 0) {
iGameMode = GAME_MODE_INIT1;
iGameModeCnt = GAME_INIT_TIME;
}
else {
iGameMode = GAME_MODE_INIT2;
iGameModeCnt = GAME_INIT_TIME;
}
/* Paint everything */
WinSendMsg(hwnd, WM_PAINT, MPVOID, MPVOID);
return 0;
/* Usually recieved from the system, sometime forced by the program to *
* ensure the screen is not corrupt. */
case WM_PAINT:
/* Clear entire window to insure no "droppings" */
WinQueryWindowRect(hwnd,&rcl);
WinFillRect(hps, &rcl, CLR_BLACK);
WinInvalidateRect(hwnd, &rcl, FALSE);
/* Get the update region and paint it black */
hpsPaint = WinBeginPaint(hwnd, (HPS)NULL, &rcl);
WinFillRect(hpsPaint, &rcl, CLR_BLACK);
WinEndPaint(hpsPaint);
/* Only in normal play mode should we draw the ship */
if ((iGameMode == GAME_MODE_PLAY) &&
(iShipMode[Player] != EXPLOSION) &&
(iShipMode[Player] != HYPERSPACE))
DrawShip(hps, cx, cy, DRAW_INIT);
else if ((iGameMode == GAME_MODE_PLAY) &&
(iShipMode[Player] == EXPLOSION))
ExplodeShip(hps, cx, cy);
/* Draw the enemy if it is on the screen */
if (iEnemyMode[Player] != NONE)
if (iEnemyMode[Player] != EXPLOSION)
DrawEnemy(hps, cx, cy,DRAW_INIT);
else
ExplodeEnemy(hps, cx, cy);
/* Draw photons and asteroids in all modes but the "Enter your *
* initials" mode, otherwise draw that screen. */
if (iGameMode != GAME_MODE_HIGH) {
DrawPhotons(hps, cx, cy, DRAW_INIT);
DrawAsteroids(hps, cx, cy, DRAW_INIT);
}
else
DrawHighScore(hps, cx, cy, DRAW_INIT);
/* Always draw the score */
DrawScore(hps, cx, cy, DRAW_INIT);
return 0;
/* Left mouse button down. This simulates the move/track function *
* in the system menu. */
case WM_BUTTON1DOWN:
if (prfProfile.bMOUSECONTROL &&
iGameMode != GAME_MODE_INIT1 &&
iGameMode != GAME_MODE_INIT2 &&
!TogglePause(CHECK)) {
UPDATE_FIRE(iShipMode[Player], TRUE);
return (MRESULT)TRUE;
}
return WinSendMsg(hwndFrame, WM_TRACKFRAME,
(MPARAM) (SHORT1FROMMP(mp2) | TF_MOVE), MPVOID);
case WM_BUTTON1UP:
if (prfProfile.bMOUSECONTROL) {
UPDATE_FIRE(iShipMode[Player], FALSE);
return (MRESULT)TRUE;
}
return 0;
/* Left mouse button double clicked. Toggle frame control display. */
case WM_BUTTON1DBLCLK:
if (!prfProfile.bMOUSECONTROL ||
iGameMode == GAME_MODE_INIT1 ||
iGameMode == GAME_MODE_INIT2 ||
TogglePause(CHECK)) {
if (prfProfile.bCONTROLS = !prfProfile.bCONTROLS)
ShowFrameControls();
else
HideFrameControls();
}
return 0;
case WM_BUTTON2DOWN:
if (prfProfile.bMOUSECONTROL) {
UPDATE_SHIELD(iShipMode[Player], iShipShieldCnt[Player]);
return (MRESULT)TRUE;
}
return 0;
case WM_BUTTON2CLICK:
if (prfProfile.bMOUSECONTROL) {
UPDATE_HYPERSPACE(iShipMode[Player], iShipModeCnt[Player]);
return (MRESULT)TRUE;
}
return 0;
/* Right mouse button double clicked. Display the about dialog box. */
case WM_BUTTON2DBLCLK:
if (!prfProfile.bMOUSECONTROL ||
iGameMode == GAME_MODE_INIT1 ||
iGameMode == GAME_MODE_INIT2 ||
TogglePause(CHECK)) {
WinDlgBox(HWND_DESKTOP, hwndClient, (PFNWP)AboutDlgProc,
NULLHANDLE, IDD_ABOUT, NULL);
}
return 0;
/* User typed a key. Most of this is self explanatory. */
case WM_CHAR:
ProcessChar((CHAR) (CHARMSG(&msg)->vkey-1),
CHARMSG(&msg)->fs & KC_VIRTUALKEY,
(CHAR) (CHARMSG(&msg)->chr),
(BOOL) !(CHARMSG(&msg)->fs & KC_KEYUP));
return 0;
/* User entered a command via the menu bar. */
case WM_COMMAND:
DoCommand(hwnd, msg, mp1, mp2);
return 0;
/* Suspend/un-suspend game depending on focus */
case WM_SETFOCUS:
if ((BOOL) SHORT1FROMMP(mp2))
TogglePause(SUSPEND_OFF);
else if (!prfProfile.bBACKGRND)
TogglePause(SUSPEND_ON);
return 0;
/* Keep track of the client window size. Profile information is not *
* updated here because there are better places (i.e. at exit) */
case WM_SIZE:
cx = (INT)SHORT1FROMMP(mp2);
cy = (INT)SHORT2FROMMP(mp2);
/* Keep track of client window position. Also updates profile info. */
case WM_MOVE:
WinQueryWindowPos(hwndFrame,&swp);
if (!(swp.fl & SWP_MAXIMIZE) && !(swp.fl & SWP_MINIMIZE)) {
prfProfile.x = swp.x;prfProfile.y = swp.y;
prfProfile.cx = swp.cx;prfProfile.cy = swp.cy;
}
if (swp.fl & SWP_MINIMIZE)
if (!prfProfile.bBACKGRND) {
/* Set icon */
WinSendMsg(hwndFrame, WM_SETICON,
(MPARAM) WinLoadPointer(HWND_DESKTOP, NULLHANDLE,
ID_RESOURCE), MPVOID);
TogglePause(SUSPEND_ON);
}
else
WinSendMsg(hwndFrame, WM_SETICON, MPVOID, MPVOID);
else
TogglePause(SUSPEND_OFF);
ptlCenter.x = swp.cx / 2;
ptlCenter.y = swp.cy / 2;
WinMapWindowPoints(hwndClient, HWND_DESKTOP, &ptlCenter, 1L);
return 0;
/* Recieved approximately 31 times a second. This is the longest and *
* ugliest of the messages, partly because there are so many cases *
* to keep track of, partly because it must be highly optimized. */
case WM_TIMER:
if (prfProfile.bMOUSECONTROL &&
iGameMode != GAME_MODE_INIT1 &&
iGameMode != GAME_MODE_INIT2) { POINTL ptl;
static BOOL bUp, bLeft, bRight;
WinQueryPointerPos(HWND_DESKTOP, &ptl);
if (bUp || (ptl.y - ptlCenter.y > 0))
UPDATE_THRUST(iShipMode[Player],
bUp = (ptl.y - ptlCenter.y > 0));
if (bLeft || (ptlCenter.x - ptl.x > 0))
UPDATE_LEFT(iShipMode[Player],
bLeft = (ptlCenter.x - ptl.x > 0));
if (bRight || (ptlCenter.x - ptl.x < 0))
UPDATE_RIGHT(iShipMode[Player],
bRight = (ptlCenter.x - ptl.x < 0));
WinSetPointerPos(HWND_DESKTOP, ptlCenter.x, ptlCenter.y);
}
/* Determine the current game mode */
switch (iGameMode) {
/* Either initialization/attract mode screen. */
case GAME_MODE_INIT1: case GAME_MODE_INIT2:
/* Switch screens when count expires */
if (--iGameModeCnt == 0) {
if (iGameMode == GAME_MODE_INIT1)
iGameMode = GAME_MODE_INIT2;
else
iGameMode = GAME_MODE_INIT1;
iGameModeCnt = GAME_INIT_TIME;
/* Score must be redrawn because the attract mode screens *
* draw the score differently. */
DrawScore(hps, cx, cy, DRAW_REINIT);
}
/* Update photons, asteroids, enemy, and score */
UpdatePhotons(hps, cx, cy);
if (uiSpeed == SPEED_OS2 || (bSlowUpdateNow = !bSlowUpdateNow)) {
UpdateAsteroids(hps, cx, cy);
UpdateEnemy(hps, cx, cy);
DrawScore(hps, cx, cy, DRAW_REFRESH);
}
break;
/* Completion of one player's turn or new game */
case GAME_MODE_NEXT:
/* Initially, erase and redraw everything for new player */
if (iGameModeCnt-- == GAME_PAUSE_TIME) {
if ((cPlayers == MAXPLAYERS) &&
(Ships[(Player+1) % MAXPLAYERS])) {
DrawAsteroids(hps, cx, cy, DRAW_ERASE);
DrawPhotons(hps, cx, cy, DRAW_ERASE);
Player = (Player+1) % MAXPLAYERS;
}
DrawScore(hps, cx, cy, DRAW_REINIT);
DrawAsteroids(hps, cx, cy, DRAW_INIT);
}
/* During countdown update score and asteroids */
else if (iGameModeCnt > 0) {
if (uiSpeed == SPEED_OS2 || (bSlowUpdateNow = !bSlowUpdateNow)) {
DrawScore(hps, cx, cy, DRAW_REFRESH);
UpdateAsteroids(hps, cx, cy);
}
}
/* At end of countdown start the player */
else {
InitShip();
InitEnemy();
iGameMode = GAME_MODE_PLAY;
DrawScore(hps, cx, cy, DRAW_REINIT);
}
break;
/* Normal play mode */
case GAME_MODE_PLAY:
/* Update ship, photons, asteroids, enemy, and score */
UpdateShip(hps, cx, cy);
UpdatePhotons(hps, cx, cy);
if (uiSpeed == SPEED_OS2 || (bSlowUpdateNow = !bSlowUpdateNow)) {
UpdateAsteroids(hps, cx, cy);
UpdateEnemy(hps, cx, cy);
/* Erase old and draw new scores if there is a change*/
if (bChangeScore) {
bChangeScore = FALSE;
DrawScore(hps, cx, cy, DRAW_REINIT);
}
/* Else just refresh the score */
else
DrawScore(hps, cx, cy, DRAW_REFRESH);
}
break;
/* Game over mode. This is the longest and ugliest case because *
* conditions are highly dependent on the number of players, *
* multiplayer game status, and the number and order of high *
* scores. */
case GAME_MODE_OVER:
/* Initially, just update the score and number of ships */
if (iGameModeCnt-- == GAME_PAUSE_TIME)
DrawScore(hps, cx, cy, DRAW_REINIT);
/* During countdown refresh the score and update the asteroids */
else if (iGameModeCnt > 0) {
if (uiSpeed == SPEED_OS2 || (bSlowUpdateNow = !bSlowUpdateNow)) {
DrawScore(hps, cx, cy, DRAW_REFRESH);
UpdateAsteroids(hps, cx, cy);
}
}
/* At the end of the countdown, if there are any other players, *
* continue with them. */
else {
/* Countinue on with any remaining players. */
if ((cPlayers == MAXPLAYERS) &&
(Ships[(Player+1) % MAXPLAYERS])) {
/* Erase all of the old asteroids. */
DrawAsteroids(hps, cx, cy, DRAW_ERASE);
/* Setup everything for the next player */
Player = (Player+1) % MAXPLAYERS;
InitShip();
InitEnemy();
iGameMode = GAME_MODE_PLAY;
DrawAsteroids(hps, cx, cy, DRAW_INIT);
DrawScore(hps, cx, cy, DRAW_REINIT);
}
/* Check for new high scores and update table as necessary. */
else {
/* Erase all of the old asteroids. */
DrawAsteroids(hps, cx, cy, DRAW_ERASE);
/* The following if/else block is admittedly a kludge, it is *
* simple and it does work, however. Ideally it should *
* sort the high scores and update the high score table in *
* descending order. */
/* If player 1 scored higher than player 2 then check *
* player 1 first for a high score. */
if (Score[0] > Score[1])
for (Player=0;Player<cPlayers;Player++)
/* If the player's score is > than the lowest, *
* update the high score table. */
if (Score[Player] > prfProfile.lSCORES[9]) {
UpdateHighScores();
iGameMode = GAME_MODE_HIGH;
}
/* Otherwise, make sure he is not asked for his *
* initials. */
else
Score[Player] = 0;
/* Otherwise, check player 2 first */
else
for (Player=cPlayers;Player>=0;Player--)
/* If the player's score is > than the lowest, *
* update the high score table. */
if (Score[Player] > prfProfile.lSCORES[9]) {
UpdateHighScores();
iGameMode = GAME_MODE_HIGH;
}
/* Otherwise, make sure he is not asked for his *
* initials. */
else
Score[Player] = 0L;
/* If there was no high score, go into attract mode */
if (iGameMode != GAME_MODE_HIGH)
WinSendMsg(hwnd,WM_INITGAME,MPFROMSHORT(1),(MPARAM) 0L);
/* Else, check for player 1's initials first then 2's *
* This is not faithful, in the arcade game the player *
* with the higher score always goes first. */
else {
if (Score[0] > 0L)
Player = 0;
else
Player = 1;
DrawScore(hps, cx, cy, DRAW_REINIT);
DrawHighScore(hps, cx, cy, DRAW_INIT);
}
}
}
break;
/* Mode which prompts players to enter their initials */
case GAME_MODE_HIGH:
/* If the player's position is > 0 then refresh the screen */
if (Score[Player] > 0L)
DrawHighScore(hps, cx, cy, DRAW_REFRESH);
/* Else, the current player is done go to the next */
else if ((cPlayers == MAXPLAYERS) && (Player == 0) &&
(Score[1] > 0L)) {
Player++;
DrawHighScore(hps, cx, cy, DRAW_REINIT);
}
/* If there are no more high scores then go into attract mode */
else
WinSendMsg(hwnd, WM_INITGAME, MPFROMSHORT(1), MPVOID);
break;
}
return 0;
/* Used by help manager */
case HM_QUERY_KEYS_HELP:
return((MRESULT)IDH_CLIENTKEYS);
/* Recieved always from the system or in the case of an initialization*
* error. Both messages will normally save the profile information.*
* Ideally the profile section should be moved to a subroutine and the*
* the following should be broken into two distinct cases. */
case WM_SAVEAPPLICATION:
case WM_DESTROY:
/* If the fonts were not found bApplicationOk will be false, in *
* that case the window profile information should not be updated.*/
if (TRUE) {
/* Copy window position and size info into profile structure */
WinQueryWindowPos(hwndFrame, &swp);
if (swp.fl & SWP_MAXIMIZE)
prfProfile.ulMINMAX = SWP_MAXIMIZE;
else if (swp.fl & SWP_MINIMIZE)
prfProfile.ulMINMAX = SWP_MINIMIZE;
else {
prfProfile.ulMINMAX = 0;
prfProfile.x = swp.x;prfProfile.y = swp.y;
prfProfile.cx = swp.cx;prfProfile.cy = swp.cy;
}
/* Write profile information */
PrfWriteProfileData(HINI_USERPROFILE, szClientClass, "Data",
&prfProfile, sizeof(PROFILEREC));
}
/* If the application is terminating release the fonts and the hps. */
if (msg == WM_DESTROY) {
/* Make sure mouse is visible if we hid it before */
ShowMouse(TRUE);
/* Release font identifiers and DLL resource module */
GpiSetCharSet(hps, LCID_DEFAULT);
GpiDeleteSetId(hps, LCID_LARGE);
GpiDeleteSetId(hps, LCID_SMALL);
GpiUnloadFonts(hab, "ASTEROID");
/* Release the "permanent" presentation space */
WinReleasePS(hps);
}
return 0;
}
return WinDefWindowProc(hwnd, msg, mp1, mp2);
}
void QCursor::setPos(int x, int y)
{
// flip y coordinate
y = qt_display_height() - (y + 1);
WinSetPointerPos(HWND_DESKTOP, x, y);
}
static VOID _wmMouseMove(PGROPDATA pGrop, SHORT lX, SHORT lY)
{
POINTL pointl;
if ( ( pGrop->hptrPointer == NULLHANDLE ) &&
( pGrop->fCapture /*|| pGrop->fFullscreen*/ ) )
{
// Unvisible pointer when mouse captured /*or fullscreen*/ - relative mouse
// mode. Send relative mouse coordinates (offset) to the application.
// Mouse pointer is unvisible.
WinSetPointer( pGrop->hwndDT, NULLHANDLE );
// Internal information about pointer in relative coordinates mode.
pGrop->fMouseInViewArea = TRUE;
pGrop->ulMouseX = pGrop->stUserMode.ulWidth / 2;
pGrop->ulMouseY = pGrop->stUserMode.ulHeight / 2;
// Center of the window in window coordinates.
pointl.x = ( pGrop->rectlWinArea.xRight -
pGrop->rectlWinArea.xLeft ) / 2;
pointl.y = ( pGrop->rectlWinArea.yTop -
pGrop->rectlWinArea.yBottom ) / 2;
// Call user's function with relative coordinates.
if ( pGrop->stCallback.fnMouseMove != NULL )
pGrop->stCallback.fnMouseMove( pGrop, TRUE,
lX - pointl.x, lY - pointl.y );
// Keep mouse at center of the window.
// Center of the window in screen coordinates.
pointl.x = ( pGrop->rectlWinArea.xRight +
pGrop->rectlWinArea.xLeft ) / 2;
pointl.y = ( pGrop->rectlWinArea.yTop +
pGrop->rectlWinArea.yBottom ) / 2;
// Do not handle mouse move message when we moves to center of the window.
pGrop->lSkipMouseMove++;
if ( !WinSetPointerPos( pGrop->hwndDT, pointl.x, pointl.y ) )
debug( "WinSetPointerPos() failed" );
return;
}
if ( pGrop->fFullscreen || ( pGrop->fCapture && pGrop->fActive ) )
{
// Restrict the movement of the mouse view area.
SHORT lXva = lX, lYva = lY;
if ( lX < pGrop->rectlViewArea.xLeft )
lX = pGrop->rectlViewArea.xLeft;
else if ( lX >= pGrop->rectlViewArea.xRight )
lX = pGrop->rectlViewArea.xRight - 1;
if ( lY < pGrop->rectlViewArea.yBottom )
lY = pGrop->rectlViewArea.yBottom;
else if ( lY >= pGrop->rectlViewArea.yTop )
lY = pGrop->rectlViewArea.yTop - 1;
if ( lX != lXva || lY != lYva )
{
pointl.x = lX;
pointl.y = lY;
WinMapWindowPoints( pGrop->hwnd, pGrop->hwndDT, &pointl, 1 );
pGrop->lSkipMouseMove++;
WinSetPointerPos( pGrop->hwndDT, pointl.x, pointl.y );
}
}
// Set application pointer when mouse on the view area or system pointer
// when it on "unused" space of window (around view area in our window).
pointl.x = lX;
pointl.y = lY;
WinSetPointer( pGrop->hwndDT,
WinPtInRect( pGrop->hab, &pGrop->rectlViewArea, &pointl )
? pGrop->hptrPointer
: WinQuerySysPointer( HWND_DESKTOP, SPTR_ARROW, FALSE ) );
pGrop->fMouseInViewArea =
lX >= pGrop->rectlViewArea.xLeft && lX < pGrop->rectlViewArea.xRight &&
lY >= pGrop->rectlViewArea.yBottom && lY < pGrop->rectlViewArea.yTop;
if ( pGrop->fMouseInViewArea )
{
ULONG ulVAWidth = pGrop->rectlViewArea.xRight -
pGrop->rectlViewArea.xLeft;
ULONG ulVAHeight = pGrop->rectlViewArea.yTop -
pGrop->rectlViewArea.yBottom;
// Set coordinates relative to the bottom-left corner of the view area.
lX -= pGrop->rectlViewArea.xLeft;
lY -= pGrop->rectlViewArea.yBottom;
// Scale coordinates to the user work area.
lX = pGrop->stUserMode.ulWidth * lX / ulVAWidth;
lY = pGrop->stUserMode.ulHeight * lY / ulVAHeight;
if ( ( pGrop->ulMouseX != lX ) || ( pGrop->ulMouseY != lY ) )
{
// Coordinates hava been changed.
pGrop->ulMouseX = lX;
pGrop->ulMouseY = lY;
// Call user's function.
if ( pGrop->stCallback.fnMouseMove != NULL )
pGrop->stCallback.fnMouseMove( pGrop, FALSE, lX, lY );
}
}
}
