00001 /*************************************************************************** 00002 * Copyright (C) 2010 by Luigi Negretti Lanner * 00003 * luigi.negrettilanner@gmail.com * 00004 * * 00005 * This program is free software; you can redistribute it and/or modify * 00006 * it under the terms of the GNU General Public License as published by * 00007 * the Free Software Foundation; either version 2 of the License, or * 00008 * (at your option) any later version. * 00009 * * 00010 * This program is distributed in the hope that it will be useful, * 00011 * but WITHOUT ANY WARRANTY; without even the implied warranty of * 00012 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * 00013 * GNU General Public License for more details. * 00014 * * 00015 * You should have received a copy of the GNU General Public License * 00016 * along with this program; if not, write to the * 00017 * Free Software Foundation, Inc., * 00018 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * 00019 ***************************************************************************/ 00020 void ini_p13b() 00021 { 00022 init_p13b[0] = p13_1b->value(); 00023 init_p13b[1] = p13_2b->value(); 00024 init_p13b[2] = p13_3b->value(); 00025 init_p13b[3] = p13_4b->value(); 00026 init_p13b[4] = p13_5b->value(); 00027 init_p13b[5] = p13_6b->value(); 00028 init_p13b[6] = p13_7b->value(); 00029 init_p13b[7] = p13_8b->value(); 00030 init_p13b[8] = p13_9b->value(); 00031 init_p13b[9] = p13_10b->value(); 00032 init_p13b[10] = p13_11b->value(); 00033 init_p13b[11] = p13_12b->value(); 00034 } 00035 00036 void contrappunto::init_p13b_serie() 00037 { 00038 int i; 00039 ini_p13b(); 00040 for (i = 0; i < 12; i++) 00041 { 00042 serie_p13b[i] = init_p13b[i]; 00043 } 00044 } 00045 00046 //INITIALIZE SERIES<<<<<<<<< 00047 00048 //RETROGRADO>>>>>>>> 00049 00050 void contrappunto::retrop13b() 00051 { 00052 init_p13b_serie(); 00053 00054 int i; 00055 int s = 11; 00056 00057 for (i=0;i<12;i++) 00058 { 00059 serie_manip[i] = serie_p13b[s]; 00060 s--; 00061 } 00062 } 00063 00064 00065 void retro_p13b() 00066 { 00067 contrappunto ob; 00068 ob.retrop13b(); 00069 p13_1b->value(ob.serie_manip[0]); 00070 p13_2b->value(ob.serie_manip[1]); 00071 p13_3b->value(ob.serie_manip[2]); 00072 p13_4b->value(ob.serie_manip[3]); 00073 p13_5b->value(ob.serie_manip[4]); 00074 p13_6b->value(ob.serie_manip[5]); 00075 p13_7b->value(ob.serie_manip[6]); 00076 p13_8b->value(ob.serie_manip[7]); 00077 p13_9b->value(ob.serie_manip[8]); 00078 p13_10b->value(ob.serie_manip[9]); 00079 p13_11b->value(ob.serie_manip[10]); 00080 p13_12b->value(ob.serie_manip[11]); 00081 } 00082 00083 void retrop13b_cb(Fl_Widget*,void*) 00084 { 00085 retro_p13b(); 00086 } 00087 00088 //RETROGRADO<<<<< 00089 00090 //CROCE<<<<<<<<<<< 00091 00092 void contrappunto::crocep13b() 00093 { 00094 init_p13b_serie(); 00095 serie_manip[0] = serie_p13b[11]; 00096 serie_manip[1] = serie_p13b[0]; 00097 serie_manip[2] = serie_p13b[10]; 00098 serie_manip[3] = serie_p13b[1]; 00099 serie_manip[4] = serie_p13b[9]; 00100 serie_manip[5] = serie_p13b[2]; 00101 serie_manip[6] = serie_p13b[8]; 00102 serie_manip[7] = serie_p13b[3]; 00103 serie_manip[8] = serie_p13b[7]; 00104 serie_manip[9] = serie_p13b[4]; 00105 serie_manip[10] = serie_p13b[6]; 00106 serie_manip[11] = serie_p13b[5]; 00107 } 00108 00109 void croce_p13b() 00110 { 00111 contrappunto ob; 00112 ob.crocep13b(); 00113 p13_1b->value(ob.serie_manip[0]); 00114 p13_2b->value(ob.serie_manip[1]); 00115 p13_3b->value(ob.serie_manip[2]); 00116 p13_4b->value(ob.serie_manip[3]); 00117 p13_5b->value(ob.serie_manip[4]); 00118 p13_6b->value(ob.serie_manip[5]); 00119 p13_7b->value(ob.serie_manip[6]); 00120 p13_8b->value(ob.serie_manip[7]); 00121 p13_9b->value(ob.serie_manip[8]); 00122 p13_10b->value(ob.serie_manip[9]); 00123 p13_11b->value(ob.serie_manip[10]); 00124 p13_12b->value(ob.serie_manip[11]); 00125 } 00126 00127 void crocep13b_cb(Fl_Widget*,void*) 00128 { 00129 croce_p13b(); 00130 } 00131 00132 //CROCE<<<<<<<<<<<<<< 00133 00134 //SLIDE>>>>>>>>>>>>>> 00135 00136 void contrappunto::slidep13b() 00137 { 00138 init_p13b_serie(); 00139 int i, s; 00140 i = 0; 00141 s = 1; 00142 for (i=0;i<11;i++) 00143 { 00144 serie_manip[i] = serie_p13b[s]; 00145 s++; 00146 } 00147 serie_manip[11] = serie_p13b[0]; 00148 } 00149 00150 void slide_p13b() 00151 { 00152 contrappunto ob; 00153 ob.slidep13b(); 00154 p13_1b->value(ob.serie_manip[0]); 00155 p13_2b->value(ob.serie_manip[1]); 00156 p13_3b->value(ob.serie_manip[2]); 00157 p13_4b->value(ob.serie_manip[3]); 00158 p13_5b->value(ob.serie_manip[4]); 00159 p13_6b->value(ob.serie_manip[5]); 00160 p13_7b->value(ob.serie_manip[6]); 00161 p13_8b->value(ob.serie_manip[7]); 00162 p13_9b->value(ob.serie_manip[8]); 00163 p13_10b->value(ob.serie_manip[9]); 00164 p13_11b->value(ob.serie_manip[10]); 00165 p13_12b->value(ob.serie_manip[11]); 00166 } 00167 00168 void slidep13b_cb(Fl_Widget*,void*) 00169 { 00170 slide_p13b(); 00171 } 00172 00173 /////////////JUMP1 00174 00175 void contrappunto::jump_onep13b() 00176 { 00177 init_p13b_serie(); 00178 serie_manip[0] = serie_p13b[1]; 00179 serie_manip[1] = serie_p13b[3]; 00180 serie_manip[2] = serie_p13b[5]; 00181 serie_manip[3] = serie_p13b[7]; 00182 serie_manip[4] = serie_p13b[9]; 00183 serie_manip[5] = serie_p13b[11]; 00184 serie_manip[6] = serie_p13b[0]; 00185 serie_manip[7] = serie_p13b[2]; 00186 serie_manip[8] = serie_p13b[4]; 00187 serie_manip[9] = serie_p13b[6]; 00188 serie_manip[10] = serie_p13b[8]; 00189 serie_manip[11] = serie_p13b[10]; 00190 } 00191 00192 void jumpone_p13b() 00193 { 00194 contrappunto ob; 00195 ob.jump_onep13b(); 00196 p13_1b->value(ob.serie_manip[0]); 00197 p13_2b->value(ob.serie_manip[1]); 00198 p13_3b->value(ob.serie_manip[2]); 00199 p13_4b->value(ob.serie_manip[3]); 00200 p13_5b->value(ob.serie_manip[4]); 00201 p13_6b->value(ob.serie_manip[5]); 00202 p13_7b->value(ob.serie_manip[6]); 00203 p13_8b->value(ob.serie_manip[7]); 00204 p13_9b->value(ob.serie_manip[8]); 00205 p13_10b->value(ob.serie_manip[9]); 00206 p13_11b->value(ob.serie_manip[10]); 00207 p13_12b->value(ob.serie_manip[11]); 00208 00209 } 00210 00211 void jumpOnep13b_cb(Fl_Widget*,void*) 00212 { 00213 jumpone_p13b(); 00214 } 00215