Mercurial > repos > blastem

comparison menu.s68 @ 910:c030e4af32b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Mouse X and Y are 9-bit 2's complement not 8-bit magnitude + sign bit like I thought. Fixed mouse Y direction.
author Michael Pavone <pavone@retrodev.com>
date Sat, 05 Dec 2015 18:40:34 -0800
parents e60eb88d7b09
children f057975212e9
comparison
equal deleted inserted replaced
909:e60eb88d7b09 910:c030e4af32b7
362 move.b d2, num_sprites.w 362 move.b d2, num_sprites.w
363 363
364 move.b #1, mouse_shown.w 364 move.b #1, mouse_shown.w
365 365
366 .skip_show_check 366 .skip_show_check
367 neg.w d1
367 move.l mouse_sprite.w, a2 368 move.l mouse_sprite.w, a2
368 add.w d1, (a2) 369 add.w d1, (a2)
369 add.w d0, mouse_x.w 370 add.w d0, mouse_x.w
370 move.w mouse_x.w, d0 371 move.w mouse_x.w, d0
371 asr.w #1, d0 372 asr.w #1, d0
503 move.b (a4)+, d3 504 move.b (a4)+, d3
504 move.b (a4), d0 505 move.b (a4), d0
505 506
506 btst #4, d3 507 btst #4, d3
507 beq xpos 508 beq xpos
508 neg.w d0 509 or.w #$FF00, d0
509 xpos 510 xpos
510 btst #5, d3 511 btst #5, d3
511 beq ypos 512 beq ypos
512 neg.w d1 513 or.w #$FF00, d1
513 ypos 514 ypos
514 ;set port config back to normal controller mode 515 ;set port config back to normal controller mode
515 move.b #$40, (PAD1_CTRL-PAD1_DATA, a2) 516 move.b #$40, (PAD1_CTRL-PAD1_DATA, a2)
516 rts 517 rts
517 518