#define note(pitch,len) .db pitch \ .dw len \
;; Note Values ;;

;; Octave 0 ;;
c0	.EQU	1056
cs0	.EQU	997
d0	.EQU	941
ds0	.EQU	888
e0	.EQU	838
f0	.EQU	791
fs0	.EQU	747
g0	.EQU	705
gs0	.EQU	665
a0	.EQU	628
as0	.EQU	593
b0	.EQU	559

;; Octave 1 ;;
c1	.EQU	528
cs1	.EQU	498
d1	.EQU	470
ds1	.EQU	444
e1	.EQU	419
f1	.EQU	396
fs1	.EQU	373
g1	.EQU	352
gs1	.EQU	333
a1	.EQU	314
as1	.EQU	296
b1	.EQU	280

;; Octave 2 ;;
c2	.EQU	264
cs2	.EQU	249
d2	.EQU	235
ds2	.EQU	222
e2	.EQU	210
f2	.EQU	198
fs2	.EQU	187
g2	.EQU	176
gs2	.EQU	166
a2	.EQU	157
as2	.EQU	148
b2	.EQU	140

;; Octave 3 ;;
c3	.EQU	132
cs3	.EQU	125
d3	.EQU	117
ds3	.EQU	110
e3	.EQU	104
f3	.EQU	098
fs3	.EQU	093
g3	.EQU	088
gs3	.EQU	083
a3	.EQU	078
as3	.EQU	074
b3	.EQU	070

;; Octave 4 ;;
c4	.EQU	066
cs4	.EQU	062
d4	.EQU	059
ds4	.EQU	055
e4	.EQU	052
f4	.EQU	049
fs4	.EQU	047
g4	.EQU	044
gs4	.EQU	042
a4	.EQU	039
as4	.EQU	037
b4	.EQU	035

;; Octave 5 ;;

c5	.EQU	033
cs5	.EQU	031
d5	.EQU	030
ds5	.EQU	028
e5	.EQU	026
f5	.EQU	025
fs5	.EQU	024
g5	.EQU	022
gs5	.EQU	021
a5	.EQU	020
as5	.EQU	019
b5	.EQU	018