Changeset 7258c6a in buchla-68k for ram/ptselbx.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/ptselbx.c
r0292fbb r7258c6a 43 43 */ 44 44 45 extern short cnvp2c(void);46 extern short dec2fr(char*s);47 48 extern u nsigned exp_c(unsignedc);49 50 extern short CurLine;51 52 extern short cents;53 extern short cmtype;54 extern short cxval;55 extern short cyval;56 extern short hitcx;57 extern short hitcy;58 extern short stccol;59 extern short stcrow;60 extern short submenu;61 extern short vtccol;62 extern short vtcrow;63 64 extern short ndvals[];65 66 extern u nsigned*obj11;45 extern int16_t cnvp2c(void); 46 extern int16_t dec2fr(int8_t *s); 47 48 extern uint16_t exp_c(uint16_t c); 49 50 extern int16_t CurLine; 51 52 extern int16_t cents; 53 extern int16_t cmtype; 54 extern int16_t cxval; 55 extern int16_t cyval; 56 extern int16_t hitcx; 57 extern int16_t hitcy; 58 extern int16_t stccol; 59 extern int16_t stcrow; 60 extern int16_t submenu; 61 extern int16_t vtccol; 62 extern int16_t vtcrow; 63 64 extern int16_t ndvals[]; 65 66 extern uint16_t *obj11; 67 67 68 68 extern struct selbox *csbp; 69 69 extern struct selbox *curboxp; 70 70 71 extern char*smdata[];72 extern char*ssdata[];73 extern char*stdata[];74 extern char*trdata[];75 76 short ptfnbox(short n);77 78 /* 79 80 */ 81 82 short ptegood; /* pte buffer -- entire entry valid flag */83 84 short ptedfok; /* pte buffer -- def valid flag */85 short ptestok; /* pte buffer -- stm valid flag */86 short ptedsok; /* pte buffer -- destination valid flag */87 short ptedtok; /* pte buffer -- datum valid flag */88 89 short ptedef; /* pte buffer -- definer number */90 short ptestm; /* pte buffer -- stimulus number */91 short ptespec; /* pte buffer -- address type */92 short ptesuba; /* pte buffer -- sub-address */93 short ptedat1; /* pte buffer -- data word 1 */94 short ptedat2; /* pte buffer -- data word 2 */95 96 short ptedftp; /* definer / stimulus entry flag */97 98 short ptedfst; /* current definer/stimulus data entry format */99 short ptedest; /* current destination data entry format */100 short ptedata; /* current datum data entry format */101 102 short ptemenu; /* current submenu highlighting */103 104 short pteset; /* pte buffer setup flag */105 short ptbflag; /* pdbuf setup flag */106 107 short ptecpos; /* current patch entry index */108 short ptepred; /* predecessor entry index */109 short ptesucc; /* successor entry index */71 extern int8_t *smdata[]; 72 extern int8_t *ssdata[]; 73 extern int8_t *stdata[]; 74 extern int8_t *trdata[]; 75 76 int16_t ptfnbox(int16_t n); 77 78 /* 79 80 */ 81 82 int16_t ptegood; /* pte buffer -- entire entry valid flag */ 83 84 int16_t ptedfok; /* pte buffer -- def valid flag */ 85 int16_t ptestok; /* pte buffer -- stm valid flag */ 86 int16_t ptedsok; /* pte buffer -- destination valid flag */ 87 int16_t ptedtok; /* pte buffer -- datum valid flag */ 88 89 int16_t ptedef; /* pte buffer -- definer number */ 90 int16_t ptestm; /* pte buffer -- stimulus number */ 91 int16_t ptespec; /* pte buffer -- address type */ 92 int16_t ptesuba; /* pte buffer -- sub-address */ 93 int16_t ptedat1; /* pte buffer -- data word 1 */ 94 int16_t ptedat2; /* pte buffer -- data word 2 */ 95 96 int16_t ptedftp; /* definer / stimulus entry flag */ 97 98 int16_t ptedfst; /* current definer/stimulus data entry format */ 99 int16_t ptedest; /* current destination data entry format */ 100 int16_t ptedata; /* current datum data entry format */ 101 102 int16_t ptemenu; /* current submenu highlighting */ 103 104 int16_t pteset; /* pte buffer setup flag */ 105 int16_t ptbflag; /* pdbuf setup flag */ 106 107 int16_t ptecpos; /* current patch entry index */ 108 int16_t ptepred; /* predecessor entry index */ 109 int16_t ptesucc; /* successor entry index */ 110 110 111 111 struct patch ptebuf; /* pte buffer -- patch table format */ 112 112 113 charptdebuf[50]; /* patch edit buffer */114 115 /* 116 117 */ 118 119 char*rawdfst[] = { /* def/stm field initial contents */113 int8_t ptdebuf[50]; /* patch edit buffer */ 114 115 /* 116 117 */ 118 119 int8_t *rawdfst[] = { /* def/stm field initial contents */ 120 120 121 121 "Key 001 1 01", … … 125 125 }; 126 126 127 char*rawdest[] = { /* destination field initial contents */127 int8_t *rawdest[] = { /* destination field initial contents */ 128 128 129 129 "??????? 00 ??", /* ?????? 00 */ … … 160 160 */ 161 161 162 char*rawmode[] = { "Frq ", "Pch ", "Int ", "Rat " }; /* oscillator modes */163 char*rawmdat[] = { "00.1 ", "0C 00", "+0000", "1/1 " }; /* oscillator data */164 165 short omtabl[] = { PSO_FRQ, PSO_PCH, PSO_INT, PSO_RAT }; /* oscillator modes */166 short omdtab[] = { 2, 320, 0, 0 }; /* oscillator data */167 short omftab[] = { 6, 7, 4, 5 }; /* mode data format */168 169 char*rawfpud[] = { "PchWh", "+0.00", "00001", "\2400.00", "Start" };170 171 short fpudtab[] = { SM_HTPW, 0, 1, 0, 1 };172 short fpuetab[] = { 11, 1, 2, 3, 9 };173 174 short dfsttab[] = { 0x0000, 0x8000, 0x1100, 0x1180 };175 176 short defcols[] = { 2, 6, 7, 8}; /* def data entry columns */177 short stmcols[] = { 15, 19, 20, 21}; /* stm data entry columns */178 179 short dstcols[] = { /* destination data entry columns */162 int8_t *rawmode[] = { "Frq ", "Pch ", "Int ", "Rat " }; /* oscillator modes */ 163 int8_t *rawmdat[] = { "00.1 ", "0C 00", "+0000", "1/1 " }; /* oscillator data */ 164 165 int16_t omtabl[] = { PSO_FRQ, PSO_PCH, PSO_INT, PSO_RAT }; /* oscillator modes */ 166 int16_t omdtab[] = { 2, 320, 0, 0 }; /* oscillator data */ 167 int16_t omftab[] = { 6, 7, 4, 5 }; /* mode data format */ 168 169 int8_t *rawfpud[] = { "PchWh", "+0.00", "00001", "\2400.00", "Start" }; 170 171 int16_t fpudtab[] = { SM_HTPW, 0, 1, 0, 1 }; 172 int16_t fpuetab[] = { 11, 1, 2, 3, 9 }; 173 174 int16_t dfsttab[] = { 0x0000, 0x8000, 0x1100, 0x1180 }; 175 176 int16_t defcols[] = { 2, 6, 7, 8}; /* def data entry columns */ 177 int16_t stmcols[] = { 15, 19, 20, 21}; /* stm data entry columns */ 178 179 int16_t dstcols[] = { /* destination data entry columns */ 180 180 181 181 /* -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 */ … … 183 183 }; 184 184 185 short dfsttp[] = { 1, 1, 2, 3 }; /* def/stm formats */186 187 short datasrc[] = {185 int16_t dfsttp[] = { 1, 1, 2, 3 }; /* def/stm formats */ 186 187 int16_t datasrc[] = { 188 188 189 189 SM_HTPW, SM_VTMW, SM_LPBR, SM_PED1, SM_CTL1, … … 195 195 */ 196 196 197 short destype[] = { /* destination type table */197 int16_t destype[] = { /* destination type table */ 198 198 199 199 PA_KEY, -1, PA_TRG, PA_PLS, PA_LED, … … 208 208 }; 209 209 210 chardestfmt[] = { /* destination data entry format table */210 int8_t destfmt[] = { /* destination data entry format table */ 211 211 212 212 0, -1, 1, 2, 3, /* 1 .. 5 */ … … 218 218 }; 219 219 220 chardatafmt[] = { /* datum data entry format table */220 int8_t datafmt[] = { /* datum data entry format table */ 221 221 222 222 8, -1, 9, 8, 14, … … 232 232 */ 233 233 234 chardesdatf[] = { /* data entry default flags */234 int8_t desdatf[] = { /* data entry default flags */ 235 235 236 236 2, 0, 2, 2, 1, … … 242 242 }; 243 243 244 short desdat1[] = { /* data word 1 defaults */244 int16_t desdat1[] = { /* data word 1 defaults */ 245 245 246 246 0, 0, 0, 0, 0, … … 252 252 }; 253 253 254 short desdat2[] = { /* data word 2 defaults */254 int16_t desdat2[] = { /* data word 2 defaults */ 255 255 256 256 0, 0, 1, 0, 0, … … 266 266 */ 267 267 268 char*rawdata[] = {268 int8_t *rawdata[] = { 269 269 270 270 "Trans", " ", "Start", "Trans", "000 ", … … 276 276 }; 277 277 278 charhilitab[][8] = { /* submenu highlight table */278 int8_t hilitab[][8] = { /* submenu highlight table */ 279 279 280 280 /* start, width, row1, row2, row3, row4, row5, pad */ … … 308 308 */ 309 309 310 void hilitpm( charn)310 void hilitpm(int8_t n) 311 311 { 312 register short chr, h, v, w;312 register int16_t chr, h, v, w; 313 313 314 314 ptemenu = n; /* set current submenu type */ … … 468 468 */ 469 469 470 void movectc( short r, short c)470 void movectc(int16_t r, int16_t c) 471 471 { 472 472 ctcpos(r, c); … … 480 480 */ 481 481 482 void endpsm( short row, short col)482 void endpsm(int16_t row, int16_t col) 483 483 { 484 484 submenu = FALSE; … … 503 503 */ 504 504 505 void edefstm( short du, short n)505 void edefstm(int16_t du, int16_t n) 506 506 { 507 short chan, port, stim;508 register short i, left, right;509 register longltemp;507 int16_t chan, port, stim; 508 register int16_t i, left, right; 509 register int32_t ltemp; 510 510 511 511 #if DEBUGIT … … 662 662 */ 663 663 664 void ptdest( short du)664 void ptdest(int16_t du) 665 665 { 666 register longltemp;667 register short i, left, right, stim;668 short port, chan;666 register int32_t ltemp; 667 register int16_t i, left, right, stim; 668 int16_t port, chan; 669 669 670 670 #if DEBUGIT … … 905 905 */ 906 906 907 void setsubm( short r, short c)907 void setsubm(int16_t r, int16_t c) 908 908 { 909 909 submenu = TRUE; … … 922 922 */ 923 923 924 short ptfnbox(short n)924 int16_t ptfnbox(int16_t n) 925 925 { 926 register short i, box, ptd, ptt;927 register longltemp;926 register int16_t i, box, ptd, ptt; 927 register int32_t ltemp; 928 928 929 929 if (NOT submenu) { /* PATCH DATA ENTRY LINE */ … … 1041 1041 } 1042 1042 1043 ptedat2 = tofpu((u nsigned short)ltemp);1043 ptedat2 = tofpu((uint16_t)ltemp); 1044 1044 epatch(); /* enter -- time */ 1045 1045 return(SUCCESS);
Note:
See TracChangeset
for help on using the changeset viewer.