Changeset fa38804 in buchla-68k for ram/lcdlbls.c
- Timestamp:
- 07/14/2017 04:18:35 PM (7 years ago)
- Branches:
- master
- Children:
- ace9ee7
- Parents:
- 1efe224
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ram/lcdlbls.c
r1efe224 rfa38804 20 20 21 21 #define PCHMAX 21920L /* maximum pitch value */ 22 23 /*24 25 */26 22 27 23 /* initialized stuff */ … … 54 50 int16_t arpar[] = { 4, 2, 9, 11, 12, 1, 3, 5, 7, 13, 14, 15, 10, 6}; 55 51 56 /*57 58 */59 60 52 int16_t sl2gain[32] = { /* slider value to EQ gain conversion table */ 61 53 … … 126 118 }; 127 119 128 /*129 130 */131 132 120 LPF t_prmtr[] = { /* switch assignments for LS_PRMTR */ 133 121 … … 174 162 }; 175 163 176 /*177 178 */179 180 164 LPF t_other[] = { /* switch assignments for LS_OTHER */ 181 165 … … 222 206 }; 223 207 224 /*225 226 */227 228 208 LPF t_inst[] = { /* switch assignments for LS_INST */ 229 209 … … 270 250 }; 271 251 272 /*273 274 */275 276 252 LPF t_ngrp[] = { /* switch assignments for LS_NGRP */ 277 253 … … 318 294 }; 319 295 320 /*321 322 */323 324 296 /* 325 297 ============================================================================= … … 331 303 { 332 304 } 333 334 /*335 336 */337 305 338 306 /* … … 373 341 dsrpmod(); 374 342 } 375 376 /*377 378 */379 343 380 344 /* … … 427 391 } 428 392 429 /*430 431 */432 433 393 /* 434 394 ============================================================================= … … 474 434 } 475 435 476 /*477 478 */479 480 436 /* 481 437 ============================================================================= … … 528 484 setipl(oldi); /* turn interrupts back on */ 529 485 } 530 531 /*532 533 */534 486 535 487 /* … … 566 518 } 567 519 568 /*569 570 */571 572 520 /* 573 521 ============================================================================= … … 615 563 } 616 564 617 /*618 619 */620 621 565 /* 622 566 ============================================================================= … … 650 594 651 595 lcdlbls(); 652 /* 653 654 */ 596 655 597 } else { /* setup for load mode */ 656 598 … … 693 635 } 694 636 695 /*696 697 */698 699 637 /* 700 638 ============================================================================= … … 746 684 747 685 break; 748 /* 749 750 */ 686 751 687 case LS_VOICE: /* voice selection */ 752 688 … … 798 734 } 799 735 800 /* 801 802 */ 736 803 737 GLCtext(7, 1, potlbls[sliders]); /* label the pots */ 804 738 … … 856 790 } 857 791 858 /*859 860 */861 862 792 /* 863 793 ============================================================================= … … 909 839 } 910 840 911 /*912 913 */914 915 841 /* 916 842 ============================================================================= … … 926 852 selasg(0); 927 853 } 928 929 /*930 931 */932 854 933 855 /* … … 960 882 lseg(GOTO_XL, GOTO_Y, GOTO_XR, GOTO_Y, 0); 961 883 } 962 /* 963 964 */ 884 965 885 switch (asmode) { 966 886 … … 1000 920 } 1001 921 1002 /*1003 1004 */1005 1006 922 /* 1007 923 ============================================================================= … … 1034 950 1035 951 GLCcurs(G_OFF); 1036 /* 1037 1038 */ 952 1039 953 switch (ismode) { 1040 954 … … 1077 991 } 1078 992 1079 /*1080 1081 */1082 1083 993 /* 1084 994 ============================================================================= … … 1127 1037 setinst(); 1128 1038 1129 /* 1130 1131 */ 1039 1132 1040 ismode = IS_NULL; 1133 1041 pkctrl = oldpk; … … 1139 1047 } 1140 1048 1141 /*1142 1143 */1144 1145 1049 /* 1146 1050 ============================================================================= … … 1156 1060 selins(0); 1157 1061 } 1158 1159 /*1160 1161 */1162 1062 1163 1063 /* … … 1194 1094 recsw = FALSE; /* force play mode */ 1195 1095 dsrpmod(); 1196 /* 1197 1198 */ 1096 1199 1097 switch (gomode) { /* select Go To mode */ 1200 1098 … … 1230 1128 setleds(); 1231 1129 } 1232 1233 /*1234 1235 */1236 1130 1237 1131 /* … … 1255 1149 smp = smf = (struct sment *)&valents[gs]; 1256 1150 1257 /* 1258 1259 */ 1151 1260 1152 while (smf NE (smp = smp->nxt)) { /* for each function ... */ 1261 1153 … … 1304 1196 } 1305 1197 } 1306 1307 /*1308 1309 */1310 1198 1311 1199 /* … … 1349 1237 smp = smf; 1350 1238 1351 /* 1352 1353 */ 1239 1354 1240 while (smf NE (smp = smp->nxt)) { /* update functions */ 1355 1241 … … 1395 1281 return(TRUE); 1396 1282 } 1397 1398 /*1399 1400 */1401 1283 1402 1284 /* … … 1423 1305 smp = smf; 1424 1306 1425 /* 1426 1427 */ 1307 1428 1308 while (smf NE (smp = smp->nxt)) { /* update functions */ 1429 1309 … … 1468 1348 } 1469 1349 1470 /*1471 1472 */1473 1474 1350 /* 1475 1351 ============================================================================= … … 1505 1381 } 1506 1382 1507 /*1508 1509 */1510 1511 1383 /* 1512 1384 ============================================================================= … … 1551 1423 } 1552 1424 1553 /*1554 1555 */1556 1557 1425 /* 1558 1426 ============================================================================= … … 1595 1463 } 1596 1464 1597 /*1598 1599 */1600 1601 1465 /* 1602 1466 ============================================================================= … … 1637 1501 lastart[arpar[i]] = artitab[i]; 1638 1502 } 1639 1640 /*1641 1642 */1643 1503 1644 1504 /* … … 1718 1578 } 1719 1579 1720 /*1721 1722 */1723 1724 1580 /* 1725 1581 ============================================================================= … … 1754 1610 break; 1755 1611 1756 /*1757 1758 */1759 1760 1612 case 2: /* level */ 1761 1613 … … 1788 1640 1789 1641 } 1790 1791 /*1792 1793 */1794 1642 1795 1643 /* … … 1834 1682 1835 1683 return; 1836 /* 1837 1838 */ 1684 1839 1685 case LS_OTHER: /* aux, dome, cv control */ 1840 1686 … … 1884 1730 return; 1885 1731 1886 /* 1887 1888 */ 1732 1889 1733 case LS_EQ: /* eq control */ 1890 1734 … … 1900 1744 } 1901 1745 } 1902 1903 /*1904 1905 */1906 1746 1907 1747 /* … … 1922 1762 } 1923 1763 1924 /*1925 1926 */1927 1928 1764 /* 1929 1765 =============================================================================
Note:
See TracChangeset
for help on using the changeset viewer.