T.R | Title | User | Personal Name | Date | Lines |
---|
2112.1 | use basic to calculate it | ANT::JANZEN | cf. ANT::CIRCUITS,ANT::UWAVES | Tue Sep 05 1989 18:06 | 27 |
| If you use basic, you can calculate the whole thing.
The ratio of two consecutive semitones in the tempered scale is
2**(1/12). So you can make a loop from A 440:
dim scale(12)
for semitone=0 to 12 step 1
scale(semitone)=2**(semitone/12)*440
next semitone
The order of names is:
A
A# Bb
B
C
C# Db
D
D# Eb
E
F
F# Gb
G
G# Ab
A
Tom
|
2112.2 | Send Mailstop and Two Boxtops... | DRUMS::FEHSKENS | | Wed Sep 06 1989 12:13 | 11 |
| I have been meaning for some time to put together a chart of MIDI
note numbers, piano key numbers, note names and nominal (A440)
frequencies. I have a chart from of frequencies/ note names and
piano key numbers from the American Institute of Physics Handbook
which I can copy and send to you.
len.
|
2112.3 | Scale.Bas for VAX Basic | ANT::JANZEN | cf. ANT::CIRCUITS,ANT::UWAVES | Wed Sep 06 1989 13:20 | 76 |
| %TITLE "ScaleList"
%IDENT "V01.00"
PROGRAM ScaleList
!++
! FACILITY:
!
! ScaleList
!
! FUNCTIONAL DESCRIPTION:
!
! Calculates and displays MIDI note number, frequency, and note name
!
! IMPLICIT INPUTS:
!
! none
!
! IMPLICIT OUTPUTS:
!
! Prints to screen a list of note names, midi key numbers, and frequencies
!
! SIDE EFFECTS:
!
! none
!
! AUTHOR:
!
! Thomas E. Janzen
!
! CREATION DATE: 06-SEP-1989
!
! MODIFICATION HISTORY:
!
!--
%PAGE
%SBTTL "Declarations"
!+
! Local Constants
!-
DECLARE REAL CONSTANT LOWC = 16.3516, A440 = 440.0
DECLARE INTEGER CONSTANT NOTESPEROCTAVE = 12, TopnoteinOctave=11,TopOctave=7
!+
! Local Functions
!-
!+
! Local Variables
!-
DECLARE REAL PITCH
DECLARE REAL TemperedScale(0 TO TopOctave, 0 TO TopNoteInOctave)
DECLARE STRING NoteNames(0 TO TopNoteInOctave)
%PAGE
RESTORE
FOR Pitch = 0 to TopNoteInOctave
READ NoteNames(Pitch)
Next Pitch
FOR Octave = 0 TO TopOctave STEP 1
FOR Pitch = 0 TO NotesPerOctave-1 STEP 1
TemperedScale(TopOctave,Pitch)=LOWC*2**(((Octave*NotesPerOctave)+Pitch)/12)
print "MIDI: ";Octave*NotesPerOctave + Pitch + 12;
PRINT "Pitch: ";NoteNames(Pitch);Octave;
print "Frequency: ";temperedscale(topoctave,pitch)
NEXT Pitch
NEXT Octave
DATA "C ", "C#", "D ", "D#", "E ", "F ", "F#", "G ", "G#", "A ", "A#", "B "
END PROGRAM 1
|
2112.4 | List of notes and frequencies | ANT::JANZEN | cf. ANT::CIRCUITS,ANT::UWAVES | Wed Sep 06 1989 13:22 | 98 |
|
MIDI: 12 Pitch: C 0 Frequency: 16.3516
MIDI: 13 Pitch: C# 0 Frequency: 17.3239
MIDI: 14 Pitch: D 0 Frequency: 18.3541
MIDI: 15 Pitch: D# 0 Frequency: 19.4454
MIDI: 16 Pitch: E 0 Frequency: 20.6017
MIDI: 17 Pitch: F 0 Frequency: 21.8268
MIDI: 18 Pitch: F# 0 Frequency: 23.1247
MIDI: 19 Pitch: G 0 Frequency: 24.4997
MIDI: 20 Pitch: G# 0 Frequency: 25.9565
MIDI: 21 Pitch: A 0 Frequency: 27.5
MIDI: 22 Pitch: A# 0 Frequency: 29.1352
MIDI: 23 Pitch: B 0 Frequency: 30.8677
MIDI: 24 Pitch: C 1 Frequency: 32.7032
MIDI: 25 Pitch: C# 1 Frequency: 34.6478
MIDI: 26 Pitch: D 1 Frequency: 36.7081
MIDI: 27 Pitch: D# 1 Frequency: 38.8909
MIDI: 28 Pitch: E 1 Frequency: 41.2035
MIDI: 29 Pitch: F 1 Frequency: 43.6535
MIDI: 30 Pitch: F# 1 Frequency: 46.2493
MIDI: 31 Pitch: G 1 Frequency: 48.9994
MIDI: 32 Pitch: G# 1 Frequency: 51.9131
MIDI: 33 Pitch: A 1 Frequency: 55
MIDI: 34 Pitch: A# 1 Frequency: 58.2705
MIDI: 35 Pitch: B 1 Frequency: 61.7354
MIDI: 36 Pitch: C 2 Frequency: 65.4064
MIDI: 37 Pitch: C# 2 Frequency: 69.2957
MIDI: 38 Pitch: D 2 Frequency: 73.4162
MIDI: 39 Pitch: D# 2 Frequency: 77.7818
MIDI: 40 Pitch: E 2 Frequency: 82.4069
MIDI: 41 Pitch: F 2 Frequency: 87.3071
MIDI: 42 Pitch: F# 2 Frequency: 92.4986
MIDI: 43 Pitch: G 2 Frequency: 97.9989
MIDI: 44 Pitch: G# 2 Frequency: 103.826
MIDI: 45 Pitch: A 2 Frequency: 110
MIDI: 46 Pitch: A# 2 Frequency: 116.541
MIDI: 47 Pitch: B 2 Frequency: 123.471
MIDI: 48 Pitch: C 3 Frequency: 130.813
MIDI: 49 Pitch: C# 3 Frequency: 138.591
MIDI: 50 Pitch: D 3 Frequency: 146.832
MIDI: 51 Pitch: D# 3 Frequency: 155.564
MIDI: 52 Pitch: E 3 Frequency: 164.814
MIDI: 53 Pitch: F 3 Frequency: 174.614
MIDI: 54 Pitch: F# 3 Frequency: 184.997
MIDI: 55 Pitch: G 3 Frequency: 195.998
MIDI: 56 Pitch: G# 3 Frequency: 207.652
MIDI: 57 Pitch: A 3 Frequency: 220
MIDI: 58 Pitch: A# 3 Frequency: 233.082
MIDI: 59 Pitch: B 3 Frequency: 246.942
MIDI: 60 Pitch: C 4 Frequency: 261.626
MIDI: 61 Pitch: C# 4 Frequency: 277.183
MIDI: 62 Pitch: D 4 Frequency: 293.665
MIDI: 63 Pitch: D# 4 Frequency: 311.127
MIDI: 64 Pitch: E 4 Frequency: 329.628
MIDI: 65 Pitch: F 4 Frequency: 349.228
MIDI: 66 Pitch: F# 4 Frequency: 369.994
MIDI: 67 Pitch: G 4 Frequency: 391.996
MIDI: 68 Pitch: G# 4 Frequency: 415.305
MIDI: 69 Pitch: A 4 Frequency: 440
MIDI: 70 Pitch: A# 4 Frequency: 466.164
MIDI: 71 Pitch: B 4 Frequency: 493.883
MIDI: 72 Pitch: C 5 Frequency: 523.251
MIDI: 73 Pitch: C# 5 Frequency: 554.365
MIDI: 74 Pitch: D 5 Frequency: 587.33
MIDI: 75 Pitch: D# 5 Frequency: 622.254
MIDI: 76 Pitch: E 5 Frequency: 659.255
MIDI: 77 Pitch: F 5 Frequency: 698.456
MIDI: 78 Pitch: F# 5 Frequency: 739.989
MIDI: 79 Pitch: G 5 Frequency: 783.991
MIDI: 80 Pitch: G# 5 Frequency: 830.609
MIDI: 81 Pitch: A 5 Frequency: 880
MIDI: 82 Pitch: A# 5 Frequency: 932.328
MIDI: 83 Pitch: B 5 Frequency: 987.767
MIDI: 84 Pitch: C 6 Frequency: 1046.5
MIDI: 85 Pitch: C# 6 Frequency: 1108.73
MIDI: 86 Pitch: D 6 Frequency: 1174.66
MIDI: 87 Pitch: D# 6 Frequency: 1244.51
MIDI: 88 Pitch: E 6 Frequency: 1318.51
MIDI: 89 Pitch: F 6 Frequency: 1396.91
MIDI: 90 Pitch: F# 6 Frequency: 1479.98
MIDI: 91 Pitch: G 6 Frequency: 1567.98
MIDI: 92 Pitch: G# 6 Frequency: 1661.22
MIDI: 93 Pitch: A 6 Frequency: 1760
MIDI: 94 Pitch: A# 6 Frequency: 1864.66
MIDI: 95 Pitch: B 6 Frequency: 1975.53
MIDI: 96 Pitch: C 7 Frequency: 2093
MIDI: 97 Pitch: C# 7 Frequency: 2217.46
MIDI: 98 Pitch: D 7 Frequency: 2349.32
MIDI: 99 Pitch: D# 7 Frequency: 2489.02
MIDI: 100 Pitch: E 7 Frequency: 2637.02
MIDI: 101 Pitch: F 7 Frequency: 2793.83
MIDI: 102 Pitch: F# 7 Frequency: 2959.96
MIDI: 103 Pitch: G 7 Frequency: 3135.96
MIDI: 104 Pitch: G# 7 Frequency: 3322.44
MIDI: 105 Pitch: A 7 Frequency: 3520
MIDI: 106 Pitch: A# 7 Frequency: 3729.31
MIDI: 107 Pitch: B 7 Frequency: 3951.07
Tom
|
2112.5 | thanx for info | CSC32::GLAUNER | | Wed Sep 06 1989 14:59 | 5 |
| All this INFO is great, what a great notes file also.
This kind of stuff really gets my interest going.
Thanks again
Ray
|
2112.6 | But.. | WELSWS::GIBSON | Alan Gibson @WLO | Fri Sep 08 1989 06:17 | 3 |
| Be aware that some book/magazines/computer programs are based, not
on A=440 Hz, but C=256 Hz. This makes some calculations easier,
but is flatter than A=440 by about half a semitone.
|
2112.7 | | KOBAL::DICKSON | | Fri Sep 08 1989 10:36 | 2 |
| There is also a general trend to tuning slightly higher than A=440.
I've heard of some european orchestras doing this.
|
2112.8 | It never made sense to me | CSC32::MOLLER | Nightmare on Sesame Street | Fri Sep 08 1989 12:22 | 3 |
| Maybe that's why the MT-32 has it's A tuned to 442.0 hz
Jens
|
2112.9 | Yamaha would never do *that*... | DCSVAX::COTE | Another day, another segue... | Fri Sep 08 1989 13:53 | 5 |
| Methinks A442 is Roland's 'standard'.
Makes their synths stand out a bit...
Edd
|
2112.10 | They Think They're Really Sharp! | DRUMS::FEHSKENS | | Fri Sep 08 1989 14:39 | 4 |
| Yes, Roland standard pitch is A442. Only Roland knows why...
len.
|
2112.11 | | KOBAL::DICKSON | | Fri Sep 08 1989 15:10 | 1 |
| My new Casio uses 442 as well for its built-in noises.
|
2112.12 | What's crush depth on a pianoforte? | GUESS::YERAZUNIS | Reverse-engineering the future. | Thu Sep 14 1989 18:46 | 13 |
| I have _heard_ that the definition of A has been creeping steadily
sharper for the last five hundred years AT LEAST. Many very old
instruments (especially stringed instruments) cannot be brought
into tune with current concert pitch of A-440. Their frames were
designed at for concert pitches of up to a fourth lower than A-440
and the harps cannot withstand the additional string tension needed.
A friend who was heavily into harpsichords knew of at least one very
old (and valuable) harpsichord that was retuned to A-440 and imploded...
-Bill
|