#include "Cheese.h"
#include "Editor.h"

struct  Library         *MUIMasterBase;
struct  ObjApp          *App;        
BOOL init( void );
extern Load_Text( Object *);

int main(int argc,char *argv[])
{
    
        ULONG               signals;
        BOOL                running = TRUE;
        if(init())
            {                     
             while(running)
                   {
                       switch(DoMethod(App->App,MUIM_Application_Input,&signals))
                               {
                                   case MUIV_Application_ReturnID_Quit:
                                          running = FALSE;
                                    break;
                               }
                       if (running && signals) Wait(signals);
                    }

             DisposeApp(App);
             

           }
        
           

      return;
}                                                                          


SAVEDS Load_Text( Object *fred)
{
    long Temp_File;
    
    Temp_File = Open("projects:SAS_Editor/GUI/Editor_MUI.c",MODE_OLDFILE);
    if(Temp_File)
     {
        DoMethod(App->EDITOR,MUIM_Editor_Import, Temp_File, LOADMODE_ASCII);
        Close(Temp_File);
    }
    else
    printf("Unable To Open Test File\n");
    
        
}

BOOL init()
{

        if( !(MUIMasterBase = OpenLibrary( MUIMASTER_NAME, 0 ) ) )
        {
            printf( "Couldn't Open Library.\n" );
            return( FALSE );
        }
        
        App = CreateApp();
        if(!App)

        {
                printf( "Failed to create application.\n" );
                return( FALSE );
        }
          
            DoMethod(App->EDITOR, MUIM_Notify, MUIA_Editor_Lines, MUIV_EveryTime,
                App->MAIN_SLIDER, 3, MUIM_Set, MUIA_Prop_Entries, MUIV_TriggerValue );
             DoMethod(App->EDITOR, MUIM_Notify, MUIA_Editor_VisLines, MUIV_EveryTime,
                App->MAIN_SLIDER, 3, MUIM_Set, MUIA_Prop_Visible, MUIV_TriggerValue );
            DoMethod(App->EDITOR, MUIM_Notify, MUIA_Editor_VisibleY, MUIV_EveryTime,
                App->MAIN_SLIDER, 3, MUIM_Set, MUIA_Prop_First, MUIV_TriggerValue );
           DoMethod(App->MAIN_SLIDER, MUIM_Notify, MUIA_Prop_First, MUIV_EveryTime,
                App->EDITOR, 3, MUIM_Set, MUIA_Editor_VisibleY, MUIV_TriggerValue );
                                                                                          
  
          
                                             
        return( TRUE );
}