Changeset 7258c6a in buchla-68k for ram/showcfg.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/showcfg.c
r0292fbb r7258c6a 31 31 /* external functions */ 32 32 33 extern u nsigned exp_c(unsignedc);33 extern uint16_t exp_c(uint16_t c); 34 34 35 35 extern void enterit(void); 36 extern void idpoint( short x, short y, short pen);36 extern void idpoint(int16_t x, int16_t y, int16_t pen); 37 37 extern void nokey(void); 38 38 39 extern short et_mcfn(short n);40 extern short ef_mcfn(short n);41 extern short rd_mcfn(short n);42 extern short nd_mcfn(short n, short k);43 extern short et_mwsn(short nn);44 extern short ef_mwsn(short nn);45 extern short rd_mwsn(short nn);46 extern short nd_mwsn(short nn, short k);39 extern int16_t et_mcfn(int16_t n); 40 extern int16_t ef_mcfn(int16_t n); 41 extern int16_t rd_mcfn(int16_t n); 42 extern int16_t nd_mcfn(int16_t n, int16_t k); 43 extern int16_t et_mwsn(int16_t nn); 44 extern int16_t ef_mwsn(int16_t nn); 45 extern int16_t rd_mwsn(int16_t nn); 46 extern int16_t nd_mwsn(int16_t nn, int16_t k); 47 47 48 48 /* forward references */ 49 49 50 short imfnbox(short n);50 int16_t imfnbox(int16_t n); 51 51 52 52 /* … … 56 56 /* variables defined elsewhere */ 57 57 58 extern void (*point)( short x, short y, short pen);58 extern void (*point)(int16_t x, int16_t y, int16_t pen); 59 59 /* point plotting function pointer */ 60 60 extern void (*x_key)(void); /* "X" key handler pointer */ 61 61 62 extern short LftEdge; /* left edge of current box */63 extern short TopEdge; /* top edge of current box */64 extern short RgtEdge; /* right edge of current box */65 extern short BotEdge; /* bottom edge of current box */66 67 extern short curslim; /* cursor changeover point */68 extern short curvce; /* currently edited voice */69 extern short hitbox; /* selected box number */70 extern short hitcx; /* selection cursor x value */71 extern short hitcy; /* selection cursor y value */72 extern short stccol; /* text cursor column */73 extern short stcrow; /* text cursor row */74 extern short wcflag; /* ws/cf menu select flag (cf=0, ws=1) */75 extern short wcmcol; /* ws/cf menu label column */76 extern short wcmrow; /* ws/cf menu label row */77 extern short wcpage; /* ws/cf menu page */78 extern short wmcsel; /* ws slot select */79 extern short wmctag; /* ws/cf display update flag */80 81 extern u nsigned*instob; /* instrument display object pointer */62 extern int16_t LftEdge; /* left edge of current box */ 63 extern int16_t TopEdge; /* top edge of current box */ 64 extern int16_t RgtEdge; /* right edge of current box */ 65 extern int16_t BotEdge; /* bottom edge of current box */ 66 67 extern int16_t curslim; /* cursor changeover point */ 68 extern int16_t curvce; /* currently edited voice */ 69 extern int16_t hitbox; /* selected box number */ 70 extern int16_t hitcx; /* selection cursor x value */ 71 extern int16_t hitcy; /* selection cursor y value */ 72 extern int16_t stccol; /* text cursor column */ 73 extern int16_t stcrow; /* text cursor row */ 74 extern int16_t wcflag; /* ws/cf menu select flag (cf=0, ws=1) */ 75 extern int16_t wcmcol; /* ws/cf menu label column */ 76 extern int16_t wcmrow; /* ws/cf menu label row */ 77 extern int16_t wcpage; /* ws/cf menu page */ 78 extern int16_t wmcsel; /* ws slot select */ 79 extern int16_t wmctag; /* ws/cf display update flag */ 80 81 extern uint16_t *instob; /* instrument display object pointer */ 82 82 83 83 extern struct octent *idoct; /* object control table pointer */ … … 130 130 */ 131 131 132 short patctab[MAXPAT] = { /* pattern colors */132 int16_t patctab[MAXPAT] = { /* pattern colors */ 133 133 134 134 0, /* 1 */ … … 173 173 */ 174 174 175 short pat[MAXPAT][16] = { /* configuration pattern elements */175 int16_t pat[MAXPAT][16] = { /* configuration pattern elements */ 176 176 177 177 {0x0000, 0x0000, 0x0000, 0x0000, /* 1 */ … … 367 367 */ 368 368 369 void putpat( short pn, short px, short py, short patc)369 void putpat(int16_t pn, int16_t px, int16_t py, int16_t patc) 370 370 { 371 register short xp, yp, pr, pc;372 register u nsignedpw;371 register int16_t xp, yp, pr, pc; 372 register uint16_t pw; 373 373 374 374 if (v_regs[5] & 0x0180) … … 408 408 */ 409 409 410 void dispcfg( short nn)410 void dispcfg(int16_t nn) 411 411 { 412 register short i, np;413 short idbuf[8];414 register char*cfgdat, *cfp;412 register int16_t i, np; 413 int16_t idbuf[8]; 414 register int8_t *cfgdat, *cfp; 415 415 416 416 if (v_regs[5] & 0x0180) … … 444 444 */ 445 445 446 void showcfg( short nn)446 void showcfg(int16_t nn) 447 447 { 448 448 LftEdge = LFT_EDGE; … … 472 472 */ 473 473 474 void dispws( short ws)474 void dispws(int16_t ws) 475 475 { 476 register u nsigned*wsp;477 register short i, x, y;478 charbuf[64];476 register uint16_t *wsp; 477 register int16_t i, x, y; 478 int8_t buf[64]; 479 479 480 480 if (ws GE NUMWAVS) /* number must be valid */ … … 507 507 */ 508 508 509 void wcmenu( short wc)509 void wcmenu(int16_t wc) 510 510 { 511 register short i;512 charbuf[32];511 register int16_t i; 512 int8_t buf[32]; 513 513 514 514 wcflag = wc; /* set menu page type */ … … 612 612 */ 613 613 614 short imfnbox(short n)614 int16_t imfnbox(int16_t n) 615 615 { 616 register short row, col;616 register int16_t row, col; 617 617 618 618 row = hitcy / 14;
Note:
See TracChangeset
for help on using the changeset viewer.