Changeset 7258c6a in buchla-68k for ram/asgdsp.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/asgdsp.c

    r0292fbb r7258c6a  
    6060/* things defined elsewhere */
    6161
    62 extern  void            (*point)(short x, short y, short pen);
    63 extern  unsigned        exp_c(unsigned c);
    64 
    65 extern  short   stcrow, stccol, cxval, cyval;
    66 extern  short   curtun, tunmod;
     62extern  void            (*point)(int16_t x, int16_t y, int16_t pen);
     63extern  uint16_t        exp_c(uint16_t c);
     64
     65extern  int16_t stcrow, stccol, cxval, cyval;
     66extern  int16_t curtun, tunmod;
    6767
    6868#if     DEBUGIT
    … …  
    7070#endif
    7171
    72 extern  unsigned        *obj0, *obj2;
    73 
    74 extern  char    bfs[];
    75 extern  char    *adbxlb[];
    76 extern  char    caname[];
    77 
    78 extern  short   adbox[][8];
    79 
    80 extern  short   admctl;                 /* assignment menu control */
    81 extern  short   adnamsw;                /* vitrual typewriter switch */
    82 extern  short   asgfks;                 /* first key selected */
    83 extern  short   asghit;                 /* row hit / assignment in progress */
    84 extern  short   asgmod;                 /* assignment number or table modified */
    85 extern  short   auxctl;                 /* aux control flag */
    86 extern  short   curasg;                 /* current assignment table */
    87 extern  short   curmop;                 /* current MIDI output port */
    88 extern  short   curvce;                 /* current voice being edited */
    89 extern  short   prgchan;                /* MIDI program change channel  (port 1) */
    90 extern  short   ps_dpth;                /* phase shifter -- depth */
    91 extern  short   ps_intn;                /* phase shifter -- intensity */
    92 extern  short   ps_rate;                /* phase shifter -- rate */
    93 extern  short   submenu;                /* submenu flag */
    94 
    95 extern  short   grpdyn[12];             /* group dynamics table (0..9) */
    96 extern  short   ins2grp[12];            /* instrument to group table (00..NINST-1) */
    97 extern  short   mctlnum[4];             /* MIDI controller number table (-1, 00..99) */
    98 extern  short   s_inst[12];             /* instrument assignments */
    99 extern  short   vce2grp[12];            /* voice to group table (-1, 1..12)*/
    100 
    101 extern  short   grp2prt[12][2]; /* group to port and channel table */
     72extern  uint16_t        *obj0, *obj2;
     73
     74extern  int8_t  bfs[];
     75extern  int8_t  *adbxlb[];
     76extern  int8_t  caname[];
     77
     78extern  int16_t adbox[][8];
     79
     80extern  int16_t admctl;                 /* assignment menu control */
     81extern  int16_t adnamsw;                /* vitrual typewriter switch */
     82extern  int16_t asgfks;                 /* first key selected */
     83extern  int16_t asghit;                 /* row hit / assignment in progress */
     84extern  int16_t asgmod;                 /* assignment number or table modified */
     85extern  int16_t auxctl;                 /* aux control flag */
     86extern  int16_t curasg;                 /* current assignment table */
     87extern  int16_t curmop;                 /* current MIDI output port */
     88extern  int16_t curvce;                 /* current voice being edited */
     89extern  int16_t prgchan;                /* MIDI program change channel  (port 1) */
     90extern  int16_t ps_dpth;                /* phase shifter -- depth */
     91extern  int16_t ps_intn;                /* phase shifter -- intensity */
     92extern  int16_t ps_rate;                /* phase shifter -- rate */
     93extern  int16_t submenu;                /* submenu flag */
     94
     95extern  int16_t grpdyn[12];             /* group dynamics table (0..9) */
     96extern  int16_t ins2grp[12];            /* instrument to group table (00..NINST-1) */
     97extern  int16_t mctlnum[4];             /* MIDI controller number table (-1, 00..99) */
     98extern  int16_t s_inst[12];             /* instrument assignments */
     99extern  int16_t vce2grp[12];            /* voice to group table (-1, 1..12)*/
     100
     101extern  int16_t grp2prt[12][2]; /* group to port and channel table */
    102102                                /* port [0] = 0..4, channel [1] = -1, 1..16 */
    103103
    104 extern  short   key2grp[88];    /* port 1 key to group assignment table */
     104extern  int16_t key2grp[88];    /* port 1 key to group assignment table */
    105105                                /* bit n = group n */
    106106
    107107extern  struct  asgent  asgtab[NASGS];  /* assignment table library */
    108108
    109 extern  unsigned        *asgob;
     109extern  uint16_t        *asgob;
    110110
    111111extern  struct  octent  *adoct;
    … …  
    115115*/
    116116
    117 char    *gprep[] = {" ", "1", "2", "L"};
    118 
    119 char    *asgsrc[] = {   /* source labels */
     117int8_t  *gprep[] = {" ", "1", "2", "L"};
     118
     119int8_t  *asgsrc[] = {   /* source labels */
    120120
    121121        "1 Pch/Hor",
    … …  
    129129/* keys are 5 pixels wide on top, except the last one, which is 8 pixels wide */
    130130
    131 short   asgkble[88] = {         /* key left edge offsets */
     131int16_t asgkble[88] = {         /* key left edge offsets */
    132132
    133133                                                /* piano        MIDI */
    … …  
    155155*/
    156156
    157 short   asgkbtp[AK_WIDTH] = {           /* keyboard icon top lines */
     157int16_t asgkbtp[AK_WIDTH] = {           /* keyboard icon top lines */
    158158
    159159        AKW_7, AKW_C, AKW_1, AKW_F,
    … …  
    196196*/
    197197
    198 short   asgkbbt[AK_WIDTH] = {           /* keyboard icon bottom lines */
     198int16_t asgkbbt[AK_WIDTH] = {           /* keyboard icon bottom lines */
    199199
    200200        AKW_7, AKW_F, AKW_7, AKW_F,
    … …  
    237237*/
    238238
    239 short   asgpal[16][3] = {       /* assignment editor color palette */
     239int16_t asgpal[16][3] = {       /* assignment editor color palette */
    240240
    241241        {0, 0, 0},      /* 0 */
    … …  
    257257};
    258258
    259 short   dyntab[10] = {          /* dynamics translation table */
     259int16_t dyntab[10] = {          /* dynamics translation table */
    260260
    261261        0,              /* 0 */
    … …  
    283283void advacur(void)
    284284{
    285         register short newcol;
     285        register int16_t newcol;
    286286
    287287        if (infield(stcrow, stccol, curfet))
    … …  
    307307void bspacur(void)
    308308{
    309         register short newcol;
     309        register int16_t newcol;
    310310
    311311        if (infield(stcrow, stccol, curfet))
    … …  
    333333*/
    334334
    335 void keycpyw(unsigned *dest, unsigned *src, short len, unsigned wk, unsigned bk)
    336 {
    337         register unsigned wkey, bkey, theword;
    338         register short i;
     335void keycpyw(uint16_t *dest, uint16_t *src, int16_t len, uint16_t wk, uint16_t bk)
     336{
     337        register uint16_t wkey, bkey, theword;
     338        register int16_t i;
    339339
    340340        wkey = exp_c(wk);
    … …  
    360360void asgkb(void)
    361361{
    362         register unsigned *p;
    363         register unsigned akline;
    364         register short i, j;
     362        register uint16_t *p;
     363        register uint16_t akline;
     364        register int16_t i, j;
    365365
    366366        akline = exp_c(AK_LINE);
    367         p = asgob + (long)AKSTART;
     367        p = asgob + (int32_t)AKSTART;
    368368
    369369        for (j = 0; j < 12; j++) {
    … …  
    407407*/
    408408
    409 void drawk2g(short grp)
    410 {
    411         register short i;
    412         register short n;
    413         register short key;
    414         register short line;
    415         register char *bfsp;
    416         register unsigned *lp;
     409void drawk2g(int16_t grp)
     410{
     411        register int16_t i;
     412        register int16_t n;
     413        register int16_t key;
     414        register int16_t line;
     415        register int8_t *bfsp;
     416        register uint16_t *lp;
    417417
    418418        n = 7;          /* key to group window */
    419419
    420420        line = (14 * grp) + AK_BASE;
    421         lp = asgob + ((long)line << 7) + 6L;
     421        lp = asgob + ((int32_t)line << 7) + 6L;
    422422
    423423        for (i = 0; i < 4; i++) {
    … …  
    460460*/
    461461
    462 void adpoint(short x, short y, short pen)
     462void adpoint(int16_t x, int16_t y, int16_t pen)
    463463{
    464464        if (v_regs[5] & 0x0180)
    … …  
    474474*/
    475475
    476 char *numblk(char *buf, short n)
     476int8_t *numblk(int8_t *buf, int16_t n)
    477477{
    478478        if (n EQ -1) {
    … …  
    498498*/
    499499
    500 void adswin(short n)
    501 {
    502         register short cx, i;
    503         register char *bfsp;
    504         char buf1[4], buf2[4];
     500void adswin(int16_t n)
     501{
     502        register int16_t cx, i;
     503        register int8_t *bfsp;
     504        int8_t buf1[4], buf2[4];
    505505
    506506        if ((n EQ 7) AND (admctl NE -1))
    … …  
    783783*/
    784784
    785 void initat(short n)
     785void initat(int16_t n)
    786786{
    787787        register struct asgent *ap;
    788         register short i;
     788        register int16_t i;
    789789
    790790        ap = &asgtab[n];
    … …  
    839839*/
    840840
    841 void setaux(short aux)
    842 {
    843         register short psgdata;
    844         register char *psg;
     841void setaux(int16_t aux)
     842{
     843        register int16_t psgdata;
     844        register int8_t *psg;
    845845
    846846        auxctl = aux;
    … …  
    867867*/
    868868
    869 void getasg(short n)
     869void getasg(int16_t n)
    870870{
    871871        register struct asgent *ap;
    872         register short i, grp, vce;
     872        register int16_t i, grp, vce;
    873873
    874874        ap = &asgtab[n];
    … …  
    921921*/
    922922
    923 void putasg(short n)
     923void putasg(int16_t n)
    924924{
    925925        register struct asgent *ap;
    926         register short i;
     926        register int16_t i;
    927927
    928928        for (i = 0; i < 12; i++)                /* fix old tables */
    … …  
    959959void awins(void)
    960960{
    961         register short i;
     961        register int16_t i;
    962962
    963963        for (i = 0; i < 11; i++)
    … …  
    973973void inital(void)
    974974{
    975         register short n;
     975        register int16_t n;
    976976
    977977        for (n = 0; n < NASGS; n++)
Note: See TracChangeset for help on using the changeset viewer.