Changeset fa38804 in buchla-68k for ram/scordsp.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/scordsp.c
r1efe224 rfa38804 7 7 8 8 #include "ram.h" 9 10 /*11 12 */13 9 14 10 /* initialized stuff */ … … 58 54 }; 59 55 60 /*61 62 */63 64 56 int8_t *clklbl[] = { /* clock control and scource labels */ 65 57 … … 101 93 }; 102 94 103 /*104 105 */106 107 95 /* 108 96 ============================================================================= … … 125 113 lnc &= 0x000F; /* mask cursor line color */ 126 114 127 /* 128 129 */ 115 130 116 for (i = 0; i < 224; i++) { 131 117 … … 167 153 } 168 154 169 /*170 171 */172 173 155 consl[74] = lew; /* constant slice treble clef lines */ 174 156 consl[82] = lew; … … 186 168 } 187 169 188 /*189 190 */191 192 170 /* 193 171 ============================================================================= … … 234 212 } 235 213 236 /*237 238 */239 240 214 /* 241 215 ============================================================================= … … 273 247 } 274 248 275 /*276 277 */278 279 249 /* 280 250 ============================================================================= … … 296 266 vputs(obj8, 7, 59, buf, SDW12ATR); 297 267 } 298 299 /*300 301 */302 268 303 269 /* … … 327 293 } 328 294 } 329 330 /*331 332 */333 295 334 296 /* … … 374 336 } 375 337 376 /*377 378 */379 380 338 /* 381 339 ============================================================================= … … 401 359 } 402 360 403 /*404 405 */406 407 361 /* 408 362 ============================================================================= … … 425 379 } 426 380 427 /*428 429 */430 431 381 /* 432 382 ============================================================================= … … 458 408 } 459 409 460 /*461 462 */463 464 410 /* 465 411 ============================================================================= … … 480 426 vputs(obj8, 0, 6, bfs, SDW01ATR); 481 427 } 482 483 /*484 485 */486 428 487 429 /* … … 511 453 } 512 454 513 /*514 515 */516 517 455 /* 518 456 ============================================================================= … … 553 491 } 554 492 555 /*556 557 */558 559 493 /* 560 494 ============================================================================= … … 593 527 vputc(obj8, 2, 6 + (n * 5), '*', simled[grpmode[n]]); 594 528 } 595 596 /*597 598 */599 529 600 530 /* … … 637 567 dsvmode(i); 638 568 } 639 640 /*641 642 */643 569 644 570 /* … … 676 602 GLCcurs(G_OFF); 677 603 } 678 /* 679 680 */ 604 681 605 if (ndisp NE 2) 682 606 return; … … 701 625 } 702 626 703 /*704 705 */706 707 627 /* 708 628 ============================================================================= … … 729 649 } 730 650 731 /*732 733 */734 735 651 /* 736 652 ============================================================================= … … 778 694 dnedmod(); 779 695 return; 780 /* 781 782 */ 696 783 697 case 4: /* assignment */ 784 698 … … 809 723 vputs(obj8, 1, 40, "Stop/Next ", SDW08ATR); 810 724 return; 811 /*812 813 */814 725 815 726 case 9: /* punch in/out */ … … 843 754 844 755 return; 845 /* 846 847 */ 756 848 757 case 12: /* analog variables */ 849 758 … … 895 804 } 896 805 897 /*898 899 */900 901 806 /* 902 807 ============================================================================= … … 915 820 sdwin(i); 916 821 } 917 918 /*919 920 */921 822 922 823 /* … … 977 878 ttcini(SDCURSR); /* setup typewriter cursor */ 978 879 979 /* 980 981 */ 880 982 881 if ((v_regs[5] & 0x0180) NE 0x0100) 983 882 vbank(1); /* select bank 1 */
Note:
See TracChangeset
for help on using the changeset viewer.