TweetFollow Us on Twitter

Extend Modal Dialog
Volume Number:6
Issue Number:4
Column Tag:C Workshop

Related Info: Dialog Manager Event Manager

Extending Modal Dialogs

By Paul Potts, Wooster, OH

Note: Source code files accompanying article are located on MacTech CD-ROM or source code disks.

The Gauntlet is Thrown Down

A few months ago I was developing a program that used a modal dialog. I showed the results to my roommate. He ran the program and brought up the dialog, but was then interrupted. When he got back, the screen saver had come on. He moved the mouse to refresh the screen, and then scrutinized my display.

“Which button is default?” he asked .

“That one. The program drew the outline, but it got erased.”

“It should be there.”

“Oh, come on! The Finder doesn’t even keep the outline around its default buttons when you use a screen saver!”

“If it’s in Inside Macintosh, it should be there. Go fix it. Here, make me a copy first.” He popped in a blank disk. Nothing happened.

“How come it didn’t ask if I want to initialize the disk?”

“That doesn’t work when a modal dialog is active,” I explained lamely.

He then pressed the “Q” key. Nothing happened. “There’s a dialog button called Quit -- why didn’t it quit?” he asked. “What kind of user-friendly program is this, anyway?”

The Gauntlet is Picked Up

My roommate was right. We are used to putting up with the limitations of modal dialogs, but ModalDialog can be extended using filter procedures. The parameters of ModalDialog can be declared in C as follows:

/* 1 */

void ModalDialog (filterProc, itemHit)
 ProcPtr  filterProc;
 int  *itemHit;

The address of your filter procedure gets passed by casting it to a procPtr. If you don’t want to use a filterProc, you pass NIL as your first parameter. If you do use a filterProc, Modal dialog then gets each event for you, using a mask which excludes disk events, and sends them to your filterProc. It is then up to your filterProc to decide what to do with them. ModalDialog expects your filterProc to be declared as follows:

/* 2 */

pascal Boolean FProc(Dialog, Event, itemHit)
 DialogPtrtheDialog;
 EventRecord*theEvent;
 int  *itemHit;

A dialog filterProc is actually a function that returns a Boolean value. This value should be TRUE if you want ModalDialog to exit, and FALSE otherwise. ModalDialog passes your filterProc a pointer to the current event. You then can do what you want with it. If your function returns FALSE, ModalDialog will handle the event after you. Thus, you can get a crack at each event even before ModalDialog does. Your filterProc can then do any of the following:

1) Handle the event, then send it to ModalDialog

2) Handle the event and tell ModalDialog to exit

3) Change the event and return to ModalDialog

4) Read the event queue itself and act on it.

My filterProc uses the first technique to handle updateEvents before ModalDialog gets them. This allows me to redraw the default box around a button and then tell ModalDialog to do its own updating. I use the second technique to exit ModalDialog if my filterProc receives a key event that it understands. I use the third technique to handle the <return> key by changing the event from a keypress to a click in the default button. You don’t actually have to do this for <enter> and <return> keypresses, since ModalDialog handles key events, but I wanted to illustrate the technique of altering an event.

Scott Knaster, in Macintosh Programming Secrets, suggests that command-key equivalents be provided for buttons in modal dialog boxes whenever possible. Command-key equivalents aren’t always necessary, however. Some popular applications, such as Microsoft Word, provide single-key equivalents for button clicks, if no editable text fields are present in the dialog, such as in the Save Changes Before Closing dialog. I suggest that commnad-key equivalents be used in modal dialogs with editable text fields, and single-key equivalents (or both single-key and command-key equivalents) be used when no editable text fields are present. My code illustrates both techniques, but your application should use only one. Even though my modal dialog has an editable text field, I allows the user to press a 1, 2, or 3 to choose one of my three buttons. The user can also use <command>-F, S, and T to choose the first, second, and third dialog items, respectively. NOTE: You must make certain that the editText item(s) in the DITL resource that you use are set to Disabled, or else my technique will not work.

When drawing your dialogs with ResEdit, keep in mind that the command-key character is ASCII 17 in the Chicago font, but cannot be typed directly from the keyboard. Microsoft Word will generate this character if you use the Change function to replace a specified character with a ^17. You can then copy this character and paste it into your ResEdit fields. RMaker can generate this character by using \11.

Since ModalDialog does not pass disk events to the filterProc, I use the fourth technique to allow the user to insert a blank disk while the ModalDialog is active. It gets initialized by DIBadMount, which then mounts it (or ejects it, if initialization failed). This might be useful in a modal dialog which displays on-line volumes. SFPutFile uses this technique to allow disks to be mounted while its dialog is active.

There are other ways you can handle events in a modal dialog using filterProcs. You can do anything you want during null events. You can plot a series of icons in your dialog to give the appearance of animation, or draw the current time using DrawString. After all, you have the current grafPort, and can draw directly with QuickDraw. Remember, though, that your drawing operations should be as fast as possible, and must take much less than a single tick to work effectively. Also, remember your poor end-user: don’t make your dialogs overly confusing or complex. We want to extend the Macintosh interface, not bury it.

If you like my code, you are welcome to use it “as-is,” modify it, or completely rewrite it. I’d appreciate it if you’d put my name somewhere in your application, but you can drop me a postcard instead.

Listing:  driveDialog.c

/* This Think C 3.02/4.0 code should be compiled with MacHeaders turned 
on.  Create a new project called FilterProc.Π, and add this file, driveDialog.c, 
along with HandleDialog.c and MacTraps.  Prototypes are provided. Compile 
the resource file, FilterProc.r, with RMaker and put it in the folder 
with the FilterProc project.*/

/*********************************************/
/* File: driveDialog.c */
/* A simple driver application for the dialog
handler.  Your own application would call
it instead. */
 
void main (void);
int HandleDialog(short ID);

void main()
{
 int  itemHit,
/* Dialog item hit, returned by HandleDialog */
 counter;
 
 InitGraf(&thePort);
 InitFonts();
 InitWindows();
 InitMenus();
 TEInit();
 InitDialogs(0L);
 FlushEvents(everyEvent, 0);
 InitCursor();
 
/* Now send the HandleDialog function the resource ID of the DLOG to 
use */
 itemHit = HandleDialog ((short)1);
 
/* Now beep to tell us what item number the HandleDialog call sent back 
(i.e., what item was hit to exit ModalDialog */
 for (counter = 1; counter<= itemHit;  counter++)
 SysBeep(40);
}
Listing:  HandleDialog.c

/*****************************************/
/* File HandleDialog.c */
/*****************************************/
/* Prototypes */
 
int HandleDialog(short Dialog_ID);
/* Called whenever you want to put up a modal dialog */

pascal Boolean FProc(DialogPtr theDialog, 
 EventRecord *theEvent, 
 int *itemHit);
/* Filter procedure called by ModalDialog to screen dialog events */
 
Point CenterDialogItem(DialogPtr theDialog,              int   item_number);
/* Returns the center of the rect of a dialog item, to be called from 
a filter proc while a modal dialog is active. */

void FlashDialogItem(DialogPtr theDialog, int                  item_number);
/* Flashes an item of a dialog, to be called from a filter proc while 
a modal dialog is active. */

void HandleUpdate(DialogPtr theDialog);
/* Used to handle update events while a modal 
dialog is active, called from a filter proc.*/

/********************************************/
/* This procedure returns the center of a dialog item as a point.  It 
is designed to be used with buttons, but will work with any type of dialog 
item.  */
/* Input: theDialog (a DialogPtr), item number (an integer) */
/* Output: a point */

Point CenterDialogItem(theDialog, item_number)
 DialogPtr  theDialog;
 int    item_number;

{
 Point  the_center; /* Center of item, to return */
 int    itemType; /* Returned by GetDItem but not used */
 Handle theItem; /* Returned by GetDItem but not used */
 Rect the_Rect; /* Returned by GetDItem */

GetDItem(theDialog, item_number, &itemType,        &theItem, &the_Rect);
the_center.h = the_Rect.left +   ((the_Rect.right -      the_Rect.left)/ 
2);
the_center.v = the_Rect.top + ((the_Rect.bottom - the_Rect.top)/ 2);
return the_center;
}

/********************************************/
/* This procedure returns the center of the rectangle of the default 
dialog item as a single point.  */
/* Input: theDialog (a DialogPtr), item_number (an integer) */
/* Output:  none */

void FlashDialogItem(theDialog, item_number)
 DialogPtr  theDialog;
 int    item_number;
{
 long tickScratch; /* returned by Delay, unused */
 int  itemType; /* Returned by GetDItem but not used */
 Handle the_item; /* Handle to default button */
 Rect controlRect; /* Returned by GetDItem but not used */

GetDItem(theDialog, item_number, &itemType,  &the_item, &controlRect);
HiliteControl(the_item, 1); 
Delay(6, &tickScratch);
}

/********************************************/
/* The following function handles update events for your dialog box. 
 It is called whenever the filterProc receives an update event.  You 
can put whatever you want to be drawn in the dialog in it.  Right now 
it redraws the rounded rect around the default button (number one). */

/* Constants for drawing roundRect */
#define edgeCurve16
#define gapBetween -4
#define lineSize 3

void HandleUpdate(theDialog)
 DialogPtr theDialog;
{
 Rect controlRect; /* rectangle of the default control.  We
need this to draw the round rect. */
 int    itemType; /* Returned by GetDItem but not used */
 Handle the_item; /* ditto */
 Rect border; /* Rect of the thick border */
 
PenSize(lineSize, lineSize);
/* Get control #1’s rectangle and grow it a little bit, then call FrameRoundRect 
to draw it. */
GetDItem(theDialog, (int)1, &itemType, &the_item, &controlRect);
border = controlRect;
InsetRect(&border, gapBetween, gapBetween);  
FrameRoundRect(&border, edgeCurve, edgeCurve);     
}

/********************************************/
/* The following filterProc is used to handle extra events during the 
modal dialog loop, such as update events.  Its original purpose was to 
keep the default round-rect drawn around the control even after a screen 
saver has redrawn the screen. It also handles insertion of blank disks 
and button-keyboard equivalents. 
NOTE:  If you have one or more editable text fields within your modal 
dialog, your key equivalents should use the command key.  If you don’t 
have any editable text fields, your key equivalents can be handled straight. 
 The names of your buttons should all begin with unique first letters, 
and if you use command-key entry you should provide a legend of command-key 
equivalents next to the buttons. */
 
pascal Boolean FProc(theDialog,  theEvent, itemHit)
 DialogPtrtheDialog;
 EventRecord   *theEvent;
 int    *itemHit;
{
 long key; /* Holds the key code */
 Point  ctr; /* where the mouse click will go */
 int  DIResult; /* Returned by DIBadMount */
 EventRecorddiskEvent; /* Returned by EventAvail, below */

/* Since ModalDialog doesn’t handle bad disk mounts, we have a handler 
that will allow the user to format new disks with a modal dialog still 
on the screen. */

if (GetNextEvent(diskMask, &diskEvent) ==    TRUE)
{
 if (HiWord(diskEvent.message) != 0) 
 {
 diskEvent.where.h = ((screenBits.bounds.right
 - screenBits.bounds.left)/ 2) - (304 / 2);
 diskEvent.where.v = ((screenBits.bounds.bottom
 - screenBits.bounds.top)/  3) - (104 / 2);
 InitCursor();
 DIResult = DIBadMount(diskEvent.where, 
 diskEvent.message);
 }

} /* end of if GetNextEvent test for disk events */

switch (theEvent->what)
{
 case (updateEvt):
 HandleUpdate(theDialog);
 return FALSE;
/*Do not return an item hit value.  Returning
FALSE tells modalDialog to handle the update
event.  We have just added our own handling of the event. */
 break; 
 
 case (keyDown):
 key = theEvent->message & charCodeMask;
 switch(key)
 { 
/* key has been pressed, we want to interpret it properly. */
 case 13: /* Return key */
 { 
 FlashDialogItem(theDialog, 1);
 ctr = CenterDialogItem(theDialog, 1);

/* We can do it this way: change the event record to fool ModalDialog. 
 ModalDialog doesn’t flash the button long enough for my taste, so I 
flash it some more myself. */
 theEvent->what = mouseDown;
 LocalToGlobal (&ctr);
 theEvent->where = ctr;
 theEvent->message = 0;

/* Now we tell ModalDialog to handle the
event.  It doesn’t suspect a thing! */
 *itemHit = 1;
 return FALSE;
 break;
 }

 case 3: /* the Enter key */
 { 

/* Or we can do it our own way by flashing the button and telling ModalDialog 
to exit. */
 FlashDialogItem(theDialog, 1);
 *itemHit = 1;
 return TRUE;
 break;
 }
 
/* These key equivalents do not rely on the use of the command key.  
You would use these in your modal dialog only if you had no editable 
text fields. */
 case 49: /* 1 key */
 { 
 FlashDialogItem(theDialog, 1);
 *itemHit = 1;
 return TRUE;
 break;
 }

 case 50: /* 2 key */
 { 
 FlashDialogItem(theDialog, 2);
 *itemHit = 2;
 return TRUE;
 break;
 }

 case 51: /* 3 key */
 { 
 FlashDialogItem(theDialog, 3);
 *itemHit = 3;
 return TRUE;
 break;
 }
 
/* These key equivalents for buttons use
the command key, and are appropriate even 
for use in a modal dialog with editable text. */
 
 case 102:/* ASCII F */
 { 
 if (theEvent->modifiers & cmdKey)
 {
 FlashDialogItem(theDialog, 1);
 *itemHit = 1;
 return TRUE;
 break;
 }
 }
 
 case 115:/* ASCII S */
 { 
 if (theEvent->modifiers & cmdKey)
 {
 FlashDialogItem(theDialog, 2);
 *itemHit = 2;
 return TRUE;
 break;
 }
 }

 case 116:/* ASCII T */
 { 
 if (theEvent->modifiers & cmdKey)
 {
 FlashDialogItem(theDialog, 3);
 *itemHit = 3;
 return TRUE;
 break;
 }
 }
 
 default:
 {
 return FALSE; /* Do nothing if another key is chosen. */
 break;
 }
 } /* end of key code switch */
 
case (mouseDown):
 
/* You can insert your own mouse click
handlers here.  ModalDialog takes care of mouse events, but you can do 
do special processing.  For example, ModalDialog does nothing if a mouse 
click
occurs inside a modal dialog but outside of a control, but you could 
do something.  */
 
 return FALSE;
 break;
case (mouseUp):
 return FALSE;
 break;
default:
 return FALSE;
 break; 
/* We don’t handle any other types of events, so these get sent to ModalDialog 
unchanged. */    
 } /* end of switch */
} /* end of filterproc function */

/********************************************/
/* HandleDialog is a function to draw and dispose of a simple modal dialog. 
 It tells ModalDialog to use a filter proc to screen events for the dialog. 


Input: short Dialog_ID - the resource ID
Output: item number of the control that was hit to exit ModalDialog. 
*/

int HandleDialog(dialog_ID)
 short  dialog_ID; 
{
 int  itemHit; /* returned by ModalDialog */
 DialogPtrtheDialog; /* The dialog we will work with */
 GrafPtroldWindow; /* Saves the previous window */       

GetPort(&oldWindow);  /* save current grafPort */
SetDAFont(0);    /* use system font */
/* First, get the dialog from the resource and prepare to execute ModalDialog 
*/
theDialog = GetNewDialog(dialog_ID, (Ptr)0, (WindowPtr)-1);
if (ResError() != noErr)
/* Called if GetNewDialog returns an error.  You can put your own error 
handler here.  In this example we are assuming that the dialog is available 
in the application resource fork */
 {
 SysBeep(40);
 ExitToShell();
 }
 
ShowWindow(theDialog);
SetPort(theDialog);
FlushEvents(everyEvent, 0);
 
/*Modaldialog call should wait until event in active control*/
ModalDialog((ProcPtr)FProc, &itemHit);
DisposDialog(theDialog);
FlushEvents (everyEvent, 0);
SetPort(oldWindow);
/* restore drawing state */
return itemHit;
}
Listing:  Filterproc.r

**************************
* RMaker source file for
* filterProc application
**************************

Filterproc.Π.RSRC
RSRCRSED

Type DITL ;;Text for dialog
,1 ;;Resource number
5;;Number of items

Button Enabled
17 27 37 95
First \11F;;The non-printable character is * ASCII 17 (see text)

Button Enabled
17 108 37 182
Second \11S

Button Enabled
17 200 37 262
Third \11T

editText Disabled
137 86 157 222
This is editable text

staticText Enabled
61 43 115 246
This is an example of a modal dialog with command-key equivalents for 
buttons.
* The above text should be all on one line

Type DLOG ;;modal dialog
,1

90 120 266 420
Visible NoGoAway
5;;proc id
0;;refCon
1;;DITL

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Apple iTunes 12.2 - Play Apple Music...
Apple iTunes lets you organize and stream Apple Music, download and watch video and listen to Podcasts. It can automatically download new music, app, and book purchases across all your devices and... Read more
Apple Security Update 2015-005 - For OS...
Apple Security Update 2015-005 is recommended for all users and improves the security of OS X. For detailed information about the security content of this update, please visit: http://support.apple.... Read more
Apple HP Printer Drivers 3.1 - For OS X...
Apple HP Printer Drivers includes the latest HP printing and scanning software for OS X Lion or later. For information about supported printer models, see this page. Version 3.1: The latest printing... Read more
Epson Printer Drivers 3.1 - For OS X 10....
Epson Printer Drivers installs the latest software for your EPSON printer or scanner for OS X Yosemite, OS X Mavericks, OS X Mountain Lion, and OS X Lion. For more information about printing and... Read more
Xcode 6.4 - Integrated development envir...
Xcode provides everything developers need to create great applications for Mac, iPhone, and iPad. Xcode brings user interface design, coding, testing, and debugging into a united workflow. The Xcode... Read more
OS X Yosemite 10.10.4 - Apple's lat...
OS X Yosemite is Apple's newest operating system for Mac. An elegant design that feels entirely fresh, yet inherently familiar. The apps you use every day, enhanced with new features. And a... Read more
Dash 3.0.2 - Instant search and offline...
Dash is an API Documentation Browser and Code Snippet Manager. Dash helps you store snippets of code, as well as instantly search and browse documentation for almost any API you might use (for a full... Read more
FontExplorer X Pro 5.0 - Font management...
FontExplorer X Pro is optimized for professional use; it's the solution that gives you the power you need to manage all your fonts. Now you can more easily manage, activate and organize your... Read more
Typinator 6.6 - Speedy and reliable text...
Typinator turbo-charges your typing productivity. Type a little. Typinator does the rest. We've all faced projects that require repetitive typing tasks. With Typinator, you can store commonly used... Read more
Arq 4.12.1 - Online backup to Google Dri...
Arq is super-easy online backup for the Mac. Back up to your own Google Drive storage (15GB free storage), your own Amazon Glacier ($.01/GB per month storage) or S3, or any SFTP server. Arq backs up... Read more

Hands-On With Raceline CC
Set for release soon, Rebellion’s motorbike racing game, Raceline CC certainly looks stylish. But how does it play? I got my hands on a preview build to answer exactly that. | Read more »
Siegefall - Tips, Tricks, and Strategies...
So, you fancy establishing a base and ruling the world again. Siegefall is a convenient place to do that, but how about some great tips and tricks on how best to go about it? Here are a few ideas on how to get ahead as a beginner to this medieval... | Read more »
The WWE Comes to Racing Rivals - Because...
Racing Rivals is a racing game that's all about, well, rivalry. And who knows rivalry better than WWE superstars (shhhh, that was rhetorical)? [Read more] | Read more »
Hey, Who Put Apple Music in My SoundHoun...
One of the App Store's popular music discovery sources - SoundHound - has already been updated to include Apple's own music discovery source - Apple Music. That was fast! [Read more] | Read more »
Arcane Legends has a New Expansion Calle...
Arcane Legends has been going strong since it debuted at the tail end of 2012. So well, in fact, that it's already up to its sixth expansion. [Read more] | Read more »
Vector 2 is Officially a Thing and it...
Vector is a pretty cool parkour-driven runner that's gotten a pretty decent following since it first came out - although personally I think more people could stand to show it some love. Anyway, Nekki has announced that a sequel isofficially on its... | Read more »
Get Ready to Trucksform and Roll Out (an...
It looks like NuOxygen is bringing the truck-transforming racer Trucksform (get it?) to iOS in a couple of weeks. Although really it's more of an auto-driver than a racer. But still, transforming trucks! [Read more] | Read more »
This Week at 148Apps:June 22-26, 2015
June's Summer Journey Continues With 148Apps How do you know what apps are worth your time and money? Just look to the review team at 148Apps. We sort through the chaos and find the apps you're looking for. The ones we love become Editor’s Choice,... | Read more »
LEGO® Minifigures Online (Games)
LEGO® Minifigures Online 1.0.1 Device: iOS iPhone Category: Games Price: $4.99, Version: 1.0.1 (iTunes) Description: | Read more »
World of Tanks Blitz celebrates its firs...
Today marks the first anniversary of the launch of World of Tanks Blitz, the mobile version of the PC tank battler, World of Tanks. World of Tanks Blitz launched on iOS and Android on June 26th last year and to celebrate, Wargaming is giving all... | Read more »

Price Scanner via MacPrices.net

Apple Releases OS X 10.10.4 With WIFi Fix, iO...
On Tuesday, Apple released final versions of OS X 10.10.4 and iOS 8.4, as well as updates for the Safari browser for OS X Yosemite, Mavericks, and Mountain Lion. The OS X 10.10.4 update focuses on... Read more
Dual-Band High-Gain Antennas for Home Wi-Fi N...
Linksys has announced what it claims are the first dual-band, omni-directional high-gain antennas for the consumer market. The new Linksys high-gain antennas available in a 2- and 4-pack (WRT004ANT... Read more
Apple refurbished 2014 15-inch Retina MacBook...
The Apple Store has Apple Certified Refurbished 2014 15″ 2.2GHz Retina MacBook Pros available for $1609, $390 off original MSRP. Apple’s one-year warranty is included, and shipping is free. They have... Read more
Clearance 2014 MacBook Airs available for up...
Adorama has 2014 MacBook Airs on sale for up to $301 off original MSRP including NY + NJ sales tax and free shipping: - 11″ 256GB MacBook Air: $798 $301 off original MSRP - 13″ 128GB MacBook Air: $... Read more
5K iMacs on sale for $100 off MSRP, free ship...
B&H Photo has the new 27″ 3.3GHz 5K iMac on sale for $1899.99 including free shipping plus NY tax only. Their price is $100 off MSRP. They have the 27″ 3.5GHz 5K iMac on sale for $2199, also $100... Read more
27-inch 3.2GHz iMac on sale for $1679, save $...
B&H Photo has the 27″ 3.2GHz iMac on sale for $1679.99 including free shipping plus NY sales tax only. Their price is $120 off MSRP. Read more
12-inch 1.2GHz Gray MacBook on sale for $1487...
Amazon.com has the new 12″ 1.2GHz Gray MacBook in stock and on sale for $1487 including free shipping. Their price is $102 off MSRP, and it’s the lowest price available for this model. We expect... Read more
15-inch 2.2GHz Retina MacBook Pro on sale for...
Amazon.com has the 15″ 2.2GHz Retina MacBook Pro on sale for $1819 including free shipping. Their price is $180 off MSRP, and it’s the lowest price available for this model. Read more
OtterBox Releases New Symmetry Series Metalli...
Otterbox’s new Symmetry Series of smartphone cases flaunts the best of both both street style and street smarts with their new metallic finishes and trusted OtterBox protection for iPhone 6 and... Read more
Eliminate Cable Chaos with New GE Branded Wra...
GE licensee Jasco Products has introduced a new line of GE branded Wrap-n-Charge USB wall chargers with built-in cable management. “We are always working to combine great technology with innovative... Read more

Jobs Board

*Apple* TV Live Streaming Frameworks Test En...
**Job Summary** Work and contribute towards the engineering of Apple 's state-of-the-art products involving video, audio, and graphics in Interactive Media Group (IMG) at Read more
Project Manager, WW *Apple* Fulfillment Ope...
…a senior project manager / business analyst to work within our Worldwide Apple Fulfillment Operations and the Business Process Re-engineering team. This role will work Read more
Senior Data Scientist, *Apple* Retail - Onl...
**Job Summary** Apple Retail - Online sells Apple products to customers around the world. In addition to selling Apple products with unique services such as iPad Read more
*Apple* Music Producer - Apple (United State...
**Job Summary** Apple Music seeks a Producer to help shepherd some of the most important content and editorial initiatives within the music app, with a particular focus Read more
Sr. Technical Services Consultant, *Apple*...
**Job Summary** Apple Professional Services (APS) has an opening for a senior technical position that contributes to Apple 's efforts for strategic and transactional Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.