home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
World of A1200
/
World_Of_A1200.iso
/
datafiles
/
text
/
c_manual
/
system
/
dirtyinput
/
mouse.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-02-27
|
5KB
|
149 lines
/***********************************************************/
/* */
/* Amiga C Encyclopedia (ACE) V3.0 Amiga C Club (ACC) */
/* ------------------------------- ------------------ */
/* */
/* Book: ACM Intuition Amiga C Club */
/* Chapter: DirtyInput Tulevagen 22 */
/* File: Mouse.c 181 41 LIDINGO */
/* Author: Anders Bjerin SWEDEN */
/* Date: 92-05-02 */
/* Version: 1.10 */
/* */
/* Copyright 1992, Anders Bjerin - Amiga C Club (ACC) */
/* */
/* Registered members may use this program freely in their */
/* own commercial/noncommercial programs/articles. */
/* */
/***********************************************************/
/* Mouse() is a handy, easy and fast but naughty function that hits the */
/* hardware of the Amiga. It looks at either port 1 or port 2, and */
/* returns the (x and y) delta movement of the mouse, as well as a */
/* bitfield containing the present state of the three buttons. (A normal */
/* Amiga mouse has only two buttons (left and right), but it is possible */
/* to connect a mouse with three buttons, so why shouldn't we support */
/* it?) */
/* */
/* Synopsis: buttons = Mouse( port, dx, dy ); */
/* */
/* buttons: (UBYTE) If the left mouse button was pressed, bit one is */
/* set. If the middle mouse button was pressed the second */
/* bit is set, and if the right mouse button was pressed the */
/* third bit is set. */
/* */
/* port: (UBYTE) Set the flag PORT1 if you want to check the first */
/* (mouse) port, or set the flag PORT2 if you want to check */
/* the second (joystick) port. */
/* */
/* dx: (BYTE *) Pointer to a variable that will be initialized */
/* with the horizontal delta movement of the mouse. */
/* */
/* dy: (BYTE *) Pointer to a variable that will be initialized */
/* with the vertical delta movement of the mouse. */
#include <exec/types.h>
#include <hardware/custom.h>
#include <hardware/cia.h>
#define LEFT_BUTTON 1
#define MIDDLE_BUTTON 2
#define RIGHT_BUTTON 4
#define PORT1 1
#define PORT2 2
/* This will automatically be linked to the Custom structure: */
extern struct Custom far custom;
/* This will automatically be linked to the CIA A (8520) chip: */
extern struct CIA far ciaa;
void main();
UBYTE Mouse(
UBYTE port,
BYTE *delta_x,
BYTE *delta_y
);
void main()
{
int timer = 0;
UBYTE value = 0, old_value = 0;
BYTE dx=0, dy=0;
while( timer < 30 )
{
old_value = value;
value = Mouse( PORT1, &dx, &dy );
printf( "(%4d :%4d) ", dx, dy );
if( value != old_value )
{
timer++;
if( value & LEFT_BUTTON )
printf("LEFT ");
if( value & MIDDLE_BUTTON )
printf("MIDDLE ");
if( value & RIGHT_BUTTON )
printf("RIGHT ");
}
printf("\n");
}
}
UBYTE Mouse(
UBYTE port,
BYTE *delta_x,
BYTE *delta_y
)
{
UBYTE data = 0;
UWORD joy, pot;
static BYTE x=0, y=0, old_x=0, old_y=0;
custom.potgo = 0xFF00;
pot = custom.potinp;
if( port == PORT1 )
{
/* PORT 1 ("MOUSE PORT") */
joy = custom.joy0dat;
data += !( ciaa.ciapra & 0x0040 ) ? LEFT_BUTTON : 0;
data += !( pot & 0x0100 ) ? MIDDLE_BUTTON : 0;
data += !( pot & 0x0400 ) ? RIGHT_BUTTON : 0;
}
else
{
/* PORT 2 ("JOYSTICK PORT") */
joy = custom.joy1dat;
data += !( ciaa.ciapra & 0x0080 ) ? LEFT_BUTTON : 0;
data += !( pot & 0x1000 ) ? MIDDLE_BUTTON : 0;
data += !( pot & 0x4000 ) ? RIGHT_BUTTON : 0;
}
old_x = x;
x = joy & 0x00FF;
*delta_x = x - old_x;
old_y = y;
y = joy >> 8;
*delta_y = y - old_y;
return( data );
}