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_p10() 00021 { 00022 init_p10[0] = p10_1->value(); 00023 init_p10[1] = p10_2->value(); 00024 init_p10[2] = p10_3->value(); 00025 init_p10[3] = p10_4->value(); 00026 init_p10[4] = p10_5->value(); 00027 init_p10[5] = p10_6->value(); 00028 init_p10[6] = p10_7->value(); 00029 init_p10[7] = p10_8->value(); 00030 init_p10[8] = p10_9->value(); 00031 init_p10[9] = p10_10->value(); 00032 init_p10[10] = p10_11->value(); 00033 init_p10[11] = p10_12->value(); 00034 } 00035 00036 void contrappunto::init_p10_serie() 00037 { 00038 int i; 00039 ini_p10(); 00040 for (i = 0; i < 12; i++) 00041 { 00042 serie_p10[i] = init_p10[i]; 00043 } 00044 } 00045 00046 //INITIALIZE SERIES<<<<<<<<< 00047 00048 //RETROGRADO>>>>>>>> 00049 00050 void contrappunto::retrop10() 00051 { 00052 init_p10_serie(); 00053 00054 int i; 00055 int s = 11; 00056 00057 for (i=0;i<12;i++) 00058 { 00059 serie_manip[i] = serie_p10[s]; 00060 s--; 00061 } 00062 } 00063 00064 00065 void retro_p10() 00066 { 00067 contrappunto ob; 00068 ob.retrop10(); 00069 p10_1->value(ob.serie_manip[0]); 00070 p10_2->value(ob.serie_manip[1]); 00071 p10_3->value(ob.serie_manip[2]); 00072 p10_4->value(ob.serie_manip[3]); 00073 p10_5->value(ob.serie_manip[4]); 00074 p10_6->value(ob.serie_manip[5]); 00075 p10_7->value(ob.serie_manip[6]); 00076 p10_8->value(ob.serie_manip[7]); 00077 p10_9->value(ob.serie_manip[8]); 00078 p10_10->value(ob.serie_manip[9]); 00079 p10_11->value(ob.serie_manip[10]); 00080 p10_12->value(ob.serie_manip[11]); 00081 } 00082 00083 void retrop10_cb(Fl_Widget*,void*) 00084 { 00085 retro_p10(); 00086 } 00087 00088 //RETROGRADO<<<<< 00089 00090 //CROCE<<<<<<<<<<< 00091 00092 00093 void contrappunto::crocep10() 00094 { 00095 init_p10_serie(); 00096 serie_manip[0] = serie_p10[11]; 00097 serie_manip[1] = serie_p10[0]; 00098 serie_manip[2] = serie_p10[10]; 00099 serie_manip[3] = serie_p10[1]; 00100 serie_manip[4] = serie_p10[9]; 00101 serie_manip[5] = serie_p10[2]; 00102 serie_manip[6] = serie_p10[8]; 00103 serie_manip[7] = serie_p10[3]; 00104 serie_manip[8] = serie_p10[7]; 00105 serie_manip[9] = serie_p10[4]; 00106 serie_manip[10] = serie_p10[6]; 00107 serie_manip[11] = serie_p10[5]; 00108 } 00109 00110 00111 void croce_p10() 00112 { 00113 contrappunto ob; 00114 ob.crocep10(); 00115 p10_1->value(ob.serie_manip[0]); 00116 p10_2->value(ob.serie_manip[1]); 00117 p10_3->value(ob.serie_manip[2]); 00118 p10_4->value(ob.serie_manip[3]); 00119 p10_5->value(ob.serie_manip[4]); 00120 p10_6->value(ob.serie_manip[5]); 00121 p10_7->value(ob.serie_manip[6]); 00122 p10_8->value(ob.serie_manip[7]); 00123 p10_9->value(ob.serie_manip[8]); 00124 p10_10->value(ob.serie_manip[9]); 00125 p10_11->value(ob.serie_manip[10]); 00126 p10_12->value(ob.serie_manip[11]); 00127 } 00128 00129 void crocep10_cb(Fl_Widget*,void*) 00130 { 00131 croce_p10(); 00132 } 00133 00134 //CROCE<<<<<<<<<<<<<< 00135 00136 //SLIDE>>>>>>>>>>>>>> 00137 00138 void contrappunto::slidep10() 00139 { 00140 init_p10_serie(); 00141 int i, s; 00142 i = 0; 00143 s = 1; 00144 for (i=0;i<11;i++) 00145 { 00146 serie_manip[i] = serie_p10[s]; 00147 s++; 00148 } 00149 serie_manip[11] = serie_p10[0]; 00150 } 00151 00152 void slide_p10() 00153 { 00154 contrappunto ob; 00155 ob.slidep10(); 00156 p10_1->value(ob.serie_manip[0]); 00157 p10_2->value(ob.serie_manip[1]); 00158 p10_3->value(ob.serie_manip[2]); 00159 p10_4->value(ob.serie_manip[3]); 00160 p10_5->value(ob.serie_manip[4]); 00161 p10_6->value(ob.serie_manip[5]); 00162 p10_7->value(ob.serie_manip[6]); 00163 p10_8->value(ob.serie_manip[7]); 00164 p10_9->value(ob.serie_manip[8]); 00165 p10_10->value(ob.serie_manip[9]); 00166 p10_11->value(ob.serie_manip[10]); 00167 p10_12->value(ob.serie_manip[11]); 00168 } 00169 00170 void slidep10_cb(Fl_Widget*,void*) 00171 { 00172 slide_p10(); 00173 } 00174 00175 /////////////JUMP1 00176 00177 void contrappunto::jump_onep10() 00178 { 00179 init_p10_serie(); 00180 serie_manip[0] = serie_p10[1]; 00181 serie_manip[1] = serie_p10[3]; 00182 serie_manip[2] = serie_p10[5]; 00183 serie_manip[3] = serie_p10[7]; 00184 serie_manip[4] = serie_p10[9]; 00185 serie_manip[5] = serie_p10[11]; 00186 serie_manip[6] = serie_p10[0]; 00187 serie_manip[7] = serie_p10[2]; 00188 serie_manip[8] = serie_p10[4]; 00189 serie_manip[9] = serie_p10[6]; 00190 serie_manip[10] = serie_p10[8]; 00191 serie_manip[11] = serie_p10[10]; 00192 } 00193 00194 00195 void jumpone_p10() 00196 { 00197 contrappunto ob; 00198 ob.jump_onep10(); 00199 p10_1->value(ob.serie_manip[0]); 00200 p10_2->value(ob.serie_manip[1]); 00201 p10_3->value(ob.serie_manip[2]); 00202 p10_4->value(ob.serie_manip[3]); 00203 p10_5->value(ob.serie_manip[4]); 00204 p10_6->value(ob.serie_manip[5]); 00205 p10_7->value(ob.serie_manip[6]); 00206 p10_8->value(ob.serie_manip[7]); 00207 p10_9->value(ob.serie_manip[8]); 00208 p10_10->value(ob.serie_manip[9]); 00209 p10_11->value(ob.serie_manip[10]); 00210 p10_12->value(ob.serie_manip[11]); 00211 00212 } 00213 00214 void jumpOnep10_cb(Fl_Widget*,void*) 00215 { 00216 jumpone_p10(); 00217 } 00218 00219 00220 00221 ///////////JUMP1 00222