home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fish 'n' More 2
/
fishmore-publicdomainlibraryvol.ii1991xetec.iso
/
disks
/
disk430.lzh
/
Pointer
/
test.c
< prev
next >
Wrap
C/C++ Source or Header
|
1991-01-11
|
4KB
|
156 lines
/**************************************
* TEST.C 08/05/90
* Written by Timm Martin
* This source code is public domain.
***************************************/
#include <exec/types.h>
#include <functions.h>
#include <intuition/intuition.h>
#include <intuition/intuitionbase.h>
#include "zz_pointer.h"
/********************
* SHARED VARIABLES
*********************/
struct IntuitionBase *IntuitionBase = NULL;
struct Window *win = NULL;
/************************
* NEW WINDOW STRUCTURE
*************************/
struct NewWindow new_window =
{
/* SHORT LeftEdge */ 0,
/* SHORT TopEdge */ 0,
/* SHORT Width */ 640,
/* SHORT Height */ 160,
/* UBYTE DetailPen */ 0,
/* UBYTE BlockPen */ 1,
/* ULONG IDCMPFlags */ CLOSEWINDOW|MOUSEBUTTONS,
/* ULONG Flags */ ACTIVATE|NOCAREREFRESH|SIMPLE_REFRESH|WINDOWCLOSE|WINDOWDEPTH|WINDOWDRAG|WINDOWSIZING,
/* struct Gadget * FirstGadget */ NULL,
/* struct Image * CheckMark */ NULL,
/* UBYTE * Title */ (STRPTR)"Pointer Test Program -- click in the window!",
/* struct Screen * Screen */ NULL,
/* struct BitMap * BitMap */ NULL,
/* SHORT MinWidth */ 230,
/* SHORT MinHeight */ 20,
/* USHORT MaxWidth */ 640,
/* USHORT MaxHeight */ 200,
/* USHORT Type */ WBENCHSCREEN,
};
/*************
* FUNCTIONS
**************/
void main( void );
void program_end( void );
void program_begin( void );
void window_input( void );
/***********
* M A I N
************/
void main( void )
{
program_begin();
window_input();
program_end();
}
/*****************
* PROGRAM BEGIN
******************/
/*
This procedure opens the Intuition library, the window, and the pointer.
If any of these things fail, the program ends.
*/
void program_begin( void )
{
if (!(IntuitionBase = (struct IntuitionBase *)
OpenLibrary( "intuition.library", 0L )) ||
!(win = OpenWindow( &new_window )) ||
!zz_pointer_open())
program_end();
}
/***************
* PROGRAM END
****************/
/*
This procedure closes the pointer, the window, and the Intuition
library.
*/
void program_end( void )
{
zz_pointer_close();
if (win) CloseWindow( win );
if (IntuitionBase) CloseLibrary( IntuitionBase );
}
/****************
* WINDOW INPUT
*****************/
/*
This procedure monitors for window input. It returns when the user clicks on
the window close gadget.
*/
void window_input( void )
{
BOOL finished;
struct IntuiMessage *imessage;
BOOL pointer;
finished = pointer = FALSE;
while (!finished)
{
/* wait for input from the window and the timer device */
Wait( 1L<<win->UserPort->mp_SigBit );
/* for each window input message */
while (imessage = (struct IntuiMessage *)GetMsg( win->UserPort ))
{
switch (imessage->Class)
{
case CLOSEWINDOW:
/* end the program */
finished = TRUE;
break;
case MOUSEBUTTONS:
/* if clicked down the left mouse button */
if (imessage->Code == SELECTDOWN)
{
/* if the ZZ pointer is currently visible */
if (pointer)
{
/* clear it */
CLEAR_POINTER( win );
pointer = FALSE;
}
else
{
/* else display it */
ZZ_POINTER( win );
pointer = TRUE;
}
}
break;
}
/* reply to the message to free its memory */
ReplyMsg( (struct Message *)imessage );
}
}
}