ref: 2471f1ea714ef4852a7b2cfeb2662c03ffb8c082
dir: /home/scrolling_menu.asm/
ScrollingMenu:: call CopyMenuData ldh a, [hROMBank] push af ld a, BANK(_ScrollingMenu) rst Bankswitch call _InitScrollingMenu call .UpdatePalettes call _ScrollingMenu pop af rst Bankswitch ld a, [wMenuJoypad] ret .UpdatePalettes: ld hl, wVramState bit 0, [hl] jp nz, UpdateTimePals jp SetPalettes InitScrollingMenu:: ld a, [wMenuBorderTopCoord] dec a ld b, a ld a, [wMenuBorderBottomCoord] sub b ld d, a ld a, [wMenuBorderLeftCoord] dec a ld c, a ld a, [wMenuBorderRightCoord] sub c ld e, a push de call Coord2Tile pop bc jp TextBox JoyTextDelay_ForcehJoyDown:: call DelayFrame ldh a, [hInMenu] push af ld a, $1 ldh [hInMenu], a call JoyTextDelay pop af ldh [hInMenu], a ldh a, [hJoyLast] and D_RIGHT + D_LEFT + D_UP + D_DOWN ld c, a ldh a, [hJoyPressed] and A_BUTTON + B_BUTTON + SELECT + START or c ld c, a ret