comparison menu.s68 @ 973:fbd783ccbadb

Get mouse working in save state slot selection menu
author Michael Pavone <pavone@retrodev.com>
date Fri, 22 Apr 2016 09:20:01 -0700
parents e2d7067ea2d8
children 4360cb5960c8
comparison
equal deleted inserted replaced
972:4899d3ae37b3 973:fbd783ccbadb
480 480
481 move.b d0, selected.w 481 move.b d0, selected.w
482 482
483 bra .no_mouse_move 483 bra .no_mouse_move
484 .handle_slots 484 .handle_slots
485 485 and.w #$FFE0, d1
486 subq #8, d1
487 move.w d1, (sprite_list).w
488 move.w d1, (sprite_list+8).w
489
490 sub.w #264, d1
491 lsr.w #5, d1
492 move.b d1, selected.w
486 .no_mouse_move 493 .no_mouse_move
487 btst #0, d4 494 btst #0, d4
488 bne select_entry 495 bne select_entry
489 .done 496 .done
490 rts 497 rts
1014 show_save_slots: 1021 show_save_slots:
1015 move.w #(256+26), sprite_list.w 1022 move.w #(256+26), sprite_list.w
1016 move.w #(256+26), (sprite_list+8).w 1023 move.w #(256+26), (sprite_list+8).w
1017 move.w #(128+8), (sprite_list+6).w 1024 move.w #(128+8), (sprite_list+6).w
1018 move.w #(128+320-24), (sprite_list+6+8).w 1025 move.w #(128+320-24), (sprite_list+6+8).w
1026 move.w #(256+32), selection_top.w
1019 move.b #0, selected.w 1027 move.b #0, selected.w
1020 move.b #0, num_menu.w 1028 move.b #0, num_menu.w
1021 lea dir_buffer, a6 1029 lea dir_buffer, a6
1022 lea menu_port+16, a3 1030 lea menu_port+16, a3
1023 move.l a6, (a3) 1031 move.l a6, (a3)
1037 move.w d7, d2 1045 move.w d7, d2
1038 bsr print_string_fixed 1046 bsr print_string_fixed
1039 addq #2, d7 1047 addq #2, d7
1040 bra .slotloop 1048 bra .slotloop
1041 .done 1049 .done
1050 lsl.w #4, d7
1051 add.w #248, d7
1052 move.w d7, selection_bot.w
1042 move.b d6, num_slots.w 1053 move.b d6, num_slots.w
1043 rts 1054 rts
1044 1055
1045 save_state: 1056 save_state:
1046 move.b #(5*4), port_off.w 1057 move.b #(5*4), port_off.w