diff --git a/Timeline/TLE.fl b/Timeline/TLE.fl index f57c337..2de8e1b 100644 --- a/Timeline/TLE.fl +++ b/Timeline/TLE.fl @@ -29,6 +29,8 @@ decl {\#include "Control_Sequence.H" // for options} {} decl {\#include } {} +decl {\#include } {} + decl {\#include } {} decl {extern char session_display_name[256];} {global @@ -115,7 +117,7 @@ free( path );} {} } { Fl_Window main_window { label {Non-DAW - Timeline} open - xywh {577 94 1024 768} type Double resizable xclass {Non-DAW} visible + xywh {129 104 1020 765} type Double resizable xclass {Non-DAW} visible } { Fl_Menu_Bar menubar {open xywh {0 0 1024 25} @@ -126,9 +128,14 @@ free( path );} {} } { MenuItem {} { label {&New} - callback {Loggable::close(); + callback {const char *name = new_session_chooser(); + +if ( ! name ) + return; + +Loggable::close(); // timeline->reset(); -main_window->redraw();} selected +main_window->redraw();} xywh {0 0 40 25} } MenuItem {} { @@ -576,7 +583,7 @@ if ( timeline->total_playback_xruns() ) xruns_output->value( engine->xruns() );} {} } - Function {update_cb( void *v )} {open return_type {static void} + Function {update_cb( void *v )} {return_type {static void} } { code {Fl::repeat_timeout( STATUS_UPDATE_FREQ, update_cb, v ); @@ -586,7 +593,7 @@ xruns_output->value( engine->xruns() );} {} } { Fl_Window {} { label About open - xywh {1082 94 498 529} type Double visible + xywh {1082 94 495 525} type Double visible } { Fl_Tabs {} {open xywh {-4 122 507 419} @@ -627,3 +634,82 @@ with fast, light, reliable alternatives.} } } } + +decl {char new_session_pathname[512];} {} + +class New_Session_Dialog {open +} { + Function {New_Session_Dialog()} {open + } { + code {make_window();} {} + } + Function {run()} {open return_type {const char *} + } { + code {_window->show(); + +while ( _window->shown() ) + Fl::wait(); + +if ( strlen( _directory->value() ) && strlen( _name->value() ) ) +{ + snprintf( new_session_pathname, sizeof( new_session_pathname ), "%s/%s", _directory->value(), _name->value() ); + + return new_session_pathname; +} +else + return NULL;} {} + } + Function {make_window()} {open + } { + Fl_Window _window { + label {New Session} + callback {if ( Fl::event_key() == FL_Escape ) +{ + _directory->value( "" ); + _name->value( "" ); +} + +o->hide();} open + xywh {464 344 550 195} type Double modal visible + } { + Fl_File_Input _name { + label {Named:} + xywh {75 140 375 35} + } + Fl_Button {} { + label Browse + callback {_directory->value( fl_dir_chooser( "Session Directory", NULL, 0 ) );} + xywh {455 110 80 25} + } + Fl_Return_Button {} { + label Create + callback {_window->hide();} + xywh {455 140 80 35} + } + Fl_Output _directory { + label {Where:} + private xywh {75 110 375 25} labeltype EMBOSSED_LABEL + } + Fl_Box {} { + label {New Session} selected + xywh {15 8 520 33} box RSHADOW_BOX color 133 labelsize 20 labelcolor 32 + } + Fl_Choice _template { + label {Template:} + private xywh {310 70 225 25} down_box BORDER_BOX + } { + MenuItem {} { + label Default + xywh {0 0 40 25} + } + } + } + } +} + +Function {new_session_chooser()} {open C return_type {const char *} +} { + code {New_Session_Dialog nsd; + +return nsd.run();} {} +}