BUSCA-ACORDES 1.0 Versión PIANO

"); document.write("

Mostrando: "+chordName+"

"); document.write("

"+notes+"

"); document.write("

"); document.write(""); document.write(""); document.write(""); document.write(""); document.write("

"); document.write(""); // init key values to spaces var note_1_value = "  "; var note_2_value = "  "; var note_3_value = "  "; var note_4_value = "  "; var note_5_value = "  "; var note_6_value = "  "; var note_7_value = "  "; var note_8_value = "  "; var note_9_value = "  "; var note_10_value = "  "; var note_11_value = "  "; var note_12_value = "  "; var note_13_value = "  "; var note_14_value = "  "; var note_15_value = "  "; var note_16_value = "  "; var note_17_value = "  "; var note_18_value = "  "; var note_19_value = "  "; var note_20_value = "  "; var note_21_value = "  "; var note_22_value = "  "; var note_23_value = "  "; var note_24_value = "  "; var note_25_value = "  "; var note_26_value = "  "; var note_27_value = "  "; var note_28_value = "  "; var note_29_value = "  "; var note_30_value = "  "; var note_31_value = "  "; var note_32_value = "  "; var note_33_value = "  "; var note_34_value = "  "; var note_35_value = "  "; var note_36_value = "  "; for (x=0;x"); // paint keyboard lines 1-3 document.write("
 ___________________________________________________________________________________
| |   |   | | |   |   |   | | |   |   | | |   |   |   | | |   |   | | |   |   |   | |
| |   |   | | |   |   |   | | |   |   | | |   |   |   | | |   |   | | |   |   |   | |
"); // paint line 4 (Sharp/flat notes or spaces) document.write("| | "+note_2_value+"| "+note_4_value+"| | | "+note_7_value+"| "+note_9_value+"| "+note_11_value+"| | | "+note_14_value+"| "+note_16_value+"| | | "+note_19_value+"| "+note_21_value+"| "+note_23_value+"| | | "+note_26_value+"| "+note_28_value+"| | | "+note_31_value+"| "+note_33_value+"| "+note_35_value+"| |
"); // paint line 5-8 document.write("| |___|___| | |___|___|___| | |___|___| | |___|___|___| | |___|___| | |___|___|___| |
|   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |
|   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |
|   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |   |
"); // paint line 9 (Natural notes or spaces) document.write("| "+note_1_value+"| "+note_3_value+"| "+note_5_value+"| "+note_6_value+"| "+note_8_value+"| "+note_10_value+"| "+note_12_value+"| "+note_13_value+"| "+note_15_value+"| "+note_17_value+"| "+note_18_value+"| "+note_20_value+"| "+note_22_value+"| "+note_24_value+"| "+note_25_value+"| "+note_27_value+"| "+note_29_value+"| "+note_30_value+"| "+note_32_value+"| "+note_34_value+"| "+note_36_value+"|
"); // paint line 10 document.write("|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|___|
"); //end page document.write("

"); document.write(""); document.write("
Hosted by www.Geocities.ws

"); } function find_chord(parms){ var myRoot = find_chord.arguments[0]; var myChordFormula = find_chord.arguments[1].split(','); var notesArray = new Array; notesArray[0] = myRoot; for(i=0;i<(myChordFormula.length);i++){ var tempIndex = (parseInt(notesArray[i]) + parseInt(myChordFormula[i])) //if (tempIndex > 12) tempIndex=tempIndex%12; notesArray[i+1] = tempIndex; } return notesArray; } function searchChordNotes(note){ note = note+''; var flag = false; for(j=0;j

 

 

 

 

 

 

 

©2003 Willie Gonzalez
Para preguntas o comentarios acerca de este programa, mándame un email aqui

Hosted by www.Geocities.ws

1