Changeset 84c0125 in buchla-68k for ram/sedisp.s
- Timestamp:
- 08/07/2017 01:05:57 PM (7 years ago)
- Branches:
- master
- Children:
- 8325447
- Parents:
- 15854f1
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ram/sedisp.s
r15854f1 r84c0125 4 4 5 5 | se_disp(ep, sd, gdstb, cf) 6 | struct s_entry |ep;6 | struct s_entry *ep; 7 7 | short sd; 8 | struct gdsel |gdstb[];8 | struct gdsel *gdstb[]; 9 9 | short cf; 10 10 … … 111 111 | gdsel structure definitions 112 112 | --------------------------- 113 G_NEXT = 0 | long - 'next' field (struct gdsel |)113 G_NEXT = 0 | long - 'next' field (struct gdsel *) 114 114 G_NOTE = 4 | word - 'note' field (short) 115 115 G_CODE = 6 | word - 'code' field (short) … … 206 206 clr.b numstr+3 | terminate string 207 207 move.w d1,d0 | col = group 208 asl.w #2,d0 | ... |5208 asl.w #2,d0 | ... * 5 209 209 add.w d1,d0 | ... 210 210 add.w #6,d0 | ... + 6 … … 251 251 clr.w d2 | d2 = ep->group 252 252 move.b E_GROUP(a0),d2 | ... 253 lsl.w #2,d2 | ... |4253 lsl.w #2,d2 | ... * 4 254 254 movea.l P_SL(a6),a2 | a2 points at gdstb 255 255 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[ep->group] … … 304 304 clr.w d2 | get group in d2 305 305 move.b E_GROUP(a0),d2 | ... 306 lsl.w #2,d2 | ... |4306 lsl.w #2,d2 | ... * 4 307 307 move.l 0(a2,d2.W),d0 | check gdstb[ep->group] 308 308 beq dsexit … … 353 353 movea.l d0,a1 | a1 = gdsp 354 354 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 355 move.w #48,d2 | d2 = event PRIORITY |4355 move.w #48,d2 | d2 = event PRIORITY * 4 356 356 movea.l P_SL(a6),a2 | a2 points at gdstb 357 357 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 376 376 movea.l d0,a1 | a1 = gdsp 377 377 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 378 move.w #48,d2 | d2 = event PRIORITY |4378 move.w #48,d2 | d2 = event PRIORITY * 4 379 379 movea.l P_SL(a6),a2 | a2 points at gdstb 380 380 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 394 394 movea.l d0,a1 | a1 = gdsp 395 395 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 396 move.w #48,d2 | d2 = event PRIORITY |4396 move.w #48,d2 | d2 = event PRIORITY * 4 397 397 movea.l P_SL(a6),a2 | a2 points at gdstb 398 398 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 428 428 movea.l d0,a1 | a1 = gdsp 429 429 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 430 move.w #52,d2 | d2 = event PRIORITY |4430 move.w #52,d2 | d2 = event PRIORITY * 4 431 431 movea.l P_SL(a6),a2 | a2 points at gdstb 432 432 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 491 491 move.w d1,-(a7) | save group number on stack 492 492 add.w d0,d0 | calculate column 493 add.w d0,d1 | ... = 5 |group493 add.w d0,d1 | ... = 5 * group 494 494 addi.w #5,d1 | ... + 5 495 495 move.w #AT11,-(a7) | vputs(obj8, 3, col, numstr, atr11) … … 519 519 movea.l d0,a1 | a1 = gdsp 520 520 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 521 move.w #52,d2 | d2 = event PRIORITY |4521 move.w #52,d2 | d2 = event PRIORITY * 4 522 522 movea.l P_SL(a6),a2 | a2 points at gdstb 523 523 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 548 548 move.w d1,-(a7) | save group number 549 549 move.w (a7),d0 | col = group number 550 add.w d0,d0 | ... |5550 add.w d0,d0 | ... * 5 551 551 add.w d0,d0 | ... 552 552 move.w (a7)+,d2 | ... (d2 = group number) … … 583 583 movea.l d0,a1 | a1 = gdsp 584 584 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 585 move.w #52,d2 | d2 = event PRIORITY |4585 move.w #52,d2 | d2 = event PRIORITY * 4 586 586 movea.l P_SL(a6),a2 | a2 points at gdstb 587 587 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 612 612 move.w d1,-(a7) | save group number 613 613 move.w (a7),d0 | col = group number 614 add.w d0,d0 | ... |5614 add.w d0,d0 | ... * 5 615 615 add.w d0,d0 | ... 616 616 move.w (a7)+,d2 | ... (d2 = group number) … … 647 647 movea.l d0,a1 | a1 = gdsp 648 648 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 649 move.w #52,d2 | d2 = event PRIORITY |4649 move.w #52,d2 | d2 = event PRIORITY * 4 650 650 movea.l P_SL(a6),a2 | a2 points at gdstb 651 651 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 683 683 move.w d1,-(a7) | save variable number 684 684 move.w d1,d0 | calculate display offset 685 lsl.w #3,d0 | ... (var |9) + 6685 lsl.w #3,d0 | ... (var * 9) + 6 686 686 add.w d0,d1 | ... in d1 687 687 addq.w #6,d1 | ... … … 707 707 movea.l d0,a1 | a1 = gdsp 708 708 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 709 move.w #52,d2 | d2 = event PRIORITY |4709 move.w #52,d2 | d2 = event PRIORITY * 4 710 710 movea.l P_SL(a6),a2 | a2 points at gdstb 711 711 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 743 743 move.w d1,-(a7) | save variable number 744 744 move.w d1,d0 | calculate display offset 745 lsl.w #3,d0 | ... (var |9) + 8745 lsl.w #3,d0 | ... (var * 9) + 8 746 746 add.w d0,d1 | ... in d1 747 747 addi.w #8,d1 | ... … … 791 791 movea.l d0,a1 | a1 = gdsp 792 792 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 793 move.w #52,d2 | d2 = event PRIORITY |4793 move.w #52,d2 | d2 = event PRIORITY * 4 794 794 movea.l P_SL(a6),a2 | a2 points at gdstb 795 795 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 834 834 movea.l d0,a1 | a1 = gdsp 835 835 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 836 move.w #56,d2 | d2 = event PRIORITY |4836 move.w #56,d2 | d2 = event PRIORITY * 4 837 837 movea.l P_SL(a6),a2 | a2 points at gdstb 838 838 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 880 880 movea.l d0,a1 | a1 = gdsp 881 881 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 882 move.w #56,d2 | d2 = event PRIORITY |4882 move.w #56,d2 | d2 = event PRIORITY * 4 883 883 movea.l P_SL(a6),a2 | a2 points at gdstb 884 884 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 918 918 movea.l d0,a1 | a1 = gdsp 919 919 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 920 move.w #56,d2 | d2 = event PRIORITY |4920 move.w #56,d2 | d2 = event PRIORITY * 4 921 921 movea.l P_SL(a6),a2 | a2 points at gdstb 922 922 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 955 955 movea.l d0,a1 | a1 = gdsp 956 956 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 957 move.w #56,d2 | d2 = event PRIORITY |4957 move.w #56,d2 | d2 = event PRIORITY * 4 958 958 movea.l P_SL(a6),a2 | a2 points at gdstb 959 959 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 978 978 movea.l d0,a1 | a1 = gdsp 979 979 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 980 move.w #60,d2 | d2 = event PRIORITY |4980 move.w #60,d2 | d2 = event PRIORITY * 4 981 981 movea.l P_SL(a6),a2 | a2 points at gdstb 982 982 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 1008 1008 move.w d1,-(a7) | save group number 1009 1009 move.w (a7),d0 | col = group number 1010 add.w d0,d0 | ... |51010 add.w d0,d0 | ... * 5 1011 1011 add.w d0,d0 | ... 1012 1012 move.w (a7)+,d2 | ... (d2 = group number) … … 1050 1050 movea.l d0,a1 | a1 = gdsp 1051 1051 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 1052 move.w #60,d2 | d2 = event PRIORITY |41052 move.w #60,d2 | d2 = event PRIORITY * 4 1053 1053 movea.l P_SL(a6),a2 | a2 points at gdstb 1054 1054 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 1100 1100 movea.l d0,a1 | a1 = gdsp 1101 1101 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 1102 move.w #60,d2 | d2 = event PRIORITY |41102 move.w #60,d2 | d2 = event PRIORITY * 4 1103 1103 movea.l P_SL(a6),a2 | a2 points at gdstb 1104 1104 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri] … … 1150 1150 movea.l d0,a1 | a1 = gdsp 1151 1151 move.l G_NEXT(a1),_gdfsep | gdfsep = gdsp->next 1152 move.w #60,d2 | d2 = event PRIORITY |41152 move.w #60,d2 | d2 = event PRIORITY * 4 1153 1153 movea.l P_SL(a6),a2 | a2 points at gdstb 1154 1154 move.l 0(a2,d2.W),G_NEXT(a1) | gdsp->next = gdstb[pri]
Note:
See TracChangeset
for help on using the changeset viewer.