Changeset fa38804 in buchla-68k for ram/ptdkey.c


Ignore:
Timestamp:
07/14/2017 04:18:35 PM (7 years ago)
Author:
Thomas Lopatic <thomas@…>
Branches:
master
Children:
ace9ee7
Parents:
1efe224
Message:

Removed form-feed comments.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ram/ptdkey.c

    r1efe224 rfa38804  
    2929short   dumpstm = 0;
    3030#endif
    31 
    32 /*
    33 
    34 */
    3531
    3632int16_t dsdecol[5][2][2] =  {   /* destination data entry column table */
    … …  
    5551int16_t dtabl9[] = { 11, 1, 2, 3, 9 };          /* FPU datum format table */
    5652
    57 /*
    58 
    59 */
    60 
    6153/*
    6254   =============================================================================
    … …  
    10092        printf("  pte  pred: %3d  cpos: %3d  succ: %3d\n",
    10193                ptepred, ptecpos, ptesucc);
    102 
    103 /*
    104 
    105 */
    10694
    10795#if     DUMPDEF
    … …  
    140128}
    141129
    142 /*
    143 
    144 */
    145 
    146130/*
    147131   =============================================================================
    … …  
    173157}
    174158
    175 /*
    176 
    177 */
    178 
    179159/*
    180160   =============================================================================
    … …  
    221201}
    222202
    223 /*
    224 
    225 */
    226 
    227203/*
    228204   =============================================================================
    … …  
    254230                ptedata = 14;
    255231                break;
    256 /*
    257 
    258 */
     232
    259233        case 4:         /* seq, reg */
    260234
    … …  
    312286        }
    313287}
    314 
    315 /*
    316 
    317 */
    318288
    319289/*
    … …  
    350320                ptdebuf[27] = ' ';
    351321
    352 /*
    353 
    354 */
     322
    355323                ptegood = TRUE;                 /* validate the patch buffer */
    356324                ptedfok = TRUE;
    … …  
    381349}
    382350
    383 /*
    384 
    385 */
    386 
    387351/*
    388352   =============================================================================
    … …  
    434398                                                UpdVid(7, n ? 25 : 12, buf2, PTDATR);
    435399                                        }
    436 /*
    437 
    438 */
     400
    439401                                        port = key - 1;
    440402
    … …  
    468430
    469431                        return;
    470 /*
    471 
    472 */
     432
    473433                } else if ((port EQ 2) AND (chan EQ 2)) {
    474434
    … …  
    515475        }
    516476}
    517 
    518 /*
    519 
    520 */
    521477
    522478/*
    … …  
    548504                ptde_ds(1, key);
    549505                return;
    550 /*
    551 
    552 */
     506
    553507        } else if (inrange(stccol, 28, 40)) {   /* DESTINATION */
    554508
    … …  
    593547
    594548                                return;
    595 /*
    596 
    597 */
     549
    598550                        case 1:         /* trg */
    599551
    … …  
    630582
    631583                                return;
    632 /*
    633 
    634 */
     584
    635585                        case 3:         /* led */
    636586
    … …  
    667617
    668618                                return;
    669 /*
    670 
    671 */
     619
    672620                        case 5:         /* tune */
    673621                        case 7:         /* aux, rate, inten, depth */
    … …  
    709657
    710658                                /* FALL-THROUGH to handle v/g in columns 39..40 */
    711 /*
    712 
    713 */
     659
    714660                        case 6:         /* inst, wava, wavb, conf */
    715661                        case 10:        /* level, filtr, fil q, loctn, dynmc */
    … …  
    741687                                                        return;
    742688                                                }
    743 /*
    744 
    745 */
     689
    746690                                        } else {        /* column 40 */
    747691
    … …  
    784728                        }
    785729                }
    786 /*
    787 
    788 */
     730
    789731        } else if (inrange(stccol, 42, 46)) {   /* DATUM */
    790732
    … …  
    826768                                return;
    827769                        }
    828 /*
    829 
    830 */
     770
    831771                        buf[1] = '\0';
    832772                        ptdebuf[stccol] = buf[0];
    … …  
    843783
    844784                        return;
    845 /*
    846 
    847 */
     785
    848786                case 2:         /* time -- 32767 */
    849787
    … …  
    864802                        return;
    865803
    866 /*
    867 
    868 */
     804
    869805                case 3:         /* value -- +10.00 */
    870806
    … …  
    917853
    918854                                break;
    919 /*
    920 
    921 */
     855
    922856                        case 43:
    923857                        case 45:
    … …  
    946880
    947881                        return;
    948 /*
    949 
    950 */
     882
    951883                case 4:         /* interval -- +1200 */
    952884
    … …  
    983915
    984916                        return;
    985 /*
    986 
    987 */
     917
    988918                case 5:         /* ratio -- 9/9 */
    989919
    … …  
    1017947
    1018948                        return;
    1019 /*
    1020 
    1021 */
     949
    1022950                case 6:         /* frequency -- 15.9 */
    1023951
    … …  
    1057985
    1058986                        return;
    1059 /*
    1060 
    1061 */
     987
    1062988                case 7:         /* pitch -- 9C#99 */
    1063989
    … …  
    11041030
    11051031                        return;
    1106 /*
    1107 
    1108 */
     1032
    11091033                case 8:         /* trans | stop | start */
    11101034
    … …  
    11381062                        movectc(stcrow, 46);
    11391063                        return;
    1140 /*
    1141 
    1142 */
     1064
    11431065                case 9:         /* stop | start */
    11441066
    … …  
    11841106                        movectc(stcrow, 46);
    11851107                        return;
    1186 /*
    1187 
    1188 */
     1108
    11891109                case 11:        /* source */
    11901110
    … …  
    12301150
    12311151                        return;
    1232 /*
    1233 
    1234 */
     1152
    12351153                case 13:        /* sequence line */
    12361154
    … …  
    12721190
    12731191                        return;
    1274 /*
    1275 
    1276 */
     1192
    12771193                case 15:        /* instrument number */
    12781194
    … …  
    12951211
    12961212                        return;
    1297 /*
    1298 
    1299 */
     1213
    13001214                case 16:        /* waveshape number */
    13011215
    … …  
    13391253
    13401254                        return;
    1341 /*
    1342 
    1343 */
     1255
    13441256                case 18:        /* tuning table number */
    13451257
Note: See TracChangeset for help on using the changeset viewer.