Changeset 7258c6a in buchla-68k for ram/etiosc.c
- Timestamp:
- 07/09/2017 04:45:34 PM (7 years ago)
- Branches:
- master
- Children:
- 8618599
- Parents:
- 0292fbb
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ram/etiosc.c
r0292fbb r7258c6a 20 20 21 21 extern void advicur(void); 22 extern void dosync( short vce);23 24 extern char *strcpy(char *s1, char*s2);22 extern void dosync(int16_t vce); 23 24 extern int8_t *strcpy(int8_t *s1, int8_t *s2); 25 25 26 26 /* variables defined elsewhere */ 27 27 28 extern short stcrow, stccol, curvce;29 30 extern short idbox[][8];31 32 extern u nsigned*instob;33 34 extern chardspbuf[];28 extern int16_t stcrow, stccol, curvce; 29 30 extern int16_t idbox[][8]; 31 32 extern uint16_t *instob; 33 34 extern int8_t dspbuf[]; 35 35 36 36 extern struct instdef vbufs[]; 37 37 38 extern short cents, bform;38 extern int16_t cents, bform; 39 39 40 40 /* … … 45 45 46 46 /* C C# D D# E F F# G G# A A# B */ 47 short notes[] = {2, 2, 3, 3, 4, 5, 5, 6, 6, 0, 0, 1};47 int16_t notes[] = {2, 2, 3, 3, 4, 5, 5, 6, 6, 0, 0, 1}; 48 48 49 49 /* A B C D E F G */ 50 short pitches[] = { 900, 1100, 0, 200, 400, 500, 700};50 int16_t pitches[] = { 900, 1100, 0, 200, 400, 500, 700}; 51 51 52 52 #include "ratio.h" /* short ratio[]; */ 53 53 54 54 /* C C# D D# E F F# G G# A A# B */ 55 short sharps[] = {7, 9, 7, 9, 7, 7, 9, 7, 9, 7, 9, 7};56 57 short shrpflt[] = { 0, -100, 100};58 59 charsfdsp[] = {' ', D_FLAT, D_SHARP};60 61 static charintstr[] = "+0000";62 static charratstr[] = "1/1";63 static charfrqstr[] = "00.0";64 static charpchstr[] = "0C 00";65 66 short ndvals[10] = {0, 0, 1200, 1902, 2400, 2786, 3102, 3369, 3600, 3804};55 int16_t sharps[] = {7, 9, 7, 9, 7, 7, 9, 7, 9, 7, 9, 7}; 56 57 int16_t shrpflt[] = { 0, -100, 100}; 58 59 int8_t sfdsp[] = {' ', D_FLAT, D_SHARP}; 60 61 static int8_t intstr[] = "+0000"; 62 static int8_t ratstr[] = "1/1"; 63 static int8_t frqstr[] = "00.0"; 64 static int8_t pchstr[] = "0C 00"; 65 66 int16_t ndvals[10] = {0, 0, 1200, 1902, 2400, 2786, 3102, 3369, 3600, 3804}; 67 67 68 68 … … 77 77 */ 78 78 79 void int2rat( short rat)80 { 81 register short den, inum, num;79 void int2rat(int16_t rat) 80 { 81 register int16_t den, inum, num; 82 82 83 83 ebuf[0] = '1'; … … 112 112 */ 113 113 114 void cnvc2p( char *buf, short cv)115 { 116 short rem, tmp;114 void cnvc2p(int8_t *buf, int16_t cv) 115 { 116 int16_t rem, tmp; 117 117 118 118 cv -= 160; … … 147 147 */ 148 148 149 short cnvp2c(void)149 int16_t cnvp2c(void) 150 150 { 151 151 if (ebuf[0] EQ 9) /* high limit is C9 00 */ … … 174 174 */ 175 175 176 short et_iosc(short nn)176 int16_t et_iosc(int16_t nn) 177 177 { 178 178 register struct instdef *ip; 179 register short val, ctl, fh, fl, v;179 register int16_t val, ctl, fh, fl, v; 180 180 181 181 v = (nn >> 8) & 0x03; … … 258 258 */ 259 259 260 void setoval(struct instdef *ip, short v, short val)260 void setoval(struct instdef *ip, int16_t v, int16_t val) 261 261 { 262 262 switch (v) { … … 301 301 */ 302 302 303 short ef_iosc(short nn)303 int16_t ef_iosc(int16_t nn) 304 304 { 305 305 register struct instdef *ip; 306 register short v, i, tmp;306 register int16_t v, i, tmp; 307 307 308 308 v = (nn >> 8) & 3; … … 375 375 */ 376 376 377 short rd_iosc(short nn)377 int16_t rd_iosc(int16_t nn) 378 378 { 379 379 register struct instdef *ip; 380 register short val, ctl, fh, fl, v;381 short n;382 charocs;380 register int16_t val, ctl, fh, fl, v; 381 int16_t n; 382 int8_t ocs; 383 383 384 384 v = (nn >> 8) & 0x03; … … 475 475 */ 476 476 477 void setoscb( short n, short v)477 void setoscb(int16_t n, int16_t v) 478 478 { 479 479 register struct instdef *ip; 480 register short bfm, ctl, val;481 register charocs;480 register int16_t bfm, ctl, val; 481 register int8_t ocs; 482 482 483 483 ip = &vbufs[curvce]; … … 594 594 */ 595 595 596 void setosyn( short n, short v, short t)596 void setosyn(int16_t n, int16_t v, int16_t t) 597 597 { 598 598 register struct instdef *ip; 599 register char*sc;599 register int8_t *sc; 600 600 601 601 ip = &vbufs[curvce]; … … 647 647 */ 648 648 649 short nd_iosc(short nn, short k)650 { 651 register short v, n;649 int16_t nd_iosc(int16_t nn, int16_t k) 650 { 651 register int16_t v, n; 652 652 653 653 n = nn & 0xFF;
Note:
See TracChangeset
for help on using the changeset viewer.