Subversion Repositories svn.mios32

Rev

Rev 2262 | Rev 2533 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2262 Rev 2532
Line 1... Line 1...
1
// $Id: seq_ui_song.c 2262 2016-01-06 18:16:23Z tk $
1
// $Id: seq_ui_song.c 2532 2017-10-12 21:50:45Z tk $
2
/*
2
/*
3
 * Song page
3
 * Song page
4
 *
4
 *
5
 * ==========================================================================
5
 * ==========================================================================
6
 *
6
 *
Line 661... Line 661...
661
661
662
    seq_song_step_t s = SEQ_SONG_StepEntryGet(ui_song_edit_pos);
662
    seq_song_step_t s = SEQ_SONG_StepEntryGet(ui_song_edit_pos);
663
663
664
    switch( ui_selected_item ) {
664
    switch( ui_selected_item ) {
665
    case ITEM_POS:
665
    case ITEM_POS:
-
 
666
      ui_selected_phrase = (u8)button;
666
      ui_song_edit_pos = (u8)button << 3;
667
      ui_song_edit_pos = ui_selected_phrase << 3;
667
 
-
 
668
668
 
669
      // send to external
669
      // send to external
670
      SEQ_MIDI_IN_ExtCtrlSend(SEQ_MIDI_IN_EXT_CTRL_PHRASE, ui_song_edit_pos >> 3, 0);
670
      SEQ_MIDI_IN_ExtCtrlSend(SEQ_MIDI_IN_EXT_CTRL_PHRASE, ui_song_edit_pos >> 3, 0);
671
671
672
      // set song position and fetch patterns
672
      // set song position and fetch patterns