Mercurial > repos > blastem

comparison menu.s68 @ 943:05229aa23b00

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Adjust arrow X positions in menu
author Michael Pavone <pavone@retrodev.com>
date Wed, 09 Mar 2016 21:46:31 -0800
parents 74bb286e6174
children 10dd8c04cbbc
comparison
equal deleted inserted replaced
942:74bb286e6174 943:05229aa23b00
596 ;calculate X position 596 ;calculate X position
597 move.w d7, d4 597 move.w d7, d4
598 lsr.w #1, d4 598 lsr.w #1, d4
599 moveq #20, d5 599 moveq #20, d5
600 sub.w d4, d5 600 sub.w d4, d5
601 ;calculate left arrow X
602 move.w d5, d4
603 lsl.w #3, d4
604 add.w #(128-24), d4
605 move.w d4, (sprite_list+6).w
606 ;calculate right arrow x
607 move.w d7, d3
608 lsl.w #3, d3
609 add.w d3, d4
610 add.w #32, d4
611 move.w d4, (sprite_list+6+8).w
601 ;restore menu pointer 612 ;restore menu pointer
602 movea.l a4, a5 613 movea.l a4, a5
603 .drawloop 614 .drawloop
604 tst.b (a5) 615 tst.b (a5)
605 beq .done 616 beq .done
622 lsr.w #1, d0 633 lsr.w #1, d0
623 sub.w d0, d1 634 sub.w d0, d1
624 ;y pos 635 ;y pos
625 move.w d6, d2 636 move.w d6, d2
626 ;base attribute 637 ;base attribute
627 ;FIXME: Change base attribute to use fixed width font
628 move.w #$206B, d0 638 move.w #$206B, d0
629 bsr print_string_fixed 639 bsr print_string_fixed
630 640
631 addq #3, d6 641 addq #3, d6
632 bra .drawloop 642 bra .drawloop