TweetFollow Us on Twitter

Jan 98 - Getting Started

Volume Number: 14 (1998)
Issue Number: 1
Column Tag: Getting Started

Event-Based Programming

by Dave Mark

How a Mac program communicates with the user

Over the last year or so, we've gotten a lot of feedback about the direction in which you want this column to head. Some folks want more coverage of Java, others PowerPlant and Rhapsody. But the biggest vote of all was a return, for a spell, to the basics. When I first started this column more than six years ago (For you old-timers, my son Daniel, who was born in these pages, is now 5-1/2), we plowed a path for beginners, covering the basics of working with the Mac Toolbox. Since then, we've explored a wide variety of topics and have covered a lot of ground.

Over the next few months, we're going to revisit some of that territory at the behest of a new generation of Mac programmer. We started with last month's column, which gave an updated answer to the question, "How do I get started with Mac programming?" This month, we'll revisit the concept of event-based programming.

Know someone interested in getting started with Mac programming? Hand them your copy of last month's MacTech and point them this way...

Event-Based Programming

Most the programs we've created together have one thing in common. Each performs its main function, then sits there waiting for a mouse click using this piece of code:

while ( ! Button() )
  ;

This chunk of code represents the only mechanism the user has to communicate with the program. In other words, the only way a user can talk to one of our programs is to click the mouse to make the program disappear! This month's program is going to change all that.

One of the most important parts of the Macintosh Toolbox is the Event Manager. The Event Manager tracks all user actions, translating these actions into a form that's perfect for your program. Each action is packaged into an event record and each event record is placed on the end of the application's event queue.

For example, when the user presses the mouse button, a mouseDown event record is created. The record describes the mouseDown in detail, including such information as the location, in screen coordinates, of the mouse when the click occurred, and the time of the event, in ticks (60ths of a second) since system startup. When the user releases the mouse button, a second event, called a mouseUp event is queued.

If the user presses a key, a keyDown event is queued, providing all kinds of information describing the key that was pressed. An autoKey event is queued when a key is held down longer than a pre-specified autoKey threshold.

Though there are lots of different events, this month we're going to focus on four of them: mouseDown, mouseUp, keyDown, and autoKey. Next month we'll look at some of the others.

Working With Events

Events are the lifeline between your user and your program. They let your program know what your user is up to. Programming with events requires a whole new way of thinking. Up until this point, our programs have been sequential. Initialize the Toolbox, load a WIND resource, show the window, draw in it, wait for a mouse click, then exit.

Figure 1. The main event loop flowchart.

Event programming follows a more iterative path. Check out the flowchart in Figure 1. From now on, our programs will look like this. First, we'll perform our program's initialization. This includes initializing the Toolbox, loading any needed resources, perhaps even opening a window or two. Once initialized, your program will enter the main event loop.

The Main Event Loop

In the main event loop, your program uses a Toolbox function named WaitNextEvent() to retrieve the next event from the event queue. Depending on the type of event retrieved, your program will respond accordingly. A mouseDown might be passed to a routine that handles mouse clicks, for example. A keyDown might be passed to a text handling routine. At some point, some event will signal that the program should exit. Typically, it will be a keyDown with the key sequence command-Q, a mouseDown with the mouse on the Quit menu item, or as the result of a Quit event sent by another program like the Finder. If If it's not time to exit the program yet, your program goes back to the top of the event loop and retrieves another event, starting the process all over again.

WaitNextEvent() returns an event in the form of an EventRecord struct:

struct EventRecord
{
  short   what;
  long    message;
  long    when;
  Point   where;
  short   modifiers;
};

The what field tells you what kind of event was returned. As I said before, this month we'll only look at mouseDown, mouseUp, keyDown, and autoKey events, though there are lots more. Depending on the value of the what field, the message field contains four bytes of descriptive information. when tells you when the event occurred, and where tells you where the mouse was when the event occurred. Finally, the modifiers field tells you the state of the control, option, command and shift modifier keys when the event occurred.

EventMaster

This month's program, EventMaster, displays four lines, one for each of the events we've covered so far. As EventMaster processes an event, it highlights that line. For example, Figure 2 shows EventMaster immediately after it processed a mouseDown event.

Figure 2. EventMaster in action.

EventMaster requires a single resource of type WIND. Create a folder called EventMaster in your Development folder. Next, open ResEdit and create a new resource file named EventMaster.rsrc inside the EventMaster folder.

Figure 3. The WIND resource specifications.

Create a new WIND resource according to the specs shown in Figure 3. Make sure the resource ID is set to 128 and the Close Box checkbox is checked. Select Set 'WIND' Characteristics from the WIND menu and set the window title to EventMaster. Quit ResEdit, saving your changes.

Running EventMaster

Launch CodeWarrior and create a new project based on the MacOS:C/C++:Basic Toolbox 68k stationary. Turn off the Create Folder check box. Name the project EventMaster.mcp and place it in your EventMaster folder. Remove SillyBalls.c and SillyBalls.rsrc from the project; we will not be using these files. From the Finder, drag and drop your EventMaster.rsrc file into the project window. You also can remove the ANSI Libraries group from the project, because we won't need them, either. Your project window should look something like Figure 4.

Figure 4. EventMaster project window.

Select New from the File menu and type this source code in the window that appears:

#include <Sound.h>

#define kBaseResID      128
#define kMoveToFront    (WindowPtr)-1L
#define kSleep          7

#define kRowHeight      14
#define kFontSize        9

#define kMouseDown      1
#define kMouseUp        2
#define kKeyDown        3
#define kAutoKey        4

/*************/
/* Globals   */
/*************/

Boolean    gDone;
short      gLastEvent = 0;



/***************/
/* Functions   */
/***************/

void  ToolBoxInit( void );
void  WindowInit( void );
void  EventLoop( void );
void  DoEvent( EventRecord *eventPtr );
void  HandleMouseDown( EventRecord *eventPtr );
void  DrawContents( void );
void  SelectEvent( short eventType );
void  DrawFrame( short eventType );

/******************************** main *********/

void  main( void )
{
  ToolBoxInit();
  WindowInit();
  
  EventLoop();
}

/*********************************** ToolBoxInit */

void  ToolBoxInit( void )
{
  InitGraf( &thePort );
  InitFonts();
  InitWindows();
  InitMenus();
  TEInit();
  InitDialogs( nil );
  InitCursor();
}

/******************************** WindowInit *********/

void  WindowInit( void )
{
  WindowPtr  window;
  
  window = GetNewWindow( kBaseResID, nil, kMoveToFront );
  
  if ( window == nil )
  {
    SysBeep( 10 );  /* Couldn't load the WIND resource!!! */
    ExitToShell();
  }
  
  SetPort( window );
  TextSize( kFontSize );
  
  ShowWindow( window );
}

/******************************** EventLoop *********/

void  EventLoop( void )
{    
  EventRecord    event;
  
  gDone = false;
  while ( gDone == false )
  {
    if ( WaitNextEvent( everyEvent, &event, kSleep, nil ) )
      DoEvent( &event );
  }
}

/************************************* DoEvent *********/

void  DoEvent( EventRecord *eventPtr )
{
  switch ( eventPtr->what )
  {
    case mouseDown:
      SelectEvent( kMouseDown );
      HandleMouseDown( eventPtr );
      break;
    case mouseUp:
      SelectEvent( kMouseUp );
      break;
    case keyDown:
      SelectEvent( kKeyDown );
      break;
    case autoKey:
      SelectEvent( kAutoKey );
      break;
    case updateEvt:
      BeginUpdate( (WindowPtr)eventPtr->message );
      DrawContents();
      EndUpdate( (WindowPtr)eventPtr->message );
  }
}

/******************************** HandleMouseDown *********/

void  HandleMouseDown( EventRecord *eventPtr )
{
  WindowPtr  window;
  short      thePart;
  
  thePart = FindWindow( eventPtr->where, &window );
  
  if ( thePart == inGoAway )
    gDone = true;
}

/******************************** DrawContents *********/

void  DrawContents( void )
{
  short      i;
  WindowPtr  window;
  
  window = FrontWindow();
  
  for ( i=1; i<=3; i++ )
  {
    MoveTo( 0, (kRowHeight * i) - 1 );
    LineTo( window->portRect.right,
        (kRowHeight * i) - 1 );
  }
  
  MoveTo( 4, 9 );
  DrawString( "\pmouseDown" );
  
  MoveTo( 4, 9 + kRowHeight );
  DrawString( "\pmouseUp" );
  
  MoveTo( 4, 9 + kRowHeight*2 );
  DrawString( "\pkeyDown" );
  
  MoveTo( 4, 9 + kRowHeight*3 );
  DrawString( "\pautoKey" );
  
  if ( gLastEvent != 0 )
    DrawFrame( gLastEvent );
}

/************************************* SelectEvent ********/

void  SelectEvent( short eventType )
{
  Rect        r;
  WindowPtr  window;
  
  window = FrontWindow();
  r = window->portRect;
  
  if ( gLastEvent != 0 )
  {
    ForeColor( whiteColor );
    DrawFrame( gLastEvent );
    ForeColor( blackColor );
  }
  
  DrawFrame( eventType );
  
  gLastEvent = eventType;
}



/************************************* DrawFrame *********/

void  DrawFrame( short eventType )
{
  Rect        r;
  WindowPtr  window;
  
  window = FrontWindow();
  r = window->portRect;
  
  r.top = kRowHeight * (eventType - 1);
  r.bottom = r.top + kRowHeight - 1;
  
  FrameRect( &r );
}

Once the source code is typed in, save the file as EventMaster.c. Select Add Window from the Project menu to add EventMaster.c to the project. Select Run from the Project menu to run EventMaster.

When the EventMaster window appears, click the mouse in the window. The mouseDown line will highlight. When you let go of the mouse button, the mouseUp line will highlight. Try this a few times, till you can play the entire drum solo to "Wipeout" on your mouse.

Next, press a key or two on your keyboard (try any key except one of the modifier keys control, option, shift or command). The keyDown line will highlight. Now press the key and hold it down for a while. After a brief delay, the autoKey line will highlight.

Once you're done playing, click the mouse in the EventMaster window's close box to exit the program.

Walking Through the EventMaster Source Code

EventMaster starts off by including <Sounds.h> to access the SysBeep() system call. (SysBeep() used by be part of OSUtils.h, but Apple moved it to Sounds.h as part of Universal Interfaces 3.0.1, included with CodeWarrior Pro 2.) Next we define a series of constants. Some you know, some you don't. The new ones will be explained as they are used in the code.

#define kBaseResID      128
#define kMoveToFront    (WindowPtr)-1L
#define kSleep          7

#define kRowHeight      14
#define kFontSize      9

#define kMouseDown      1
#define kMouseUp        2
#define kKeyDown        3
#define kAutoKey        4

The global gDone starts off with a value of false. When the mouse is clicked in the window's close box, gDone will be set to true and the program will exit. gLastEvent keeps track of the last event that occurred, taking on a value of either kMouseDown, kMouseUp, kKeyDown, or kAutoKey. We do this so we can erase the old highlighting (if any) before we draw the new highlighting.

Boolean    gDone;
short      gLastEvent = 0;

As usual, our program includes a function prototype for all our functions.

/***************/
/* Functions   */
/***************/

void  ToolBoxInit( void );
void  WindowInit( void );
void  EventLoop( void );
void  DoEvent( EventRecord *eventPtr );
void  HandleMouseDown( EventRecord *eventPtr );
void  DrawContents( void );
void  SelectEvent( short eventType );
void  DrawFrame( short eventType );

main() starts by initializing the Toolbox and loading the WIND resource to build the EventMaster window.

/******************************** main *********/

void  main( void )
{
  ToolBoxInit();
  WindowInit();

Next, we enter the main event loop.

  EventLoop();
}

EventLoop() continuously loops on a call to WaitNextEvent(), waiting for something to set gDone to true. The first parameter to WaitNextEvent() tells you what kind of events you are interested in receiving. The constant everyEvent asks the system to send every event it handles.

The second parameter is a pointer to an EventRecord. The third parameter tells the system how friendly your application is to other applications running at the same time. Basically, the number tells the system how many ticks you are willing to wait before recieving the next event, allowing other applications to get some processing time. This number should be about 7 when the application is not busy with a processor intensive task. If the application were doing something where it needed as much processor time as possible (such as compressing a document), this value would be set to zero, but WaitNextEvent() would be called once every seven ticks to give time to the system to check other applications.

The last parameter specifies a home-base region for the mouse. If the mouse moves outside this region, the system will generate a special event, known as a mouse-moved event. Since we won't be handling mouse-moved events, we'll pass nil as this last parameter.

/******************************** EventLoop *********/

void  EventLoop( void )
{    
  EventRecord    event;
  
  gDone = false;
  while ( gDone == false )
  {

WaitNextEvent() will return true if it successfully retrieved an event from the event queue. In that case, we'll process the event by passing it to DoEvent().

    if ( WaitNextEvent( everyEvent, &event, kSleep, nil ) )
      DoEvent( &event );
  }
}

WaitNextEvent() is described in detail in Inside Macintosh: Macintosh Toolbox Essentials, on page 2-85. If you get a chance, read chapter 2, which describes the Event Manager in detail. You might also want to refer to Chapter 4 in the 2nd edition of the Macintosh C Programming Primer.

DoEvent() switches on eventPtr->what, sending the appropriate constant to the routine SelectEvent(), which highlights the appropriate line in the EventMaster window.

/************************************* DoEvent *********/

void  DoEvent( EventRecord *eventPtr )
{
  switch ( eventPtr->what )
  {

In the case of a mouseDown, we also pass the event on to our HandleMouseDown() routine, which will check for a mouseDown in the window's close box.

    case mouseDown:
      SelectEvent( kMouseDown );
      HandleMouseDown( eventPtr );
      break;
    case mouseUp:
      SelectEvent( kMouseUp );
      break;
    case keyDown:
      SelectEvent( kKeyDown );
      break;
    case autoKey:
      SelectEvent( kAutoKey );
      break;

OK, I know I promised we were only going to handle four event types this month, but I couldn't help but sneak this one in here. An update event is generated by the system when the contents of your window need to be redrawn. We'll get to updateEvt next month. In the meantime, if you want to force this code to execute, try triggering your screen dimmer, or cover the EventMaster window with another window and then uncover it..

    case updateEvt:
      BeginUpdate( (WindowPtr)eventPtr->message );
      DrawContents();
      EndUpdate( (WindowPtr)eventPtr->message );
  }
}

HandleMouseDown() calls FindWindow() to find out in which window, and in which part of the window, the mouse was clicked.

/******************************** HandleMouseDown *********/

void  HandleMouseDown( EventRecord *eventPtr )
{
  WindowPtr  window;
  short      thePart;
  
  thePart = FindWindow( eventPtr->where, &window );

If the mouse was clicked in the close box (also known as the goaway box), set gDone to true.

  if ( thePart == inGoAway )
    gDone = true;
}

DrawContents() draws the contents of the EventMaster window. Notice that the highlighting routine DrawFrame() is only called if a previous event has been handled.

/******************************** DrawContents *********/

void  DrawContents( void )
{
  short      i;
  WindowPtr  window;
  
  window = FrontWindow();
  
  for ( i=1; i<=3; i++ )
  {
    MoveTo( 0, (kRowHeight * i) - 1 );
    LineTo( window->portRect.right,
        (kRowHeight * i) - 1 );
  }
  
  MoveTo( 4, 9 );
  DrawString( "\pmouseDown" );
  
  MoveTo( 4, 9 + kRowHeight );
  DrawString( "\pmouseUp" );
  
  MoveTo( 4, 9 + kRowHeight*2 );
  DrawString( "\pkeyDown" );
  
  MoveTo( 4, 9 + kRowHeight*3 );
  DrawString( "\pautoKey" );
  
  if ( gLastEvent != 0 )
    DrawFrame( gLastEvent );
}

SelectEvent() erases the old highlighting (if it existed) and then draws the new highlighting.

/************************************* SelectEvent   */

void  SelectEvent( short eventType )
{
  Rect        r;
  WindowPtr  window;
  
  window = FrontWindow();
  r = window->portRect;
  
  if ( gLastEvent != 0 )
  {
    ForeColor( whiteColor );
    DrawFrame( gLastEvent );
    ForeColor( blackColor );
  }
  
  DrawFrame( eventType );
  
  gLastEvent = eventType;
}

DrawFrame() draws the highlighting rectangle.

/************************************* DrawFrame *********/

void  DrawFrame( short eventType )
{
  Rect        r;
  WindowPtr  window;
  
  window = FrontWindow();
  r = window->portRect;
  
  r.top = kRowHeight * (eventType - 1);
  r.bottom = r.top + kRowHeight - 1;
  
  FrameRect( &r );
}

Some Homework

To understand more about events, read the Event Manager chapters in Inside Macintosh: Macintosh Toolbox Essentials. You may have noticed that EventMaster left a lot of room on the right side of each of its event lines. Use this space as a scratch pad, drawing information culled from the EventRecord each time you process an event.

As an example, try writing out the contents of the when and where fields. How about pulling the character and key codes out of the message field of a keyDown event. Think of EventMaster as an event playground. Play. Learn.

Next Month

Next month, we'll dig into some events designed specifically for the Window Manager: update and activate events. See you next month...

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Is there cross-platform play in slither....
So you've sunken plenty of hours into crawling around in slither.io on your iPhone or iPad. You've got your stories of tragedy and triumph, the times you coiled four snakes at one time balanced out by the others when you had a length of more than... | Read more »
Rodeo Stampede guide to running a better...
In Rodeo Stampede, honing your skills so you can jump from animal to animal and outrun the herd as long as possible is only half the fun. Once you've tamed a few animals, you can bring them home with you. [Read more] | Read more »
VoxSyn (Music)
VoxSyn 1.0 Device: iOS Universal Category: Music Price: $6.99, Version: 1.0 (iTunes) Description: VoxSyn turns your voice into the most flexible vocal sound generator ever. Instantly following even subtle modulations of pitch and... | Read more »
Catch Battleplans on Google Play from Ju...
Real-time strategy title Battleplans is due for release on Google Play on June 30th, following its release for iOS systems last month. With its simple interface and pretty graphics, the crowd-pleaser brings a formerly overlooked genre out for the... | Read more »
iDoyle: The interactive Adventures of Sh...
iDoyle: The interactive Adventures of Sherlock Holmes - A Scandal in Bohemia 1.0 Device: iOS Universal Category: Books Price: $1.99, Version: 1.0 (iTunes) Description: Special Release Price $1.99 (Normally $3.99) | Read more »
Five popular free apps to help you slim...
Thanks to retail and advertising, we're used to thinking one season ahead. Here we are just a week into the summer and we're conditioned to start thinking about the fall. [Read more] | Read more »
How to ride longer and tame more animals...
It's hard to accurately describe Rodeo Stampede to people who haven't seen it yet. It's like if someone took Crossy Roadand Disco Zoo and put them in a blender, yet with a unique game mechanic that's still simple and fun for anyone. [Read more] | Read more »
Teeny Titans - A Teen Titans Go! Figure...
Teeny Titans - A Teen Titans Go! Figure Battling Game 1.0.0 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0.0 (iTunes) Description: Teeny Titans, GO! Join Robin for a figure battling RPG of epic proportions! TEENY... | Read more »
NinjAwesome: Tips and tricks to be a mor...
Sorry about that headline, but I'm going to go ahead and assume that GameResort would not have named its game NinjAwesome without expecting some of that. It is, in fact, pretty awesome the way it combines an endless runner and old school arcade... | Read more »
Into Mirror (Games)
Into Mirror 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: "Is all that we see or seem, but a dream within a dream?"- Edgar Allan Poe New game by Lemon Jam Studio, the team behind Pursuit... | Read more »

Price Scanner via MacPrices.net

13-inch Retina MacBook Pros on sale for up to...
B&H Photo has 13″ Retina MacBook Pros on sale for up to $150 off MSRP. Shipping is free, and B&H charges NY tax only: - 13″ 2.7GHz/128GB Retina MacBook Pro: $1179 $120 off MSRP - 13″ 2.7GHz/... Read more
Apple refurbished Mac minis available for up...
Apple has Certified Refurbished Mac minis available starting at $419. Apple’s one-year warranty is included with each mini, and shipping is free: - 1.4GHz Mac mini: $419 $80 off MSRP - 2.6GHz Mac... Read more
13-inch 2.5GHz MacBook Pro on sale for $999,...
B&H Photo has the 13″ 2.5GHz MacBook Pro on sale for $999 including free shipping plus NY sales tax only. Their price is $100 off MSRP. Read more
Apple refurbished iMacs available for up to $...
Apple has Certified Refurbished 2015 21″ & 27″ iMacs available for up to $350 off MSRP. Apple’s one-year warranty is standard, and shipping is free. The following models are available: - 21″ 3.... Read more
15-inch Retina MacBook Pros on sale for $200-...
B&H Photo has 15″ Retina MacBook Pros on sale for up to $210 off MSRP. Shipping is free, and B&H charges NY tax only: - 15″ 2.2GHz Retina MacBook Pro: $1799.99 $200 off MSRP - 15″ 2.5GHz... Read more
Mac minis on sale for up to $100 off MSRP
B&H Photo has Mac minis on sale for up to $100 off MSRP including free shipping plus NY sales tax only: - 1.4GHz Mac mini: $449 $50 off MSRP - 2.6GHz Mac mini: $649 $50 off MSRP - 2.8GHz Mac mini... Read more
Clearance 2015 13-inch MacBook Airs available...
B&H Photo has clearance 2015 13″ MacBook Airs available for $300 off original MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 1.6GHz/4GB/128GB MacBook Air (MJVE2LL/A): $799.... Read more
Apple refurbished Mac minis available for up...
Apple has Certified Refurbished Mac minis available starting at $419. Apple’s one-year warranty is included with each mini, and shipping is free: - 1.4GHz Mac mini: $419 $80 off MSRP - 2.6GHz Mac... Read more
ABBYY TextGrabber: 1,000,000 Installs in 5 Da...
ABBYY, an international OCR technologies provider, has announced that their image-to-text application TextGrabber, got installed 1,000,000 times in just five days while being featured by the App... Read more
New SkinIt Waterproof Case For iPhone 6
With its impact and waterproof design, the Skinit Waterproof case provides security and protection to guarantee your phone will get you through even the most demanding outdoor conditions. The impact-... Read more

Jobs Board

*Apple* Retail - Multiple Positions, Towson...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
*Apple* iPhone 6s and New Products Tester Ne...
…we therefore look forward to put out products to quality test for durability. Apple leads the digital music revolution with its iPods and iTunes online store, Read more
Music Marketing Lead, iTunes & *Apple*...
…Music Marketing Lead is responsible for developing robust marketing campaigns and programs for Apple Music and iTunes across the whole of Apple ecosystem. This Read more
*Apple* Valley Medical Clinic is Hiring - AP...
Apple Valley Medical Clinic is Hiring! Apple Valley Medical Clinic is an independently owned practice operating a Family Medicine Clinic, a 24/7 Urgent Care, Read more
*Apple* New Products Testers Needed - Apple...
…we therefore look forward to put out products to quality test for durability. Apple leads the digital music revolution with its iPods and iTunes online store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.