461 lines
13 KiB
NASM
461 lines
13 KiB
NASM
arch gba.thumb
|
|
|
|
//==============================================================================
|
|
// Relocation hacks
|
|
//==============================================================================
|
|
|
|
// Move the weird box font from 0xFCE6C
|
|
org $80B3274; dd m2_font_relocate
|
|
|
|
|
|
//==============================================================================
|
|
// Font hacks
|
|
//==============================================================================
|
|
|
|
org $8AFED84; incbin m2-mainfont1-empty.bin
|
|
org $8B0F424; incbin m2-mainfont2-empty.bin
|
|
org $8B13424; incbin m2-mainfont3-empty.bin
|
|
org $8B088A4; incbin m2-shifted-cursor.bin
|
|
|
|
// Greek letters
|
|
org $8B1B907; db $8B // alpha
|
|
org $8B1B90A; db $8C // beta
|
|
org $8B1B90D; db $8D // gamma
|
|
org $8B1B910; db $8E // sigma
|
|
org $8B1B913; db $8F // omega
|
|
|
|
|
|
//==============================================================================
|
|
// VWF hacks
|
|
//==============================================================================
|
|
|
|
// 32- to 16-bit access change for window flags
|
|
org $80BE16A; strh r2,[r4,#0]
|
|
org $80BE1FA; strh r2,[r6,#0]
|
|
org $80BE222; strh r6,[r1,#0]
|
|
|
|
// PSI class window size
|
|
org $80B7820
|
|
mov r1,#4
|
|
mov r2,#1
|
|
mov r3,#6
|
|
|
|
//---------------------------------------------------------
|
|
// C0A5C hacks (status window)
|
|
//---------------------------------------------------------
|
|
|
|
incsrc m2-status-initial.asm
|
|
incsrc m2-status-switch.asm
|
|
|
|
//---------------------------------------------------------
|
|
// BAC18 hacks (status window switching)
|
|
//---------------------------------------------------------
|
|
|
|
org $80BACFC; bl m2_vwf_entries.bac18_redraw_status
|
|
org $80BADE6; bl m2_vwf_entries.bac18_redraw_status
|
|
org $80BACEE; bl m2_vwf_entries.bac18_clear_psi
|
|
org $80BADC8
|
|
bl m2_vwf_entries.bac18_check_button
|
|
b $80BADD8
|
|
|
|
//---------------------------------------------------------
|
|
// BAEF8 hacks (equip window)
|
|
//---------------------------------------------------------
|
|
|
|
// Erase offense change
|
|
define erase_offense "mov r0,#0xC; mov r1,#0xB; mov r2,#4; bl m2_vwf.print_blankstr"
|
|
org $80BB216; {erase_offense}
|
|
org $80BB38C; {erase_offense}
|
|
org $80BB4C6; {erase_offense}
|
|
org $80BB5FC; {erase_offense}
|
|
org $80BBAAE; {erase_offense}
|
|
org $80BBBF6; {erase_offense}
|
|
org $80BBD54; {erase_offense}
|
|
|
|
// Erase defense change
|
|
define erase_defense "mov r0,#0xC; mov r1,#0xD; mov r2,#4; bl m2_vwf.print_blankstr"
|
|
org $80BB226; {erase_defense}
|
|
org $80BBABE; {erase_defense}
|
|
org $80BBC06; {erase_defense}
|
|
org $80BBD64; {erase_defense}
|
|
|
|
// Erase offense/defense after changing equipment
|
|
org $80BB3E2; bl m2_vwf_entries.baef8_reequip_erase
|
|
org $80BB518; bl m2_vwf_entries.baef8_reequip_erase
|
|
org $80BBB12; bl m2_vwf_entries.baef8_reequip_erase
|
|
org $80BBC70; bl m2_vwf_entries.baef8_reequip_erase
|
|
|
|
//80B80EE
|
|
|
|
//---------------------------------------------------------
|
|
// C5500 hacks (equip window switching)
|
|
//---------------------------------------------------------
|
|
|
|
// Clear offense/defense changes when moving cursor
|
|
org $80C5AA2; bl m2_vwf_entries.c5500_clear_up
|
|
org $80C5B12; bl m2_vwf_entries.c5500_clear_down
|
|
|
|
// Don't draw equip icon
|
|
org $80C5A1A; nop
|
|
org $80C5A28; nop
|
|
|
|
//---------------------------------------------------------
|
|
// C1FBC hacks (PSI window)
|
|
//---------------------------------------------------------
|
|
|
|
org $80C203E; mov r1,#0x14 // new PSI name entry length
|
|
org $80C21B4; mov r1,#0x14
|
|
org $80C224A; mov r1,#0x14
|
|
org $80C229E; mov r1,#0x14
|
|
|
|
// Draw PSI Rockin
|
|
org $80C2192
|
|
mov r2,r8
|
|
str r2,[sp,#0]
|
|
mov r2,#0xFD
|
|
lsl r2,r2,#1
|
|
add r0,r6,r2
|
|
mov r1,#0x71
|
|
mov r2,#8
|
|
bl m2_vwf.print_string
|
|
|
|
//---------------------------------------------------------
|
|
// C239C hacks (print PSI name)
|
|
//---------------------------------------------------------
|
|
|
|
org $80C23AA; lsr r2,r2,#0xD // tiles-to-pixels
|
|
org $80C23AE; lsr r6,r3,#0xD // tiles-to-pixels
|
|
org $80C23CE; bl m2_vwf_entries.c239c_print_psi; nop; nop; nop
|
|
org $80C23DA; add r4,#17 // pixel width of "PSI "
|
|
org $80C23F0; bl m2_vwf.print_string_hlight_pixels // print rockin'
|
|
org $80C2402; mov r0,#3; lsl r0,r0,#0x10 // pixel width of space
|
|
org $80C242E; mov r0,#0x14 // new PSI name entry length
|
|
org $80C2448
|
|
bl m2_vwf.print_string_hlight_pixels // print PSI name
|
|
mov r2,r1 // record X width
|
|
add r2,#3 // add a space
|
|
org $80C2468; bl m2_vwf.print_string_hlight_pixels
|
|
|
|
//---------------------------------------------------------
|
|
// C438C hacks (PSI window cursor movement)
|
|
//---------------------------------------------------------
|
|
|
|
org $80C4580; bl m2_vwf_entries.c438c_moveup
|
|
org $80C4642; bl m2_vwf_entries.c438c_movedown
|
|
org $80C4768; bl m2_vwf_entries.c438c_moveright
|
|
org $80C48B2; bl m2_vwf_entries.c438c_moveleft
|
|
|
|
//---------------------------------------------------------
|
|
// PSI target window hacks
|
|
//---------------------------------------------------------
|
|
|
|
// PSI target length hack
|
|
org $80B8B12; mov r0,#0x14
|
|
org $80C24EE; mov r1,#0x14
|
|
|
|
// Fix PSI target offset calculation
|
|
org $80B8B08
|
|
mov r1,#100
|
|
mul r1,r2
|
|
nop
|
|
nop
|
|
|
|
// Make PP cost use correct number values
|
|
org $80CA732
|
|
add r1,#0x60
|
|
|
|
// Make PP cost use the correct space value if there's only one digit
|
|
org $80CA712
|
|
mov r0,#0x50
|
|
|
|
//---------------------------------------------------------
|
|
// B8BBC hacks (PSI window)
|
|
//---------------------------------------------------------
|
|
|
|
// Redraw main menu when exiting PSI target window
|
|
org $80B8E3A; bl m2_vwf_entries.b8bbc_redraw_menu_2to1
|
|
|
|
// Redraw main menu when entering PSI target window
|
|
org $80B8CF8; bl m2_vwf_entries.b8bbc_redraw_menu_13to2 // 1 to 2
|
|
org $80B920C; bl m2_vwf_entries.b8bbc_redraw_menu_13to2 // 3 to 2
|
|
|
|
//---------------------------------------------------------
|
|
// C4B2C hacks (Equip window render)
|
|
//---------------------------------------------------------
|
|
|
|
// Start equipment at the 6th tile instead of 5th
|
|
org $80C4C96; mov r2,#6 // Weapon
|
|
org $80C4D1C; mov r2,#6 // Body
|
|
org $80C4DA4; mov r2,#6 // Arms
|
|
org $80C4E2C; mov r2,#6 // Other
|
|
|
|
// Only render (None) if necessary
|
|
org $80C4C0C
|
|
bl m2_vwf_entries.c4b2c_skip_nones
|
|
b $80C4C58
|
|
|
|
// Don't render equip symbols
|
|
org $80C4CD0; nop
|
|
org $80C4CDE; nop
|
|
org $80C4D58; nop
|
|
org $80C4D66; nop
|
|
org $80C4DE0; nop
|
|
org $80C4DEE; nop
|
|
org $80C4E68; nop
|
|
org $80C4E76; nop
|
|
|
|
// Widen the who/where/etc window
|
|
org $80B77B4; mov r3,#5
|
|
org $80BA9E2; mov r3,#5
|
|
|
|
//---------------------------------------------------------
|
|
// C4B2C hacks (Equip window loop)
|
|
//---------------------------------------------------------
|
|
|
|
org $80C4F80; bl m2_vwf_entries.c4b2c_clear_left
|
|
org $80C4F84; bl m2_vwf_entries.c4b2c_clear_right
|
|
|
|
//---------------------------------------------------------
|
|
// C980C hacks (main character printing)
|
|
//---------------------------------------------------------
|
|
|
|
// Reset pixel X during scroll
|
|
org $80C9858; bl m2_vwf_entries.c980c_resetx_newline
|
|
org $80C9BF0; bl m2_vwf_entries.c980c_resetx_scroll
|
|
org $80C9D18; bl m2_vwf_entries.c980c_resetx_newline
|
|
org $80CA336; bl m2_vwf_entries.c980c_resetx_newline
|
|
|
|
// Reset pixel X during a newline
|
|
org $80C9CC4
|
|
bl m2_vwf_entries.c980c_resetx_newline
|
|
|
|
// Other reset X
|
|
org $80C9D62; bl m2_vwf_entries.c980c_resetx_other
|
|
org $80C9D76; bl m2_vwf_entries.c980c_resetx_other2
|
|
org $80C9EEC; bl m2_vwf_entries.c980c_resetx_other3
|
|
org $80C9F34; bl m2_vwf_entries.c980c_resetx_other3
|
|
org $80CA204; bl m2_vwf_entries.c980c_resetx_other4
|
|
org $80CA274; bl m2_vwf_entries.c980c_resetx_other4
|
|
org $80CA30E; bl m2_vwf_entries.c980c_resetx_newline
|
|
|
|
// Custom codes check
|
|
org $80CA2BC
|
|
bl m2_vwf_entries.c980c_custom_codes
|
|
|
|
// Reset pixel X when redrawing the window
|
|
org $80CA2E6
|
|
bl m2_vwf_entries.c980c_resetx
|
|
|
|
// Welding entry
|
|
org $80CA448
|
|
bl m2_vwf_entries.c980c_weld_entry
|
|
b $80CA46C
|
|
|
|
// Disable X coordinate incrementing
|
|
org $80CA48E
|
|
nop
|
|
|
|
//---------------------------------------------------------
|
|
// C8FFC hacks (main string printing)
|
|
//---------------------------------------------------------
|
|
|
|
// Custom codes check
|
|
org $80C90A2
|
|
bl m2_vwf_entries.c8ffc_custom_codes
|
|
|
|
// Welding entry
|
|
org $80C9114
|
|
bl m2_vwf_entries.c8ffc_weld_entry
|
|
b $80C9144
|
|
|
|
// Integer-to-char changes
|
|
org $80CA67C; mov r3,#0x50 // space
|
|
org $80CA69C; mov r2,#0x60 // zero
|
|
org $80CA78A; mov r0,#0x60 // zero
|
|
org $80CA7AC; mov r2,#0x69 // nine
|
|
org $80CA7EC; sub r1,#0xA0
|
|
|
|
//---------------------------------------------------------
|
|
// C87D0 hacks (draw blank window)
|
|
//---------------------------------------------------------
|
|
|
|
org $80C87DC
|
|
bl m2_vwf_entries.c87d0_clear_entry
|
|
|
|
//---------------------------------------------------------
|
|
// C9634 hacks (string printing)
|
|
//---------------------------------------------------------
|
|
|
|
org $80C967E
|
|
bl m2_vwf_entries.c9634_resetx
|
|
|
|
//---------------------------------------------------------
|
|
// C96F0 hacks (string printing with highlight)
|
|
//---------------------------------------------------------
|
|
|
|
org $80C9714
|
|
lsl r3,r3,#1 // change from row coords to tile coords
|
|
ldrh r1,[r0,#0x22]
|
|
add r1,r1,r2
|
|
lsl r1,r1,#3 // r1 = tile_x * 8
|
|
ldrh r2,[r0,#0x24]
|
|
add r2,r2,r3
|
|
lsl r2,r2,#3 // r2 = tile_y * 8
|
|
mov r0,r6
|
|
bl m2_vwf.print_string
|
|
mov r7,r0
|
|
b $80C9788
|
|
|
|
//---------------------------------------------------------
|
|
// CA4BC hacks (scroll text)
|
|
//---------------------------------------------------------
|
|
|
|
org $80CA55E; bl m2_vwf_entries.ca4bc_erase_tile_short
|
|
org $80CA60E; bl m2_vwf_entries.ca4bc_copy_tile_up
|
|
org $80CA626; bl m2_vwf_entries.ca4bc_erase_tile
|
|
|
|
//---------------------------------------------------------
|
|
// D2E94 hacks (print party character name)
|
|
//---------------------------------------------------------
|
|
|
|
org $80D2F24
|
|
mov r1,r6
|
|
mov r2,r7
|
|
mov r0,r4
|
|
bl m2_vwf.weld_entry
|
|
b $80D2F52
|
|
|
|
// Disable X increment
|
|
org $80D2F5A; nop
|
|
|
|
//---------------------------------------------------------
|
|
// D30C4 hacks (print number)
|
|
//---------------------------------------------------------
|
|
|
|
org $80D314A
|
|
mov r0,r5
|
|
mov r1,r7
|
|
bl m2_vwf.weld_entry
|
|
b $80D3178
|
|
|
|
// Disable X increment
|
|
org $80D3180; nop
|
|
|
|
//---------------------------------------------------------
|
|
// D332C hacks (print name)
|
|
//---------------------------------------------------------
|
|
|
|
org $80D34E8
|
|
mov r0,r5
|
|
mov r1,r4
|
|
bl m2_vwf.weld_entry
|
|
b $80D3514
|
|
|
|
// Disable X increment
|
|
org $80D351A; nop
|
|
|
|
//---------------------------------------------------------
|
|
// D3934 hacks (print PSI name)
|
|
//---------------------------------------------------------
|
|
|
|
org $80D39BA; mov r0,#0x14 // PSI name length
|
|
|
|
// Weld entry
|
|
org $80D39E2
|
|
mov r0,r4
|
|
mov r1,r5
|
|
bl m2_vwf.weld_entry
|
|
b $80D3A14
|
|
|
|
// Print a space before the Greek letter
|
|
org $80D39D4; bl m2_vwf_entries.d3934_print_space
|
|
|
|
// Allocate extra space for enemy names
|
|
org $80DB04E; add sp,#-0x20
|
|
org $80DB058; mov r2,#0x1E
|
|
org $80DB08C; mov r2,#0x1A
|
|
org $80DB116; mov r1,#0x1E
|
|
org $80DB15A; add sp,#0x20
|
|
|
|
//80DB116: length of name + end code
|
|
|
|
// Battle command hacks
|
|
org $8B1F4C8; db $11 // Extend command window width two tiles (Normal)
|
|
org $8B1F4CC; db $16 // Extend command window width two tiles (Paula paralyzed leader)
|
|
org $80D7A56; mov r1,#4 // Move PSI class window left one tile
|
|
org $80D7A5A; mov r3,#6 // Extend PSI class window width one tile
|
|
org $80DC038; add r5,#0x30 // String address calculation
|
|
org $80DC0A8; add r1,#0x60 // String address calculation
|
|
|
|
org $80DC27C; lsl r1,r2,#4; nop // String address calculation
|
|
org $80DC2AC; lsl r1,r2,#4; nop // String address calculation
|
|
|
|
org $80E079E; bl m2_vwf_entries.e06ec_clear_window
|
|
org $80E0888; bl m2_vwf_entries.e06ec_redraw_psi
|
|
org $80E0A16; bl m2_vwf_entries.e06ec_redraw_bash_psi
|
|
|
|
//==============================================================================
|
|
// Data files
|
|
//==============================================================================
|
|
|
|
org $8B2C000
|
|
|
|
// Box font relocation
|
|
m2_font_relocate:
|
|
incbin m2-font-relocate.bin
|
|
|
|
// Co-ordinate table
|
|
m2_coord_table:
|
|
incbin m2-coord-table.bin
|
|
|
|
// EB fonts
|
|
m2_font_table:
|
|
dd m2_font_main
|
|
dd m2_font_saturn
|
|
|
|
m2_font_main:
|
|
incbin m2-font-main.bin
|
|
|
|
m2_font_saturn:
|
|
incbin m2-font-saturn.bin
|
|
|
|
// EB font heights
|
|
m2_height_table:
|
|
db $02, $02, $01, $00 // last byte for alignment
|
|
|
|
// EB font widths
|
|
m2_widths_table:
|
|
dd m2_widths_main
|
|
dd m2_widths_saturn
|
|
|
|
m2_widths_main:
|
|
incbin m2-widths-main.bin
|
|
|
|
m2_widths_saturn:
|
|
// tbd
|
|
|
|
m2_bits_to_nybbles:
|
|
incbin m2-bits-to-nybbles.bin
|
|
|
|
m2_nybbles_to_bits:
|
|
incbin m2-nybbles-to-bits.bin
|
|
|
|
|
|
//==============================================================================
|
|
// Misc
|
|
//==============================================================================
|
|
|
|
org $2027FC0
|
|
m2_custom_wram:
|
|
|
|
|
|
//==============================================================================
|
|
// Code files
|
|
//==============================================================================
|
|
|
|
org $80FCE6C
|
|
incsrc m2-vwf.asm
|
|
incsrc m2-vwf-entries.asm
|
|
incsrc m2-formatting.asm
|
|
incsrc m2-customcodes.asm
|