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

    r0292fbb r7258c6a  
    4343*/
    4444
    45 extern  short   cnvp2c(void);
    46 extern  short   dec2fr(char *s);
    47 
    48 extern  unsigned        exp_c(unsigned c);
    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  unsigned        *obj11;
     45extern  int16_t cnvp2c(void);
     46extern  int16_t dec2fr(int8_t *s);
     47
     48extern  uint16_t        exp_c(uint16_t c);
     49
     50extern  int16_t CurLine;
     51
     52extern  int16_t cents;
     53extern  int16_t cmtype;
     54extern  int16_t cxval;
     55extern  int16_t cyval;
     56extern  int16_t hitcx;
     57extern  int16_t hitcy;
     58extern  int16_t stccol;
     59extern  int16_t stcrow;
     60extern  int16_t submenu;
     61extern  int16_t vtccol;
     62extern  int16_t vtcrow;
     63
     64extern  int16_t ndvals[];
     65
     66extern  uint16_t        *obj11;
    6767
    6868extern  struct selbox   *csbp;
    6969extern  struct selbox   *curboxp;
    7070
    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 */
     71extern  int8_t  *smdata[];
     72extern  int8_t  *ssdata[];
     73extern  int8_t  *stdata[];
     74extern  int8_t  *trdata[];
     75
     76int16_t ptfnbox(int16_t n);
     77
     78/*
     79
     80*/
     81
     82int16_t ptegood;                /* pte buffer -- entire entry valid flag */
     83
     84int16_t ptedfok;                /* pte buffer -- def valid flag */
     85int16_t ptestok;                /* pte buffer -- stm valid flag */
     86int16_t ptedsok;                /* pte buffer -- destination valid flag */
     87int16_t ptedtok;                /* pte buffer -- datum valid flag */
     88
     89int16_t ptedef;                 /* pte buffer -- definer number */
     90int16_t ptestm;                 /* pte buffer -- stimulus number */
     91int16_t ptespec;                /* pte buffer -- address type */
     92int16_t ptesuba;                /* pte buffer -- sub-address */
     93int16_t ptedat1;                /* pte buffer -- data word 1 */
     94int16_t ptedat2;                /* pte buffer -- data word 2 */
     95
     96int16_t ptedftp;                /* definer / stimulus entry flag */
     97
     98int16_t ptedfst;                /* current definer/stimulus data entry format */
     99int16_t ptedest;                /* current destination data entry format */
     100int16_t ptedata;                /* current datum data entry format */
     101
     102int16_t ptemenu;                /* current submenu highlighting */
     103
     104int16_t pteset;                 /* pte buffer setup flag */
     105int16_t ptbflag;                /* pdbuf setup flag */
     106
     107int16_t ptecpos;                /* current patch entry index */
     108int16_t ptepred;                /* predecessor entry index */
     109int16_t ptesucc;                /* successor entry index */
    110110
    111111struct patch    ptebuf;         /* pte buffer -- patch table format */
    112112
    113 char    ptdebuf[50];            /* patch edit buffer */
    114 
    115 /*
    116 
    117 */
    118 
    119 char    *rawdfst[] = {          /* def/stm field initial contents */
     113int8_t  ptdebuf[50];            /* patch edit buffer */
     114
     115/*
     116
     117*/
     118
     119int8_t  *rawdfst[] = {          /* def/stm field initial contents */
    120120
    121121        "Key 001 1 01",
     
    125125};
    126126
    127 char    *rawdest[] = {          /* destination field initial contents */
     127int8_t  *rawdest[] = {          /* destination field initial contents */
    128128
    129129        "??????? 00 ??",        /* ??????       00 */
     
    160160*/
    161161
    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 */
     162int8_t  *rawmode[] = { "Frq ",  "Pch ",   "Int ",  "Rat " };    /* oscillator modes */
     163int8_t  *rawmdat[] = { "00.1 ", "0C 00",  "+0000", "1/1  " };   /* oscillator data */
     164
     165int16_t omtabl[]   = { PSO_FRQ, PSO_PCH, PSO_INT, PSO_RAT };    /* oscillator modes */
     166int16_t omdtab[]   = { 2,       320,     0,       0       };    /* oscillator data */
     167int16_t omftab[]   = { 6,       7,       4,       5       };    /* mode data format */
     168
     169int8_t  *rawfpud[] = { "PchWh", "+0.00", "00001", "\2400.00", "Start" };
     170
     171int16_t fpudtab[]  = { SM_HTPW,       0,          1,       0,       1 };
     172int16_t fpuetab[]  = {      11,       1,          2,       3,       9 };
     173
     174int16_t dfsttab[] = { 0x0000, 0x8000, 0x1100, 0x1180 };
     175
     176int16_t defcols[] = {  2,  6,  7,  8};  /* def data entry columns */
     177int16_t stmcols[] = { 15, 19, 20, 21};  /* stm data entry columns */
     178
     179int16_t dstcols[] = {                   /* destination data entry columns */
    180180
    181181/*      -1,  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10  */
     
    183183};
    184184
    185 short   dfsttp[] = { 1,  1,  2,  3 };   /* def/stm formats */
    186 
    187 short   datasrc[] = {
     185int16_t dfsttp[] = { 1,  1,  2,  3 };   /* def/stm formats */
     186
     187int16_t datasrc[] = {
    188188
    189189        SM_HTPW,  SM_VTMW,  SM_LPBR,  SM_PED1,  SM_CTL1,
     
    195195*/
    196196
    197 short   destype[] = {                   /* destination type table */
     197int16_t destype[] = {                   /* destination type table */
    198198
    199199        PA_KEY,         -1,             PA_TRG,         PA_PLS,         PA_LED,
     
    208208};
    209209
    210 char    destfmt[] = {           /* destination data entry format table */
     210int8_t  destfmt[] = {           /* destination data entry format table */
    211211
    212212         0,     -1,      1,      2,      3,     /*  1 ..  5 */
     
    218218};
    219219
    220 char    datafmt[] = {           /* datum data entry format table */
     220int8_t  datafmt[] = {           /* datum data entry format table */
    221221
    222222        8,              -1,             9,              8,              14,
     
    232232*/
    233233
    234 char    desdatf[] = {           /* data entry default flags */
     234int8_t  desdatf[] = {           /* data entry default flags */
    235235
    236236        2,              0,              2,              2,              1,
     
    242242};
    243243
    244 short   desdat1[] = {           /* data word 1 defaults */
     244int16_t desdat1[] = {           /* data word 1 defaults */
    245245
    246246        0,              0,              0,              0,              0,
     
    252252};
    253253
    254 short   desdat2[] = {           /* data word 2 defaults */
     254int16_t desdat2[] = {           /* data word 2 defaults */
    255255
    256256        0,              0,              1,              0,              0,
     
    266266*/
    267267
    268 char    *rawdata[] = {
     268int8_t  *rawdata[] = {
    269269
    270270        "Trans",        "     ",        "Start",        "Trans",        "000  ",
     
    276276};
    277277
    278 char    hilitab[][8] = {                /* submenu highlight table */
     278int8_t  hilitab[][8] = {                /* submenu highlight table */
    279279
    280280        /* start, width, row1, row2, row3, row4, row5, pad */
     
    308308*/
    309309
    310 void hilitpm(char n)
     310void hilitpm(int8_t n)
    311311{
    312         register short chr, h, v, w;
     312        register int16_t chr, h, v, w;
    313313
    314314        ptemenu = n;                            /* set current submenu type */
     
    468468*/
    469469
    470 void movectc(short r, short c)
     470void movectc(int16_t r, int16_t c)
    471471{
    472472        ctcpos(r, c);
     
    480480*/
    481481
    482 void endpsm(short row, short col)
     482void endpsm(int16_t row, int16_t col)
    483483{
    484484        submenu = FALSE;
     
    503503*/
    504504
    505 void edefstm(short du, short n)
     505void edefstm(int16_t du, int16_t n)
    506506{
    507         short chan, port, stim;
    508         register short i, left, right;
    509         register long ltemp;
     507        int16_t chan, port, stim;
     508        register int16_t i, left, right;
     509        register int32_t ltemp;
    510510
    511511#if     DEBUGIT
     
    662662*/
    663663
    664 void ptdest(short du)
     664void ptdest(int16_t du)
    665665{
    666         register long ltemp;
    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;
    669669
    670670#if     DEBUGIT
     
    905905*/
    906906
    907 void setsubm(short r, short c)
     907void setsubm(int16_t r, int16_t c)
    908908{
    909909        submenu = TRUE;
     
    922922*/
    923923
    924 short ptfnbox(short n)
     924int16_t ptfnbox(int16_t n)
    925925{
    926         register short i, box, ptd, ptt;
    927         register long ltemp;
     926        register int16_t i, box, ptd, ptt;
     927        register int32_t ltemp;
    928928
    929929        if (NOT submenu) {                      /* PATCH DATA ENTRY LINE */
     
    10411041                                }
    10421042
    1043                                 ptedat2 = tofpu((unsigned short)ltemp);
     1043                                ptedat2 = tofpu((uint16_t)ltemp);
    10441044                                epatch();       /* enter -- time */
    10451045                                return(SUCCESS);
Note: See TracChangeset for help on using the changeset viewer.