#pragma optimize -1
#pragma noroot

#include "defines.h"
#include "extern.h"
#include <types.h>
#include <EVENT.h>
#include <WINDOW.h>    
#include <Resources.h>


extern pascal void SetPort(GrafPortPtr) inline(0x1B04,dispatcher);
extern int Active;
extern int Quit;
extern int newnotes;
extern int notes;
extern int key;

WmTaskRec  MyEvent;
GrafPortPtr ChordWinPtr; 		/* window pointer */
GrafPortPtr OptionWinPtr;		/* tuning, etc controls */


void OpenWindows(void)
{
	Active++;
        ChordWinPtr=NewWindow2(NIL,
        	NIL,DrawWindow,
                NIL,refIsResource,MyWindow,
                rWindParam1);
     	SetPort(ChordWinPtr);

	OptionWinPtr=NewWindow2(NIL, NIL, DrawOptions, NIL,
                refIsResource, kOptionsWindow, rWindParam1);

}

void Update(void)
{
       	newnotes = Adjust (key, notes);

	if (Active) DrawWindow ();
        else
        {
        	ChordWinPtr = NewWindow2( NIL,
        		NIL, DrawWindow,
                        NIL, refIsResource, MyWindow,
                        rWindParam1);
     		SetPort (ChordWinPtr);
	        Active++;
        }
}

void MainEvent (void){
word  myTaskCode;
	
	MyEvent.wmTaskMask = kMyTaskMask;
	while (!Quit) {
		myTaskCode = TaskMaster (kMyEventMask, &MyEvent);
		switch (myTaskCode){
/*
        		case wInGoAway: DoClose();
                        	break;
*/                
        		case wInSpecial:
        		case wInMenuBar:MenuEvents();
        			break;

                        case wInControl:
                        	if (DoControls( (word)(MyEvent.wmTaskData4),
                                	MyEvent.wmTaskData2))
                                	Update();
	                        break;
                                
        		default:;
 		}
	}
}