This is NoteOnHandler.m in view mode; [Download] [Up]
/**************************************************
* SynthBuilder
* Copyright 1993 Nick Porcaro All Rights Reserved
**************************************************/
/*
* NoteOnHandler.m
*/
#import <stdio.h>
#import <stdlib.h>
#import <string.h>
#import <appkit/Panel.h>
#import <musickit/params.h>
#import <musickit/Performer.h>
#import <musickit/Note.h>
#import <musickit/NoteFilter.h>
#import <musickit/NoteSender.h>
#import <musickit/Conductor.h>
#import <musickit/Orchestra.h>
#import <musickit/Conductor.h>
#import <musickit/UnitGenerator.h>
#import "NoteOnHandler.h"
#import "FakeSynthPatch.h"
#import "FakeUG.h"
extern char *getAppName();
@implementation NoteOnHandler
- init
{
[super init];
[self addNoteSender:[[NoteSender alloc] init]];
[self addNoteReceiver:[[NoteReceiver alloc] init]];
return self;
}
- initConnection:aSP
{
/* theSP should be connected in the nib file */
theSP = aSP;
if (! theSP)
{
NXRunAlertPanel(getAppName(),
"Internal snafu nil theSP in NoteOnHandler", NULL, NULL, NULL);
}
return self;
}
- realizeNote:aNote fromNoteReceiver:nr
{
[[self noteSender] sendNote:aNote];
switch ([aNote noteType])
{
case MK_noteOn:
{
/* broadcast 'noteOn' */
[theSP noteOn:self];
break;
}
case MK_noteOff:
{
/* broadcast 'noteOff' */
[theSP noteOff:self];
break;
}
default:
{
/* Nothing for now */
break;
}
}
return self;
}
@end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.