API tools faq
paste
Advertisement
Guest User

onson

a guest
Apr 20th, 2019
149
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Bash 52.49 KB | None | 0 0
raw download clone embed print report
  1. #!/bin/bash
  2.  
  3. # FUNCTION J$UNCTION
  4. # HEADERS
  5. readandcenterlinebyline () {
  6.     while IFS='' read -r line || [[ -n "$line" ]]; do
  7.       COLUMNS=$(tput cols)
  8.       onsonlogo="$line"
  9.       printf "%*s\n" $(((${#onsonlogo}+$COLUMNS)/2)) "$onsonlogo"
  10.     done < "$1"
  11.     }
  12. onson_header () {
  13.   clear
  14.   echo
  15.   readandcenterlinebyline /usr/local/bin/onson/logo
  16.   echo
  17.   echo
  18.   }
  19.   preset_header () {
  20.     mapfile -t currentsong </usr/local/bin/onson/satelites/currentsong
  21.     mapfile -t currentpreset </usr/local/bin/onson/satelites/currentpreset
  22.     mapfile -t bank </usr/local/bin/onson/satelites/currentbank
  23.  
  24.     COLUMNS=$(tput cols)
  25.     presetprompt="SONG:$currentsong     PRESET:$currentpreset     BANK:$bank"
  26.     printf "%*s\n\n" $(((${#presetprompt}+$COLUMNS)/2)) "$presetprompt"
  27.   }
  28. bank_header () {
  29.  
  30.   mapfile -t currentpreset </usr/local/bin/onson/satelites/currentpreset
  31.   mapfile -t bank </usr/local/bin/onson/satelites/currentbank
  32.  
  33.   onson_header
  34.   echo
  35.   preset_header
  36. }
  37. steps_header  () {
  38.  
  39.   COLUMNS=$(tput cols)
  40.   stepprompt="STEPS:"
  41.   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  42. }
  43.  
  44. direction_header () {
  45.   mapfile -t direction < /usr/local/bin/onson/satelites/direction
  46.   currentdirnum=" 1 2 3"
  47.   currentdirname=(FORWARD REVERSE BOUNCE BACKWARD)
  48.   for i in $currentdirnum
  49.     do
  50.       if [ "$direction" = "$i" ]
  51.         then
  52.           ((arrayplace=$i-1))
  53.           directionprompt="CURRENT DIRECTION IS: ${currentdirname[$arrayplace]}"
  54.           COLUMNS=$(tput cols)
  55.           printf "%*s\n\n" $(((${#directionprompt}+$COLUMNS)/2)) "$directionprompt"
  56.       fi
  57.   done
  58. }
  59. glide_header () {
  60.   echo
  61.   echo
  62.   echo
  63.   echo
  64.   mapfile -t aglide < /usr/local/bin/onson/satelites/glide
  65.  
  66.   COLUMNS=$(tput cols)
  67.   currentglidenum="//// CURRENT GLIDE IS: $glide ////"
  68.   printf "%*s\n\n" $(((${#currentglidenum}+$COLUMNS)/2)) "$currentglidenum"
  69. }
  70.  
  71.  
  72. #BODIES
  73. steps_body () {
  74.       while :
  75.         do
  76.           clear
  77.           echo
  78.           echo
  79.           clear
  80.           bank_header
  81.           print_steps
  82.           menu_footer 8
  83.           center_read 1 stepnumber
  84.           case $stepnumber in
  85.             #
  86.               1)
  87.               while :
  88.                 do
  89.                   clear
  90.                   bank_header
  91.  
  92.                   #DISPLAY CURRENT STEP VALUE
  93.                   mapfile -t step1 </usr/local/bin/onson/satelites/step1
  94.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  95.  
  96.  
  97.                   COLUMNS=$(tput cols)
  98.                   stepprompt="CURRENT STEP 1: $step1"
  99.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  100.  
  101.                   COLUMNS=$(tput cols)
  102.                   allstepsprompt="ALL STEPS: $allsteps"
  103.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  104.  
  105.                   notes_menu_root
  106.                   center_read 4 note
  107.                   notes_validation_vars
  108.  
  109.                   for i in $stepmenu
  110.                     do
  111.                       if [ "$note" = "$i" ]
  112.                         then
  113.                           rootarrayplace=$arrayplace
  114.                           step1="${scale[$rootarrayplace]}"
  115.                           midistep1="${scalevalues[$rootarrayplace]}"
  116.                           echo "$step1" > /usr/local/bin/onson/satelites/step1
  117.                           echo "$midistep1" > /usr/local/bin/onson/midi/satelites/midistep1
  118.                           echo "$rootarrayplace" > /usr/local/bin/onson/satelites/rootarrayplace
  119.                           currentscaleroot=$rootarrayplace
  120.  
  121.  
  122.                       fi
  123.                       ((arrayplace++))
  124.  
  125.                     done
  126.                   clear
  127.                   break
  128.                   done
  129.               ;;
  130.  
  131.               2)
  132.               while :
  133.                 do
  134.                   clear
  135.                   bank_header
  136.  
  137.                   mapfile -t step2 </usr/local/bin/onson/satelites/step2
  138.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  139.                   mapfile -t rootarrayplace </usr/local/bin/onson/satelites/rootarrayplace
  140.  
  141.                   #DISPLAY CURRENT STEP VALUE
  142.                   COLUMNS=$(tput cols)
  143.                   stepprompt="CURRENT STEP 2: $step2"
  144.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  145.  
  146.                   COLUMNS=$(tput cols)
  147.                   allstepsprompt="ALL STEPS: $allsteps"
  148.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  149.  
  150.                   notes_menu_nonroot
  151.                   center_read 4 note
  152.                   notes_validation_vars
  153.                   for i in $stepmenu
  154.                     do
  155.                       if [ "${note^^}" = "${i^^}" ]
  156.                         then
  157.                           step2="${scale[$arrayplace]}"
  158.                           midistep2="${scalevalues[$arrayplace]}"
  159.                           echo "$step2" > /usr/local/bin/onson/satelites/step2
  160.                           echo "$midistep2" > /usr/local/bin/onson/midi/satelites/midistep2
  161.                           save_preset
  162.  
  163.                       fi
  164.                       ((arrayplace++))
  165.                     done
  166.                   clear
  167.                   break
  168.                   done
  169.               ;;
  170.  
  171.               3)
  172.               while :
  173.                 do
  174.                   clear
  175.                   bank_header
  176.  
  177.                   #DISPLAY CURRENT STEP VALUE
  178.                   mapfile -t step3 </usr/local/bin/onson/satelites/step3
  179.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  180.  
  181.                   COLUMNS=$(tput cols)
  182.                   stepprompt="STEP 3: $step3"
  183.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  184.  
  185.                   COLUMNS=$(tput cols)
  186.                   allstepsprompt="ALL STEPS: $allsteps"
  187.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  188.  
  189.                   notes_menu_nonroot
  190.  
  191.                   center_read 4 note
  192.                   notes_validation_vars
  193.                   for i in $stepmenu
  194.                     do
  195.                       if [ "${note^^}" = "${i^^}" ]
  196.                         then
  197.                           step3="${scale[$arrayplace]}"
  198.                           midistep3="${scalevalues[$arrayplace]}"
  199.                           echo "$step3" > /usr/local/bin/onson/satelites/step3
  200.                           echo "$midistep3" > /usr/local/bin/onson/midi/satelites/midistep3
  201.                           save_preset
  202.                       fi
  203.  
  204.                       ((arrayplace++))
  205.                     done
  206.                   clear
  207.                   break
  208.                   done
  209.               ;;
  210.  
  211.               4)
  212.               while :
  213.                 do
  214.                   clear
  215.                   bank_header
  216.  
  217.                   #DISPLAY CURRENT STEP VALUE
  218.                   mapfile -t step4 </usr/local/bin/onson/satelites/step4
  219.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  220.  
  221.  
  222.                   COLUMNS=$(tput cols)
  223.                   stepprompt="STEP 4: $step4"
  224.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  225.  
  226.                   COLUMNS=$(tput cols)
  227.                   allstepsprompt="ALL STEPS: $allsteps"
  228.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  229.  
  230.                   notes_menu_nonroot
  231.  
  232.                   center_read 4 note
  233.                   notes_validation_vars
  234.                   for i in $stepmenu
  235.                     do
  236.                       if [ "${note^^}" = "${i^^}" ]
  237.                         then
  238.                           step4="${scale[$arrayplace]}"
  239.                           midistep4="${scalevalues[$arrayplace]}"
  240.                           echo "$step4" > /usr/local/bin/onson/satelites/step4
  241.                           echo "$midistep4" > /usr/local/bin/onson/midi/satelites/midistep4
  242.                           save_preset
  243.                       fi
  244.                       ((arrayplace++))
  245.                     done
  246.                   clear
  247.                   break
  248.                   done
  249.               ;;
  250.  
  251.               5)
  252.               while :
  253.                 do
  254.                   clear
  255.                   bank_header
  256.  
  257.                   #DISPLAY CURRENT STEP VALUE
  258.                   mapfile -t step5 </usr/local/bin/onson/satelites/step5
  259.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  260.  
  261.                   COLUMNS=$(tput cols)
  262.                   stepprompt="STEP 5: $step5"
  263.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  264.  
  265.                   COLUMNS=$(tput cols)
  266.                   allstepsprompt="ALL STEPS: $allsteps"
  267.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  268.  
  269.  
  270.                   notes_menu_nonroot
  271.  
  272.                   center_read 4 note
  273.                   notes_validation_vars
  274.                   for i in $stepmenu
  275.                     do
  276.                       if [ "${note^^}" = "${i^^}" ]
  277.                         then
  278.                           step5="${scale[$arrayplace]}"
  279.                           midistep5="${scalevalues[$arrayplace]}"
  280.                           echo "$step5" > /usr/local/bin/onson/satelites/step5
  281.                           echo "$midistep5" > /usr/local/bin/onson/midi/satelites/midistep5
  282.                           save_preset
  283.                       fi
  284.                       ((arrayplace++))
  285.                     done
  286.                   clear
  287.                   break
  288.                   done
  289.               ;;
  290.  
  291.               6)
  292.               while :
  293.                 do
  294.                   clear
  295.                   bank_header
  296.  
  297.                   #DISPLAY CURRENT STEP VALUE
  298.                   mapfile -t step6 </usr/local/bin/onson/satelites/step6
  299.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  300.  
  301.                   COLUMNS=$(tput cols)
  302.                   stepprompt="STEP 6: $step6"
  303.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  304.  
  305.                   COLUMNS=$(tput cols)
  306.                   allstepsprompt="ALL STEPS: $allsteps"
  307.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  308.  
  309.                   notes_menu_nonroot
  310.  
  311.                   center_read 4 note
  312.                   notes_validation_vars
  313.                   for i in $stepmenu
  314.                     do
  315.                       if [ "${note^^}" = "${i^^}" ]
  316.                         then
  317.                           step6="${scale[$arrayplace]}"
  318.                           midistep6="${scalevalues[$arrayplace]}"
  319.                           echo "$step6" > /usr/local/bin/onson/satelites/step6
  320.                           echo "$midistep6" > /usr/local/bin/onson/midi/satelites/midistep6
  321.                           save_preset
  322.                         fi
  323.                       ((arrayplace++))
  324.                     done
  325.                   clear
  326.                   break
  327.                   done
  328.               ;;
  329.  
  330.               7)
  331.               while :
  332.                 do
  333.                   clear
  334.                   bank_header
  335.  
  336.  
  337.                   #DISPLAY CURRENT STEP VALUE
  338.                   mapfile -t step7 </usr/local/bin/onson/satelites/step7
  339.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  340.  
  341.  
  342.                   COLUMNS=$(tput cols)
  343.                   stepprompt="STEP 7: $step7"
  344.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  345.  
  346.                   COLUMNS=$(tput cols)
  347.                   allstepsprompt="ALL STEPS: $allsteps"
  348.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  349.  
  350.                   notes_menu_nonroot
  351.  
  352.                   center_read 4 note
  353.                   notes_validation_vars
  354.                   for i in $stepmenu
  355.                     do
  356.                       if [ "${note^^}" = "${i^^}" ]
  357.                         then
  358.                           step7="${scale[$arrayplace]}"
  359.                           midistep7="${scalevalues[$arrayplace]}"
  360.                           echo "$step7" > /usr/local/bin/onson/satelites/step7
  361.                           echo "$midistep7" > /usr/local/bin/onson/midi/satelites/midistep7
  362.                           save_preset
  363.                           save_preset
  364.                         fi
  365.                       ((arrayplace++))
  366.                     done
  367.                   clear
  368.                   break
  369.                   done
  370.               ;;
  371.  
  372.               8)
  373.               while :
  374.                 do
  375.                   clear
  376.                   bank_header
  377.  
  378.                   #DISPLAY CURRENT STEP VALUE
  379.                   mapfile -t step8 </usr/local/bin/onson/satelites/step8
  380.                   mapfile -t allsteps </usr/local/bin/onson/satelites/allsteps
  381.  
  382.  
  383.                   COLUMNS=$(tput cols)
  384.                   stepprompt="STEP 8: $step8"
  385.                   printf "%*s\n\n" $(((${#stepprompt}+$COLUMNS)/2)) "$stepprompt"
  386.  
  387.                   COLUMNS=$(tput cols)
  388.                   allstepsprompt="ALL STEPS: $allsteps"
  389.                   printf "%*s\n\n" $(((${#allstepsprompt}+$COLUMNS)/2)) "$allstepsprompt"
  390.  
  391.                   notes_menu_nonroot
  392.  
  393.                   center_read 4 note
  394.                   notes_validation_vars
  395.  
  396.                   for i in $stepmenu
  397.                     do
  398.                       if [ "${note^^}" = "${i^^}" ]
  399.                         then
  400.                           step8="${scale[$arrayplace]}"
  401.                           midistep8="${scalevalues[$arrayplace]}"
  402.                           echo "$step8" > /usr/local/bin/onson/satelites/step8
  403.                           echo "$midistep8" > /usr/local/bin/onson/midi/satelites/midistep8
  404.                           save_preset
  405.                         fi
  406.                       ((arrayplace++))
  407.                     done
  408.                   clear
  409.                   break
  410.                   done
  411.               ;;
  412.  
  413.               *)
  414.               clear
  415.               break
  416.               ;;
  417.           esac
  418.         done
  419.         }
  420.  
  421. direction_body () {
  422.  
  423.         clear
  424.         bank_header
  425.         direction_header
  426.         print_direction
  427.         menu_footer 4
  428.         center_read 1 input
  429.  
  430.       if [ "$input" -gt 0 ] && [ "$input" -lt 5 ]
  431.         then
  432.           ((direction = "$input"-1))
  433.           echo "$direction"  > /usr/local/bin/onson/satelites/direction
  434.           save_preset
  435.       fi
  436.  
  437.  
  438.  
  439.  
  440. }
  441. glide_body () {
  442.         clear
  443.         bank_header
  444.         glide_header
  445.         echo
  446.         echo
  447.         echo
  448.         echo
  449.         menu_footer 127
  450.         center_read 3 input
  451.  
  452.       if [ "$input" -gt -1 ] && [ "$input" -lt 128 ]
  453.         then
  454.           glide="$input"
  455.           echo "$glide"  > /usr/local/bin/onson/satelites/glide
  456.           save_preset
  457.       fi
  458. }
  459. length_body () {
  460.         clear
  461.         bank_header
  462.         echo
  463.         echo
  464.         echo
  465.         echo
  466.         mapfile -t length < /usr/local/bin/onson/satelites/length
  467.  
  468.         COLUMNS=$(tput cols)
  469.         currentlengthnum="//// CURRENT LENGTH IS: $length ////"
  470.         printf "%*s\n\n" $(((${#currentlengthnum}+$COLUMNS)/2)) "$currentlengthnum"
  471.         echo
  472.         echo
  473.         echo
  474.         menu_footer 8
  475.         center_read 1 input
  476.  
  477.       if [ "$input" -gt 0 ] && [ "$input" -lt 9 ]
  478.         then
  479.           length="$input"
  480.           echo "$length"  > /usr/local/bin/onson/satelites/length
  481.           save_preset
  482.       fi
  483. }
  484.  
  485. #FOOTERS
  486. exit_footer () {
  487.   exitsign="|| OR ANY KEY TO EXIT ||"
  488.   printf "%*s\n\n" $(((${#exitsign}+$COLUMNS)/2)) "$exitsign"
  489. }
  490. preset_footer () {
  491.   tput sc
  492.   tput ll
  493.   echo
  494.   echo
  495.   echo
  496.   echo
  497.   COLUMNS=$(tput cols)
  498.   prompt="|| ENTER PRESET # ||"
  499.   printf "%*s\n\n" $(((${#prompt}+$COLUMNS)/2)) "$prompt"
  500.   presetfooterprompt="© 2019 SPIL KITT"
  501.   printf "%*s\n\n" $(((${#presetfooterprompt}+$COLUMNS)/2)) "$presetfooterprompt"
  502.   tput rc
  503. }
  504. song_footer () {
  505.   tput sc
  506.   tput ll
  507.   echo
  508.   echo
  509.   echo
  510.   echo
  511.   COLUMNS=$(tput cols)
  512.   prompt="|| ENTER SONG # ||"
  513.   printf "%*s\n\n" $(((${#prompt}+$COLUMNS)/2)) "$prompt"
  514.   songfooterprompt="© 2019 SPIL KITT"
  515.   printf "%*s\n\n" $(((${#songfooterprompt}+$COLUMNS)/2)) "$songfooterprompt"
  516.   tput rc
  517. }
  518. menu_footer () {
  519.   tput sc
  520.   tput ll
  521.   echo
  522.   echo
  523.   echo
  524.   echo
  525.   COLUMNS=$(tput cols)
  526.   range="|| 1-$1 ||"
  527.   printf "%*s\n\n" $(((${#range}+$COLUMNS)/2)) "$range"
  528.   exit_footer
  529.   tput rc
  530. }
  531.  
  532.  
  533. #UTILITY FUNCTIONS
  534. append_step_values () {
  535.   # THIS ISN'T USED ANYMORE BUT I KEPT IT FOR REFERENCE.
  536.   # IT'S A HOLDOVER FROM BEFORE I HAD THE IDEA TO QUANTIZE THE STEPS.
  537.   # INSTEAD, I WAS TAKING INPUT  THAT WOULD ADD OR SUBTRACT TO THE
  538.   # CURRENT STEP VALUE WITHIN THE ALLOWABLE RANGE.
  539.  
  540.   #END OF FIRT PASS STEP LOOP / BEGINNING TRAILING STEP LOOP
  541.     unset "y"
  542.     unset "z"
  543.  
  544.       #SYNC THE ARRAY INDICES WITH ASSOCIATED SEQUENCER STEPS
  545.       ((x="$step"-1))
  546.  
  547.       #INPUT CHANGE TO PREVIOUS SLIDER VALUES
  548.       y=${array[$x]}
  549.       ((z="$y" + "$delta"))
  550.       array["$x"]="$z"
  551.       echo > /usr/local/bin/onson/satelites/stepsfile
  552.       echo "${array[@]}" > /usr/local/bin/onson/satelites/stepsfile
  553. }
  554. center_read () {
  555.   echo
  556.   COLUMNS=$(tput cols)
  557.   currentlengthnum="$1"
  558.   ((N=(+$COLUMNS/2)-${currentlengthnum}))
  559.   tput cuf $N
  560.   read -n $1 $2
  561. }
  562. notes_validation_vars () {
  563.   set -f
  564.   GLOBIGNORE="*"
  565.  
  566.  
  567.   scale=(\#\#E \#\#F \#\#F\# \#\#G \#\#G\# \#\#A \#\#Bb \#\#B \#\#C \#\#C\# \#\#D \#\#D\# \#E \#F \#F\# \#G \#G\# \#A \#Bb \#B \#C \#C\# \#D \#D\# E F F\# G G\# A Bb B C C\# D D\# \*E \*F \*F\# \*G \*G\# \*A \*Bb \*B \*C \*C\# \*D \*D\# \*\*E \*\*F \*\*F\# \*\*G \*\*G\# \*\*A \*\*Bb \*\*B \*\*C \*\*C\# \*\*D \*\*D\# \*\*\*E \*\*\*F \*\*\*F\# \*\*\*G \*\*\*G\# \*\*\*A \*\*\*Bb)
  568.  
  569.   #    ##E -  ##D# -  ##01 - ##12 - 1-12   midi- 00 - 21
  570.   #     #E -   #D# -  #001 - #012 - 13-24  midi- 23 - 46
  571.   #      E -    D# -  0001 - 0012 - 25-36  midi- 48 - 70
  572.   #     *E -   *D# -  *001 - *012 - 37-48  midi- 72 - 92
  573.   #    **E -  **D# -  **01 - **12 - 49-60  midi- 25 - 114
  574.   #   ***E - ***Bb -  ***1 - ***7 - 61-67  midi- 115 - 126
  575.  
  576.  
  577.  
  578.   stepmenu="##01 ##02 ##03 ##04 ##05 ##06 ##07 ##08 ##09 ##10 ##11 ##12 #001 #002 #003 #004 #005 #006 #007 #008 #009 #010 #011 #012 0001 0002 0003 0004 0005 0006 0007 0008 0009 0010 0011 0012 *001 *002 *003 *004 *005 *006 *007 *008 *009 *010 *011 *012 **01 **02 **03 **04 **05 **06 **07 **08 **09 **10 **11 **12 ***1 ***2 ***3 ***4 ***5 ***6 ***7"
  579.  
  580.   scalevalues=(00 02 03 05 07 09 11 13 15 18 20 21 23 26 28 30 32 34 35 37 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 73 75 77 79 82 83 85 87 88 91 92 95 97 98 100 102 103 105 107 109 110 113 114 115 118 120 121 123 124 126)
  581.   arrayplace=0
  582.   set +f
  583.  
  584. }
  585. banks_validation_vars () {
  586.   banknames=(A B AB)
  587.   banksmenu="1 2 3"
  588.   arrayplace=0
  589. }
  590. notes_menu_root () {
  591.  
  592.                 paddednote_e=$(menu_pad "##01/#001/0001/*001/**01/***1" E)
  593.                 COLUMNS=$(tput cols)
  594.                 paddednotee="$paddednote_e"
  595.                 printf "%*s\n\n" $(((${#paddednotee}+$COLUMNS)/2)) "$paddednotee"
  596.  
  597.                 paddednote_f=$(menu_pad "##02/#002/0002/*002/**02/***2" F)
  598.                 COLUMNS=$(tput cols)
  599.                 paddednotefprompt="$paddednote_f"
  600.                 printf "%*s\n\n" $(((${#paddednotefprompt}+$COLUMNS)/2)) "$paddednotefprompt"
  601.  
  602.                 paddednote_fsharp=$(menu_pad "##03/#003/0003/*003/**03/***3" F#)
  603.                 COLUMNS=$(tput cols)
  604.                 paddednotefsharpprompt="$paddednote_fsharp"
  605.                 printf "%*s\n\n" $(((${#paddednotefsharpprompt}+$COLUMNS)/2)) "$paddednotefsharpprompt"
  606.  
  607.                 paddednote_g=$(menu_pad "##04/#004/0004/*004/**04/***4" G)
  608.                 COLUMNS=$(tput cols)
  609.                 paddednotegprompt="$paddednote_g"
  610.                 printf "%*s\n\n" $(((${#paddednotegprompt}+$COLUMNS)/2)) "$paddednotegprompt"
  611.  
  612.                 paddednote_gsharp=$(menu_pad "##05/#005/0005/*005/**05/***5" G#)
  613.                 COLUMNS=$(tput cols)
  614.                 paddednotegsharpprompt="$paddednote_gsharp"
  615.                 printf "%*s\n\n" $(((${#paddednotegsharpprompt}+$COLUMNS)/2)) "$paddednotegsharpprompt"
  616.  
  617.                 paddednote_a=$(menu_pad "##06/#006/0006/*006/**06/***6" A)
  618.                 COLUMNS=$(tput cols)
  619.                 paddednoteaprompt="$paddednote_a"
  620.                 printf "%*s\n\n" $(((${#paddednoteaprompt}+$COLUMNS)/2)) "$paddednoteaprompt"
  621.  
  622.                 paddednote_bflat=$(menu_pad "##07/#007/0007/*007/**07/***7" Bb)
  623.                 COLUMNS=$(tput cols)
  624.                 paddednotebflatprompt="$paddednote_bflat"
  625.                 printf "%*s\n\n" $(((${#paddednotebflatprompt}+$COLUMNS)/2)) "$paddednotebflatprompt"
  626.  
  627.                 paddednote_b=$(menu_pad "##08/#008/0008/*008/**08" B)
  628.                 COLUMNS=$(tput cols)
  629.                 paddednotebprompt="$paddednote_b"
  630.                 printf "%*s\n\n" $(((${#paddednotebprompt}+$COLUMNS)/2)) "$paddednotebprompt"
  631.  
  632.                 paddednote_c=$(menu_pad "##09/#009/0009/*009/**09" C)
  633.                 COLUMNS=$(tput cols)
  634.                 paddednotecprompt="$paddednote_c"
  635.                 printf "%*s\n\n" $(((${#paddednotecprompt}+$COLUMNS)/2)) "$paddednotecprompt"
  636.  
  637.                 paddednote_csharp=$(menu_pad "##10/#010/0010/*010/**10" C#)
  638.                 COLUMNS=$(tput cols)
  639.                 paddednotecsharpprompt="$paddednote_csharp"
  640.                 printf "%*s\n\n" $(((${#paddednotecsharpprompt}+$COLUMNS)/2)) "$paddednotecsharpprompt"
  641.  
  642.                 paddednote_d=$(menu_pad "##11/#011/0011/*011/**11" D)
  643.                 COLUMNS=$(tput cols)
  644.                 paddednotedprompt="$paddednote_d"
  645.                 printf "%*s\n\n" $(((${#paddednotedprompt}+$COLUMNS)/2)) "$paddednotedprompt"
  646.  
  647.                 paddednote_dsharp=$(menu_pad "##12/#012/0012/*012/**12" D#)
  648.                 COLUMNS=$(tput cols)
  649.                 paddednotedsharpprompt="$paddednote_dsharp"
  650.                 printf "%*s\n\n" $(((${#paddednotedsharpprompt}+$COLUMNS)/2)) "$paddednotedsharpprompt"
  651.  
  652.                 menu_footer 12
  653. }
  654.  
  655. notes_menu_nonroot () {
  656.  
  657.                 notes_validation_vars
  658.  
  659.                 mapfile -t arrayplace < /usr/local/bin/onson/satelites/arrayplace
  660.  
  661.                 mapfile -t rootarrayplace < /usr/local/bin/onson/satelites/rootarrayplace
  662.  
  663.  
  664.                 ##FIND "MIDDLE" ROOT VALUES TO DISPLAY
  665.  
  666.                 stepmenuarray=(\#\#01 \#\#02 \#\#03 \#\#04 \#\#05 \#\#06 \#\#07 \#\#08 \#\#09 \#\#10 \#\#11 \#\#12 \#\01 \#002 \#003 \#004 \#005 \#006 \#007 \#008 \#009 \#010 \#011 \#012 0001 0002 0003 0004 0005 0006 0007 0008 0009 0010 0011 0012 \*001 \*002 \*003 \*004 \*005 \*006 \*007 \*008 \*009 \*010 \*011 \*012 \*\*01 \*\*02 \*\*03 \*\*04 \*\*05 \*\*06 \*\*07 \*\*08 \*\*09 \*\*10 \*\*11 \*\*12 \*\*\*1 \*\*\*2 \*\*\*3 \*\*\*4 \*\*\*5 \*\*\*6 \*\*\*7)
  667.  
  668.  
  669.  
  670.                   echo
  671.                   displayarrayplace1=$rootarrayplace
  672.                   ((displayarrayplace2 = "$displayarrayplace1"+2))
  673.                   ((displayarrayplace3 = "$displayarrayplace2"+2))
  674.                   ((displayarrayplace4 = "$displayarrayplace3"+1))
  675.                   ((displayarrayplace5 = "$displayarrayplace4"+2))
  676.                   ((displayarrayplace6 = "$displayarrayplace5"+2))
  677.                   ((displayarrayplace7 = "$displayarrayplace6"+2))
  678.  
  679.                   menurootnote="${scale[$displayarrayplace1]}"
  680.                   menu2ndnote="${scale[$displayarrayplace2]}"
  681.                   menu3rdnote="${scale[$displayarrayplace3]}"
  682.                   menu4thnote="${scale[$displayarrayplace4]}"
  683.                   menu5thnote="${scale[$displayarrayplace5]}"
  684.                   menu6thnote="${scale[$displayarrayplace6]}"
  685.                   menu7thnote="${scale[$displayarrayplace7]}"
  686.  
  687.                   rootnoteindex="${stepmenuarray[$displayarrayplace1]}"
  688.                   notetwoindex="${stepmenuarray[$isplayarrayplace2]}"
  689.                   notethreeindex="${stepmenuarray[$displayarrayplace3]}"
  690.                   notefourindex="${stepmenuarray[$displayarrayplace4]}"
  691.                   notefiveindex="${stepmenuarray[$displayarrayplace5]}"
  692.                   notesixindex="${stepmenuarray[$displayarrayplace6]}"
  693.                   notesevenindex="${stepmenuarray[$displayarrayplace7]}"
  694.  
  695.                   menurootnote=${menurootnote/#'*\#'/}
  696.                   menu2ndnote=${menu2ndnote/#'*\#'/}
  697.                   menu3rdnote=${menu3rdnote/#'*\#'/}
  698.                   menu4thnote=${menu4thnote/#'*\#'/}
  699.                   menu5thnote=${menu5thnote/#'*\#'/}
  700.                   menu6thnote=${menu6thnote/#'*\#'/}
  701.                   menu7thnote=${menu7thnote/#'*\#'/}
  702.  
  703.                   menurootnote=${menurootnote//\*/}
  704.                   menu2ndnote=${menu2ndnote//\*/}
  705.                   menu3rdnote=${menu3rdnote//\*/}
  706.                   menu4thnote=${menu4thnote//\*/}
  707.                   menu5thnote=${menu5thnote//\*/}
  708.                   menu6thnote=${menu6thnote//\*/}
  709.                   menu7thnote=${menu7thnote//\*/}
  710.  
  711.                   rootnoteindex=${rootnoteindex:2}
  712.                   notetwoindex=${notetwoindex:2}
  713.                   notethreeindex=${notethreeindex:2}
  714.                   notefourindex=${notefourindex:2}
  715.                   notefiveindex=${notefiveindex:2}
  716.                   notesixindex=${notesixindex:2}
  717.                   notesevenindex=${notesevenindex:2}
  718.  
  719.  
  720.                 paddedrootnote=$(menu_pad "$rootnoteindex" "$menurootnote")
  721.                 COLUMNS=$(tput cols)
  722.                 paddedrootnoteprompt="$paddedrootnote"
  723.                 printf "%*s\n\n" $(((${#paddedrootnoteprompt}+$COLUMNS)/2)) "$paddedrootnoteprompt"
  724.  
  725.                 padded2ndnote=$(menu_pad $notetwoindex "$menu2ndnote")
  726.                 COLUMNS=$(tput cols)
  727.                 padded2ndnoteprompt="$padded2ndnote"
  728.                 printf "%*s\n\n" $(((${#padded2ndnoteprompt}+$COLUMNS)/2)) "$padded2ndnoteprompt"
  729.  
  730.                 padded3rdnote=$(menu_pad "$notethreeindex" "$menu3rdnote")
  731.                 COLUMNS=$(tput cols)
  732.                 padded3rdnoteprompt="$padded3rdnote"
  733.                 printf "%*s\n\n" $(((${#padded3rdnoteprompt}+$COLUMNS)/2)) "$padded3rdnoteprompt"
  734.  
  735.                 padded4thnote=$(menu_pad "$notefourindex" "$menu4thnote")
  736.                 COLUMNS=$(tput cols)
  737.                 padded4thnoteprompt="$padded4thnote"
  738.                 printf "%*s\n\n" $(((${#padded4thnoteprompt}+$COLUMNS)/2)) "$padded4thnoteprompt"
  739.  
  740.                 padded5thnote=$(menu_pad "$notefiveindex" "$menu5thnote")
  741.                 COLUMNS=$(tput cols)
  742.                 padded5thnoteprompt="$padded5thnote"
  743.                 printf "%*s\n\n" $(((${#padded5thnoteprompt}+$COLUMNS)/2)) "$padded5thnoteprompt"
  744.  
  745.                 padded6thnote=$(menu_pad "$notesixindex" "$menu6thnote")
  746.                 COLUMNS=$(tput cols)
  747.                 padded6thnoteaprompt="$padded6thnote"
  748.                 printf "%*s\n\n" $(((${#padded6thnoteaprompt}+$COLUMNS)/2)) "$padded6thnoteaprompt"
  749.  
  750.                 padded7thnote=$(menu_pad "$notesevenindex" "$menu7thnote")
  751.                 COLUMNS=$(tput cols)
  752.                 padded7thnoteaprompt="$padded7thnote"
  753.                 printf "%*s\n\n" $(((${#padded7thnoteaprompt}+$COLUMNS)/2)) "$padded7thnoteaprompt"
  754.  
  755.                   tput sc
  756.                   tput ll
  757.                   echo
  758.                   echo
  759.                   echo
  760.                   echo
  761.                   COLUMNS=$(tput cols)
  762.                   range="|| ##0X || #00X || 000X || *00X  || **0X || ***X ||"
  763.                   printf "%*s\n\n" $(((${#range}+$COLUMNS)/2)) "$range"
  764.                   echo
  765.                   exit_footer
  766.                   tput rc
  767. }
  768.  
  769. menu_pad () {
  770.   # TOOL I STOLE / ADAPTED
  771.   #line='----------------------------------------'
  772.   #MENURIGHT="$2"
  773.   #printf "$1 %s %s \n" "${line:${#MENURIGHT}}" $MENURIGHT
  774.  
  775.   # TOOL I STOLE / ADAPTED
  776.   line='---------------------------------------------------'
  777.   MENURIGHT="$2"
  778.   MENULEFT="$1"
  779.   printf "$1 %s %s %s \n" "${line:${#MENULEFT}}""${line:${#MENURIGHT}}" "$MENURIGHT"
  780. }
  781.  
  782.  
  783. preset_pad () {
  784.   # TOOL I STOLE / ADAPTED
  785.   #line='----------------------------------------'
  786.   #MENURIGHT="$2"
  787.   #printf "$1 %s %s \n" "${line:${#MENURIGHT}}" $MENURIGHT
  788.  
  789.   # TOOL I STOLE / ADAPTED
  790.   line='----------'
  791.   MENURIGHT="$2"
  792.   MENULEFT="$1"
  793.   printf "$1 %s %s %s \n" "${line:${#MENULEFT}}""${line:${#MENURIGHT}}" "$MENURIGHT"
  794. }
  795. save_preset () {
  796.  
  797.   #IMPORT CURRENT VARIABLES
  798.   mapfile -t step1 < /usr/local/bin/onson/satelites/step1
  799.   mapfile -t step2 < /usr/local/bin/onson/satelites/step2
  800.   mapfile -t step3 < /usr/local/bin/onson/satelites/step3
  801.   mapfile -t step4 < /usr/local/bin/onson/satelites/step4
  802.   mapfile -t step5 < /usr/local/bin/onson/satelites/step5
  803.   mapfile -t step6 < /usr/local/bin/onson/satelites/step6
  804.   mapfile -t step7 < /usr/local/bin/onson/satelites/step7
  805.   mapfile -t step8 < /usr/local/bin/onson/satelites/step8
  806.   mapfile -t divide <  /usr/local/bin/onson/satelites/divide
  807.   mapfile -t direction <  /usr/local/bin/onson/satelites/direction
  808.   mapfile -t glide <  /usr/local/bin/onson/satelites/glide
  809.   mapfile -t length <  /usr/local/bin/onson/satelites/length
  810.   mapfile -t currentpreset <  /usr/local/bin/onson/satelites/currentpreset
  811.   mapfile -t currentbank <  /usr/local/bin/onson/satelites/currentbank
  812.  
  813.  
  814.   #MIDI CONVERSION
  815.  
  816.   if [ "$currentbank" = "A" ]
  817.     then
  818.     currentbankmidi="2"
  819.     fi
  820.  
  821.   if [ "$currentbank" = "B" ]
  822.     then
  823.     currentbankmidi="3"
  824.     fi
  825.  
  826.   echo "$currentbankmidi" > /usr/local/bin/onson/midi/satelites/currentbankmidi
  827.  
  828.   scalestring="##01 ##02 ##03 ##04 ##05 ##06 ##07 ##08 ##09 ##10 ##11 ##12 #001 #002 #003 #004 #005 #006 #007 #008 #009 #010 #011 #012 0001 0002 0003 0004 0005 0006 0007 0008 0009 0010 0011 0012 *001 *002 *003 *004 *005 *006 *007 *008 *009 *010 *011 *012 \*\*01 \*\*02 \*\*03 \*\*04 \*\*05 \*\*06 \*\*07 \*\*08 \*\*09 \*\*10 \*\*11 \*\*12 \*\*\*1 \*\*\*2 \*\*\*3 \*\*\*4 \*\*\*5 \*\*\*6 \*\*\*7"
  829.  
  830.   preconversionnames="step1 step2 step3 step4 step5 step6 step7 step8 divide direction glide length"
  831.  
  832.   conversionvalues=($midistep1 $midistep2 $midistep3 $midistep4 $midistep5 $midistep6 $midistep7 $midistep8 $mididivide $mididirection $midiglide $midilength)
  833.  
  834.   postconversionnames=(16 17 18 19 20 21 22 23 29 26 25 27)
  835.  
  836.   scalevalues=(00 02 03 05 07 09 11 13 15 18 20 21 23 26 28 30 32 34 35 37 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 73 75 77 79 82 83 85 87 88 91 92 95 97 98 100 102 103 105 107 109 110 113 114 115 118 120 121 123 124 126)
  837.  
  838.   w=0
  839.  
  840.   for i in $scalestring
  841.   do
  842.     if [ "$step1" = "$i" ]
  843.       then
  844.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep1
  845.       fi
  846.     if [ "$step2" = "$i" ]
  847.       then
  848.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep2
  849.     fi
  850.     if [ "$step3" = "$i" ]
  851.       then
  852.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep3
  853.     fi
  854.     if [ "$step4" = "$i" ]
  855.       then
  856.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep4
  857.     fi
  858.     if [ "$step5" = "$i" ]
  859.       then
  860.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep5
  861.     fi
  862.     if [ "$step6" = "$i" ]
  863.       then
  864.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep6
  865.     fi
  866.     if [ "$step7" = "$i" ]
  867.       then
  868.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep7
  869.     fi
  870.     if [ "$step8" = "$i" ]
  871.       then
  872.       echo ${scalevalues[$w]} > /usr/local/bin/onson/midi/satelites/midistep8
  873.     fi
  874.  
  875.     ((w++))
  876.   done
  877.  
  878.   echo $divide  > /usr/local/bin/onson/midi/satelites/mididivide
  879.   echo $direction  > /usr/local/bin/onson/midi/satelites/mididirection
  880.   echo $glide  > /usr/local/bin/onson/midi/satelites/midiglide
  881.   echo $length  > /usr/local/bin/onson/midi/satelites/midilength
  882.  
  883.   #PRESET CONVERSION
  884.  
  885.   mapfile -t midistep1 < /usr/local/bin/onson/midi/satelites/midistep1
  886.   mapfile -t midistep2 < /usr/local/bin/onson/midi/satelites/midistep2
  887.   mapfile -t midistep3 < /usr/local/bin/onson/midi/satelites/midistep3
  888.   mapfile -t midistep4 < /usr/local/bin/onson/midi/satelites/midistep4
  889.   mapfile -t midistep5 < /usr/local/bin/onson/midi/satelites/midistep5
  890.   mapfile -t midistep6 < /usr/local/bin/onson/midi/satelites/midistep6
  891.   mapfile -t midistep7 < /usr/local/bin/onson/midi/satelites/midistep7
  892.   mapfile -t midistep8 < /usr/local/bin/onson/midi/satelites/midistep8
  893.   mapfile -t mididirection < /usr/local/bin/onson/midi/satelites/mididirection
  894.   mapfile -t mididivide < /usr/local/bin/onson/midi/satelites/mididivide
  895.   mapfile -t midiglide < /usr/local/bin/onson/midi/satelites/midiglide
  896.   mapfile -t midilength < /usr/local/bin/onson/midi/satelites/midilength
  897.   mapfile -t currentbankmidi < /usr/local/bin/onson/midi/satelites/currentbankmidi
  898.   mapfile -t currentbank <  /usr/local/bin/onson/satelites/currentbank
  899.   mapfile -t currentpreset <  /usr/local/bin/onson/satelites/currentpreset
  900.   mapfile -t currentsong <  /usr/local/bin/onson/satelites/currentsong
  901.  
  902.  
  903.  
  904.   echo -e "#!/bin/bash
  905. sleep 0.3
  906. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE pc 111&>/dev/null &
  907. disown
  908. sleep 0.3
  909. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 16 $midistep1&>/dev/null &
  910. disown
  911. sleep 0.3
  912. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 17 $midistep2&>/dev/null &
  913. disown
  914. sleep 0.3
  915. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 18 $midistep3&>/dev/null &
  916. disown
  917. sleep 0.3
  918. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 19 $midistep4&>/dev/null &
  919. disown
  920. sleep 0.3
  921. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 20 $midistep5&>/dev/null &
  922. disown
  923. sleep 0.3
  924. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 21 $midistep6&>/dev/null &
  925. disown
  926. sleep 0.3
  927. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 22 $midistep7&>/dev/null &
  928. disown
  929. sleep 0.3
  930. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 23 $midistep8&>/dev/null &
  931. disown
  932. sleep 0.3
  933. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 23 $midistep8&>/dev/null &
  934. disown
  935. sleep 0.3
  936. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 29 $mididivide&>/dev/null &
  937. disown
  938. sleep 0.3
  939. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 26 $mididirection&>/dev/null &
  940. disown
  941. sleep 0.3
  942. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 25 $midiglide&>/dev/null &
  943. disown
  944. sleep 0.3
  945. nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 27 $midilength&>/dev/null &
  946. disown
  947. sleep 0.3" > /usr/local/bin/onson/midi/presets/"$currentsong$currentpreset$currentbank"
  948.  
  949.  
  950.  
  951.  
  952.  
  953.   #SAVE VARIABLES TO CURRENT PRESET
  954.   echo 'echo "'$currentsong'" > /usr/local/bin/onson/satelites/currentsong' > /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  955.   echo 'echo "'$currentpreset'" > /usr/local/bin/onson/satelites/currentpreset' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  956.   echo 'echo "'$currentbank'" > /usr/local/bin/onson/satelites/currentbank' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  957.   echo 'echo "'$step1'" > /usr/local/bin/onson/satelites/step1' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  958.   echo 'echo "'$step2'" > /usr/local/bin/onson/satelites/step2' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  959.   echo 'echo "'$step3'" > /usr/local/bin/onson/satelites/step3' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  960.   echo 'echo "'$step4'" > /usr/local/bin/onson/satelites/step4' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  961.   echo 'echo "'$step5'" > /usr/local/bin/onson/satelites/step5' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  962.   echo 'echo "'$step6'" > /usr/local/bin/onson/satelites/step6' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  963.   echo 'echo "'$step7'" > /usr/local/bin/onson/satelites/step7' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  964.   echo 'echo "'$step8'" > /usr/local/bin/onson/satelites/step8' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  965.   echo 'echo "'$divide'" > /usr/local/bin/onson/satelites/divide' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  966.   echo 'echo "'$direction'" > /usr/local/bin/onson/satelites/direction' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  967.   echo 'echo "'$glide'" > /usr/local/bin/onson/satelites/glide' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  968.   echo 'echo "'$length'" > /usr/local/bin/onson/satelites/length' >> /usr/local/bin/onson/presets/"$currentsong$currentpreset$currentbank"
  969.  
  970. nohup sudo chmod +x /usr/local/bin/onson/midi/presets/"$currentsong$currentpreset$currentbank"&> /dev/null &
  971. disown
  972. #nohup sudo sendmidi ch $currentbankmidi dev pisound MIDI PS-3NQ28DE cc 118 0 &>/dev/null & ## sets internal preset to bank 0 - which is all low D
  973. #disown
  974. nohup sudo sh /usr/local/bin/onson/midi/presets/"$currentsong$currentpreset$currentbank"&> /dev/null &
  975. disown
  976.  
  977.  
  978.  
  979.   }
  980. load_song () {
  981.  
  982.   mapfile -t currentsong <  /usr/local/bin/onson/satelites/currentsong
  983.   mapfile -t currentpreset <  /usr/local/bin/onson/satelites/currentpreset
  984.   mapfile -t currentbank <  /usr/local/bin/onson/satelites/currentbank
  985.   songfile="$currentsong$currentpreset$currentbank"
  986.   source /usr/local/bin/onson/presets/"$songfile"
  987.  
  988.  
  989. }
  990.  
  991. #PRINT OUTS
  992. print_bank () {
  993.   echo
  994.   COLUMNS=$(tput cols)
  995.   bankprompt="PICK A SEQUENCER."
  996.   printf "%*s\n" $(((${#bankprompt}+$COLUMNS)/2)) "$bankprompt"
  997.   echo
  998.   echo
  999.   echo
  1000.  
  1001.   paddedbanka=$(menu_pad 1. A)
  1002.   COLUMNS=$(tput cols)
  1003.   paddedaprompt="$paddedbanka"
  1004.   printf "%*s\n\n" $(((${#paddedaprompt}+$COLUMNS)/2)) "$paddedaprompt"
  1005.  
  1006.   paddedbankb=$(menu_pad 2. B)
  1007.   COLUMNS=$(tput cols)
  1008.   paddedbprompt="$paddedbankb"
  1009.   printf "%*s\n\n" $(((${#paddedbprompt}+$COLUMNS)/2)) "$paddedbprompt"
  1010.  
  1011.   paddedbankab=$(menu_pad 3. AB)
  1012.   COLUMNS=$(tput cols)
  1013.   paddedabprompt="$paddedbankab"
  1014.   printf "%*s\n\n" $(((${#paddedabprompt}+$COLUMNS)/2)) "$paddedabprompt"
  1015.  
  1016.  
  1017. }
  1018. print_song () {
  1019.   preset_header
  1020.   echo
  1021.  
  1022.  
  1023. }
  1024. print_main_menu () {
  1025.   mapfile -t step1 < /usr/local/bin/onson/satelites/step1
  1026.   mapfile -t step2 < /usr/local/bin/onson/satelites/step2
  1027.   mapfile -t step3 < /usr/local/bin/onson/satelites/step3
  1028.   mapfile -t step4 < /usr/local/bin/onson/satelites/step4
  1029.   mapfile -t step5 < /usr/local/bin/onson/satelites/step5
  1030.   mapfile -t step6 < /usr/local/bin/onson/satelites/step6
  1031.   mapfile -t step7 < /usr/local/bin/onson/satelites/step7
  1032.   mapfile -t step8 < /usr/local/bin/onson/satelites/step8
  1033.   mapfile -t divide < /usr/local/bin/onson/satelites/divide
  1034.   mapfile -t direction < /usr/local/bin/onson/satelites/direction
  1035.   mapfile -t glide < /usr/local/bin/onson/satelites/glide
  1036.   mapfile -t length < /usr/local/bin/onson/satelites/length
  1037.  
  1038.  
  1039.   allsteps="$step1 $step2 $step3 $step4 $step5 $step6 $step7 $step8"
  1040.   echo  $allsteps > /usr/local/bin/onson/satelites/allsteps
  1041.   echo
  1042.  
  1043.   paddedallsteps=$(menu_pad 1.STEPS "$allsteps")
  1044.   COLUMNS=$(tput cols)
  1045.   paddedallstepsprompt="$paddedallsteps"
  1046.   printf "%*s\n\n" $(((${#paddedallstepsprompt}+$COLUMNS)/2)) "$paddedallstepsprompt"
  1047.  
  1048.   #DIVIDE
  1049.           divname="TAP"
  1050.           paddeddivide=$(menu_pad 2.DIVIDE "$divname")
  1051.           COLUMNS=$(tput cols)
  1052.           paddeddivideprompt="$paddeddivide"
  1053.           printf "%*s\n\n" $(((${#paddeddivideprompt}+$COLUMNS)/2)) "$paddeddivideprompt"
  1054.  
  1055.   #DIRECTION
  1056.   currentdirnum="0 1 2 3 "
  1057.   currentdirname=(FORWARD REVERSE BOUNCE RANDOM)
  1058.   for i in $currentdirnum
  1059.     do
  1060.       if [ "$direction" = "$i" ]
  1061.         then
  1062.           ((arrayplace="$i"))
  1063.           dirname="${currentdirname[$arrayplace]}"
  1064.           paddeddirection=$(menu_pad 3.DIRECTION "$dirname")
  1065.           COLUMNS=$(tput cols)
  1066.           paddeddirectionprompt="$paddeddirection"
  1067.           printf "%*s\n\n" $(((${#paddeddirectionprompt}+$COLUMNS)/2)) "$paddeddirectionprompt"
  1068.       fi
  1069.       done
  1070.  
  1071.   paddedglide=$(menu_pad 4.GLIDE "$glide")
  1072.   COLUMNS=$(tput cols)
  1073.   paddedglideprompt="$paddedglide"
  1074.   printf "%*s\n\n" $(((${#paddedglideprompt}+$COLUMNS)/2)) "$paddedglideprompt"
  1075.  
  1076.   paddedlength=$(menu_pad 5.LENGTH $length)
  1077.   COLUMNS=$(tput cols)
  1078.   paddedlengthprompt="$paddedlength"
  1079.   printf "%*s\n\n" $(((${#paddedlengthprompt}+$COLUMNS)/2)) "$paddedlengthprompt"
  1080. }
  1081. print_steps () {
  1082.  
  1083.   paddedstep1=$(menu_pad 1. "$step1")
  1084.   COLUMNS=$(tput cols)
  1085.   paddedstep1prompt="$paddedstep1"
  1086.   printf "%*s\n\n" $(((${#paddedstep1prompt}+$COLUMNS)/2)) "$paddedstep1prompt"
  1087.  
  1088.   paddedstep2=$(menu_pad 2. "$step2")
  1089.   COLUMNS=$(tput cols)
  1090.   paddedstep2prompt="$paddedstep2"
  1091.   printf "%*s\n\n" $(((${#paddedstep2prompt}+$COLUMNS)/2)) "$paddedstep2prompt"
  1092.  
  1093.   paddedstep3=$(menu_pad 3. "$step3")
  1094.   COLUMNS=$(tput cols)
  1095.   paddedstep3prompt="$paddedstep3"
  1096.   printf "%*s\n\n" $(((${#paddedstep3prompt}+$COLUMNS)/2)) "$paddedstep3prompt"
  1097.  
  1098.   paddedstep4=$(menu_pad 4. "$step4")
  1099.   COLUMNS=$(tput cols)
  1100.   paddedstep4prompt="$paddedstep4"
  1101.   printf "%*s\n\n" $(((${#paddedstep4prompt}+$COLUMNS)/2)) "$paddedstep4prompt"
  1102.  
  1103.   paddedstep5=$(menu_pad 5. "$step5")
  1104.   COLUMNS=$(tput cols)
  1105.   paddedstep5prompt="$paddedstep5"
  1106.   printf "%*s\n\n" $(((${#paddedstep5prompt}+$COLUMNS)/2)) "$paddedstep5prompt"
  1107.  
  1108.   paddedstep6=$(menu_pad 6. "$step6")
  1109.   COLUMNS=$(tput cols)
  1110.   paddedstep6prompt="$paddedstep6"
  1111.   printf "%*s\n\n" $(((${#paddedstep6prompt}+$COLUMNS)/2)) "$paddedstep6prompt"
  1112.  
  1113.   paddedstep7=$(menu_pad 7. "$step7")
  1114.   COLUMNS=$(tput cols)
  1115.   paddedstep7prompt="$paddedstep7"
  1116.   printf "%*s\n\n" $(((${#paddedstep7prompt}+$COLUMNS)/2)) "$paddedstep7prompt"
  1117.  
  1118.   paddedstep8=$(menu_pad 8. "$step8")
  1119.   COLUMNS=$(tput cols)
  1120.   paddedstep8prompt="$paddedstep8"
  1121.   printf "%*s\n\n" $(((${#paddedstep8prompt}+$COLUMNS)/2)) "$paddedstep8prompt"
  1122.  
  1123.  
  1124.  
  1125. }
  1126. print_divide () {
  1127.       echo
  1128.  
  1129.       div0="OFF-1/4"
  1130.       div1="DOTTED-8TH"
  1131.       div2="1/4-TRIPLET"
  1132.       div3="8TH"
  1133.       div4="8TH-TRIPLET"
  1134.       div5="16TH"
  1135.       div6="32ND"
  1136.  
  1137.       paddeddiv0=$(menu_pad 1. "$div0")
  1138.       COLUMNS=$(tput cols)
  1139.       paddeddiv0prompt="$paddeddiv0"
  1140.       printf "%*s\n\n" $(((${#paddeddiv0}+$COLUMNS)/2)) "$paddeddiv0"
  1141.  
  1142.       paddeddiv1=$(menu_pad 2. "$div1")
  1143.       COLUMNS=$(tput cols)
  1144.       paddeddiv1prompt="$paddeddiv1"
  1145.       printf "%*s\n\n" $(((${#paddeddiv1}+$COLUMNS)/2)) "$paddeddiv1"
  1146.  
  1147.       paddeddiv2=$(menu_pad 3. "$div2")
  1148.       COLUMNS=$(tput cols)
  1149.       paddeddiv2prompt="$paddeddiv2"
  1150.       printf "%*s\n\n" $(((${#paddeddiv2}+$COLUMNS)/2)) "$paddeddiv2"
  1151.  
  1152.       paddeddiv3=$(menu_pad 4. "$div3")
  1153.       COLUMNS=$(tput cols)
  1154.       paddeddiv3prompt="$paddeddiv3"
  1155.       printf "%*s\n\n" $(((${#paddeddiv3}+$COLUMNS)/2)) "$paddeddiv3"
  1156.  
  1157.       paddeddiv4=$(menu_pad 5. "$div4")
  1158.       COLUMNS=$(tput cols)
  1159.       paddeddiv4prompt="$paddeddiv4"
  1160.       printf "%*s\n\n" $(((${#paddeddiv4}+$COLUMNS)/2)) "$paddeddiv4"
  1161.  
  1162.       paddeddiv5=$(menu_pad 6. "$div5")
  1163.       COLUMNS=$(tput cols)
  1164.       paddeddiv5prompt="$paddeddiv5"
  1165.       printf "%*s\n\n" $(((${#paddeddiv5}+$COLUMNS)/2)) "$paddeddiv5"
  1166.  
  1167.       paddeddiv6=$(menu_pad 7. "$div6")
  1168.       COLUMNS=$(tput cols)
  1169.       paddeddiv6prompt="$paddeddiv6"
  1170.       printf "%*s\n\n" $(((${#paddeddiv6}+$COLUMNS)/2)) "$paddeddiv6"
  1171.  
  1172.     }
  1173. print_direction () {
  1174.  
  1175.   dir0="FORWARD"
  1176.   dir1="REVERSE"
  1177.   dir2="BOUNCE"
  1178.   dir3="RANDOM"
  1179.  
  1180.   paddeddir0=$(menu_pad 1. "$dir0")
  1181.   COLUMNS=$(tput cols)
  1182.   paddeddir0prompt="$paddeddir0"
  1183.   printf "%*s\n\n" $(((${#paddeddir0}+$COLUMNS)/2)) "$paddeddir0"
  1184.  
  1185.   paddeddir1=$(menu_pad 2. "$dir1")
  1186.   COLUMNS=$(tput cols)
  1187.   paddeddir1prompt="$paddeddir1"
  1188.   printf "%*s\n\n" $(((${#paddeddir1}+$COLUMNS)/2)) "$paddeddir1"
  1189.  
  1190.   paddeddir2=$(menu_pad 3. "$dir2")
  1191.   COLUMNS=$(tput cols)
  1192.   paddeddir2prompt="$paddeddir2"
  1193.   printf "%*s\n\n" $(((${#paddeddir2}+$COLUMNS)/2)) "$paddeddir2"
  1194.  
  1195.   paddeddir3=$(menu_pad 4. "$dir3")
  1196.   COLUMNS=$(tput cols)
  1197.   paddeddir3prompt="$paddeddir3"
  1198.   printf "%*s\n\n" $(((${#paddeddir3}+$COLUMNS)/2)) "$paddeddir3"
  1199. }
  1200.  
  1201. #FOR A CARRIAGE RETURN
  1202. cr=`echo $'\n.'`
  1203. cr=${cr%.}
  1204.  
  1205. clear
  1206.  
  1207.   #IF MISSING CREATE SATALITE FILES BEFORE THE BIG LOOP
  1208.   mkdir -p /usr/local/bin/onson/presets
  1209.   mkdir -p /usr/local/bin/onson/satelites
  1210.   mkdir -p /usr/local/bin/onson/midi/satelites
  1211.   mkdir -p /usr/local/bin/onson/midi/presets
  1212.   touch  /usr/local/bin/onson/satelites/rootarrayplace
  1213.   touch  /usr/local/bin/onson/satelites/arrayplace
  1214.   touch  </usr/local/bin/onson/satelites/allsteps
  1215.   touch  /usr/local/bin/onson/satelites/step1
  1216.   touch  /usr/local/bin/onson/satelites/step2
  1217.   touch  /usr/local/bin/onson/satelites/step3
  1218.   touch  /usr/local/bin/onson/satelites/step4
  1219.   touch  /usr/local/bin/onson/satelites/step5
  1220.   touch  /usr/local/bin/onson/satelites/step6
  1221.   touch  /usr/local/bin/onson/satelites/step7
  1222.   touch  /usr/local/bin/onson/satelites/step8
  1223.   touch  /usr/local/bin/onson/satelites/divide
  1224.   touch  /usr/local/bin/onson/satelites/direction
  1225.   touch  /usr/local/bin/onson/satelites/glide
  1226.   touch  /usr/local/bin/onson/satelites/length
  1227.   touch  /usr/local/bin/onson/satelites/currentsong
  1228.   touch  /usr/local/bin/onson/satelites/currentpreset
  1229.   touch  /usr/local/bin/onson/satelites/currentbank
  1230.   touch  /usr/local/bin/onson/midi/satelites/midistep1
  1231.   touch  /usr/local/bin/onson/midi/satelites/midistep2
  1232.   touch  /usr/local/bin/onson/midi/satelites/midistep3
  1233.   touch  /usr/local/bin/onson/midi/satelites/midistep4
  1234.   touch  /usr/local/bin/onson/midi/satelites/midistep5
  1235.   touch  /usr/local/bin/onson/midi/satelites/midistep6
  1236.   touch  /usr/local/bin/onson/midi/satelites/midistep7
  1237.   touch  /usr/local/bin/onson/midi/satelites/midistep8
  1238.   touch  /usr/local/bin/onson/midi/satelites/mididivide
  1239.   touch  /usr/local/bin/onson/midi/satelites/mididirection
  1240.   touch  /usr/local/bin/onson/midi/satelites/midiglide
  1241.   touch  /usr/local/bin/onson/midi/satelites/midilength
  1242.   touch  /usr/local/bin/onson/midi/satelites/currentpreset
  1243.   touch  /usr/local/bin/onson/midi/satelites/currentbank
  1244.  
  1245.   mapfile -t currentsong < /usr/local/bin/onson/satelites/currentsong
  1246.   mapfile -t currentpreset < /usr/local/bin/onson/satelites/currentpreset
  1247.   mapfile -t currentbank < /usr/local/bin/onson/satelites/currentbank
  1248.  
  1249.  
  1250.  
  1251.   # THERE ARE LAYERS OF LOOPS HERE TO ROUTE BREAKS TO/FROM VARIOUIS
  1252.   # POINTS IN NAVIGATION
  1253.  
  1254.   # BIG LOOP 3
  1255.   while :
  1256.     do
  1257.  
  1258.       #BIG LOOP 2 -
  1259.       while :
  1260.         do
  1261.  
  1262.           #BIG LOOP 1 -
  1263.           while :
  1264.             do
  1265.               clear
  1266.               onson_header
  1267.               echo
  1268.               echo
  1269.               print_song
  1270.               song_footer
  1271.               center_read 4 songinput
  1272.  
  1273.               if [ "$songinput" -ge 0 ] && [ "$songinput" -eq "$songinput" ]
  1274.                 then
  1275.                   validsong="$songinput"
  1276.                   echo "$validsong" > /usr/local/bin/onson/satelites/currentsong
  1277.                   break
  1278.                 fi
  1279.               done
  1280.  
  1281.               #SMALL PRESET LOOP
  1282.               while :
  1283.                 do
  1284.  
  1285.                   clear
  1286.                   onson_header
  1287.                   echo
  1288.                   echo
  1289.                   print_song
  1290.                   preset_footer
  1291.                   center_read 2 presetinput
  1292.  
  1293.                   if [ "$presetinput" -ge 0 ] && [ "$presetinput" -eq "$presetinput" ]
  1294.                     then
  1295.                       validpreset="$presetinput"
  1296.                       echo "$validpreset" > /usr/local/bin/onson/satelites/currentpreset
  1297.                       break
  1298.                     fi
  1299.                   done
  1300.  
  1301.                     #BANK SELECTION
  1302.                         clear
  1303.                         onson_header
  1304.                         print_bank
  1305.                         menu_footer 3
  1306.                         center_read 1 bankinput
  1307.                         case $bankinput in
  1308.                           1)
  1309.                           bank="A"
  1310.                           echo "$bank" > /usr/local/bin/onson/satelites/currentbank
  1311.                           load_song
  1312.  
  1313.                           break # OUT OF SMALL PRESET LOOP
  1314.                           ;;
  1315.  
  1316.                           2)
  1317.                           bank="B"
  1318.                           echo "$bank" > /usr/local/bin/onson/satelites/currentbank
  1319.                           load_song
  1320.  
  1321.                           break # OUT OF SMALL PRESET LOOP
  1322.                           ;;
  1323.  
  1324.                           3)
  1325.                           bank="AB"
  1326.                           echo "$bank" > /usr/local/bin/onson/satelites/currentbank
  1327.                           load_song
  1328.                           break # OUT OF SMALL PRESET LOOP
  1329.                           ;;
  1330.  
  1331.                           *)
  1332.                           ;;
  1333.                         esac
  1334.  
  1335.               done #CLOSE SMALL PRESET LOOP
  1336.  
  1337.                       #SMALL MAIN MENU LOOP
  1338.                       while :
  1339.                         do
  1340.                               clear
  1341.                                bank_header
  1342.                                print_main_menu
  1343.                                menu_footer 5
  1344.                                center_read 1 menuselection
  1345.                            case $menuselection in
  1346.                               #STEPS
  1347.                               1)
  1348.  
  1349.                               clear
  1350.                                mapfile -t step1 </usr/local/bin/onson/satelites/step1
  1351.                                mapfile -t step2 </usr/local/bin/onson/satelites/step2
  1352.                                mapfile -t step3 </usr/local/bin/onson/satelites/step3
  1353.                                mapfile -t step4 </usr/local/bin/onson/satelites/step4
  1354.                                mapfile -t step5 </usr/local/bin/onson/satelites/step5
  1355.                                mapfile -t step6 </usr/local/bin/onson/satelites/step6
  1356.                                mapfile -t step7 </usr/local/bin/onson/satelites/step7
  1357.                                mapfile -t step8 </usr/local/bin/onson/satelites/step8
  1358.                                mapfile -t midistep1 < /usr/local/bin/onson/midi/satelites/midistep1
  1359.                                mapfile -t midistep2 < /usr/local/bin/onson/midi/satelites/midistep2
  1360.                                mapfile -t midistep3 < /usr/local/bin/onson/midi/satelites/midistep3
  1361.                                mapfile -t midistep4 < /usr/local/bin/onson/midi/satelites/midistep4
  1362.                                mapfile -t midistep5 < /usr/local/bin/onson/midi/satelites/midistep5
  1363.                                mapfile -t midistep6 < /usr/local/bin/onson/midi/satelites/midistep6
  1364.                                mapfile -t midistep7 < /usr/local/bin/onson/midi/satelites/midistep7
  1365.                                mapfile -t midistep8 < /usr/local/bin/onson/midi/satelites/midistep8
  1366.                               steps_body
  1367.  
  1368.  
  1369.                               ;;
  1370.  
  1371.                               #MENU ITEM # 2 - DIVISION
  1372.  
  1373.                               2)
  1374.                              mapfile -t currentbankmidi < /usr/local/bin/onson/midi/satelites/currentbankmidi
  1375.                             ((x++))
  1376.                             if [ "$x" -gt 6 ]
  1377.                             then
  1378.                             x=0
  1379.                             fi
  1380.                             divide="$x"
  1381.                             nohup sudo sendmidi ch "$currentbankmidi" dev pisound MIDI PS-3NQ28DE cc 29 "$divide"&>/dev/null &
  1382.                             disown
  1383.                             echo "$divide" > /usr/local/bin/onson/satelites/divide
  1384.  
  1385.  
  1386.                             ;;
  1387.  
  1388.                               3)
  1389.                               clear
  1390.                               mapfile -t direction </usr/local/bin/onson/satelites/direction
  1391.                               direction_body
  1392.  
  1393.  
  1394.                                # OUT OF BIG LOOP ONE
  1395.                               ;;
  1396.  
  1397.                               #MENU ITEM #4 - GLIDE
  1398.  
  1399.                               4)
  1400.                               clear
  1401.                               mapfile -t glide </usr/local/bin/onson/satelites/glide
  1402.                               glide_body
  1403.  
  1404.  
  1405.                                # OUT OF BIG LOOP ONE
  1406.                               ;;
  1407.  
  1408.                               #MENU ITEM #5 - LENGTH
  1409.  
  1410.                               5)
  1411.                               clear
  1412.                               mapfile -t length </usr/local/bin/onson/satelites/length
  1413.                               length_body
  1414.  
  1415.  
  1416.                                # OUT OF BIG LOOP ONE
  1417.                               ;;
  1418.  
  1419.                               *)
  1420.                               clear
  1421.                               break
  1422.                               ;;
  1423.                               #CLOSING MENU CASE
  1424.                             esac
  1425.  
  1426.                       done
  1427.                       #CLOSE SMALL MAIN MENU LOOP
  1428.             done
  1429.             #CLOSE BIG LOOP 1
  1430.  
  1431.           done
  1432.           #CLOSE BIG LOOP 2
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!