home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Club Amiga de Montreal - CAM
/
CAM_CD_1.iso
/
files
/
377b.lha
/
resources
/
potgo
/
read9n5.c
< prev
Wrap
C/C++ Source or Header
|
1980-02-02
|
3KB
|
85 lines
/* Copyright (c) 1990 Commodore-Amiga, Inc.
*
* This example is provided in electronic form by Commodore-Amiga, Inc. for
* use with the 1.3 revisions of the Addison-Wesley Amiga reference manuals.
* The 1.3 Addison-Wesley Amiga Reference Manual series contains additional
* information on the correct usage of the techniques and operating system
* functions presented in this example. The source and executable code of
* this example may only be distributed in free electronic form, via bulletin
* board or as part of a fully non-commercial and freely redistributable
* diskette. Both the source and executable code (including comments) must
* be included, without modification, in any copy. This example may not be
* published in printed form or distributed with any commercial product.
* However, the programming techniques and support routines set forth in
* this example may be used in the development of original executable
* software products for Commodore Amiga computers.
* All other rights reserved.
* This example is provided "as-is" and is subject to change; no warranties
* are made. All use is at your own risk. No liability or responsibility
* is assumed.
*/
/* An example of using the potgo.resource to read pins 9 and 5 of
* port 1 (the non-mouse port). This bypasses the gameport.device.
* When the right button on a mouse plugged into port 1 is pressed,
* the read value will change.
*
* Use of port 0 (mouse) is unaffected.
*
* Lattice use lc -b1 -cfist -v -y. Link with amiga.lib and lc.lib.
*/
#include <exec/types.h>
#include <libraries/dos.h>
#include <proto/all.h>
#include <stdio.h>
#ifdef LATTICE
int CXBRK(void) { return(0); } /* Disable Lattice CTRL/C handling */
int chkabort(void) { return(0); } /* really */
#endif
struct PotgoBase *PotgoBase;
ULONG potbits;
UWORD value;
#define UNLESS(x) if(!(x))
#define UNTIL(x) while(!(x))
#define OUTRY 1L<<15
#define DATRY 1L<<14
#define OUTRX 1L<<13
#define DATRX 1L<<12
void main(int argc,char **argv)
{
UNLESS(PotgoBase=(struct PotgoBase *)OpenResource("potgo.resource"))
return;
printf("PotgoBase is at $%lx\n",PotgoBase);
potbits=AllocPotBits(OUTRY|DATRY|OUTRX|DATRX);
/* Get the bits for the right and middle mouse buttons
on the alternate mouse port. */
if(potbits != (OUTRY|DATRY|OUTRX|DATRX))
{
printf("Pot bits are already allocated! %lx\n",potbits);
FreePotBits(potbits);
return;
}
WritePotgo(0xFFFFFFFFL,potbits);
/* Set all ones in the register (masked by potbits) */
UNTIL(SIGBREAKF_CTRL_C & SetSignal(0L,0L))
/* until CTRL-C is pressed */
{
value=*(UWORD *)0x00DFF016;
/* Read word at $DFF016 */
printf("POTINP = $%lx\n",value & potbits);
/* Show what was read (restricted to our allocated bits) */
}
FreePotBits(potbits);
}