Changeset fa38804 in buchla-68k for ram/scfield.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/scfield.c
r1efe224 rfa38804 9 9 10 10 #define PCENTER 256L 11 12 /*13 14 */15 11 16 12 struct fet sc_fet1[] = { … … 50 46 {19, 60, 63, 11, et_trns, ef_trns, rd_trns, nd_trns}, 51 47 52 /*53 54 */55 56 48 {20, 6, 6, 0, et_dyn, ef_dyn, rd_dyn, nd_dyn}, 57 49 {20, 8, 8, 0, et_loc, ef_loc, rd_loc, nd_loc}, … … 89 81 {20, 61, 61, 11, et_dyn, ef_dyn, rd_dyn, nd_dyn}, 90 82 {20, 63, 63, 11, et_loc, ef_loc, rd_loc, nd_loc}, 91 92 /*93 94 */95 83 96 84 {21, 6, 8, 0, et_vel, ef_vel, rd_vel, nd_vel}, … … 134 122 { 0, 0, 0, 0x0000, FN_NULL, FN_NULL, FN_NULL, FN_NULL} 135 123 }; 136 137 /*138 139 */140 124 141 125 struct curpak sc_flds = { … … 164 148 }; 165 149 166 /*167 168 */169 170 150 /* 171 151 ============================================================================= … … 193 173 return(SUCCESS); 194 174 } 195 196 /*197 198 */199 175 200 176 /* … … 239 215 } 240 216 241 /*242 243 */244 245 217 /* 246 218 ============================================================================= … … 290 262 } 291 263 292 /*293 294 */295 296 264 /* 297 265 ============================================================================= … … 328 296 } 329 297 330 /*331 332 */333 334 298 /* 335 299 ============================================================================= … … 367 331 } 368 332 369 /*370 371 */372 373 333 /* 374 334 ============================================================================= … … 408 368 } else 409 369 return(FAILURE); 410 /* 411 412 */ 370 413 371 } else if (fnc EQ 1) { /* mode */ 414 372 … … 432 390 } else 433 391 return(FAILURE); 434 /* 435 436 */ 392 437 393 } else if (stcrow EQ 22) { /* analog variables */ 438 394 … … 466 422 } 467 423 468 /*469 470 */471 472 424 /* 473 425 ============================================================================= … … 490 442 return(TRUE); /* ... and return TRUE */ 491 443 } 492 493 /*494 495 */496 444 497 445 /* … … 512 460 ep = ep_adj(p_cur, 1, thetime); /* start at left end of chain */ 513 461 514 /* 515 516 */ 462 517 463 while (ep->e_time EQ thetime) { /* for each event at ctime ... */ 518 464 … … 554 500 return(rc); 555 501 } 556 557 /*558 559 */560 502 561 503 /* … … 619 561 ep = rp; /* next event */ 620 562 } 621 /* 622 623 */ 563 624 564 } else if ((vc GE 2) AND (vc LE 6)) { /* value */ 625 565 … … 670 610 } 671 611 672 /*673 674 */675 676 612 /* 677 613 ============================================================================= … … 693 629 if (scmctl NE -1) /* ... and area 1 menu is down */ 694 630 return; 695 /* 696 697 */ 631 698 632 if (sdmctl EQ 4) { /* section menu is up */ 699 633 … … 740 674 741 675 break; 742 /* 743 744 */ 676 745 677 case 1: /* section number */ 746 678 case 2: … … 779 711 return; 780 712 781 /* 782 783 */ 713 784 714 } else if ((vtcrow EQ 23) AND 785 715 (vtccol GE 28) AND (vtccol LE 62)) { … … 810 740 if (cp2time(cxval)) 811 741 delevts(-1, ctime); /* delete all events at cursor */ 812 813 /*814 815 */816 742 817 743 } else if (stcrow EQ 17) { … … 860 786 861 787 deladat(); 862 /* 863 864 */ 788 865 789 } else if (stcrow EQ 24) { /* score */ 866 790 … … 885 809 } 886 810 887 /*888 889 */890 891 811 /* 892 812 ============================================================================= … … 906 826 } 907 827 908 /*909 910 */911 912 828 /* 913 829 =============================================================================
Note:
See TracChangeset
for help on using the changeset viewer.