Changeset 7258c6a in buchla-68k for ram/lcdlbls.c


Ignore:
Timestamp:
07/09/2017 04:45:34 PM (7 years ago)
Author:
Thomas Lopatic <thomas@…>
Branches:
master
Children:
8618599
Parents:
0292fbb
Message:

Use standard integer types.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ram/lcdlbls.c

    r0292fbb r7258c6a  
    4848
    4949*/
    50 extern  char    gain2eq(short gain);
    51 
    52 extern  unsigned        setsr(unsigned sr);
    53 
    54 extern  void    (*d_key)(short k);
     50extern  int8_t  gain2eq(int16_t gain);
     51
     52extern  uint16_t        setsr(uint16_t sr);
     53
     54extern  void    (*d_key)(int16_t k);
    5555extern  void    (*e_key)(void);
    5656extern  void    (*m_key)(void);
    5757extern  void    (*x_key)(void);
    58 extern  void    (*olddkey)(short k);
     58extern  void    (*olddkey)(int16_t k);
    5959extern  void    (*oldekey)(void);
    6060extern  void    (*oldmkey)(void);
    6161extern  void    (*oldxkey)(void);
    62 extern  void    (*point)(short x, short y, short pen);
     62extern  void    (*point)(int16_t x, int16_t y, int16_t pen);
    6363
    6464extern  LPF     (*oldsw)[];
    … …  
    6767extern  LPF     aswtbl[14];
    6868
    69 extern  short   asig;
    70 extern  short   asmode;
    71 extern  short   astat;
    72 extern  short   aval;
    73 extern  short   clkrun;
    74 extern  short   ctrsw;
    75 extern  short   curasg;
    76 extern  short   gomode;
    77 extern  short   ismode;
    78 extern  short   lampio;
    79 extern  short   lampsw;
    80 extern  short   loadrow;
    81 extern  short   loadsw;
    82 extern  short   ltagged;
    83 extern  short   ndisp;
    84 extern  short   oldpk;
    85 extern  short   oldsl;
    86 extern  short   pkctrl;
    87 extern  short   recsw;
    88 extern  short   sliders;
    89 extern  short   tagslot;
    90 extern  short   tmpomlt;
    91 extern  short   tmpoval;
    92 extern  short   tuneval;
    93 
    94 extern  unsigned short  seqdupd;
    95 
    96 extern  short   BGeq[];
    97 extern  short   BGother[];
    98 extern  short   BGprmtr[];
    99 
    100 extern  short   articen[];
    101 extern  short   grpmode[];
    102 extern  short   grpsel[];
    103 extern  short   grpstat[];
    104 extern  short   ins2grp[];
    105 extern  short   lastart[];
    106 extern  short   s_trns[];
    107 extern  short   vce2grp[];
    108 extern  short   vce2trg[];
    109 
    110 extern  short   anrs[][16];
    111 
    112 extern  long    iotime;
    113 extern  long    lcdontm;
    114 extern  long    lcdtime;
     69extern  int16_t asig;
     70extern  int16_t asmode;
     71extern  int16_t astat;
     72extern  int16_t aval;
     73extern  int16_t clkrun;
     74extern  int16_t ctrsw;
     75extern  int16_t curasg;
     76extern  int16_t gomode;
     77extern  int16_t ismode;
     78extern  int16_t lampio;
     79extern  int16_t lampsw;
     80extern  int16_t loadrow;
     81extern  int16_t loadsw;
     82extern  int16_t ltagged;
     83extern  int16_t ndisp;
     84extern  int16_t oldpk;
     85extern  int16_t oldsl;
     86extern  int16_t pkctrl;
     87extern  int16_t recsw;
     88extern  int16_t sliders;
     89extern  int16_t tagslot;
     90extern  int16_t tmpomlt;
     91extern  int16_t tmpoval;
     92extern  int16_t tuneval;
     93
     94extern  uint16_t        seqdupd;
     95
     96extern  int16_t BGeq[];
     97extern  int16_t BGother[];
     98extern  int16_t BGprmtr[];
     99
     100extern  int16_t articen[];
     101extern  int16_t grpmode[];
     102extern  int16_t grpsel[];
     103extern  int16_t grpstat[];
     104extern  int16_t ins2grp[];
     105extern  int16_t lastart[];
     106extern  int16_t s_trns[];
     107extern  int16_t vce2grp[];
     108extern  int16_t vce2trg[];
     109
     110extern  int16_t anrs[][16];
     111
     112extern  int32_t iotime;
     113extern  int32_t lcdontm;
     114extern  int32_t lcdtime;
    115115
    116116extern  struct  gdsel   *gdstbc[];
    … …  
    124124/* forward references */
    125125
    126 void    l_none(short _1, short _2);
    127 void    l_prmtr(short stat, short sig);
    128 void    l_other(short stat, short sig);
    129 void    l_voice(short stat, short vce);
    130 void    l_init(short stat, short sig);
    131 void    l_clock(short stat, short _2);
    132 void    l_eq(short stat, short sig);
    133 void    trapper(short stat, short _2);
    134 void    setlamp(short stat, short _2);
    135 void    rpctl(short stat, short _2);
    136 void    quiet(short _1, short _2);
    137 void    l_group(short stat, short grp);
    138 void    l_dflt(short stat, short _2);
    139 void    l_inst(short stat, short _2);
    140 void    l_goto(short stat, short _2);
    141 void    l_asgn(short stat, short _2);
    142 void    l_adfl(short stat, short _2);
    143 void    l_load(short stat, short _2);
     126void    l_none(int16_t _1, int16_t _2);
     127void    l_prmtr(int16_t stat, int16_t sig);
     128void    l_other(int16_t stat, int16_t sig);
     129void    l_voice(int16_t stat, int16_t vce);
     130void    l_init(int16_t stat, int16_t sig);
     131void    l_clock(int16_t stat, int16_t _2);
     132void    l_eq(int16_t stat, int16_t sig);
     133void    trapper(int16_t stat, int16_t _2);
     134void    setlamp(int16_t stat, int16_t _2);
     135void    rpctl(int16_t stat, int16_t _2);
     136void    quiet(int16_t _1, int16_t _2);
     137void    l_group(int16_t stat, int16_t grp);
     138void    l_dflt(int16_t stat, int16_t _2);
     139void    l_inst(int16_t stat, int16_t _2);
     140void    l_goto(int16_t stat, int16_t _2);
     141void    l_asgn(int16_t stat, int16_t _2);
     142void    l_adfl(int16_t stat, int16_t _2);
     143void    l_load(int16_t stat, int16_t _2);
    144144
    145145/* initialized stuff */
    … …  
    147147/* BarType -- LCD slider bar graph type table -- 0 = bottom, 1 = centered */
    148148
    149 short   BarType[14] = { 1, 0,   0, 0, 0,   1, 1, 1, 1,   0, 0, 0,   1, 0 };
    150 
    151 short   artitab[] = {           /* articulation pot initialization values */
     149int16_t BarType[14] = { 1, 0,   0, 0, 0,   1, 1, 1, 1,   0, 0, 0,   1, 0 };
     150
     151int16_t artitab[] = {           /* articulation pot initialization values */
    152152
    153153        ARTIVAL(500),   /* locn  */
    … …  
    170170/*         sigtab[ 25  26  27  28  29  30  31  32  33  34  35  36  37  38] */
    171171
    172 short   arpar[] = { 4,  2,  9, 11, 12,  1,  3,  5,  7, 13, 14, 15, 10,  6};
    173 
    174 /*
    175 
    176 */
    177 
    178 short   sl2gain[32] = {         /* slider value to EQ gain conversion table */
     172int16_t arpar[] = { 4,  2,  9, 11, 12,  1,  3,  5,  7, 13, 14, 15, 10,  6};
     173
     174/*
     175
     176*/
     177
     178int16_t sl2gain[32] = {         /* slider value to EQ gain conversion table */
    179179
    180180        -12, -12, -12, -12, -12, -11, -10, -9 ,-8 ,-7, -6, -5, -4, -3, -2, -1,
    … …  
    182182};
    183183
    184 short   vmasks[16] = {          /* variable resolution masks */
     184int16_t vmasks[16] = {          /* variable resolution masks */
    185185
    186186        0x8000, 0xC000, 0xE000, 0xF000,
    … …  
    190190};
    191191
    192 short   src2var[14] = {         /* source number to analog variable number map */
     192int16_t src2var[14] = {         /* source number to analog variable number map */
    193193
    194194        -1, -1,  3, -1, -1, -1,  5, -1,  4, -1, -1,  0,  1,  2 };
    195195
    196 char    *potlbls[] = {          /* LCD pot labels */
     196int8_t  *potlbls[] = {          /* LCD pot labels */
    197197
    198198        /* Pot:  25    26    27    28    29    30    31    32    33    34    35    36    37    38 */
    … …  
    209209
    210210#if     ROMPOK
    211 char    *swtlbls[] = {          /* LCD switch labels -- ROMP ENABLED */
     211int8_t  *swtlbls[] = {          /* LCD switch labels -- ROMP ENABLED */
    212212
    213213        /* 0 */ "Quiet ROMP  Lamp  Clock  P/R  Go To Instr Asgmt Load              Other Voice Init ",
    … …  
    234234#endif
    235235
    236 char    *aslbls[] = {           /* Assignment select key labels */
     236int8_t  *aslbls[] = {           /* Assignment select key labels */
    237237
    238238        "Asgmt",        /* 0 */
    … …  
    446446*/
    447447
    448 void l_none(short _1, short _2)
     448void l_none(int16_t _1, int16_t _2)
    449449{
    450450}
    … …  
    460460*/
    461461
    462 void quiet(short _1, short _2)
    463 {
    464         register short vce;
     462void quiet(int16_t _1, int16_t _2)
     463{
     464        register int16_t vce;
    465465
    466466        for (vce = 0; vce < 12; vce++)          /* for each voice ... */
    … …  
    483483*/
    484484
    485 void rpctl(short stat, short _2)
     485void rpctl(int16_t stat, int16_t _2)
    486486{
    487487        if (NOT stat)
    … …  
    502502*/
    503503
    504 void trapper(short stat, short _2)
     504void trapper(int16_t stat, int16_t _2)
    505505{
    506506        if (stat)
    … …  
    514514*/
    515515
    516 void l_clock(short stat, short _2)
     516void l_clock(int16_t stat, int16_t _2)
    517517{
    518518        if (NOT stat)
    … …  
    557557void preio(void)
    558558{
    559         short oldipl;
     559        int16_t oldipl;
    560560
    561561        oldipl = setipl(TIM_DI);
    … …  
    577577void postio(void)
    578578{
    579         short oldipl;
     579        int16_t oldipl;
    580580
    581581        oldipl = setipl(TIM_DI);
    … …  
    602602*/
    603603
    604 void setlamp(short stat, short _2)
    605 {
    606         register short oldi;
     604void setlamp(int16_t stat, int16_t _2)
     605{
     606        register int16_t oldi;
    607607
    608608        if (NOT stat)           /* only act on key closures */
    … …  
    637637void lcd_on(void)
    638638{
    639         register short oldi;
     639        register int16_t oldi;
    640640
    641641        oldi = setipl(TIM_DI);  /* disable interrupts to keep out the timer */
    … …  
    657657*/
    658658
    659 void loadkey(short key)
     659void loadkey(int16_t key)
    660660{
    661661        if (NOT astat)
    … …  
    694694*/
    695695
    696 void pcancel(short pm)
     696void pcancel(int16_t pm)
    697697{
    698698        point = GLCplot;                /* setup to plot on LCD */
    … …  
    743743*/
    744744
    745 void l_load(short stat, short _2)
     745void l_load(int16_t stat, int16_t _2)
    746746{
    747747        if (NOT stat)
    … …  
    823823void lcdlbls(void)
    824824{
    825         register short i, barval;
    826         char buf[8];
    827         char dsp[86];
     825        register int16_t i, barval;
     826        int8_t buf[8];
     827        int8_t dsp[86];
    828828
    829829        point = GLCplot;                /* set up to plot on the LCD */
    … …  
    984984*/
    985985
    986 void selasg(short n)
     986void selasg(int16_t n)
    987987{
    988988        register struct s_entry *ep;
    … …  
    10371037*/
    10381038
    1039 void l_adfl(short stat, short _2)
     1039void l_adfl(int16_t stat, int16_t _2)
    10401040{
    10411041        if (NOT stat)
    … …  
    10551055*/
    10561056
    1057 void l_asgn(short stat, short _2)
     1057void l_asgn(int16_t stat, int16_t _2)
    10581058{
    10591059        if (NOT stat)                   /* only do this on key closure */
    … …  
    11281128*/
    11291129
    1130 void l_inst(short stat, short _2)
     1130void l_inst(int16_t stat, int16_t _2)
    11311131{
    11321132        if (NOT stat)
    … …  
    12051205*/
    12061206
    1207 void selins(short ival)
    1208 {
    1209         register short n;
     1207void selins(int16_t ival)
     1208{
     1209        register int16_t n;
    12101210        register struct s_entry *ep;
    12111211
    … …  
    12671267*/
    12681268
    1269 void l_dflt(short stat, short _2)
     1269void l_dflt(int16_t stat, int16_t _2)
    12701270{
    12711271        if (NOT stat)
    … …  
    12851285*/
    12861286
    1287 void l_goto(short stat, short _2)
     1287void l_goto(int16_t stat, int16_t _2)
    12881288{
    12891289        if (NOT stat)                   /* only do this on key closure */
    … …  
    13591359*/
    13601360
    1361 void newpps(short trg, short grp, short src, short ival)
     1361void newpps(int16_t trg, int16_t grp, int16_t src, int16_t ival)
    13621362{
    13631363        register struct sment *smf, *smp;
    1364         register unsigned *fpu;
    1365         register long ltmp;
    1366         register short val;
    1367         register short vce;
    1368         short gs, oldi;
     1364        register uint16_t *fpu;
     1365        register int32_t ltmp;
     1366        register int16_t val;
     1367        register int16_t vce;
     1368        int16_t gs, oldi;
    13691369
    13701370        gs = (grp << 4) | src;          /* calculate group/source index */
    … …  
    13941394                        case 10:        /* filtr */
    13951395
    1396                                 ltmp = ((long)ival >> 1) + ((long)ival >> 2);
    1397 
    1398                                 if (ltmp > (long)VALMAX)
    1399                                         ltmp = (long)VALMAX;
    1400                                 else if (ltmp < (long)VALMIN)
    1401                                         ltmp = (long)VALMIN;
    1402 
    1403                                 val = (short)ltmp;
     1396                                ltmp = ((int32_t)ival >> 1) + ((int32_t)ival >> 2);
     1397
     1398                                if (ltmp > (int32_t)VALMAX)
     1399                                        ltmp = (int32_t)VALMAX;
     1400                                else if (ltmp < (int32_t)VALMIN)
     1401                                        ltmp = (int32_t)VALMIN;
     1402
     1403                                val = (int16_t)ltmp;
    14041404                                break;
    14051405
    … …  
    14331433*/
    14341434
    1435 short newsv(short grp, short src, short ival)
     1435int16_t newsv(int16_t grp, int16_t src, int16_t ival)
    14361436{
    14371437        register struct sment *smf, *smp;
    1438         register unsigned *fpu;
    1439         register long ltmp;
    1440         register short val;
    1441         register short gs;
    1442         register short oldi;
    1443         short vmask, var;
     1438        register uint16_t *fpu;
     1439        register int32_t ltmp;
     1440        register int16_t val;
     1441        register int16_t gs;
     1442        register int16_t oldi;
     1443        int16_t vmask, var;
    14441444
    14451445        gs  = (grp << 4) | src;                 /* calculate grp/src index */
    … …  
    14841484                case 10:        /* filtr */
    14851485
    1486                         ltmp = ((long)ival >> 1) + ((long)ival >> 2);
    1487 
    1488                         if (ltmp > (long)VALMAX)
    1489                                 ltmp = (long)VALMAX;
    1490                         else if (ltmp < (long)VALMIN)
    1491                                 ltmp = (long)VALMIN;
    1492 
    1493                         val = (short)ltmp;
     1486                        ltmp = ((int32_t)ival >> 1) + ((int32_t)ival >> 2);
     1487
     1488                        if (ltmp > (int32_t)VALMAX)
     1489                                ltmp = (int32_t)VALMAX;
     1490                        else if (ltmp < (int32_t)VALMIN)
     1491                                ltmp = (int32_t)VALMIN;
     1492
     1493                        val = (int16_t)ltmp;
    14941494                        break;
    14951495
    … …  
    15241524*/
    15251525
    1526 void setsv(short grp, short src, short ival)
     1526void setsv(int16_t grp, int16_t src, int16_t ival)
    15271527{
    15281528        register struct sment *smf, *smp;
    1529         register unsigned *fpu;
    1530         register long ltmp;
    1531         register short val;
    1532         register short gs;
    1533         register short oldi;
     1529        register uint16_t *fpu;
     1530        register int32_t ltmp;
     1531        register int16_t val;
     1532        register int16_t gs;
     1533        register int16_t oldi;
    15341534
    15351535        gs  = (grp << 4) | src;                 /* calculate grp/src index */
    … …  
    15581558                case 10:        /* filtr */
    15591559
    1560                         ltmp = ((long)ival >> 1) + ((long)ival >> 2);
    1561 
    1562                         if (ltmp > (long)VALMAX)
    1563                                 ltmp = (long)VALMAX;
    1564                         else if (ltmp < (long)VALMIN)
    1565                                 ltmp = (long)VALMIN;
    1566 
    1567                         val = (short)ltmp;
     1560                        ltmp = ((int32_t)ival >> 1) + ((int32_t)ival >> 2);
     1561
     1562                        if (ltmp > (int32_t)VALMAX)
     1563                                ltmp = (int32_t)VALMAX;
     1564                        else if (ltmp < (int32_t)VALMIN)
     1565                                ltmp = (int32_t)VALMIN;
     1566
     1567                        val = (int16_t)ltmp;
    15681568                        break;
    15691569
    … …  
    15961596*/
    15971597
    1598 void l_prmtr(short stat, short sig)
     1598void l_prmtr(int16_t stat, int16_t sig)
    15991599{
    16001600        if (NOT stat)
    … …  
    16331633*/
    16341634
    1635 void l_voice(short stat, short vce)
    1636 {
    1637         register short ap, j, par;
    1638         register unsigned *fpu;
    1639 
    1640         char buf[8];
     1635void l_voice(int16_t stat, int16_t vce)
     1636{
     1637        register int16_t ap, j, par;
     1638        register uint16_t *fpu;
     1639
     1640        int8_t buf[8];
    16411641
    16421642        if (NOT stat)
    … …  
    16791679*/
    16801680
    1681 void l_group(short stat, short grp)
    1682 {
    1683         char buf[8];
     1681void l_group(int16_t stat, int16_t grp)
     1682{
     1683        int8_t buf[8];
    16841684
    16851685        if (NOT stat)
    … …  
    17021702*/
    17031703
    1704 void l_other(short stat, short sig)
     1704void l_other(int16_t stat, int16_t sig)
    17051705{
    17061706        if (NOT stat)
    … …  
    17231723*/
    17241724
    1725 void l_eq(short stat, short sig)
     1725void l_eq(int16_t stat, int16_t sig)
    17261726{
    17271727        if (NOT stat)
    … …  
    17501750void artclr(void)
    17511751{
    1752         register short i;
     1752        register int16_t i;
    17531753
    17541754        for (i = 0; i < 14; i++)
    … …  
    17661766*/
    17671767
    1768 void l_init(short stat, short sig)
    1769 {
    1770         register unsigned *fpu;
    1771         register short barval, i, j;
    1772         char buf[16];
     1768void l_init(int16_t stat, int16_t sig)
     1769{
     1770        register uint16_t *fpu;
     1771        register int16_t barval, i, j;
     1772        int8_t buf[16];
    17731773
    17741774        if (NOT stat)
    … …  
    18461846*/
    18471847
    1848 void sendart(short vce, short par, short ival)
    1849 {
    1850         register unsigned *fpu;
    1851         register short val, oldi, mult;
    1852         short nop;
     1848void sendart(int16_t vce, int16_t par, int16_t ival)
     1849{
     1850        register uint16_t *fpu;
     1851        register int16_t val, oldi, mult;
     1852        int16_t nop;
    18531853
    18541854        lastart[par] = ival;
    … …  
    19191919void doslide(void)
    19201920{
    1921         register short arp, bar, barval, i, slval;
     1921        register int16_t arp, bar, barval, i, slval;
    19221922
    19231923        slval = ART_VAL(aval);  /* scaled articulation value */
    … …  
    20292029*/
    20302030
    2031 void settmpo(short val)
    2032 {
    2033         register short timeval;
     2031void settmpo(int16_t val)
     2032{
     2033        register int16_t timeval;
    20342034
    20352035        tmpoval  = val;
    20362036        timeval  = ( ( (tmpomlt + 50) * tmpoval) / 100);
    2037         timeval  = (short)( (192000L / timeval) - 1);
     2037        timeval  = (int16_t)( (192000L / timeval) - 1);
    20382038        TIME_T2H = timeval >> 8;
    20392039        TIME_T2L = timeval & 0x00FF;
    … …  
    20522052void settune(void)
    20532053{
    2054         register short oldi, i, grp;
    2055         register unsigned *fpu;
    2056         register long trval, trmax;
    2057         short nop;
     2054        register int16_t oldi, i, grp;
     2055        register uint16_t *fpu;
     2056        register int32_t trval, trmax;
     2057        int16_t nop;
    20582058
    20592059        trmax = PCHMAX;
    … …  
    20672067                if (-1 NE (grp = vce2grp[i])) {
    20682068
    2069                         trval = (long)tuneval + ((long)s_trns[grp - 1] << 1);
     2069                        trval = (int32_t)tuneval + ((int32_t)s_trns[grp - 1] << 1);
    20702070
    20712071                        if (trval > trmax)
    … …  
    20742074                } else {
    20752075
    2076                         trval = (long)tuneval;
     2076                        trval = (int32_t)tuneval;
    20772077                }
    20782078
    20792079                fpu = io_fpu + FPU_OFNC + (i << 8) + 0x0010;    /* freq 1 */
    20802080
    2081                 *(fpu + FPU_TCV3) = (unsigned)(0x0000FFFFL & trval);
     2081                *(fpu + FPU_TCV3) = (uint16_t)(0x0000FFFFL & trval);
    20822082                ++nop;  ++nop;  ++nop;
    20832083                *(fpu + FPU_TSF3) = 0x7FFF;
Note: See TracChangeset for help on using the changeset viewer.