Changeset 7258c6a in buchla-68k for ram/sendval.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/sendval.c
r0292fbb r7258c6a 27 27 /* functions defined elsewhere */ 28 28 29 extern u nsigned tofpu(unsignedtime);30 31 extern u nsigned setipl(unsignedarg);32 33 extern short amplval, ext_cv1, ext_cv2, ext_cv3, ext_cv4, ext_mod;34 extern short lstbgnc, lstendc, ps_intn, ps_rate, ps_dpth, sliders;35 36 extern short lastart[];37 extern short dyntab[];38 extern short expbit[];39 extern short fnoff[];40 extern short fp_resv[];41 extern short grpdyn[];42 extern short grploc[];43 extern short lastvce[];44 extern short prstab[];45 extern short vce2grp[];46 extern short vce2trg[];47 extern short veltab[];48 49 extern short sigtab[128][2];50 51 extern charkeystat[];52 extern charmpsust[];53 extern chartrgtab[];29 extern uint16_t tofpu(uint16_t time); 30 31 extern uint16_t setipl(uint16_t arg); 32 33 extern int16_t amplval, ext_cv1, ext_cv2, ext_cv3, ext_cv4, ext_mod; 34 extern int16_t lstbgnc, lstendc, ps_intn, ps_rate, ps_dpth, sliders; 35 36 extern int16_t lastart[]; 37 extern int16_t dyntab[]; 38 extern int16_t expbit[]; 39 extern int16_t fnoff[]; 40 extern int16_t fp_resv[]; 41 extern int16_t grpdyn[]; 42 extern int16_t grploc[]; 43 extern int16_t lastvce[]; 44 extern int16_t prstab[]; 45 extern int16_t vce2grp[]; 46 extern int16_t vce2trg[]; 47 extern int16_t veltab[]; 48 49 extern int16_t sigtab[128][2]; 50 51 extern int8_t keystat[]; 52 extern int8_t mpsust[]; 53 extern int8_t trgtab[]; 54 54 55 55 extern struct n_entry *lstbgns[NLSTENTS]; … … 66 66 */ 67 67 68 void sendval( short voice, short par, short ival)68 void sendval(int16_t voice, int16_t par, int16_t ival) 69 69 { 70 register u nsigned*fpu;71 register short oldi, val;72 register longltmp;73 short nop;70 register uint16_t *fpu; 71 register int16_t oldi, val; 72 register int32_t ltmp; 73 int16_t nop; 74 74 75 75 fpu = io_fpu + FPU_OFNC + (voice << 8) + (par << 4); … … 92 92 case 10: /* filter */ 93 93 94 ltmp = (( long)ival >> 1) + ((long)ival >>2);95 96 if (ltmp GT ( long)VALMAX)97 ltmp = ( long)VALMAX;98 else if (ltmp LT ( long)VALMIN)99 ltmp = ( long)VALMIN;100 101 val = ( short)ltmp;94 ltmp = ((int32_t)ival >> 1) + ((int32_t)ival >>2); 95 96 if (ltmp GT (int32_t)VALMAX) 97 ltmp = (int32_t)VALMAX; 98 else if (ltmp LT (int32_t)VALMIN) 99 ltmp = (int32_t)VALMIN; 100 101 val = (int16_t)ltmp; 102 102 break; 103 103 /* … … 106 106 case 2: /* level */ 107 107 108 val = ((( short)ival >> 5) - 500) << 6;108 val = (((int16_t)ival >> 5) - 500) << 6; 109 109 break; 110 110 … … 118 118 /* ++++++++++++++++++++++++++++ FPU interrupts disabled +++++++++++++++++++++ */ 119 119 120 *(fpu + ( long)FPU_TNV0) = val;120 *(fpu + (int32_t)FPU_TNV0) = val; 121 121 ++nop; ++nop; ++nop; 122 *(fpu + ( long)FPU_TNV1) = val;122 *(fpu + (int32_t)FPU_TNV1) = val; 123 123 ++nop; ++nop; ++nop; 124 *(fpu + ( long)FPU_TCTL) = 0x0015;124 *(fpu + (int32_t)FPU_TCTL) = 0x0015; 125 125 126 126 setipl(oldi); … … 140 140 */ 141 141 142 void clearer( short stat, short sig)142 void clearer(int16_t stat, int16_t sig) 143 143 { 144 register u nsigned*fpu;145 register u nsignedfpexp, fpmant, fptime;146 register short oldi, i;147 short nop, olds;144 register uint16_t *fpu; 145 register uint16_t fpexp, fpmant, fptime; 146 register int16_t oldi, i; 147 int16_t nop, olds; 148 148 149 149 if (stat) {
Note:
See TracChangeset
for help on using the changeset viewer.