Vyššie na [Platon] / games / _shared

Headers update:
    - switch to standard/classic Platon SDG source header
    - bumped copyright year to 2004
    - changelog dates reformatted to new format YYYY-MM-DD

/*
 * games/_shared/ - shared routines for games
 *
 * mouse-win32.c - Win32 mouse handler
 * ____________________________________________________________
 *
 * Developed by Ondrej Jombik <nepto@platon.sk>
 * Copyright (c) 2003-2004 Platon SDG, http://platon.sk/
 * All rights reserved.
 *
 * See README file for more information about this software.
 * See COPYING file for license information.
 *
 * Download the latest version from
 * http://platon.sk/projects/games/
 *
 * Changelog:
 * 2003-06-23 - created
 */

/* $Platon: games/_shared/mouse-win32.c,v 1.3 2003/10/27 09:52:10 nepto Exp $ */

#include <stdio.h>
#include <winbgim.h>

#include "mouse.h"

#define MOUSE_WIN32_DEBUG    0

static int mouse_x, mouse_y, mouse_bstat;
static int pressed_count[3], released_count[3];

static void mouse_status_update(void) /* {{{ */
{
    register int bstat_diff = 0;
    /* Clearing double-click events */
    if (ismouseclick(WM_LBUTTONDBLCLK))
        clearmouseclick(WM_LBUTTONDBLCLK);
    if (ismouseclick(WM_RBUTTONDBLCLK))
        clearmouseclick(WM_RBUTTONDBLCLK);
    if (ismouseclick(WM_MBUTTONDBLCLK))
        clearmouseclick(WM_MBUTTONDBLCLK);
    /* Mouse mouse */
    if (ismouseclick(WM_MOUSEMOVE)) {
        getmouseclick(WM_MOUSEMOVE, mouse_x, mouse_y);
        mouse_x = max(0, mouse_x);
        mouse_y = max(0, mouse_y);
    }
    /* Mouse button press */
    if (ismouseclick(WM_LBUTTONDOWN)) {
        clearmouseclick(WM_LBUTTONDOWN);
        pressed_count[0]++;
        bstat_diff += 1;
    }
    if (ismouseclick(WM_RBUTTONDOWN)) {
        clearmouseclick(WM_RBUTTONDOWN);
        pressed_count[1]++;
        bstat_diff += 2;
    }
    if (ismouseclick(WM_MBUTTONDOWN)) {
        clearmouseclick(WM_MBUTTONDOWN);
        pressed_count[2]++;
        bstat_diff += 3;
    }
    /* Mouse button release */
    if (ismouseclick(WM_LBUTTONUP)) {
        clearmouseclick(WM_LBUTTONUP);
        released_count[0]++;
        bstat_diff -= 1;
    }
    if (ismouseclick(WM_RBUTTONUP)) {
        clearmouseclick(WM_RBUTTONUP);
        released_count[1]++;
        bstat_diff -= 2;
    }
    if (ismouseclick(WM_MBUTTONUP)) {
        clearmouseclick(WM_MBUTTONUP);
        released_count[2]++;
        bstat_diff -= 3;
    }
#if defined(MOUSE_WIN32_DEBUG) && MOUSE_WIN32_DEBUG
    if (bstat_diff != 0)
        fprintf(stderr, __FILE__ ": mouse_status_update(): [1] mouse_bstat = %d, bstat_diff = %d\n",
                mouse_bstat, bstat_diff);
#endif
    /* Buttons status counting */
    bstat_diff  %= 3;
    mouse_bstat += bstat_diff;
    mouse_bstat  = min(3, mouse_bstat);
    mouse_bstat  = max(0, mouse_bstat);
#if defined(MOUSE_WIN32_DEBUG) && MOUSE_WIN32_DEBUG
    if (bstat_diff != 0)
        fprintf(stderr, __FILE__ ": mouse_status_update(): [2] mouse_bstat = %d\n", mouse_bstat);
#endif
} /* }}} */

BYTE initmouse(void) /* {{{ */
{
#if defined(MOUSE_WIN32_DEBUG) && MOUSE_WIN32_DEBUG
    fprintf(stderr, __FILE__ ": initmouse(): mouse initialized\n");
#endif
    return 2; /* always return 2 buttons available */
} /* }}} */

void showmouse(void) /* {{{ */
{
    return; /* simply do nothing */
} /* }}} */

void hidemouse(void) /* {{{ */
{
    return; /* simply do nothing */
} /* }}} */

BYTE getmousepos(WORD *x, WORD *y) /* {{{ */
{
    mouse_status_update();
    if (x != NULL) *x = (WORD) mouse_x;
    if (y != NULL) *y = (WORD) mouse_y;
#if defined(MOUSE_WIN32_DEBUG) && MOUSE_WIN32_DEBUG
    fprintf(stderr, __FILE__ ": getmousepos(%u, %u) = %d\n", mouse_x, mouse_y, mouse_bstat);
#endif
    return mouse_bstat;
} /* }}} */

void setmousepos(WORD x, WORD y) /* {{{ */
{
    x = x;
    y = y;
    /* it is not possible to set up mouse position under Win32 */
    return;
} /* }}} */

BYTE pressbutton(BYTE but, WORD *x, WORD *y) /* {{{ */
{
    register BYTE ret;
    mouse_status_update();
    if (but > 2) {
        ret = 0;
    } else {
        ret = pressed_count[but];
        pressed_count[but] = 0;
    }
    if (x != NULL) *x = mouse_x;
    if (y != NULL) *y = mouse_y;
#if defined(MOUSE_WIN32_DEBUG) && MOUSE_WIN32_DEBUG
    fprintf(stderr, __FILE__ ": pressbutton(%u, %u) = %d\n", mouse_x, mouse_y, ret);
#endif
    return ret;
} /* }}} */

BYTE releasebutton(BYTE but, WORD *x, WORD *y) /* {{{ */
{
    register BYTE ret;
    mouse_status_update();
    if (but > 2) {
        ret = 0;
    } else {
        ret = released_count[but];
        released_count[but] = 0;
    }
    if (x != NULL) *x = mouse_x;
    if (y != NULL) *y = mouse_y;
#if defined(MOUSE_WIN32_DEBUG) && MOUSE_WIN32_DEBUG
    fprintf(stderr, __FILE__ ": releasebutton(%u, %u) = %d\n", mouse_x, mouse_y, ret);
#endif
    return ret;
} /* }}} */

void rangex(WORD a_min, WORD a_max) /* {{{ */
{
    a_min = a_min;
    a_max = a_max;
    return;
} /* }}} */

void rangey(WORD a_min, WORD a_max) /* {{{ */
{
    a_min = a_min;
    a_max = a_max;
    return;
} /* }}} */

void setmousecur(WORD x, WORD y, void*p) /* {{{ */
{
    x = x;
    y = y;
    p = p;
    return;
} /* }}} */

void exclude(WORD x1, WORD y1, WORD x2, WORD y2) /* {{{ */
{
    x1 = x1;
    y1 = y1;
    x2 = x2;
    y2 = y2;
    return;
} /* }}} */

void mousesensitive(WORD x, WORD y) /* {{{ */
{
    x = x;
    y = y;
    return;
} /* }}} */

void setmousespeed(WORD speed) /* {{{ */
{
    speed = speed;
    return;
} /* }}} */

/* Modeline for ViM {{{
 * vim: set ts=4:
 * vim600: fdm=marker fdl=0 fdc=0:
 * }}} */