[f40a309] | 1 | /*
|
---|
| 2 | =============================================================================
|
---|
| 3 | pix2mid.c -- convert cursor position to MIDI note number and score time
|
---|
| 4 | Version 9 -- 1988-10-27 -- D.N. Lynx Crowe
|
---|
| 5 | =============================================================================
|
---|
| 6 | */
|
---|
| 7 |
|
---|
[b28a12e] | 8 | #include "ram.h"
|
---|
[f40a309] | 9 |
|
---|
| 10 | #define PCENTER 256 /* pixel offset of 0 time line */
|
---|
| 11 |
|
---|
[7258c6a] | 12 | int16_t mpixtab[52][4] = { /* pixel to MIDI note for the white keys */
|
---|
[f40a309] | 13 |
|
---|
| 14 | /* [0] = center pixel, [1] = MIDI note, [2] = sharp tag, [3] = flat tag */
|
---|
| 15 |
|
---|
| 16 | { 1, 108, 0, 0}, /* 8C 00 -- 0 */
|
---|
| 17 |
|
---|
| 18 |
|
---|
| 19 | { 5, 107, 0, 1}, /* 7B 00 -- 1 */
|
---|
| 20 | { 9, 105, 1, 1}, /* 7A 00 -- 2 */
|
---|
| 21 | { 13, 103, 1, 1}, /* 7G 00 -- 3 */
|
---|
| 22 | { 17, 101, 1, 0}, /* 7F 00 -- 4 */
|
---|
| 23 |
|
---|
| 24 | { 21, 100, 0, 1}, /* 7E 00 -- 5 */
|
---|
| 25 | { 25, 98, 1, 1}, /* 7D 00 -- 6 */
|
---|
| 26 | { 29, 96, 1, 0}, /* 7C 00 -- 7 */
|
---|
| 27 |
|
---|
| 28 |
|
---|
| 29 | { 33, 95, 0, 1}, /* 6B 00 -- 8 */
|
---|
| 30 | { 37, 93, 1, 1}, /* 6A 00 -- 9 */
|
---|
| 31 | { 41, 91, 1, 1}, /* 6G 00 -- 10 */
|
---|
| 32 | { 45, 89, 1, 0}, /* 6F 00 -- 11 */
|
---|
| 33 |
|
---|
| 34 | { 49, 88, 0, 1}, /* 6E 00 -- 12 */
|
---|
| 35 | { 53, 86, 1, 1}, /* 6D 00 -- 13 */
|
---|
| 36 | { 57, 84, 1, 0}, /* 6C 00 -- 14 */
|
---|
| 37 |
|
---|
| 38 |
|
---|
| 39 | { 61, 83, 0, 1}, /* 5B 00 -- 15 */
|
---|
| 40 | { 65, 81, 1, 1}, /* 5A 00 -- 16 */
|
---|
| 41 | { 69, 79, 1, 1}, /* 5G 00 -- 17 */
|
---|
| 42 | { 73, 77, 1, 0}, /* 5F 00 -- 18 */
|
---|
| 43 |
|
---|
| 44 | { 77, 76, 0, 1}, /* 5E 00 -- 19 */
|
---|
| 45 | { 81, 74, 1, 1}, /* 5D 00 -- 20 */
|
---|
| 46 | { 85, 72, 1, 0}, /* 5C 00 -- 21 */
|
---|
| 47 |
|
---|
| 48 | { 89, 71, 0, 1}, /* 4B 00 -- 22 */
|
---|
| 49 | { 93, 69, 1, 1}, /* 4A 00 -- 23 */
|
---|
| 50 | { 97, 67, 1, 1}, /* 4G 00 -- 24 */
|
---|
| 51 | {101, 65, 1, 0}, /* 4F 00 -- 25 */
|
---|
| 52 |
|
---|
| 53 | {105, 64, 0, 1}, /* 4E 00 -- 26 */
|
---|
| 54 | {109, 62, 1, 1}, /* 4D 00 -- 27 */
|
---|
| 55 | {113, 60, 1, 0}, /* 4C 00 -- 28 -- Middle C */
|
---|
| 56 |
|
---|
| 57 | {117, 59, 0, 1}, /* 3B 00 -- 29 */
|
---|
| 58 | {121, 57, 1, 1}, /* 3A 00 -- 30 */
|
---|
| 59 | {125, 55, 1, 1}, /* 3G 00 -- 31 */
|
---|
| 60 | {129, 53, 1, 0}, /* 3F 00 -- 32 */
|
---|
| 61 |
|
---|
| 62 | {133, 52, 0, 1}, /* 3E 00 -- 33 */
|
---|
| 63 | {137, 50, 1, 1}, /* 3D 00 -- 34 */
|
---|
| 64 | {141, 48, 1, 0}, /* 3C 00 -- 35 */
|
---|
| 65 |
|
---|
| 66 |
|
---|
| 67 | {145, 47, 0, 1}, /* 2B 00 -- 36 */
|
---|
| 68 | {149, 45, 1, 1}, /* 2A 00 -- 37 */
|
---|
| 69 | {153, 43, 1, 1}, /* 2G 00 -- 38 */
|
---|
| 70 | {157, 41, 1, 0}, /* 2F 00 -- 39 */
|
---|
| 71 |
|
---|
| 72 | {161, 40, 0, 1}, /* 2E 00 -- 40 */
|
---|
| 73 | {165, 38, 1, 1}, /* 2D 00 -- 41 */
|
---|
| 74 | {169, 36, 1, 0}, /* 2C 00 -- 42 */
|
---|
| 75 |
|
---|
| 76 |
|
---|
| 77 | {173, 35, 0, 1}, /* 1B 00 -- 43 */
|
---|
| 78 | {177, 33, 1, 1}, /* 1A 00 -- 44 */
|
---|
| 79 | {181, 31, 1, 1}, /* 1G 00 -- 45 */
|
---|
| 80 | {185, 29, 1, 0}, /* 1F 00 -- 46 */
|
---|
| 81 |
|
---|
| 82 | {189, 28, 0, 1}, /* 1E 00 -- 47 */
|
---|
| 83 | {193, 26, 1, 1}, /* 1D 00 -- 48 */
|
---|
| 84 | {197, 24, 1, 0}, /* 1C 00 -- 49 */
|
---|
| 85 |
|
---|
| 86 |
|
---|
| 87 | {201, 23, 0, 1}, /* 0B 00 -- 50 */
|
---|
| 88 | {205, 21, 1, 0} /* 0A 00 -- 51 */
|
---|
| 89 | };
|
---|
| 90 |
|
---|
| 91 | /*
|
---|
| 92 | =============================================================================
|
---|
| 93 | pix2mid() -- convert (px, py) to MIDI note and score time
|
---|
| 94 | =============================================================================
|
---|
| 95 | */
|
---|
| 96 |
|
---|
[7258c6a] | 97 | int16_t pix2mid(void)
|
---|
[f40a309] | 98 | {
|
---|
[7258c6a] | 99 | register int16_t i, cy, mpc;
|
---|
| 100 | register int32_t ct;
|
---|
[f40a309] | 101 |
|
---|
| 102 | cnote = -1;
|
---|
| 103 | ctime = -1L;
|
---|
| 104 | cflag = -1;
|
---|
| 105 | mpc = ac_code EQ N_SHARP ? 2 : 3;
|
---|
| 106 |
|
---|
[7258c6a] | 107 | ct = t_cur + ((int32_t)cxval - (int32_t)PCENTER);
|
---|
[f40a309] | 108 |
|
---|
| 109 | if (ct < 0L)
|
---|
| 110 | return(FAILURE);
|
---|
| 111 |
|
---|
| 112 | ctime = ct;
|
---|
| 113 | cy = cyval - 14;
|
---|
| 114 |
|
---|
| 115 | for (i = 0; i < 52; i++) {
|
---|
| 116 |
|
---|
| 117 | if ((cy GE mpixtab[i][0]) AND
|
---|
| 118 | (cy LE mpixtab[i][0] + 2)) {
|
---|
| 119 |
|
---|
| 120 | cnote = mpixtab[i][1];
|
---|
| 121 | cflag = mpixtab[i][mpc];
|
---|
| 122 | break;
|
---|
| 123 | }
|
---|
| 124 | }
|
---|
| 125 |
|
---|
| 126 | return((cnote EQ -1L) ? FAILURE : SUCCESS);
|
---|
| 127 | }
|
---|
[6262b5c] | 128 |
|
---|