Changeset 7258c6a in buchla-68k for ram/sqexec.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/sqexec.c
r0292fbb r7258c6a 34 34 #endif 35 35 36 extern u nsigned setsr(unsignedsr);37 extern longrand24(void);38 39 extern chartrgtab[];40 41 extern short curslin;42 extern short dsp_ok;43 extern short ndisp;44 45 extern u nsigned short seqdupd;46 47 extern u nsigned*obj10;48 49 extern int cg3[][256];36 extern uint16_t setsr(uint16_t sr); 37 extern int32_t rand24(void); 38 39 extern int8_t trgtab[]; 40 41 extern int16_t curslin; 42 extern int16_t dsp_ok; 43 extern int16_t ndisp; 44 45 extern uint16_t seqdupd; 46 47 extern uint16_t *obj10; 48 49 extern int16_t cg3[][256]; 50 50 51 51 extern struct wordq ptefifo; 52 52 53 short seqdspn;54 55 short rtab[] = { 0x0000, 0x0001, 0x0003, 0x0007, 0x000F, 0x001F, 0x003F,53 int16_t seqdspn; 54 55 int16_t rtab[] = { 0x0000, 0x0001, 0x0003, 0x0007, 0x000F, 0x001F, 0x003F, 56 56 0x003F, 0x003F, 0x003F }; 57 57 … … 66 66 */ 67 67 68 u nsigned short evaltv(unsigned short dat)68 uint16_t evaltv(uint16_t dat) 69 69 { 70 70 switch (SQ_MTYP & dat) { … … 84 84 case SQ_RND: /* random number */ 85 85 86 return(( short)rand24() & rtab[SQ_MVAL & dat]);86 return((int16_t)rand24() & rtab[SQ_MVAL & dat]); 87 87 88 88 default: /* something weird got in here ... */ … … 102 102 */ 103 103 104 short dosqact(unsigned short seq, unsigned short act, unsigned short dat)104 int16_t dosqact(uint16_t seq, uint16_t act, uint16_t dat) 105 105 { 106 register u nsigned short obj, val;107 register short sv;106 register uint16_t obj, val; 107 register int16_t sv; 108 108 109 109 obj = (SQ_MOBJ & act) >> 8; … … 269 269 */ 270 270 271 void sqexec(u nsigned short seq)271 void sqexec(uint16_t seq) 272 272 { 273 register u nsigned short act, dat, line;273 register uint16_t act, dat, line; 274 274 register struct seqent *sp; 275 register short rc;275 register int16_t rc; 276 276 277 277 line = seqline[seq]; … … 354 354 void seqproc(void) 355 355 { 356 register u nsigned short oldsr, seq;357 register short dspn;358 register u nsigned short *fp;359 charlinbuf[66];356 register uint16_t oldsr, seq; 357 register int16_t dspn; 358 register uint16_t *fp; 359 int8_t linbuf[66]; 360 360 361 361 if (0 EQ timers[SQTIMER]) {
Note:
See TracChangeset
for help on using the changeset viewer.