falkTX
/
Carla
mirror of https://github.com/falkTX/Carla
1
0
Fork 0
Code Releases 42 Activity
Audio plugin host https://kx.studio/carla
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
3959 Commits
16 Branches
16GB
Tree: 510209d0ee
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '510209d0ee'
${ noResults }
Carla/source/native-plugins/zynaddsubfx/UI/MasterUI.fl

1784 lines
57KB
Raw Blame History 

  1. # data file for the Fltk User Interface Designer (fluid)

  2. version 1.0302 

  3. header_name {.h} 

  4. code_name {.cc}

  5. decl {//Copyright (c) 2002-2009 Nasca Octavian Paul - (c) 2009-2017 Mark McCurry} {private local

  6. } 

  7. 

  8. decl {//License: GNU GPL version 2 or later} {private local

  9. } 

  10. 

  11. decl {\#include <stdlib.h>} {public local

  12. } 

  13. 

  14. decl {\#include <stdio.h>} {public local

  15. } 

  16. 

  17. decl {\#include <string.h>} {public local

  18. } 

  19. 

  20. decl {\#if ! defined(PLUGINVERSION) && HAS_X11

  21. \#include "zynaddsubfx.xpm"

  22. \#endif} {private local

  23. } 

  24. 

  25. decl {\#include "WidgetPDial.h"} {public local

  26. } 

  27. 

  28. decl {\#include "ADnoteUI.h"} {public local

  29. } 

  30. 

  31. decl {\#include "SUBnoteUI.h"} {public local

  32. } 

  33. 

  34. decl {\#include "EffUI.h"} {public local

  35. } 

  36. 

  37. decl {\#include "VirKeyboard.h"} {public local

  38. } 

  39. 

  40. decl {\#include "ConfigUI.h"} {public local

  41. } 

  42. 

  43. decl {\#include "BankUI.h"} {public local

  44. } 

  45. 

  46. decl {\#include "PartUI.h"} {public local

  47. } 

  48. 

  49. decl {\#include "MicrotonalUI.h"} {public local

  50. } 

  51. 

  52. decl {\#include "PresetsUI.h"} {public local

  53. } 

  54. 

  55. decl {\#include "NioUI.h"} {public global

  56. } 

  57. 

  58. decl {\#include "VuPartMeter.h"} {public local

  59. } 

  60. 

  61. decl {\#include "Fl_Osc_Dial.H"} {private local

  62. } 

  63. 

  64. decl {\#include "Osc_DataModel.h"} {private local

  65. } 

  66. 

  67. decl {\#include "Fl_Osc_TSlider.H"} {private local

  68. } 

  69. 

  70. decl {\#include "VuMasterMeter.h"} {public local

  71. } 

  72. 

  73. decl {\#include "PartNameButton.h"} {public local

  74. } 

  75. 

  76. decl {\#include "common.H"} {public local

  77. } 

  78. 

  79. decl {\#if USE_NSM

  80. \#include "NSM.H"

  81. extern NSM_Client *nsm;

  82. \#endif} {public local

  83. } 

  84. 

  85. decl {\#if !defined(PLUGINVERSION) && HAS_X11

  86. \#include <X11/xpm.h>

  87. \#endif} {public local

  88. } 

  89. 

  90. decl {\#include "../globals.h"} {public local

  91. } 

  92. 

  93. class SysEffSend {: {public Fl_Osc_Dial}

  94. } {

  95.   Function {SysEffSend(int x,int y, int w, int h, const char *label=0):Fl_Osc_Dial(x,y,w,h,label)} {} {

  96.     code {} {}

  97.   }

  98.   Function {init(int neff1,int neff2)} {} {

  99.     code {//TODO figure out if this extra class is even needed

  100. minimum(0);

  101. maximum(127);

  102. step(1);

  103. labelfont(1);

  104. labelsize(10);

  105. align(FL_ALIGN_TOP);

  106. 

  107. Fl_Osc_Dial::init("part"+to_s(neff1)+"/sysefxsend"+to_s(neff2));

  108. char tmp[20];snprintf(tmp,20,"%d->%d",neff1+1,neff2+1);

  109. this->copy_label(tmp);} {}

  110.   }

  111.   Function {~SysEffSend()} {} {

  112.     code {hide();} {}

  113.   }

  114. } 

  115. 

  116. class Panellistitem {open : {public Fl_Osc_Group}

  117. } {

  118.   Function {make_window()} {open private

  119.   } {

  120.     Fl_Window panellistitem {open

  121.       private xywh {632 715 100 260} type Double box NO_BOX

  122.       class Fl_Group visible

  123.     } {

  124.       Fl_Group panellistitemgroup {open

  125.         private xywh {0 20 70 240} box UP_FRAME

  126.         code0 {/*if (master->part[npart]->Penabled==0) o->deactivate();*/}

  127.         code1 {set_module_parameters( o );}

  128.       } {

  129.         Fl_Group {} {open

  130.           xywh {45 65 15 110} box ENGRAVED_FRAME

  131.         } {

  132.           Fl_Box partvu {

  133.             label {V U}

  134.             xywh {45 65 15 110} box FLAT_BOX color 0 selection_color 75 labelcolor 55 align 128

  135.             class VuPartMeter

  136.           }

  137.         }

  138.         Fl_Button partname {

  139.           label {  }

  140.           callback {if ((int)bankui->cbwig->value()!=(npart+1)){

  141.    bankui->cbwig->value(npart+1);

  142.    bankui->cbwig->do_callback();

  143. };

  144. bankui->show();}

  145.           xywh {5 27 60 30} box THIN_DOWN_BOX down_box FLAT_BOX labelfont 1 labelsize 10 align 208

  146.           code0 {o->ext = "Pname";o->oscRegister("Pname");}

  147.           class PartNameButton

  148.         }

  149.         Fl_Slider partvolume {

  150.           xywh {10 65 30 110} type {Vert Knob} box NO_BOX minimum 127 maximum 0 step 1 value 127

  151.           code0 {o->init("Pvolume", 'i');o->reset_value=96;}

  152.           class Fl_Osc_TSlider

  153.         }

  154.         Fl_Dial partpanning {

  155.           xywh {20 180 30 30} maximum 127 step 1

  156.           code0 {o->init("Ppanning");o->reset_value=64;}

  157.           class Fl_Osc_Dial

  158.         }

  159.         Fl_Button {} {

  160.           label edit

  161.           callback {if ((int)bankui->cbwig->value()!=(npart+1)){

  162.    bankui->cbwig->value(npart+1);

  163.    bankui->cbwig->do_callback();

  164.    }

  165.    if (Fl::event_shift())

  166.         partui->instrumenteditwindow->show();

  167.    else if (Fl::event_ctrl())

  168.         partui->instrumentkitlist->show();

  169. }

  170.           xywh {15 235 40 20} labelsize 10

  171.         }

  172.         Fl_Choice partrcv {

  173.           tooltip {receive from Midi channel} xywh {10 213 50 15} down_box BORDER_BOX labelsize 10 align 5 textfont 1 textsize 10

  174.           code0 {char nrstr[10]; for(int i=0;i<NUM_MIDI_CHANNELS;i++){sprintf(nrstr,"Ch%d",i+1);if (i!=9) o->add(nrstr); else o->add("Dr10");};}

  175.           code1 {o->init("Prcvchn");}

  176.           class Fl_Osc_Choice

  177.         } {}

  178.       }

  179.       Fl_Check_Button partenabled {

  180.         label 01

  181.         callback {

  182.             if ((int) o->value()==0) panellistitemgroup->deactivate();

  183.             else {

  184.                 panellistitemgroup->activate();

  185.             };

  186. 

  187.             o->redraw();}

  188.         private xywh {5 0 45 20} down_box DOWN_BOX labeltype EMBOSSED_LABEL labelfont 1 labelsize 13 align 24

  189.         code0 {char tmp[10];snprintf(tmp,10,"%d",npart+1);o->copy_label(tmp);}

  190.         code1 {o->init("Penabled");}

  191.         class Fl_Osc_Check

  192.       }

  193.     }

  194.   }

  195.   Function {Panellistitem(int x,int y, int w, int h, const char *label=0):Fl_Osc_Group(x,y,w,h,label)} {} {

  196.     code {npart=0;

  197. bankui=NULL;} {}

  198.   }

  199.   Function {init(int npart_,BankUI *bankui_, PartUI *partui_)} {} {

  200.     code {npart=npart_;

  201. bankui=bankui_;

  202. partui=partui_;

  203. ext = "part"+to_s(npart)+"/";

  204. 

  205. make_window();

  206. panellistitem->show();

  207. end();} {}

  208.   }

  209.   Function {refresh()} {} {

  210.     code {

  211.     partenabled->update();

  212.     partrcv->update();

  213.     partpanning->update();

  214.     partvolume->update();

  215.     partname->update();

  216.     

  217.     if ((int)bankui->cbwig->value()!=(npart+1))

  218.    panellistitemgroup->color(fl_rgb_color(160,160,160));

  219. else 

  220.    panellistitemgroup->color(fl_rgb_color(50,190,240));

  221. 

  222. panellistitemgroup->redraw();} {}

  223.   }

  224.   Function {~Panellistitem()} {} {

  225.     code {} {}

  226.   }

  227.   decl {int npart;} {private local

  228.   }

  229.   decl {BankUI *bankui;} {private local

  230.   }

  231.   decl {PartUI *partui;} {private local

  232.   }

  233. } 

  234. 

  235. class MasterUI {open

  236. } {

  237.   Function {make_window()} {open

  238.   } {

  239.     Fl_Window masterwindow {

  240.       label zynaddsubfx

  241.       callback {if ((isPlugin

  242. \#if USE_NSM

  243.  || (nsm && nsm->is_active())

  244. \#endif

  245.  || fl_choice("Exit and leave the unsaved data?","No","Yes",NULL))) {

  246.     close();

  247. };} open

  248.       xywh {330 365 390 525} type Double xclass zynaddsubfx visible

  249.       class Fl_Osc_Window

  250.     } {

  251.         Fl_Box dummy_again {

  252.           xywh {25 25 25 25}

  253.           code0 {masterwindow->init(osc, "");}

  254.         }

  255. 

  256.       Fl_Group win_root {open

  257.         xywh {0 0 390 525}

  258.         class Fl_Osc_Group

  259.       } {

  260.         Fl_Menu_Bar mastermenu {

  261.           xywh {0 0 390 25}

  262.         } {

  263.           Submenu {} {

  264.             label {&File}

  265.             xywh {5 5 100 20}

  266.           } {

  267.             MenuItem {} {

  268.               label {&New (erase all)...}

  269.               callback {do_new_master();}

  270.               xywh {25 25 100 20}

  271.             }

  272.             MenuItem {} {

  273.               label {&Revert changes...}

  274.               callback {do_revert_changes();}

  275.               xywh {25 25 100 20}

  276.             }

  277.             MenuItem {} {

  278.               label {&Open Parameters...}

  279.               callback {\#if USE_NSM

  280.             if ( nsm && nsm->is_active() )

  281.             {

  282.                 do_load_master();

  283.                 do_save_master( nsm->project_filename );

  284.             }

  285.             else

  286. \#endif

  287.             {

  288.                 do_load_master();

  289.             }}

  290.               xywh {25 25 100 20}

  291.             }

  292.             MenuItem {} {

  293.               label {&Save All Parameters...}

  294.               callback {\#if USE_NSM

  295.             if ( nsm && nsm->is_active() )

  296.             {

  297.                 do_save_master( nsm->project_filename );

  298.             }

  299.             else

  300. \#endif

  301.             {

  302.                  do_save_master();

  303.             }}

  304.               xywh {15 15 100 20} divider

  305.             }

  306.             MenuItem {} {

  307.               label {&Load Midi Learn...}

  308.               callback {char *filename;

  309. filename=fl_file_chooser("Open:","({*.xlz})",NULL,0);

  310. if (filename==NULL) return;

  311. 

  312. osc->write("/load_xlz", "s", filename);}

  313.               xywh {40 40 100 20}

  314.             }

  315.             MenuItem {} {

  316.               label {Clear Midi Learn...}

  317.               callback {osc->write("/clear_xlz", "");}

  318.               xywh {40 40 100 20}

  319.             }

  320.             MenuItem {} {

  321.               label {Save Midi Learn...}

  322.               callback {char *filename;

  323. int result;

  324. filename=fl_file_chooser("Save:","({*.xlz})",NULL,0);

  325. if (filename==NULL) return;

  326. filename=fl_filename_setext(filename,".xlz");

  327. 

  328. result=fileexists(filename);

  329. if (result) {

  330.     result=0;

  331.    if (!fl_choice("The file exists. \\nOverwrite it?","No","Yes",NULL)) return;

  332. };

  333. 

  334. osc->write("/save_xlz", "s", filename);}

  335.               xywh {30 30 100 20} divider

  336.             }

  337.             MenuItem {} {

  338.               label {&Load Scale Settings...}

  339.               callback {char *filename;

  340. filename=fl_file_chooser("Open:","({*.xsz})",NULL,0);

  341. if (filename==NULL) return;

  342. 

  343. osc->write("/load_xsz", "s", filename);

  344. }

  345.               xywh {40 40 100 20}

  346.             }

  347.             MenuItem {} {

  348.               label {Save Sc&ale Settings ..}

  349.               callback {char *filename;

  350. int result=0;

  351. 

  352. filename=fl_file_chooser("Save:","({*.xsz})",NULL,0);

  353. if (filename==NULL) return;

  354. filename=fl_filename_setext(filename,".xsz");

  355. 

  356. result=fileexists(filename);

  357. if (result) {

  358.     result=0;

  359.    if (!fl_choice("The file exists. \\nOverwrite it?","No","Yes",NULL)) return;

  360.        

  361. };

  362. 

  363. 

  364. osc->write("/save_xsz", "s", filename); }

  365.               xywh {30 30 100 20}

  366.             }

  367.             MenuItem {} {

  368.               label {Show Scale Settings...}

  369.               callback {microtonalui->show();}

  370.               xywh {5 5 100 20} divider

  371.             }

  372.             MenuItem {} {

  373.               label {&Settings...}

  374.               callback {configui->show();}

  375.               xywh {30 30 100 20}

  376.             }

  377.             MenuItem {} {

  378.               label {N&io Settings}

  379.               callback {nioui.refresh();

  380. nioui.show();}

  381.               xywh {5 5 36 21} divider

  382.             }

  383.             MenuItem {} {

  384.               label {&Copyright...}

  385.               callback {aboutwindow->show();}

  386.               xywh {20 20 100 20} divider

  387.             }

  388.             MenuItem {} {

  389.               label {E&xit}

  390.               callback {masterwindow->do_callback();}

  391.               xywh {15 15 100 20}

  392.             }

  393.           }

  394.           Submenu {} {

  395.             label {&Instrument}

  396.             xywh {15 15 100 20}

  397.           } {

  398.             MenuItem {} {

  399.               label {&Clear Instrument...}

  400.               callback {if (fl_choice("Clear instrument's parameters ?","No","Yes",NULL)){

  401. //       int npart=(int)npartcounter->value()-1;

  402.        osc->write("/part"+to_s(npart)+"/clear");

  403. };

  404. 

  405. updatepanel();}

  406.               xywh {40 40 100 20}

  407.             }

  408.             MenuItem {} {

  409.               label {&Open Instrument...}

  410.               callback {const char *filename;

  411. filename=fl_file_chooser("Load:","({*.xiz})",NULL,0);

  412. if (filename==NULL) return;

  413. 

  414. 

  415. osc->write("/load_xiz", "is", npart, filename);

  416. npartcounter->do_callback();

  417. updatepanel();

  418. 

  419. /*

  420. if (result==-10) fl_alert("Error: Could not load the file\\nbecause it is not an instrument file.");

  421.       else if (result<0) fl_alert("Error: Could not load the file.");*/}

  422.               xywh {35 35 100 20}

  423.             }

  424.             MenuItem {} {

  425.               label {&Save Instrument ...}

  426.               callback {char *filename;

  427. 

  428. filename=fl_file_chooser("Save:","({*.xiz})",NULL,0);

  429. if (filename==NULL) return;

  430. filename=fl_filename_setext(filename,".xiz");

  431. 

  432. int result=fileexists(filename);

  433. if (result) {

  434.     result=0;

  435.    if (!fl_choice("The file exists. \\nOverwrite it?","No","Yes",NULL)) return;

  436.        

  437. };

  438. 

  439. osc->write("/save_xiz", "is", npart, filename);

  440. /*if (result<0) fl_alert("Error: Could not save the file.");*/}

  441.               xywh {25 25 100 20} divider

  442.             }

  443.             MenuItem {} {

  444.               label {Show Instrument &Bank...}

  445.               callback {bankui->show();}

  446.               xywh {5 5 100 20} divider

  447.             }

  448.             MenuItem {} {

  449.               label {&Virtual Keyboard...}

  450.               callback {virkeyboard->show();}

  451.               xywh {15 15 100 20}

  452.             }

  453.           }

  454.           Submenu recordmenu {

  455.             label {&Record}

  456.             xywh {5 5 100 20}

  457.           } {

  458.             MenuItem {} {

  459.               label {&Choose WAV file...}

  460.               callback {char *filename;

  461. recordbutton->deactivate();

  462. pausebutton->deactivate();

  463. pauselabel->deactivate();

  464. stopbutton->deactivate();

  465. filename=fl_file_chooser("Record to audio file:","(*.wav)",NULL,0);

  466. if (filename==NULL) return;

  467. fl_filename_setext(filename,".wav");

  468. 

  469. //TODO TODO Test if a file exists

  470. if (fl_choice("The file *might* exist. \\nOverwrite it?","No","Yes",NULL)) {

  471.     osc->write("/HDDRecorder/preparefile", "s", filename);

  472.     recordbutton->activate();//TODO make this button osc controlled

  473. }

  474. 

  475. /*if (result!=0) fl_alert("Error: Could not save the file.");*/}

  476.               xywh {5 5 100 20}

  477.             }

  478.           }

  479.           Submenu {} {

  480.             label Misc

  481.             xywh {15 15 100 20}

  482.           } {

  483.             MenuItem {} {

  484.               label {Switch User Interface Mode}

  485.               callback {if (fl_choice("Switch the User Interface to Beginner mode ?","No","Yes",NULL)){

  486. 	masterwindow->hide();

  487. 	refresh_master_ui();

  488. 	simplemasterwindow->show();

  489.     osc->write("/cfg.UserInterfaceMode", "i", 2);

  490. };}

  491.               xywh {15 15 100 20}

  492.             }

  493.           }

  494.         }

  495.         Fl_Box dummy {

  496.           xywh {25 25 25 25}

  497.           code0 {win_root->osc = osc;}

  498.           code1 {win_root->base = "/";}

  499.         }

  500.         Fl_Dial mastervolumedial {

  501.           label {Master Volume}

  502.           tooltip {Master Volume} xywh {15 32 55 55} box ROUND_UP_BOX labelsize 9 align 130 maximum 127 step 1

  503.           code2 {o->init("volume"); o->selection_color(FL_RED); o->reset_value=80;}

  504.           class Fl_Osc_Dial

  505.         }

  506.         Fl_Counter masterkeyshiftcounter {

  507.           label {Master KeyShift}

  508.           xywh {150 97 120 23} type Simple labelsize 9 minimum -64 maximum 64 step 1

  509.           code0 {o->lstep(12);}

  510.           code1 {o->init("Pkeyshift",'i',-64);}

  511.           class Fl_Osc_Counter

  512.         }

  513.         Fl_Button {} {

  514.           label {Panic!}

  515.           callback {virkeyboard->releaseallkeys();

  516.           o->oscWrite("Panic");}

  517.           xywh {280 29 105 53} color 90 labelfont 1

  518.           class Fl_Osc_Button

  519.         }

  520.         Fl_Group partuigroup {open

  521.           xywh {0 310 390 205}

  522.         } {

  523.           Fl_Group partui {open

  524.             xywh {0 310 383 175}

  525.             code0 {o->init("/part0/", 0,bankui,"/part0/", osc);}

  526.             code1 {o->show();}

  527.             class PartUI

  528.           } {}

  529.         }

  530.         Fl_Tabs {} {open

  531.           xywh {0 145 390 165} box UP_FRAME

  532.         } {

  533.           Fl_Group {} {

  534.             label {System Effects} open

  535.             xywh {0 162 390 145} labelsize 15 align 9

  536.           } {

  537.             Fl_Counter syseffnocounter {

  538.               label {Sys.Effect No.}

  539.               callback {nsyseff=(int) o->value()-1;

  540.               syseffectuigroup->reext("sysefx"+to_s(nsyseff)+"/");

  541.               sysefftype->oscMove("sysefx"+to_s(nsyseff)+"/efftype");

  542. syseffectui->refresh();}

  543.               xywh {5 181 80 22} type Simple labelfont 1 labelsize 10 align 1 minimum 0 maximum 127 step 1 value 1 textfont 1

  544.               code0 {o->bounds(1,NUM_SYS_EFX);}

  545.               code1 {o->value(nsyseff+1);}

  546.             }

  547.             Fl_Choice sysefftype {

  548.               label EffType

  549.               callback {syseffectui->efftype = o->value();

  550. syseffectui->refresh();}

  551.               xywh {285 176 100 22} down_box BORDER_BOX labelsize 10

  552.               code0 {o->init("sysefx"+to_s(nsyseff)+"/efftype");}

  553.               class Fl_Osc_Choice

  554.             } {

  555.               MenuItem {} {

  556.                 label {No Effect}

  557.                 xywh {15 15 100 20} labelfont 1 labelsize 10

  558.               }

  559.               MenuItem {} {

  560.                 label Reverb

  561.                 xywh {25 25 100 20} labelfont 1 labelsize 10

  562.               }

  563.               MenuItem {} {

  564.                 label Echo

  565.                 xywh {35 35 100 20} labelfont 1 labelsize 10

  566.               }

  567.               MenuItem {} {

  568.                 label Chorus

  569.                 xywh {45 45 100 20} labelfont 1 labelsize 10

  570.               }

  571.               MenuItem {} {

  572.                 label Phaser

  573.                 xywh {55 55 100 20} labelfont 1 labelsize 10

  574.               }

  575.               MenuItem {} {

  576.                 label AlienWah

  577.                 xywh {65 65 100 20} labelfont 1 labelsize 10

  578.               }

  579.               MenuItem {} {

  580.                 label Distortion

  581.                 xywh {75 75 100 20} labelfont 1 labelsize 10

  582.               }

  583.               MenuItem {} {

  584.                 label EQ

  585.                 xywh {85 85 100 20} labelfont 1 labelsize 10

  586.               }

  587.               MenuItem {} {

  588.                 label DynFilter

  589.                 xywh {95 95 100 20} labelfont 1 labelsize 10

  590.               }

  591.             }

  592.             Fl_Group syseffectuigroup {

  593.               xywh {5 203 380 95} color 48

  594.               class Fl_Osc_Group

  595.             } {

  596.               Fl_Box {} {

  597.                 xywh {5 203 0 0}

  598.                 code0 {syseffectuigroup->ext = "sysefx0/";}

  599.               }

  600.               Fl_Group syseffectui {

  601.                 xywh {5 203 380 95}

  602.                 code0 {o->init(false);}

  603.                 class EffUI

  604.               } {}

  605.             }

  606.             Fl_Button {} {

  607.               label {Send to...}

  608.               callback {syseffsendwindow->show();}

  609.               xywh {90 181 85 22} box THIN_UP_BOX labelfont 1 labelsize 11

  610.             }

  611.             Fl_Button {} {

  612.               label C

  613.               callback {presetsui->copy("/sysefx"+to_s(nsyseff)+"/");}

  614.               xywh {180 187 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 11 labelcolor 55

  615.             }

  616.             Fl_Button {} {

  617.               label P

  618.               callback { presetsui->paste("/sysefx"+to_s(nsyseff)+"/",syseffectui);} selected

  619.               xywh {210 187 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 11 labelcolor 55

  620.             }

  621.           }

  622.           Fl_Group {} {

  623.             label {Insertion Effects} open

  624.             xywh {0 165 390 145} labelsize 15 align 9 hide

  625.           } {

  626.             Fl_Counter inseffnocounter {

  627.               label {Ins.Effect No.}

  628.               callback {ninseff=(int) o->value()-1;

  629.               insefftype->oscMove("insefx"+to_s(ninseff)+"/efftype");

  630.               inseffectuigroup->reext("insefx"+to_s(ninseff)+"/");

  631.               inseffpart->oscMove("Pinsparts"+to_s(ninseff));

  632. 

  633.               /*

  634. insefftype->value(master->insefx[ninseff]->geteffect());

  635. inseffpart->value(master->Pinsparts[ninseff]+2);

  636. inseffectui->refresh();

  637. 

  638. if (master->Pinsparts[ninseff]!=-1) {

  639.         insefftype->activate();

  640. 	inseffectui->activate();

  641.         inseffectuigroup->activate();

  642. } else {

  643. 	insefftype->deactivate();

  644.  	inseffectui->deactivate();

  645.         inseffectuigroup->deactivate();

  646. };*/}

  647.               xywh {5 183 80 22} type Simple labelfont 1 labelsize 10 align 1 minimum 0 maximum 127 step 1 value 1 textfont 1

  648.               code0 {o->bounds(1,NUM_INS_EFX);}

  649.               code1 {o->value(ninseff+1);}

  650.             }

  651.             Fl_Choice insefftype {

  652.               label EffType

  653.               callback {/*pthread_mutex_lock(&master->mutex);

  654. master->insefx[ninseff]->changeeffect((int) o->value());

  655. pthread_mutex_unlock(&master->mutex);*/

  656. inseffectui->efftype = o->value();

  657. inseffectui->refresh();

  658. inseffectui->show();}

  659.               xywh {285 173 100 22} down_box BORDER_BOX labelsize 10

  660.               code0 {/*o->value(master->insefx[ninseff]->geteffect());*/}

  661.               code1 {/*if (master->Pinsparts[ninseff]== -1) o->deactivate();*/}

  662.               code2 {o->init("insefx"+to_s(ninseff)+"/efftype");}

  663.               class Fl_Osc_Choice

  664.             } {

  665.               MenuItem {} {

  666.                 label {No Effect}

  667.                 xywh {30 30 100 20} labelfont 1 labelsize 10

  668.               }

  669.               MenuItem {} {

  670.                 label Reverb

  671.                 xywh {40 40 100 20} labelfont 1 labelsize 10

  672.               }

  673.               MenuItem {} {

  674.                 label Echo

  675.                 xywh {50 50 100 20} labelfont 1 labelsize 10

  676.               }

  677.               MenuItem {} {

  678.                 label Chorus

  679.                 xywh {60 60 100 20} labelfont 1 labelsize 10

  680.               }

  681.               MenuItem {} {

  682.                 label Phaser

  683.                 xywh {65 65 100 20} labelfont 1 labelsize 10

  684.               }

  685.               MenuItem {} {

  686.                 label AlienWah

  687.                 xywh {75 75 100 20} labelfont 1 labelsize 10

  688.               }

  689.               MenuItem {} {

  690.                 label Distortion

  691.                 xywh {85 85 100 20} labelfont 1 labelsize 10

  692.               }

  693.               MenuItem {} {

  694.                 label EQ

  695.                 xywh {95 95 100 20} labelfont 1 labelsize 10

  696.               }

  697.               MenuItem {} {

  698.                 label DynFilter

  699.                 xywh {105 105 100 20} labelfont 1 labelsize 10

  700.               }

  701.             }

  702.             Fl_Group inseffectuigroup {open

  703.               xywh {5 205 380 95} box FLAT_BOX color 48

  704.               class Fl_Osc_Group

  705.             } {

  706.               Fl_Box {} {

  707.                 xywh {5 205 0 0}

  708.                 code0 {inseffectuigroup->ext = "insefx0/";}

  709.               }

  710.               Fl_Group inseffectui {

  711.                 xywh {5 205 380 90} box UP_FRAME

  712.                 code0 {o->init(true);}

  713.                 class EffUI

  714.               } {}

  715.             }

  716.             Fl_Choice inseffpart {

  717.               label {Insert To.}

  718.               callback {/*master->Pinsparts[ninseff]=(int) o->value()-2;*/

  719. if ((int) o->value()==1){

  720.     inseffectuigroup->deactivate();

  721.     insefftype->deactivate();

  722.     inseffectui->deactivate();

  723. } else {

  724.     inseffectuigroup->activate();

  725.     insefftype->activate();

  726.     inseffectui->activate();

  727. };

  728. /*master->insefx[ninseff]->cleanup();*/} open

  729.               xywh {95 183 80 22} down_box BORDER_BOX labelfont 1 labelsize 10 align 5 textsize 10

  730.               code0 {o->add("Master Out");o->add("Off");}

  731.               code1 {char tmp[50]; for (int i=0;i<NUM_MIDI_PARTS;i++) {sprintf(tmp,"Part %2d",i+1);o->add(tmp);};}

  732.               code3 {o->init("Pinsparts"+to_s(ninseff),-2);}

  733.               class Fl_Osc_Choice

  734.             } {}

  735.             Fl_Button {} {

  736.               label C

  737.               callback {presetsui->copy(inseffectuigroup->loc());}

  738.               xywh {180 185 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 11 labelcolor 55

  739.             }

  740.             Fl_Button {} {

  741.               label P

  742.               callback {presetsui->paste(inseffectuigroup->loc(),inseffectui);}

  743.               xywh {210 185 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 11 labelcolor 55

  744.             }

  745.           }

  746.         }

  747.         Fl_Button {} {

  748.           label Scales

  749.           callback {microtonalui->show();}

  750.           xywh {320 87 65 23} color 51 labelfont 1

  751.         }

  752.         Fl_Group {} {

  753.           xywh {150 40 117 45} box UP_FRAME

  754.         } {

  755.           Fl_Button recordbutton {

  756.             label {Rec.}

  757.             callback {o->deactivate();

  758. recordmenu->deactivate();

  759. recordmenu->label("&Record(*)");

  760. stopbutton->activate();

  761. pausebutton->activate();

  762. pauselabel->activate();

  763. o->oscWrite("HDDRecorder/start");

  764. o->oscWrite("reset-vu");

  765. mastermenu->redraw();}

  766.             tooltip {Start Recording} xywh {159 46 21 21} box ROUND_UP_BOX color 88 labelfont 1 labelsize 10 align 2 deactivate

  767.             class Fl_Osc_Button

  768.           }

  769.           Fl_Button stopbutton {

  770.             label Stop

  771.             callback {o->deactivate();

  772.             o->oscWrite("HDDRecorder/stop");

  773. recordbutton->deactivate();

  774. pausebutton->deactivate();

  775. pauselabel->deactivate();

  776. recordmenu->activate();

  777. recordmenu->label("&Record");

  778. mastermenu->redraw();}

  779.             tooltip {Stop Recording and close the audio file} xywh {237 46 21 21} box THIN_UP_BOX color 4 labelfont 1 labelsize 10 align 2 deactivate

  780.             class Fl_Osc_Button

  781.           }

  782.           Fl_Button pausebutton {

  783.             label {| |}

  784.             callback {o->deactivate();

  785. o->oscWrite("HDDRecorder/pause");

  786. recordbutton->activate();

  787. mastermenu->redraw();}

  788.             tooltip {Pause Recording} xywh {198 46 21 21} box THIN_UP_BOX color 4 selection_color 4 labelfont 1 labelcolor 3 align 16 deactivate

  789.             class Fl_Osc_Button

  790.           }

  791.           Fl_Box pauselabel {

  792.             label Pause

  793.             xywh {192 66 30 15} labelfont 1 labelsize 10 deactivate

  794.           }

  795.         }

  796.         Fl_Group {} {

  797.           xywh {1 490 389 55}

  798.         } {

  799.           Fl_Box mastervu {

  800.             label {VU-Meter}

  801.             xywh {5 490 380 30} box FLAT_BOX color 48 selection_color 75

  802.             code0 {o->init(osc);}

  803.             class VuMasterMeter

  804.           }

  805.         }

  806.         Fl_Check_Button nrpnbutton {

  807.           label NRPN

  808.           tooltip {Receive NRPNs} xywh {10 115 60 25} down_box DOWN_BOX labelsize 12

  809.           code0 {o->init("ctl/NRPN.receive");}

  810.           class Fl_Osc_Check

  811.         }

  812.         Fl_Counter npartcounter {

  813.           callback {int nval=(int) o->value()-1;

  814. /*partuigroup->remove(partui);

  815. delete partui;

  816. partui=new PartUI(0,0,765,525);

  817. partuigroup->add(partui);

  818. char buffer[1024];

  819. snprintf(buffer, 1024, "/part%d/", nval);

  820. partui->init(master->part[nval], buffer, master, nval, bankui, "/part"+to_s(nval)+"/", osc);

  821. partui->redraw();

  822. o->redraw();

  823. */

  824. npart=nval;

  825. partui->rebase("/part"+to_s(npart)+"/");

  826. 

  827. updatepanel();

  828. simplenpartcounter->value(nval+1);

  829. simplenpartcounter->do_callback();}

  830.           tooltip {The part number} xywh {5 312 50 18} type Simple labelfont 1 minimum 0 maximum 127 step 1 value 1 textfont 1

  831.           code0 {o->bounds(1,NUM_MIDI_PARTS);}

  832.           code1 {bankui->init(o);}

  833.         }

  834.         Fl_Button {} {

  835.           label vK

  836.           callback {virkeyboard->show();}

  837.           tooltip {Virtual Keyboard} xywh {280 87 40 23} color 51 labelfont 1

  838.         }

  839.         Fl_Group {} {

  840.           xywh {85 32 55 110} box UP_FRAME

  841.         } {

  842.           Fl_Button {} {

  843.             label Reset

  844.             callback {globalfinedetuneslider->value(64.0);

  845. globalfinedetuneslider->do_callback();}

  846.             tooltip {Master fine detune reset} xywh {90 37 45 23} box THIN_UP_BOX labelsize 10

  847.           }

  848.           Fl_Dial globalfinedetuneslider {

  849.             label {Fine Detune}

  850.             tooltip {global fine detune} xywh {90 68 45 45} box ROUND_UP_BOX labelsize 9 align 130 maximum 127 step 1 value 64

  851.             code0 {o->init("microtonal/Pglobalfinedetune");o->reset_value=64;}

  852.             class Fl_Osc_Dial

  853.           }

  854.         }

  855.         Fl_Button {} {

  856.           label {Panel Window}

  857.           callback {updatepanel();

  858. panelwindow->show();}

  859.           tooltip {Panel Window} xywh {280 112 105 23} color 51 labelfont 1 labelsize 10

  860.         }

  861.         Fl_Button sm_indicator1 {

  862.           label SM

  863.           xywh {350 5 35 15} box ROUNDED_BOX down_box ROUNDED_BOX color 45 selection_color 93 labelfont 3 labelcolor 39 deactivate

  864.         }

  865.       }

  866.     }

  867.     Fl_Window aboutwindow {

  868.       label {Copyright...}

  869.       xywh {411 344 365 280} type Double hide

  870.     } {

  871.       Fl_Box {} {

  872.         label {Copyright (c) 2002-2009 Nasca O. PAUL, 2009-2016 Mark McCurry, and others. Please read AUTHORS.txt}

  873.         xywh {15 35 335 55} labeltype EMBOSSED_LABEL labelsize 15 align 208

  874.       }

  875.       Fl_Box {} {

  876.         label {This is free software; you may redistribute it and/or modify it under the terms of the 

  877. version 2 (or any later version) of the GNU General Public License as published by the Free Software Fundation.

  878.   This program comes with

  879.  ABSOLUTELY NO WARRANTY. 

  880.  See the version 2 (or any later version) of the 

  881. GNU General Public License for details.}

  882.         xywh {15 90 335 145} labelfont 1 labelsize 11 align 144

  883.       }

  884.       Fl_Button {} {

  885.         label {Close this window}

  886.         callback {aboutwindow->hide();}

  887.         xywh {80 245 190 25} box THIN_UP_BOX labelsize 11

  888.       }

  889.       Fl_Box {} {

  890.         label ZynAddSubFX

  891.         xywh {15 5 335 30} labeltype EMBOSSED_LABEL labelfont 1 labelsize 20 align 16

  892.       }

  893.     }

  894.     Fl_Window syseffsendwindow {

  895.       label {System Effects Send}

  896.       xywh {171 234 120 250} type Double hide resizable

  897.       class Fl_Osc_Window

  898.     } {

  899.       Fl_Box {} {

  900.         xywh {0 0 0 0}

  901.         code0 {syseffsendwindow->init(osc,"");}

  902.       }

  903.       Fl_Scroll syseffscroll {open

  904.         xywh {0 45 120 170} box FLAT_BOX resizable

  905.         code0 {syseffsendwindow->begin();for (int neff1=0;neff1<NUM_SYS_EFX;neff1++) for (int neff2=neff1+1;neff2<NUM_SYS_EFX;neff2++)}

  906.         code1 {{syseffsend[neff1][neff2]=new Fl_Osc_Dial(o->x()+(neff2-1)*35,o->y()+15+neff1*50,30,30);syseffsend[neff1][neff2]->label(strdup((to_s(neff1) + "->" + to_s(neff2)).c_str()));syseffsend[neff1][neff2]->init("/sysefxfrom"+to_s(neff1)+"/to"+to_s(neff2));};syseffsendwindow->end();}

  907.       } {}

  908.       Fl_Button {} {

  909.         label Close

  910.         callback {syseffsendwindow->hide();}

  911.         xywh {25 220 80 25} box THIN_UP_BOX

  912.       }

  913.       Fl_Box {} {

  914.         label {Send system effect's output to other system effects}

  915.         xywh {5 5 110 35} labelsize 10 align 192

  916.       }

  917.     }

  918.     Fl_Window panelwindow {

  919.       label {ZynAddSubFX Panel} open

  920.       xywh {615 247 630 635} type Double

  921.       class Fl_Osc_Window visible

  922.     } {

  923.       Fl_Box {} {

  924.         xywh {0 0 0 0}

  925.         code0 {panelwindow->init(osc,"/");}

  926.       }

  927.       Fl_Scroll {} {open

  928.         xywh {0 5 570 310} type HORIZONTAL box THIN_UP_BOX

  929.       } {

  930.         Fl_Pack {} {open

  931.           xywh {5 10 560 285} type HORIZONTAL

  932.           code0 {for (int i=0;i<NUM_MIDI_PARTS/2;i++){panellistitem[i]=new Panellistitem(0,0,70,260,"");panellistitem[i]->init(i,bankui,partui);}}

  933.         } {}

  934.       }

  935.       Fl_Scroll {} {open

  936.         xywh {0 320 570 310} type HORIZONTAL box THIN_UP_BOX

  937.       } {

  938.         Fl_Pack {} {open

  939.           xywh {5 325 560 285} type HORIZONTAL

  940.           code0 {for (int i=NUM_MIDI_PARTS/2;i<NUM_MIDI_PARTS;i++){panellistitem[i]=new Panellistitem(0,0,70,260,"");panellistitem[i]->init(i,bankui,partui);}}

  941.         } {}

  942.       }

  943.       Fl_Button {} {

  944.         label Close

  945.         callback {panelwindow->hide();

  946. updatepanel();}

  947.         xywh {575 605 50 25} box THIN_UP_BOX labelsize 13

  948.       }

  949.       Fl_Button {} {

  950.         label Refresh

  951.         callback {updatepanel();}

  952.         xywh {575 570 55 25} box THIN_UP_BOX labelsize 13

  953.       }

  954.     }

  955.     Fl_Window simplemasterwindow {

  956.       label ZynAddSubFX

  957.       callback {

  958. if (isPlugin || fl_choice("Exit and leave the unsaved data?","No","Yes",NULL))

  959. {

  960. 	*exitprogram=1;

  961. };} open

  962.       xywh {655 378 600 335} type Double

  963.       class Fl_Osc_Window visible

  964.     } {

  965.       Fl_Box {} {

  966.         xywh {0 0 0 0}

  967.         code0 {simplemasterwindow->init(osc, "/");}

  968.       }

  969.       Fl_Menu_Bar simplemastermenu {

  970.         xywh {0 0 600 25}

  971.       } {

  972.         Submenu {} {

  973.           label {&File}

  974.           xywh {10 10 100 20}

  975.         } {

  976.           MenuItem {} {

  977.             label {&New (erase all)...}

  978.             callback {do_new_master();}

  979.             xywh {30 30 100 20}

  980.           }

  981.           MenuItem {} {

  982.             label {&Revert changes...}

  983.             callback {do_revert_changes();}

  984.             xywh {30 30 100 20}

  985.           }

  986.           MenuItem {} {

  987.             label {&Open Parameters...}

  988.             callback {do_load_master();}

  989.             xywh {30 30 100 20}

  990.           }

  991.           MenuItem {} {

  992.             label {&Save All Parameters...}

  993.             callback {\#if USE_NSM

  994.             if ( nsm && nsm->is_active() )

  995.             {

  996.                 do_save_master( nsm->project_filename );

  997.             }

  998.             else

  999. \#endif

  1000.             {

  1001.                  do_save_master();

  1002.             }}

  1003.             xywh {20 20 100 20} divider

  1004.           }

  1005.           MenuItem {} {

  1006.             label {&Settings...}

  1007.             callback {configui->show();}

  1008.             xywh {35 35 100 20} divider

  1009.           }

  1010.           MenuItem {} {

  1011.             label {&Copyright...}

  1012.             callback {aboutwindow->show();}

  1013.             xywh {25 25 100 20} divider

  1014.           }

  1015.           MenuItem {} {

  1016.             label {E&xit}

  1017.             callback {masterwindow->do_callback();}

  1018.             xywh {20 20 100 20}

  1019.           }

  1020.         }

  1021.         Submenu {} {

  1022.           label {&Instrument}

  1023.           xywh {20 20 100 20}

  1024.         } {

  1025.           MenuItem {} {

  1026.             label {&Open Instrument...}

  1027.             callback {const char *filename;

  1028. filename=fl_file_chooser("Load:","({*.xiz})",NULL,0);

  1029. if (filename==NULL) return;

  1030. 

  1031. 

  1032. osc->write("/load_xiz", "si", filename, npart);

  1033. simplenpartcounter->do_callback();

  1034. /*

  1035. if (result==-10) fl_alert("Error: Could not load the file\\nbecause it is not an instrument file.");

  1036.       else if (result<0) fl_alert("Error: Could not load the file.");*/}

  1037.             xywh {40 40 100 20}

  1038.           }

  1039.           MenuItem {} {

  1040.             label {Show Instrument &Bank...}

  1041.             callback {bankui->show();}

  1042.             xywh {10 10 100 20} divider

  1043.           }

  1044.         }

  1045.         Submenu {} {

  1046.           label Misc

  1047.           xywh {0 0 100 20}

  1048.         } {

  1049.           MenuItem {} {

  1050.             label {Switch User Interface Mode}

  1051.             callback {if (fl_choice("Switch the User Interface to Advanced mode ?","No","Yes",NULL)){

  1052. 	simplemasterwindow->hide();

  1053. 	refresh_master_ui();

  1054. 	masterwindow->show();

  1055.     osc->write("/cfg.UserInterfaceMode", "i", 1);

  1056. };}

  1057.             xywh {0 0 100 20}

  1058.           }

  1059.         }

  1060.       }

  1061.       Fl_Group simplelistitemgroup {

  1062.         private xywh {125 65 215 145} box UP_FRAME

  1063.         class Fl_Osc_Group

  1064.       } {

  1065.         Fl_Box {} {

  1066.           xywh {125 65 0 0}

  1067.           code0 {simplelistitemgroup->ext = "part0/";}

  1068.         }

  1069.         Fl_Button partname {

  1070.           callback {if ((int)bankui->cbwig->value()!=(npart+1)){

  1071.    bankui->cbwig->value(npart+1);

  1072.    bankui->cbwig->do_callback();

  1073. };

  1074. bankui->show();}

  1075.           xywh {130 72 205 18} box THIN_DOWN_BOX down_box FLAT_BOX color 50 labelfont 1 labelsize 11 align 208

  1076.           code0 {o->ext = "Pname";o->oscRegister("Pname");}

  1077.           class PartNameButton

  1078.         }

  1079.         Fl_Slider partpanning {

  1080.           label Pan

  1081.           xywh {185 95 145 15} type {Horz Knob} box NO_BOX labelsize 11 maximum 127 step 1 value 64

  1082.           code0 {o->init("Ppanning",'i'); o->reset_value=64;}

  1083.           class Fl_Osc_TSlider

  1084.         }

  1085.         Fl_Choice partrcv {

  1086.           label {Midi Channel Receive}

  1087.           callback {virkeys->releaseallkeys(0);

  1088. virkeys->midich=(int) o->value();} open

  1089.           tooltip {receive from Midi channel} xywh {140 157 65 18} down_box BORDER_BOX labelsize 10 align 130 textfont 1

  1090.           code0 {char nrstr[10]; for(int i=0;i<NUM_MIDI_CHANNELS;i++){sprintf(nrstr,"Ch%d",i+1);if (i!=9) o->add(nrstr); else o->add("Dr10");};}

  1091.           code1 {o->init("Prcvchn");}

  1092.           class Fl_Osc_Choice

  1093.         } {}

  1094.         Fl_Dial partvolume {

  1095.           xywh {135 95 45 40} labelsize 9 maximum 127 step 1

  1096.           code0 {o->init("Pvolume"); o->reset_value=96;}

  1097.           class Fl_Osc_Dial

  1098.         }

  1099.         Fl_Box {} {

  1100.           label Volume

  1101.           xywh {130 130 55 20} labelsize 10

  1102.         }

  1103.         Fl_Check_Button simplepartportamento {

  1104.           label Portamento

  1105.           tooltip {Enable/Disable the portamento} xywh {193 127 79 23} down_box DOWN_BOX labelsize 9

  1106.           code0 {o->init("ctl/portamento.portamento");}

  1107.           class Fl_Osc_Check

  1108.         }

  1109.         Fl_Counter simpleminkcounter {

  1110.           label {Min.key}

  1111.           callback {if (simpleminkcounter->value()>simplemaxkcounter->value()) o->textcolor(FL_RED);

  1112.               else o->textcolor(FL_BLACK);}

  1113.           tooltip {Minimum key (that the part receives NoteOn messages)} xywh {210 158 40 15} type Simple labelsize 10 minimum 0 maximum 127 step 1 textsize 10

  1114.           code0 {o->init("Pminkey");}

  1115.           class Fl_Osc_Counter

  1116.         }

  1117.         Fl_Counter simplemaxkcounter {

  1118.           label {Max.key}

  1119.           callback {if (simpleminkcounter->value()>simplemaxkcounter->value()) o->textcolor(FL_RED);

  1120.               else o->textcolor(FL_BLACK);}

  1121.           tooltip {Maximum key (that the part receives NoteOn messages)} xywh {255 158 40 15} type Simple labelsize 10 minimum 0 maximum 127 step 1 textsize 10

  1122.           code0 {o->init("Pmaxkey");}

  1123.           class Fl_Osc_Counter

  1124.         }

  1125.         Fl_Button {} {

  1126.           label m

  1127.           callback {o->oscWrite("grabMinNote");}

  1128.           tooltip {set the minimum key to the last pressed key} xywh {230 188 15 12} box THIN_UP_BOX labelsize 10

  1129.           class Fl_Osc_Button

  1130.         }

  1131.         Fl_Button {} {

  1132.           label M

  1133.           callback {o->oscWrite("grabMaxNote");}

  1134.           tooltip {set the maximum key to the last pressed key} xywh {260 188 15 12} box THIN_UP_BOX labelsize 10

  1135.           class Fl_Osc_Button

  1136.         }

  1137.         Fl_Button {} {

  1138.           label R

  1139.           callback {simpleminkcounter->value(0);

  1140. simpleminkcounter->do_callback();

  1141. simplemaxkcounter->value(127);

  1142. simplemaxkcounter->do_callback();}

  1143.           tooltip {reset the minimum key to 0 and maximum key to 127} xywh {245 188 15 12} box THIN_UP_BOX labelfont 1 labelsize 10

  1144.         }

  1145.         Fl_Counter simplepartkeyshiftcounter {

  1146.           label KeyShift

  1147.           xywh {280 120 50 20} type Simple labelsize 11 minimum -64 maximum 64 step 1

  1148.           code0 {o->lstep(12);}

  1149.           code1 {o->init("Pkeyshift", 'i', -64);}

  1150.           class Fl_Osc_Counter

  1151.         }

  1152.         Fl_Dial simplesyseffsend {

  1153.           xywh {300 160 30 30} maximum 127 step 1

  1154.           code0 {o->alt_init("/","Psysefxvol"+to_s(nsyseff)+"/part"+to_s(npart));}

  1155.           class Fl_Osc_Dial

  1156.         }

  1157.         Fl_Box {} {

  1158.           label Effect

  1159.           xywh {295 190 40 15} labelsize 10

  1160.         }

  1161.       }

  1162.       Fl_Check_Button partenabled {

  1163.         label Enabled

  1164.         callback {if ((int) o->value()==0) simplelistitemgroup->deactivate();

  1165.   else {

  1166.     simplelistitemgroup->activate();

  1167.     if ((int)bankui->cbwig->value()!=(npart+1)){

  1168.        bankui->cbwig->value(npart+1);

  1169.        bankui->cbwig->do_callback();

  1170.     };

  1171. };

  1172. 

  1173. o->redraw();}

  1174.         private xywh {250 40 85 20} down_box DOWN_BOX labeltype EMBOSSED_LABEL labelfont 1 labelsize 13 align 24

  1175.         code0 {//char tmp[10];snprintf(tmp,10,"%d",npart+1);o->copy_label(tmp);}

  1176.         code1 {o->init("part0/Penabled");}

  1177.         class Fl_Osc_Check

  1178.       }

  1179.       Fl_Box virkeys {

  1180.         label Keyboard

  1181.         xywh {5 215 590 80} box BORDER_BOX color 17

  1182.         code0 {o->init(osc, "/");}

  1183.         class VirKeys

  1184.       }

  1185.       Fl_Group {} {

  1186.         xywh {340 30 255 185}

  1187.       } {

  1188.         Fl_Tabs {} {

  1189.           xywh {345 35 245 175} box UP_FRAME align 18

  1190.         } {

  1191.           Fl_Group {} {

  1192.             label {System Effects}

  1193.             xywh {345 55 245 155} box UP_FRAME labelfont 1 labelsize 12 align 18

  1194.           } {

  1195.             Fl_Counter simplesyseffnocounter {

  1196.               label {Sys.Effect No.}

  1197.               callback {nsyseff=(int) o->value()-1;

  1198. /*simplesysefftype->value(master->sysefx[nsyseff]->geteffect());*/

  1199. simplesyseffectui->refresh();

  1200. simplesysefftype->oscMove("sysefx"+to_s(nsyseff)+"/efftype");

  1201. simplesyseffectuigroup->reext("sysefx"+to_s(nsyseff)+"/");

  1202. simplesyseffsend->oscMove("Psysefxvol"+to_s(nsyseff)+"/part"+to_s(npart));

  1203. simplerefresh();}

  1204.               xywh {350 75 80 20} type Simple labelfont 1 labelsize 10 align 1 minimum 0 maximum 127 step 1 value 1 textfont 1

  1205.               code0 {o->bounds(1,NUM_SYS_EFX);}

  1206.               code1 {o->value(nsyseff+1);}

  1207.             }

  1208.             Fl_Choice simplesysefftype {

  1209.               label EffType

  1210.               callback {

  1211.               simplesyseffectui->efftype = o->value();

  1212. simplesyseffectui->refresh();

  1213.               }

  1214.               xywh {515 80 70 15} down_box BORDER_BOX labelsize 10 align 5

  1215.               code0 {o->init("sysefx"+to_s(nsyseff)+"/efftype");}

  1216.               class Fl_Osc_Choice

  1217.             } {

  1218.               MenuItem {} {

  1219.                 label {No Effect}

  1220.                 xywh {20 20 100 20} labelfont 1 labelsize 10

  1221.               }

  1222.               MenuItem {} {

  1223.                 label Reverb

  1224.                 xywh {30 30 100 20} labelfont 1 labelsize 10

  1225.               }

  1226.               MenuItem {} {

  1227.                 label Echo

  1228.                 xywh {40 40 100 20} labelfont 1 labelsize 10

  1229.               }

  1230.               MenuItem {} {

  1231.                 label Chorus

  1232.                 xywh {50 50 100 20} labelfont 1 labelsize 10

  1233.               }

  1234.               MenuItem {} {

  1235.                 label Phaser

  1236.                 xywh {60 60 100 20} labelfont 1 labelsize 10

  1237.               }

  1238.               MenuItem {} {

  1239.                 label AlienWah

  1240.                 xywh {70 70 100 20} labelfont 1 labelsize 10

  1241.               }

  1242.               MenuItem {} {

  1243.                 label Distortion

  1244.                 xywh {80 80 100 20} labelfont 1 labelsize 10

  1245.               }

  1246.               MenuItem {} {

  1247.                 label EQ

  1248.                 xywh {90 90 100 20} labelfont 1 labelsize 10

  1249.               }

  1250.               MenuItem {} {

  1251.                 label DynFilter

  1252.                 xywh {100 100 100 20} labelfont 1 labelsize 10

  1253.               }

  1254.             }

  1255.             Fl_Group simplesyseffectuigroup {

  1256.               xywh {350 95 235 95} color 48

  1257.               class Fl_Osc_Group

  1258.             } {

  1259.               Fl_Box {} {

  1260.                 xywh {350 95 0 0}

  1261.                 code0 {simplesyseffectuigroup->ext = "sysefx0/";}

  1262.               }

  1263.               Fl_Group simplesyseffectui {

  1264.                 xywh {350 95 234 95}

  1265.                 code0 {o->init(false);}

  1266.                 code1 {o->refresh();}

  1267.                 class SimpleEffUI

  1268.               } {}

  1269.             }

  1270.             Fl_Button {} {

  1271.               label {Send to...}

  1272.               callback {syseffsendwindow->show();}

  1273.               xywh {435 75 75 20} box THIN_UP_BOX labelfont 1 labelsize 11

  1274.             }

  1275.             Fl_Button {} {

  1276.               label P

  1277.               callback {/*pthread_mutex_lock(&master->mutex);

  1278. presetsui->paste(master->sysefx[nsyseff],simplesyseffectui);

  1279. pthread_mutex_unlock(&master->mutex);*/}

  1280.               xywh {560 65 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 11 labelcolor 55

  1281.             }

  1282.           }

  1283.           Fl_Group {} {

  1284.             label {Insertion Effects}

  1285.             xywh {345 55 245 155} box UP_FRAME labelfont 1 labelsize 12 align 18 hide

  1286.           } {

  1287.             Fl_Counter simpleinseffnocounter {

  1288.               label {Ins.Effect No.}

  1289.               callback {ninseff=(int) o->value()-1;

  1290. /*simpleinsefftype->value(master->insefx[ninseff]->geteffect());

  1291. simpleinseffpart->value(master->Pinsparts[ninseff]+2);*/

  1292. simpleinseffectuigroup->reext("insefx"+to_s(ninseff)+"/");

  1293. simpleinsefftype->oscMove("insefx"+to_s(ninseff)+"/efftype");

  1294. simpleinseffectui->refresh();

  1295. 

  1296. /*

  1297. if (master->Pinsparts[ninseff]!=-1) {

  1298.         simpleinsefftype->activate();

  1299. 	simpleinseffectui->activate();

  1300.         simpleinseffectuigroup->activate();

  1301. } else {

  1302. 	simpleinsefftype->deactivate();

  1303.  	simpleinseffectui->deactivate();

  1304.         simpleinseffectuigroup->deactivate();

  1305. };*/}

  1306.               xywh {350 75 80 20} type Simple labelfont 1 labelsize 10 align 1 minimum 0 maximum 127 step 1 value 1 textfont 1

  1307.               code0 {o->bounds(1,NUM_INS_EFX);}

  1308.               code1 {o->value(ninseff+1);}

  1309.             }

  1310.             Fl_Choice simpleinsefftype {

  1311.               label EffType

  1312.               callback {/*pthread_mutex_lock(&master->mutex);

  1313. master->insefx[ninseff]->changeeffect((int) o->value());

  1314. pthread_mutex_unlock(&master->mutex);*/

  1315. simpleinseffectui->efftype = o->value();

  1316. simpleinseffectui->refresh();

  1317. simpleinseffectui->show();}

  1318.               xywh {515 80 70 15} down_box BORDER_BOX labelsize 10 align 5

  1319.               code0 {/*o->value(master->insefx[ninseff]->geteffect());*/}

  1320.               code1 {/*if (master->Pinsparts[ninseff]== -1) o->deactivate();*/}

  1321.               code2 {o->init("insefx"+to_s(ninseff)+"/efftype");}

  1322.               class Fl_Osc_Choice

  1323.             } {

  1324.               MenuItem {} {

  1325.                 label {No Effect}

  1326.                 xywh {35 35 100 20} labelfont 1 labelsize 10

  1327.               }

  1328.               MenuItem {} {

  1329.                 label Reverb

  1330.                 xywh {45 45 100 20} labelfont 1 labelsize 10

  1331.               }

  1332.               MenuItem {} {

  1333.                 label Echo

  1334.                 xywh {55 55 100 20} labelfont 1 labelsize 10

  1335.               }

  1336.               MenuItem {} {

  1337.                 label Chorus

  1338.                 xywh {65 65 100 20} labelfont 1 labelsize 10

  1339.               }

  1340.               MenuItem {} {

  1341.                 label Phaser

  1342.                 xywh {70 70 100 20} labelfont 1 labelsize 10

  1343.               }

  1344.               MenuItem {} {

  1345.                 label AlienWah

  1346.                 xywh {80 80 100 20} labelfont 1 labelsize 10

  1347.               }

  1348.               MenuItem {} {

  1349.                 label Distortion

  1350.                 xywh {90 90 100 20} labelfont 1 labelsize 10

  1351.               }

  1352.               MenuItem {} {

  1353.                 label EQ

  1354.                 xywh {100 100 100 20} labelfont 1 labelsize 10

  1355.               }

  1356.               MenuItem {} {

  1357.                 label DynFilter

  1358.                 xywh {110 110 100 20} labelfont 1 labelsize 10

  1359.               }

  1360.             }

  1361.             Fl_Group simpleinseffectuigroup {

  1362.               xywh {350 95 234 95} box FLAT_BOX color 48

  1363.               class Fl_Osc_Group

  1364.             } {

  1365.               Fl_Box {} {

  1366.                 xywh {350 95 0 0}

  1367.                 code0 {simpleinseffectuigroup->ext = "insefx0/";}

  1368.               }

  1369.               Fl_Group simpleinseffectui {

  1370.                 xywh {350 95 234 95}

  1371.                 code0 {o->init(true);}

  1372.                 class SimpleEffUI

  1373.               } {}

  1374.             }

  1375.             Fl_Choice simpleinseffpart {

  1376.               label {Insert To.}

  1377.               callback {/*master->Pinsparts[ninseff]=(int) o->value()-2;*/

  1378. if ((int) o->value()==1){

  1379.     simpleinseffectuigroup->deactivate();

  1380.     simpleinsefftype->deactivate();

  1381.     simpleinseffectui->deactivate();

  1382. } else {

  1383.     simpleinseffectuigroup->activate();

  1384.     simpleinsefftype->activate();

  1385.     simpleinseffectui->activate();

  1386. };

  1387. /*master->insefx[ninseff]->cleanup();*/} open

  1388.               xywh {435 75 80 20} down_box BORDER_BOX labelfont 1 labelsize 10 align 5 textsize 10

  1389.               code0 {o->add("Master Out");o->add("Off");}

  1390.               code1 {char tmp[50]; for (int i=0;i<NUM_MIDI_PARTS;i++) {sprintf(tmp,"Part %2d",i+1);o->add(tmp);};}

  1391.               code3 {/*o->value(master->Pinsparts[ninseff]+2);*/}

  1392.             } {}

  1393.             Fl_Button {} {

  1394.               label P

  1395.               callback {/*pthread_mutex_lock(&master->mutex);

  1396. presetsui->paste(master->insefx[ninseff],simpleinseffectui);

  1397. pthread_mutex_unlock(&master->mutex);*/}

  1398.               xywh {560 65 25 15} box THIN_UP_BOX color 179 labelfont 1 labelsize 11 labelcolor 55

  1399.             }

  1400.           }

  1401.         }

  1402.       }

  1403.       Fl_Group {} {

  1404.         xywh {5 300 590 30} box ENGRAVED_FRAME

  1405.       } {

  1406.         Fl_Box simplemastervu {

  1407.           label {VU-Meter}

  1408.           xywh {5 300 590 30} box FLAT_BOX color 41 selection_color 75

  1409.           code0 {o->init(osc);}

  1410.           class VuMasterMeter

  1411.         }

  1412.       }

  1413.       Fl_Dial simplemastervolumedial {

  1414.         label {Master Volume}

  1415.         tooltip {Master Volume} xywh {10 35 40 40} box ROUND_UP_BOX labelfont 1 labelsize 11 align 130 maximum 127 step 1

  1416.         code0 {o->init("Pvolume");o->reset_value=80;}

  1417.         class Fl_Osc_Dial

  1418.       }

  1419.       Fl_Counter simplemasterkeyshiftcounter {

  1420.         label {Master KeyShift}

  1421.         xywh {15 110 90 20} labelsize 11 minimum -64 maximum 64 step 1

  1422.         code0 {o->lstep(12);}

  1423.         code1 {o->init("Pkeyshift",'i',-64);}

  1424.         class Fl_Osc_Counter

  1425.       }

  1426.       Fl_Button {} {

  1427.         label {Stop ALL sounds!}

  1428.         callback {virkeyboard->releaseallkeys();

  1429.         o->oscWrite("Panic");}

  1430.         xywh {5 149 115 31} color 90 labelfont 1 labelsize 10

  1431.         class Fl_Osc_Button

  1432.       }

  1433.       Fl_Button {} {

  1434.         label Reset

  1435.         callback {simpleglobalfinedetuneslider->value(64.0);

  1436. simpleglobalfinedetuneslider->do_callback();}

  1437.         tooltip {Master fine detune reset} xywh {70 30 50 17} box THIN_UP_BOX labelsize 11 align 128

  1438.       }

  1439.       Fl_Dial simpleglobalfinedetuneslider {

  1440.         label {Fine Detune}

  1441.         tooltip {global fine detune} xywh {80 50 30 30} box ROUND_UP_BOX labelsize 11 align 130 maximum 127 step 1 value 64

  1442.         code0 {o->init("microtonal/Pglobalfinedetune");o->reset_value=64;}

  1443.         class Fl_Osc_Dial

  1444.       }

  1445.       Fl_Counter simplenpartcounter {

  1446.         label Part

  1447.         callback {virkeys->releaseallkeys(0);

  1448. npartcounter->value(o->value());

  1449. npart=(int) o->value()-1;

  1450. 

  1451. simplelistitemgroup->reext("part"+to_s(npart)+"/");

  1452. partenabled->oscMove("part"+to_s(npart)+"/Penabled");

  1453. simplerefresh();}

  1454.         tooltip {The part number} xywh {170 40 70 20} type Simple labelfont 1 align 4 minimum 0 maximum 127 step 1 value 1 textfont 1

  1455.         code0 {o->bounds(1,NUM_MIDI_PARTS);}

  1456.       }

  1457.       Fl_Counter {} {

  1458.         label {Keyb.Oct.}

  1459.         callback {virkeys->releaseallkeys(0);

  1460. virkeys->midioct=(int) o->value();

  1461. virkeys->take_focus();}

  1462.         tooltip {Midi Octave} xywh {5 190 55 20} type Simple labelsize 11 align 8 when 6 minimum 0 maximum 5 step 1 textfont 1 textsize 11

  1463.         code0 {o->value(virkeys->midioct);}

  1464.       }

  1465.       Fl_Button sm_indicator2 {

  1466.         label SM

  1467.         xywh {560 5 35 15} box ROUNDED_BOX down_box ROUNDED_BOX color 45 selection_color 93 labelfont 3 labelcolor 39 deactivate

  1468.       }

  1469.     }

  1470.     Fl_Window selectuiwindow {

  1471.       label {User Interface mode}

  1472.       callback {*exitprogram=1;}

  1473.       xywh {342 246 430 250} type Double hide non_modal

  1474.       class Fl_Osc_Window

  1475.     } {

  1476.       Fl_Box {} {

  1477.         label {Welcome to ZynAddSubFX}

  1478.         xywh {5 5 425 40} labeltype SHADOW_LABEL labelfont 1 labelsize 26

  1479.       }

  1480.       Fl_Box {} {

  1481.         label {Please choose the interface mode:}

  1482.         xywh {10 50 265 25} labelfont 1 labelsize 13

  1483.       }

  1484.       Fl_Button {} {

  1485.         label Advanced

  1486.         callback {

  1487.         osc->write("/config/cfg.UserInterfaceMode", "i", 1);

  1488. masterwindow->show();

  1489. selectuiwindow->hide();}

  1490.         xywh {10 165 100 35} color 229 labelfont 1 labelsize 16

  1491.       }

  1492.       Fl_Box {} {

  1493.         label {.. if you have used ZynAddSubFX before, or you like to have full control to all parameters.}

  1494.         xywh {110 165 310 35} labelfont 1 labelsize 11 align 144

  1495.       }

  1496.       Fl_Button {} {

  1497.         label Beginner

  1498.         callback {simplemasterwindow->show();

  1499. selectuiwindow->hide();

  1500. osc->write("/config/cfg.UserInterfaceMode", "i", 2);}

  1501.         xywh {10 80 100 65} color 238 labelfont 1 labelsize 16

  1502.       }

  1503.       Fl_Box {} {

  1504.         label {..if you are a beginner, you prefer using presets or you prefer to use simpler user interfaces. Most functionality of ZynAddSubFX will be hidden in this mode to make simple the learning/using it.}

  1505.         xywh {110 75 320 75} labelfont 1 labelsize 11 align 144

  1506.       }

  1507.       Fl_Box {} {

  1508.         label {You can switch the interface modes anytime you want.}

  1509.         xywh {30 215 360 25} box BORDER_BOX color 51 labelfont 1 labelsize 11 align 144

  1510.       }

  1511.     }

  1512.   }

  1513.   Function {updatesendwindow()} {} {

  1514.     code {/*for (int neff1=0;neff1<NUM_SYS_EFX;neff1++) 

  1515.   for (int neff2=neff1+1;neff2<NUM_SYS_EFX;neff2++)

  1516.     syseffsend[neff1][neff2]->value(master->Psysefxsend[neff1][neff2]);*/} {}

  1517.   }

  1518.   Function {updatepanel()} {} {

  1519.     code {for (int npart=0;npart<NUM_MIDI_PARTS;npart++){

  1520.   panellistitem[npart]->refresh();

  1521. };} {}

  1522.   }

  1523.   Function {setfilelabel(const char *filename)} {} {

  1524.     code {if (filename!=NULL) snprintf(&masterwindowlabel[0],100,"%s - ZynAddSubFX",fl_filename_name(filename));

  1525.   else snprintf(&masterwindowlabel[0],100,"%s","ZynAddSubFX");

  1526. masterwindowlabel[99]='\\0';

  1527. masterwindow->label(&masterwindowlabel[0]);

  1528. simplemasterwindow->label(&masterwindowlabel[0]);

  1529. masterwindow->update_title();

  1530. simplemasterwindow->update_title();

  1531. } {}

  1532.   }

  1533.   Function {MasterUI(int *exitprogram_, class Fl_Osc_Interface *osc_):nioui(osc_)} {open

  1534.   } {

  1535.     code {exitprogram=exitprogram_;

  1536. osc=osc_;

  1537. ninseff=0;

  1538. nsyseff=0;

  1539. npart=0;

  1540. last_loaded[0]=0;

  1541. loading_next[0]=0;

  1542. last_xmz = new Osc_DataModel(osc);

  1543. last_xmz->callback = [this](std::string filestr) {

  1544.     const char *filename = filestr.c_str();

  1545.     if (filename[0] != 0)

  1546.        strncpy(last_loaded, filename, XMZ_PATH_MAX);

  1547.     else if (loading_next[0] != 0) {

  1548.        strncpy(last_loaded, loading_next, XMZ_PATH_MAX);

  1549.        loading_next[0] = 0;

  1550.     } else

  1551.        last_loaded[0] = 0;

  1552.     last_loaded[XMZ_PATH_MAX - 1] = 0;

  1553.     char *label = NULL;

  1554.     if(last_loaded[0] != 0) {

  1555.         label = strrchr(last_loaded, '/');

  1556.         if(label && *label)

  1557.             label = label+1;

  1558.         else

  1559.             label = last_loaded;

  1560.     }

  1561. 

  1562.     setfilelabel(label);

  1563. };

  1564. last_xmz->doUpdate("/last_xmz");

  1565. 

  1566. for (int i=0;i<NUM_SYS_EFX;i++)

  1567.    for (int j=0;j<NUM_SYS_EFX;j++)

  1568.      syseffsend[i][j]=NULL;

  1569. 

  1570. microtonalui=new MicrotonalUI(osc, "/microtonal/");

  1571. virkeyboard=new VirKeyboard(osc, "/");

  1572. bankui=new BankUI(&npart, osc);

  1573. configui=new ConfigUI(osc);

  1574. 

  1575. make_window();

  1576. fl_open_display();

  1577. 

  1578. \#if !defined(PLUGINVERSION) && HAS_X11

  1579. Pixmap p, mask;

  1580. XCreatePixmapFromData(fl_display, DefaultRootWindow(fl_display),

  1581.                                  (char**)zynaddsubfx_xpm, &p, &mask, NULL);

  1582. masterwindow->icon((char *)p);

  1583. \#endif

  1584. assert(osc);

  1585. presetsui=new PresetsUI(osc);

  1586. setfilelabel(NULL);

  1587. swapefftype=0;

  1588. simplerefresh();} {}

  1589.   }

  1590.   Function {~MasterUI()} {} {

  1591.     code {masterwindow->hide();

  1592. delete masterwindow;

  1593. simplemasterwindow->hide();

  1594. delete simplemasterwindow;

  1595. aboutwindow->hide();

  1596. delete aboutwindow;

  1597. syseffsendwindow->hide();

  1598. delete syseffsendwindow;

  1599. 

  1600. delete virkeyboard;

  1601. delete microtonalui;

  1602. delete bankui;

  1603. delete configui;

  1604. 

  1605. delete presetsui;

  1606. delete panelwindow;

  1607. delete selectuiwindow;} {}

  1608.   }

  1609.   Function {showUI(int UIMode)} {} {

  1610.     code {switch (UIMode){

  1611. 	case 0:selectuiwindow->show();

  1612. 	break;

  1613. 	case 1:masterwindow->show();

  1614. 	break;

  1615. 	case 2:simplemasterwindow->show();

  1616. 	break;

  1617. };} {}

  1618.   }

  1619.   Function {simplerefresh()} {} {

  1620.     code {/*

  1621.      if (master->part[npart]->Pname[0]!=0) partname->label((char *)master->part[npart]->Pname);

  1622.      else partname->label("Click here to load a instrument");

  1623.      */

  1624. 

  1625. simplelistitemgroup->redraw();} {}

  1626.   }

  1627.   Function {do_new_master_unconditional()} {} {

  1628.     code {delete microtonalui;

  1629. microtonalui=new MicrotonalUI(osc, "/microtonal/");

  1630. 

  1631.     osc->write("/reset_master");

  1632.        osc->write("/last_xmz");

  1633.        npartcounter->value(1);

  1634.        refresh_master_ui();

  1635.        updatepanel();} {}

  1636.   }

  1637.   Function {do_new_master()} {} {

  1638.     code {if (fl_choice("Clear *ALL* the parameters ?","No","Yes",NULL)){

  1639.          do_new_master_unconditional();

  1640.          }} {}

  1641.   }

  1642.   Function {do_revert_changes_unconditional()} {return_type int

  1643.   } {

  1644.     code {strncpy(loading_next, last_loaded, XMZ_PATH_MAX);

  1645.     osc->write("/load_xmz", "s", last_loaded);

  1646.     osc->write("/last_xmz");

  1647.     refresh_master_ui();

  1648.     updatepanel();

  1649. 

  1650. return 1;} {}

  1651.   }

  1652.   Function {do_revert_changes()} {} {

  1653.     code {if (last_loaded[0] == 0)

  1654.          do_new_master();

  1655.          else

  1656.          if (fl_choice("Revert *ALL* the parameters ?","No","Yes",NULL)){

  1657.          do_revert_changes_unconditional();

  1658.          }} {}

  1659.   }

  1660.   Function {do_load_master_unconditional(const char *filename, const char *display_name)} {return_type int

  1661.   } {

  1662.     code {strncpy(loading_next, filename, XMZ_PATH_MAX);

  1663.     osc->write("/load_xmz", "s", filename);

  1664.     osc->write("/last_xmz");

  1665.     refresh_master_ui();

  1666.     updatepanel();

  1667. 

  1668.     setfilelabel(display_name);

  1669.     

  1670.     return 1;} {}

  1671.   }

  1672.   Function {do_load_master(const char* file = NULL)} {} {

  1673.     code {const char *filename;

  1674.   if (file == NULL) {

  1675.     filename=fl_file_chooser("Open:","({*.xmz})",NULL,0);

  1676.     if (filename==NULL) return;

  1677.   }

  1678.   else {

  1679.     filename = file;

  1680.   }

  1681. 

  1682.   int result = do_load_master_unconditional( filename, filename );

  1683. 

  1684. if (result==-10) fl_alert("Error: Could not load the file\\nbecause it is not a zynaddsubfx parameters file.");

  1685.       else if (result<0) fl_alert("Error: Could not load the file.");} {}

  1686.   }

  1687.   Function {do_save_master(const char* file = NULL)} {} {

  1688.     code {const char *filename;

  1689. char *tmp;

  1690.   int result=0;

  1691.   if (file == NULL) {

  1692.     tmp=fl_file_chooser("Save:","({*.xmz})",NULL,0);

  1693.     if (tmp==NULL) return;

  1694.     tmp=fl_filename_setext(tmp,".xmz");

  1695.     filename=tmp;

  1696.     result=fileexists(tmp);

  1697.     if (result) {

  1698.       result=0;

  1699.       if (!fl_choice("The file exists. Overwrite it?","No","Yes",NULL)) return;

  1700.       

  1701.     }

  1702.   }

  1703.   else {

  1704.     filename = file;

  1705.   }

  1706. 

  1707. 

  1708.     osc->write("/save_xmz", "s", filename);

  1709. if (result<0) fl_alert("Error: Could not save the file.");

  1710. 	else

  1711. {

  1712.     osc->write("/last_xmz", "s", filename);

  1713. \#if USE_NSM

  1714.         if ( nsm && nsm->is_active() )

  1715.              setfilelabel( nsm->display_name );

  1716.         else

  1717. \#endif

  1718.              setfilelabel(filename);

  1719. }

  1720. updatepanel();} {}

  1721.   }

  1722.   Function {refresh_master_ui()} {} {

  1723.     code {ninseff=0;

  1724. nsyseff=0;

  1725. npart=0;

  1726. 

  1727. //the Master UI

  1728. npartcounter->do_callback();

  1729. syseffnocounter->do_callback();

  1730. inseffnocounter->do_callback();

  1731. delete microtonalui;

  1732. microtonalui=new MicrotonalUI(osc, "/microtonal/");

  1733. updatesendwindow();

  1734. updatepanel();

  1735. 

  1736. //the simle MasterUI

  1737. simplenpartcounter->value(1);

  1738. simplesyseffnocounter->value(1);

  1739. simpleinseffnocounter->value(1);

  1740. simplenpartcounter->do_callback();

  1741. simplesyseffnocounter->do_callback();

  1742. simpleinseffnocounter->do_callback();

  1743. 

  1744. simplerefresh();

  1745. bankui->hide();} {}

  1746.   }

  1747.   decl {class Osc_DataModel *last_xmz;} {public local

  1748.   }

  1749.   decl {MicrotonalUI *microtonalui;} {private local

  1750.   }

  1751.   decl {BankUI *bankui;} {private local

  1752.   }

  1753.   decl {int ninseff,npart;} {private local

  1754.   }

  1755.   decl {int nsyseff;} {private local

  1756.   }

  1757.   decl {int *exitprogram;} {private local

  1758.   }

  1759.   decl {Fl_Osc_Dial *syseffsend[NUM_SYS_EFX][NUM_SYS_EFX];} {private local

  1760.   }

  1761.   decl {VirKeyboard *virkeyboard;} {private local

  1762.   }

  1763.   decl {ConfigUI *configui;} {private local

  1764.   }

  1765.   decl {int swapefftype;} {private local

  1766.   }

  1767.   decl {char masterwindowlabel[100];} {private local

  1768.   }

  1769.   decl {Panellistitem *panellistitem[NUM_MIDI_PARTS];} {public local

  1770.   }

  1771.   decl {NioUI nioui;} {private local

  1772.   }

  1773.   decl {class Fl_Osc_Interface *osc;} {public local

  1774.   }

  1775.   decl {char last_loaded[XMZ_PATH_MAX];} {public local

  1776.   }

  1777.   decl {char loading_next[XMZ_PATH_MAX];} {public local

  1778.   }

  1779.   Function {close()} {open return_type void

  1780.   } {

  1781.     code {*exitprogram=1;} {}

  1782.   }

  1783. }