src/MacOSX/Controller.mm

/*
 *      Controller.m - Simple application window management. 
 *
 *      $Id: Controller.mm,v 1.12 2005/01/30 21:42:13 gbeauche Exp $
 *
 *  Basilisk II (C) 1997-2005 Christian Bauer
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#import "Controller.h"
#import "Emulator.h"

#import "sysdeps.h"                             // Types used in Basilisk C++ code

#import <main.h>
#import <prefs.h>

#define DEBUG 0
#import <debug.h>

#import "misc_macosx.h"
#import "video_macosx.h"

@implementation Controller

//
// Standard NSApplication methods that we override
//

- (id) init
{
#ifdef ENABLE_MULTIPLE
        emulators  = [NSMutableArray new];
#endif
        return [super init];
}

- (void) dealloc
{
#ifdef ENABLE_MULTIPLE
        [emulators      dealloc];
#endif
        [super          dealloc];
}

- (void) awakeFromNib
{
#ifdef ENABLE_MULTIPLE
        [self NewEmulator: self];                       // So the user gets something on screen
#endif
        [[NSApplication sharedApplication]
                setDelegate: self];                             // Enable applicationShouldTerminate
}

- (void) sendEvent: (NSEvent *)event;
{
        if ( [self isAnyEmulatorDisplayingSheets] ||
                        [[thePrefsEditor window] isVisible] || ! [self isAnyEmulatorRunning] )
                [super sendEvent: event];
        else
        {
                NSEventType     type = [event type];

                if ( type == NSKeyUp || type == NSKeyDown || type == NSFlagsChanged )
                        [self dispatchKeyEvent: event
                                                          type: type];
                else
                        [self dispatchEvent: event
                                                   type: type];
        }
}

// NSApplication methods which are invoked through delegation

- (BOOL) applicationShouldTerminateAfterLastWindowClosed: (NSApplication *)app
{       return YES;  }

- (NSApplicationTerminateReply) applicationShouldTerminate: (NSApplication *)app
{
        short   count;
        char    *stillRunningMessage;

        if ( [thePrefsEditor hasEdited] )
                if ( ChoiceAlert("Preferences have been edited",
                                                                        "Save changes", "Quit") )
                        SavePrefs();

//      if ( edited )
//      {
//              NSString *title = [NSString stringWithCString: getString(STR_WARNING_ALERT_TITLE)],
//                               *msg   = @"Preferences have been edited",
//                               *def   = @"Save changes",
//                               *alt   = @"Quit Application",
//                               *other = @"Continue";
//
//              switch ( NSRunAlertPanel(title, msg, def, alt, other, nil) )
//              {
//                      case NSAlertDefault:    savePrefs();
//                      case NSAlertAlternate:  return NSTerminateNow;
//                      case NSAlertOther:              return NSTerminateCancel;
//              }
//      }


        if ( [[thePrefsEditor window] isVisible] )
                [[thePrefsEditor window] performClose: self];


        count = [self emulatorCreatedCount];

        if ( count > 0 )
        {
                if ( count > 1 )
                        stillRunningMessage = "Emulators are still running\nExiting Basilisk may lose data";
                else
                        stillRunningMessage = "Emulator is still running\nExiting Basilisk may lose data";
                if ( ! ChoiceAlert(stillRunningMessage, "Exit", "Continue") )
                        return NSTerminateCancel;                               // NSTerminateLater?
        }

        return NSTerminateNow;
}


// Event dispatching, called by sendEvent

- (void) dispatchKeyEvent: (NSEvent *)event
                                         type: (NSEventType)type
{
        EmulatorView    *view;

#ifdef ENABLE_MULTIPLE
        // We need to work out what window's Emulator should receive these messages


        int     tmp;

        for ( tmp = 0; tmp < [emulators count], ++tmp )
        {
                theEmulator = [emulators objectAtIndex: tmp];
                view = [theEmulator screen];

                if ( [ theEmulator isRunning ] &&
                                ( [[theEmulator window] isKeyWindow] || [view isFullScreen] ) )
                        break;
        }
        
        if ( tmp < [emulators count] )          // i.e. if we exited the for loop
#else
        view = [theEmulator screen];

        if ( [theEmulator isRunning] &&
                                ( [[theEmulator window] isKeyWindow] || [view isFullScreen] ) )
#endif
        {
                D(NSLog(@"Got a key event - %d\n", [event keyCode]));
                switch ( type )
                {
                        case NSKeyUp:
                                [view keyUp: event];
                                break;
                        case NSKeyDown:
                                D(NSLog(@"%s - NSKeyDown - %@", __PRETTY_FUNCTION__, event));
                                [view keyDown: event];
                                break;
                        case NSFlagsChanged:
                                [view flagsChanged: event];
                                break;
                        default:
                                NSLog(@"%s - Sent a non-key event (logic error)",
                                                __PRETTY_FUNCTION__);
                                [super sendEvent: event];
                }
        }
        else                            // No Basilisk window is key (maybe a panel or pane).
                [super sendEvent: event];                               // Call NSApplication default

}

- (void) dispatchEvent: (NSEvent *)event
                                  type: (NSEventType)type                               
{
        EmulatorView    *view;
        BOOL                    fullScreen;

#ifdef ENABLE_MULTIPLE
        // We need to work out what window's Emulator should receive these messages


        int     tmp;

        for ( tmp = 0; tmp < [emulators count], ++tmp )
        {
                theEmulator = [emulators objectAtIndex: tmp];
                view = [theEmulator screen];
                fullScreen = [view isFullScreen];

                if ( [theEmulator isRunning] &&
                                ( fullScreen || [[theEmulator window] isMainWindow] ) )
                        break;
        }
        
        if ( tmp < [emulators count] )          // i.e. if we exited the for loop
#else
        view = [theEmulator screen];
        fullScreen = [view isFullScreen];

        if ( [theEmulator isRunning] &&
                                ( fullScreen || [[theEmulator window] isMainWindow] ) )
#endif
        {
                if ( fullScreen || [view mouseInView: event] )
                {
                        switch ( type )
                        {
                                case NSLeftMouseDown:
                                        [view mouseDown: event];
                                        break;
                                case NSLeftMouseUp:
                                        [view mouseUp: event];
                                        break;
                                case NSLeftMouseDragged:
                                case NSMouseMoved:
                                        if ( fullScreen )
                                                [view fullscreenMouseMove];
                                        else
                                                [view processMouseMove: event];
                                        break;
                                default:
                                        [super sendEvent: event];               // NSApplication default
                        }
                        return;
                }
        }

        // Either the pointer is not in the Emulator's screen, no Basilisk window is running,
        // or no Basilisk window is main (e.g. there might be a panel or pane up).
        //
        // We should just be calling NSApp's default sendEvent, but then for some reason
        // mouseMoved events are still passed to our EmulatorView, so we filter them out.

        if ( type != NSMouseMoved )
                [super sendEvent: event];
}


// Methods to display documentation:

- (IBAction) HelpHowTo: (id)sender
{
        NSString        *path = [[NSBundle mainBundle] pathForResource: @"HowTo"
                                                                                                                ofType: @"html"];

        if ( ! path )
                InfoSheet(@"Cannot find HowTo.html", [theEmulator window]);
        else
                if ( ! [[NSWorkspace sharedWorkspace] openFile: path] )
                        InfoSheet(@"Cannot open HowTo.html with default app", [theEmulator window]);
}

- (IBAction) HelpToDo: (id)sender
{
        NSString        *path = [[NSBundle mainBundle] pathForResource: @"ToDo"
                                                                                                                ofType: @"html"];

        if ( ! path )
                InfoSheet(@"Cannot find ToDo.html", [theEmulator window]);
        else
                if ( ! [[NSWorkspace sharedWorkspace] openFile: path
                                                                           withApplication: @"TextEdit"] )
                        InfoSheet(@"Cannot open ToDo.html with TextEdit", [theEmulator window]);
}

- (IBAction) HelpVersions: (id)sender
{
        NSString        *path = [[NSBundle mainBundle] pathForResource: @"Versions"
                                                                                                                ofType: @"html"];

        if ( ! path )
                InfoSheet(@"Cannot find Versions.html", [theEmulator window]);
        else
                if ( ! [[NSWorkspace sharedWorkspace] openFile: path
                                                                           withApplication: @"TextEdit"] )
                        InfoSheet(@"Cannot open Versions.html with TextEdit",
                                                                                                [theEmulator window]);
}


// Menu items which for managing more than one window

#ifdef ENABLE_MULTIPLE

- (IBAction) NewEmulator: (id)sender
{
        NSString        *title;

        if ( ! [NSBundle loadNibNamed:@"Win512x342" owner:self] )
        {
                NSLog(@"%s - LoadNibNamed@Win512x342 failed", __PRETTY_FUNCTION__);
                return;
        }

        if ( theEmulator == nil)
        {
                NSLog(@"%s - Newly created emulator's NIB stuff not fully linked?", __PRETTY_FUNCTION__);
                return;
        }

        [emulators addObject: theEmulator];
        title = [NSString localizedStringWithFormat:@"BasiliskII Emulator %d", [emulators count]];
        [theEmulator -> win setTitle: title];
}

- (IBAction) PauseAll: (id)sender
{
        [emulators makeObjectsPerformSelector:@selector(Suspend:)
                                                           withObject:self];
}

- (IBAction) RunAll: (id)sender
{
        [emulators makeObjectsPerformSelector:@selector(Resume:)
                                                           withObject:self];
}

- (IBAction) TerminateAll: (id)sender
{
        [emulators makeObjectsPerformSelector:@selector(Terminate:)
                                                           withObject:self];
}

#endif

- (BOOL) isAnyEmulatorDisplayingSheets
{
#ifdef ENABLE_MULTIPLE
        int     tmp;

        for ( tmp = 0; tmp < [emulators count], ++tmp )
                if ( [[[emulators objectAtIndex: tmp] window] attachedSheet] )
                        break;
        
        if ( tmp < [emulators count] )          // i.e. if we exited the for loop
#else
        if ( [[theEmulator window] attachedSheet] )
#endif
                return TRUE;

        return FALSE;
}

- (BOOL) isAnyEmulatorRunning
{
#ifdef ENABLE_MULTIPLE
        int     tmp;

        for ( tmp = 0; tmp < [emulators count], ++tmp )
                if ( [[emulators objectAtIndex: tmp] isRunning] )
                        break;
        
        if ( tmp < [emulators count] )          // i.e. if we exited the for loop
#else
        if ( [theEmulator isRunning] )
#endif
                return TRUE;

        return FALSE;
}

- (short) emulatorCreatedCount
{
        short   count = 0;
#ifdef ENABLE_MULTIPLE
        int             tmp;

        for ( tmp = 0; tmp < [emulators count], ++tmp )
                if ( [[emulators objectAtIndex: tmp] uaeCreated] )
                        ++count;
#else
        if ( [theEmulator uaeCreated] )
                ++count;
#endif

        return count;
}

@end
Revision:	1.13
Committed:	2005-08-14T12:21:27Z (19 years, 3 months ago) by nigel
Branch:	MAIN
CVS Tags:	nigel-build-17
Changes since 1.12:	+3 -3 lines
Log Message:	Stylistic (and possible GCC3/4) fix
#	User	Rev	Content
1	nigel	1.2	/*
2			* Controller.m - Simple application window management.
3			*
4	nigel	1.13	* $Id: Controller.mm,v 1.12 2005/01/30 21:42:13 gbeauche Exp $
5	nigel	1.2	*
6	gbeauche	1.12	* Basilisk II (C) 1997-2005 Christian Bauer
7	nigel	1.2	*
8			* This program is free software; you can redistribute it and/or modify
9			* it under the terms of the GNU General Public License as published by
10			* the Free Software Foundation; either version 2 of the License, or
11			* (at your option) any later version.
12			*
13			* This program is distributed in the hope that it will be useful,
14			* but WITHOUT ANY WARRANTY; without even the implied warranty of
15			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16			* GNU General Public License for more details.
17			*
18			* You should have received a copy of the GNU General Public License
19			* along with this program; if not, write to the Free Software
20			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21			*/
22
23			#import "Controller.h"
24			#import "Emulator.h"
25
26			#import "sysdeps.h" // Types used in Basilisk C++ code
27
28			#import <main.h>
29			#import <prefs.h>
30
31			#define DEBUG 0
32			#import <debug.h>
33
34	nigel	1.6	#import "misc_macosx.h"
35	nigel	1.2	#import "video_macosx.h"
36
37	nigel	1.13	@implementation Controller
38
39	nigel	1.2	//
40			// Standard NSApplication methods that we override
41			//
42
43			- (id) init
44			{
45			#ifdef ENABLE_MULTIPLE
46	nigel	1.5	emulators = [NSMutableArray new];
47	nigel	1.2	#endif
48			return [super init];
49			}
50
51			- (void) dealloc
52			{
53			#ifdef ENABLE_MULTIPLE
54			[emulators dealloc];
55			#endif
56			[super dealloc];
57			}
58
59			- (void) awakeFromNib
60			{
61			#ifdef ENABLE_MULTIPLE
62			[self NewEmulator: self]; // So the user gets something on screen
63			#endif
64			[[NSApplication sharedApplication]
65			setDelegate: self]; // Enable applicationShouldTerminate
66			}
67
68			- (void) sendEvent: (NSEvent *)event;
69			{
70	nigel	1.9	if ( [self isAnyEmulatorDisplayingSheets] \|\|
71			[[thePrefsEditor window] isVisible] \|\| ! [self isAnyEmulatorRunning] )
72	nigel	1.4	[super sendEvent: event];
73			else
74			{
75			NSEventType type = [event type];
76	nigel	1.2
77	nigel	1.4	if ( type == NSKeyUp \|\| type == NSKeyDown \|\| type == NSFlagsChanged )
78			[self dispatchKeyEvent: event
79			type: type];
80			else
81			[self dispatchEvent: event
82			type: type];
83			}
84	nigel	1.2	}
85
86			// NSApplication methods which are invoked through delegation
87
88			- (BOOL) applicationShouldTerminateAfterLastWindowClosed: (NSApplication *)app
89			{ return YES; }
90
91			- (NSApplicationTerminateReply) applicationShouldTerminate: (NSApplication *)app
92			{
93			short count;
94			char *stillRunningMessage;
95
96			if ( [thePrefsEditor hasEdited] )
97			if ( ChoiceAlert("Preferences have been edited",
98			"Save changes", "Quit") )
99			SavePrefs();
100
101			// if ( edited )
102			// {
103			// NSString *title = [NSString stringWithCString: getString(STR_WARNING_ALERT_TITLE)],
104			// *msg = @"Preferences have been edited",
105			// *def = @"Save changes",
106			// *alt = @"Quit Application",
107			// *other = @"Continue";
108			//
109			// switch ( NSRunAlertPanel(title, msg, def, alt, other, nil) )
110			// {
111	nigel	1.10	// case NSAlertDefault: savePrefs();
112			// case NSAlertAlternate: return NSTerminateNow;
113			// case NSAlertOther: return NSTerminateCancel;
114	nigel	1.2	// }
115			// }
116
117
118			if ( [[thePrefsEditor window] isVisible] )
119			[[thePrefsEditor window] performClose: self];
120
121
122			count = [self emulatorCreatedCount];
123
124			if ( count > 0 )
125			{
126			if ( count > 1 )
127			stillRunningMessage = "Emulators are still running\nExiting Basilisk may lose data";
128			else
129			stillRunningMessage = "Emulator is still running\nExiting Basilisk may lose data";
130			if ( ! ChoiceAlert(stillRunningMessage, "Exit", "Continue") )
131			return NSTerminateCancel; // NSTerminateLater?
132			}
133
134			return NSTerminateNow;
135			}
136
137
138			// Event dispatching, called by sendEvent
139
140			- (void) dispatchKeyEvent: (NSEvent *)event
141			type: (NSEventType)type
142			{
143			EmulatorView *view;
144
145			#ifdef ENABLE_MULTIPLE
146			// We need to work out what window's Emulator should receive these messages
147
148
149			int tmp;
150
151			for ( tmp = 0; tmp < [emulators count], ++tmp )
152			{
153			theEmulator = [emulators objectAtIndex: tmp];
154	nigel	1.4	view = [theEmulator screen];
155
156			if ( [ theEmulator isRunning ] &&
157			( [[theEmulator window] isKeyWindow] \|\| [view isFullScreen] ) )
158	nigel	1.2	break;
159			}
160
161			if ( tmp < [emulators count] ) // i.e. if we exited the for loop
162			#else
163	nigel	1.4	view = [theEmulator screen];
164
165			if ( [theEmulator isRunning] &&
166			( [[theEmulator window] isKeyWindow] \|\| [view isFullScreen] ) )
167	nigel	1.2	#endif
168			{
169	nigel	1.4	D(NSLog(@"Got a key event - %d\n", [event keyCode]));
170	nigel	1.2	switch ( type )
171			{
172			case NSKeyUp:
173			[view keyUp: event];
174			break;
175			case NSKeyDown:
176			D(NSLog(@"%s - NSKeyDown - %@", __PRETTY_FUNCTION__, event));
177			[view keyDown: event];
178			break;
179			case NSFlagsChanged:
180			[view flagsChanged: event];
181			break;
182			default:
183			NSLog(@"%s - Sent a non-key event (logic error)",
184			__PRETTY_FUNCTION__);
185			[super sendEvent: event];
186			}
187			}
188			else // No Basilisk window is key (maybe a panel or pane).
189			[super sendEvent: event]; // Call NSApplication default
190
191			}
192
193			- (void) dispatchEvent: (NSEvent *)event
194			type: (NSEventType)type
195			{
196	nigel	1.4	EmulatorView *view;
197	nigel	1.7	BOOL fullScreen;
198	nigel	1.4
199	nigel	1.2	#ifdef ENABLE_MULTIPLE
200			// We need to work out what window's Emulator should receive these messages
201
202
203			int tmp;
204
205			for ( tmp = 0; tmp < [emulators count], ++tmp )
206			{
207			theEmulator = [emulators objectAtIndex: tmp];
208	nigel	1.4	view = [theEmulator screen];
209	nigel	1.7	fullScreen = [view isFullScreen];
210	nigel	1.4
211			if ( [theEmulator isRunning] &&
212	nigel	1.7	( fullScreen \|\| [[theEmulator window] isMainWindow] ) )
213	nigel	1.2	break;
214			}
215
216			if ( tmp < [emulators count] ) // i.e. if we exited the for loop
217			#else
218	nigel	1.4	view = [theEmulator screen];
219	nigel	1.7	fullScreen = [view isFullScreen];
220	nigel	1.4
221			if ( [theEmulator isRunning] &&
222	nigel	1.7	( fullScreen \|\| [[theEmulator window] isMainWindow] ) )
223	nigel	1.2	#endif
224			{
225	nigel	1.7	if ( fullScreen \|\| [view mouseInView: event] )
226	nigel	1.2	{
227			switch ( type )
228			{
229			case NSLeftMouseDown:
230			[view mouseDown: event];
231			break;
232			case NSLeftMouseUp:
233			[view mouseUp: event];
234			break;
235			case NSLeftMouseDragged:
236			case NSMouseMoved:
237	nigel	1.7	if ( fullScreen )
238			[view fullscreenMouseMove];
239			else
240			[view processMouseMove: event];
241	nigel	1.2	break;
242			default:
243			[super sendEvent: event]; // NSApplication default
244			}
245			return;
246			}
247			}
248
249			// Either the pointer is not in the Emulator's screen, no Basilisk window is running,
250			// or no Basilisk window is main (e.g. there might be a panel or pane up).
251			//
252			// We should just be calling NSApp's default sendEvent, but then for some reason
253			// mouseMoved events are still passed to our EmulatorView, so we filter them out.
254
255			if ( type != NSMouseMoved )
256			[super sendEvent: event];
257			}
258	nigel	1.6
259
260			// Methods to display documentation:
261
262	nigel	1.8	- (IBAction) HelpHowTo: (id)sender
263			{
264	nigel	1.10	NSString *path = [[NSBundle mainBundle] pathForResource: @"HowTo"
265			ofType: @"html"];
266	nigel	1.8
267	nigel	1.10	if ( ! path )
268			InfoSheet(@"Cannot find HowTo.html", [theEmulator window]);
269			else
270			if ( ! [[NSWorkspace sharedWorkspace] openFile: path] )
271			InfoSheet(@"Cannot open HowTo.html with default app", [theEmulator window]);
272	nigel	1.8	}
273
274	nigel	1.6	- (IBAction) HelpToDo: (id)sender
275			{
276	nigel	1.10	NSString *path = [[NSBundle mainBundle] pathForResource: @"ToDo"
277			ofType: @"html"];
278	nigel	1.6
279	nigel	1.10	if ( ! path )
280			InfoSheet(@"Cannot find ToDo.html", [theEmulator window]);
281			else
282			if ( ! [[NSWorkspace sharedWorkspace] openFile: path
283			withApplication: @"TextEdit"] )
284			InfoSheet(@"Cannot open ToDo.html with TextEdit", [theEmulator window]);
285	nigel	1.6	}
286
287			- (IBAction) HelpVersions: (id)sender
288			{
289	nigel	1.10	NSString *path = [[NSBundle mainBundle] pathForResource: @"Versions"
290			ofType: @"html"];
291	nigel	1.6
292	nigel	1.10	if ( ! path )
293			InfoSheet(@"Cannot find Versions.html", [theEmulator window]);
294			else
295			if ( ! [[NSWorkspace sharedWorkspace] openFile: path
296			withApplication: @"TextEdit"] )
297			InfoSheet(@"Cannot open Versions.html with TextEdit",
298	nigel	1.8	[theEmulator window]);
299	nigel	1.6	}
300
301
302			// Menu items which for managing more than one window
303	nigel	1.2
304			#ifdef ENABLE_MULTIPLE
305
306			- (IBAction) NewEmulator: (id)sender
307			{
308			NSString *title;
309
310			if ( ! [NSBundle loadNibNamed:@"Win512x342" owner:self] )
311			{
312			NSLog(@"%s - LoadNibNamed@Win512x342 failed", __PRETTY_FUNCTION__);
313			return;
314			}
315
316			if ( theEmulator == nil)
317			{
318			NSLog(@"%s - Newly created emulator's NIB stuff not fully linked?", __PRETTY_FUNCTION__);
319			return;
320			}
321
322			[emulators addObject: theEmulator];
323			title = [NSString localizedStringWithFormat:@"BasiliskII Emulator %d", [emulators count]];
324			[theEmulator -> win setTitle: title];
325			}
326
327			- (IBAction) PauseAll: (id)sender
328			{
329			[emulators makeObjectsPerformSelector:@selector(Suspend:)
330			withObject:self];
331			}
332
333			- (IBAction) RunAll: (id)sender
334			{
335			[emulators makeObjectsPerformSelector:@selector(Resume:)
336			withObject:self];
337			}
338
339			- (IBAction) TerminateAll: (id)sender
340			{
341			[emulators makeObjectsPerformSelector:@selector(Terminate:)
342			withObject:self];
343			}
344
345			#endif
346	nigel	1.4
347			- (BOOL) isAnyEmulatorDisplayingSheets
348			{
349			#ifdef ENABLE_MULTIPLE
350			int tmp;
351
352			for ( tmp = 0; tmp < [emulators count], ++tmp )
353			if ( [[[emulators objectAtIndex: tmp] window] attachedSheet] )
354			break;
355
356			if ( tmp < [emulators count] ) // i.e. if we exited the for loop
357			#else
358			if ( [[theEmulator window] attachedSheet] )
359			#endif
360			return TRUE;
361
362			return FALSE;
363			}
364	nigel	1.2
365			- (BOOL) isAnyEmulatorRunning
366			{
367			#ifdef ENABLE_MULTIPLE
368			int tmp;
369
370			for ( tmp = 0; tmp < [emulators count], ++tmp )
371			if ( [[emulators objectAtIndex: tmp] isRunning] )
372			break;
373
374			if ( tmp < [emulators count] ) // i.e. if we exited the for loop
375			#else
376			if ( [theEmulator isRunning] )
377			#endif
378			return TRUE;
379
380			return FALSE;
381			}
382
383			- (short) emulatorCreatedCount
384			{
385			short count = 0;
386			#ifdef ENABLE_MULTIPLE
387			int tmp;
388
389			for ( tmp = 0; tmp < [emulators count], ++tmp )
390			if ( [[emulators objectAtIndex: tmp] uaeCreated] )
391			++count;
392			#else
393			if ( [theEmulator uaeCreated] )
394			++count;
395			#endif
396
397			return count;
398			}
399
400	nigel	1.10	@end