Changeset fa38804 in buchla-68k for ram/sqselbx.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/sqselbx.c
r1efe224 rfa38804 21 21 22 22 struct seqent seqbuf; /* sequence line buffer */ 23 24 /*25 26 */27 23 28 24 int8_t sqhilit[][8] = { /* submenu highlight table */ … … 50 46 51 47 int8_t nextact[] = { 24, 36, 6 }; /* next column after action entry */ 52 53 /*54 55 */56 48 57 49 int16_t sqidata[] = { /* intial data by box */ … … 77 69 }; 78 70 79 /*80 81 */82 83 71 int8_t actcol[] = { /* action data entry column by action */ 84 72 … … 94 82 SQ_VAL, SQ_REG, SQ_VLT, SQ_RND 95 83 }; 96 97 /*98 99 */100 84 101 85 /* … … 124 108 } 125 109 } 126 127 /*128 129 */130 110 131 111 /* … … 177 157 } 178 158 179 /*180 181 */182 183 159 /* 184 160 ============================================================================= … … 208 184 movestc(row, col); 209 185 } 210 211 /*212 213 */214 186 215 187 /* … … 226 198 } 227 199 228 /*229 230 */231 232 200 /* 233 201 ============================================================================= … … 270 238 } 271 239 272 /* 273 274 */ 240 275 241 lcol = actlft[action]; 276 242 theact = SQ_MACT & *ap; … … 295 261 296 262 key = ltemp - 1; 297 /* 298 299 */ 263 300 264 i = sqdebuf[lcol + 7]; 301 265 … … 327 291 328 292 break; 329 /* 330 331 */ 293 332 294 case SQ_STRG: /* "Trig on 01" */ 333 295 case SQ_CTRG: /* "Trig off 01" */ … … 364 326 365 327 break; 366 /* 367 368 */ 328 369 329 case SQ_SREG: /* "Set R01=00 " */ 370 330 case SQ_AREG: /* "Inc R01+00 " */ … … 408 368 409 369 break; 410 /* 411 412 */ 370 413 371 case SQ_VLT: /* control voltage */ 414 372 … … 441 399 return(FAILURE); 442 400 } 443 /* 444 445 */ 401 446 402 memcpyw(&seqtab[curslin], &seqbuf, NSEQW); 447 403 dsqlin(sqdebuf, curslin); … … 452 408 } 453 409 454 /*455 456 */457 458 410 /* 459 411 ============================================================================= … … 501 453 movestc(DATAROW, 12); 502 454 return(SUCCESS); 503 /* 504 505 */ 455 506 456 } else if (inrange(stccol, 12, 22)) { /* Action 1 */ 507 457 … … 543 493 return(sqenter()); 544 494 } 545 /* 546 547 */ 495 548 496 } else if (inrange(stccol, 36, 46)) { /* Action 3 */ 549 497 … … 568 516 } else 569 517 return(FAILURE); 570 /* 571 572 */ 518 573 519 } else { /* SUBMENU SELECTION */ 574 520 … … 587 533 else 588 534 return(FAILURE); 589 /* 590 591 */ 535 592 536 switch (sqmenu) { /* switch on submenu type */ 593 537 … … 636 580 637 581 return(SUCCESS); 638 /* 639 640 */ 582 641 583 case ST_1: /* operand type */ 642 584
Note:
See TracChangeset
for help on using the changeset viewer.