ref: 212846af57d1878bb2c6964fbeababd9de03a195
dir: /home/mobile.asm/
Function3e32:: ; Mobile cp $2 ld [$c988], a ld a, l ld [$c986], a ld a, h ld [$c987], a jr nz, .okay ld [$c982], a ld a, l ld [$c981], a ld hl, $c983 ld a, c ld [hli], a ld a, b ld [hl], a .okay ld hl, $c822 set 6, [hl] ldh a, [hROMBank] push af ld a, BANK(Function110030) ld [$c981], a rst Bankswitch jp Function110030 Function3e60:: ; Return from Function110030 ld [$c986], a ld a, l ld [$c987], a ld a, h ld [$c988], a pop bc ld a, b ld [$c981], a rst Bankswitch ld hl, $c822 res 6, [hl] ld hl, $c987 ld a, [hli] ld h, [hl] ld l, a ld a, [$c986] ret MobileReceive:: ldh a, [hROMBank] push af ld a, BANK(_MobileReceive) ld [$c981], a rst Bankswitch call _MobileReceive pop bc ld a, b ld [$c981], a rst Bankswitch ret MobileTimer:: push af push bc push de push hl ldh a, [hMobile] and a jr z, .pop_ret xor a ldh [rTAC], a ; Turn off timer interrupt ldh a, [rIF] and 1 << VBLANK | 1 << LCD_STAT | 1 << SERIAL | 1 << JOYPAD ldh [rIF], a ld a, [$c86a] or a jr z, .pop_ret ld a, [$c822] bit 1, a jr nz, .skip_timer ldh a, [rSC] and 1 << rSC_ON jr nz, .skip_timer ldh a, [hROMBank] push af ld a, BANK(_Timer) ld [$c981], a rst Bankswitch call _Timer pop bc ld a, b ld [$c981], a rst Bankswitch .skip_timer ldh a, [rTMA] ldh [rTIMA], a ld a, 1 << rTAC_ON | rTAC_65536_HZ ldh [rTAC], a .pop_ret pop hl pop de pop bc pop af reti Function3ed7:: ; unreferenced ld [$dc02], a ldh a, [hROMBank] push af ld a, BANK(Function114243) rst Bankswitch call Function114243 pop bc ld a, b rst Bankswitch ld a, [$dc02] ret Function3eea:: push hl push bc ld de, wAttrmap - wTilemap add hl, de inc b inc b inc c inc c call Function3f35 pop bc pop hl call MobileHome_PlaceBox ret Function3efd:: ; unreferenced push hl hlcoord 0, 12 ld b, 4 ld c, 18 call .fill_attr pop hl call PrintTextboxText ret .fill_attr push hl push bc ld de, wAttrmap - wTilemap add hl, de inc b inc b inc c inc c call Function3f35 pop bc pop hl call TextboxBorder ret Function3f20:: hlcoord 0, 0, wAttrmap ld b, 6 ld c, 20 call Function3f35 hlcoord 0, 0 ld b, 4 ld c, 18 call MobileHome_PlaceBox ret Function3f35:: ld a, 6 ld de, SCREEN_WIDTH .row push bc push hl .col ld [hli], a dec c jr nz, .col pop hl add hl, de pop bc dec b jr nz, .row ret MobileHome_PlaceBox: push bc call .FillTop pop bc .RowLoop: push bc call .FillMiddle pop bc dec b jr nz, .RowLoop call .FillBottom ret .FillTop: ld a, $63 ld d, $62 ld e, $64 jr .FillRow .FillBottom: ld a, $68 ld d, $67 ld e, $69 jr .FillRow .FillMiddle: ld a, $7f ld d, $65 ld e, $66 .FillRow: push hl ld [hl], d inc hl .FillLoop: ld [hli], a dec c jr nz, .FillLoop ld [hl], e pop hl ld de, SCREEN_WIDTH add hl, de ret Function3f7c:: call MenuBoxCoord2Tile call GetMenuBoxDims dec b dec c call Function3eea ret Function3f88:: ld hl, wDecompressScratch ld b, 0 .row push bc ld c, 1 tiles / 2 .col ld a, [de] inc de cpl ld [hl], 0 inc hl ld [hli], a dec c jr nz, .col pop bc dec c jr nz, .row ret Function3f9f:: ld hl, wDecompressScratch .row push bc ld c, 1 tiles / 2 .col ld a, [de] inc de inc de cpl ld [hl], $0 inc hl ld [hli], a dec c jr nz, .col pop bc dec c jr nz, .row ret