pokecrystal-board/mobile/fixed_words.asm

4130 lines
71 KiB
NASM
Raw Normal View History

; These functions seem to be related to the selection of preset phrases
; for use in mobile communications. Annoyingly, they separate the
; Battle Tower function above from the data it references.
2018-06-24 07:09:41 -07:00
Function11c05d:
ld a, e
or d
2016-05-14 13:37:12 -07:00
jr z, .error
ld a, e
and d
cp $ff
2016-05-14 13:37:12 -07:00
jr z, .error
push hl
2016-05-14 13:37:12 -07:00
call CopyMobileEZChatToC608
pop hl
call PlaceString
and a
ret
2016-05-14 13:37:12 -07:00
.error
ld c, l
ld b, h
scf
ret
2018-06-24 07:09:41 -07:00
Function11c075:
push de
ld a, c
call Function11c254
pop de
ld bc, wcd36
call Function11c08f
ret
Function11c082: ; unreferenced
push de
ld a, c
call Function11c254
pop de
ld bc, wcd36
2016-05-14 13:37:12 -07:00
call PrintEZChatBattleMessage
ret
2018-06-24 07:09:41 -07:00
Function11c08f:
ld l, e
ld h, d
push hl
2016-05-14 13:37:12 -07:00
ld a, 3
.loop
push af
ld a, [bc]
ld e, a
inc bc
ld a, [bc]
ld d, a
inc bc
push bc
call Function11c05d
2016-05-14 13:37:12 -07:00
jr c, .okay
inc bc
2016-05-14 13:37:12 -07:00
.okay
ld l, c
ld h, b
pop bc
pop af
dec a
2016-05-14 13:37:12 -07:00
jr nz, .loop
pop hl
2016-05-14 13:37:12 -07:00
ld de, 2 * SCREEN_WIDTH
add hl, de
ld a, $3
2016-05-14 13:37:12 -07:00
.loop2
push af
ld a, [bc]
ld e, a
inc bc
ld a, [bc]
ld d, a
inc bc
push bc
call Function11c05d
2016-05-14 13:37:12 -07:00
jr c, .okay2
inc bc
2016-05-14 13:37:12 -07:00
.okay2
ld l, c
ld h, b
pop bc
pop af
dec a
2016-05-14 13:37:12 -07:00
jr nz, .loop2
ret
2018-06-24 07:09:41 -07:00
PrintEZChatBattleMessage:
; Use up to 6 words from bc to print text starting at de.
; Preserve [wJumptableIndex], [wcf64]
ld a, [wJumptableIndex]
ld l, a
ld a, [wcf64]
ld h, a
push hl
; reset value at [wc618] (not preserved)
ld hl, wc618
ld a, $0
ld [hli], a
; preserve de
push de
; [wJumptableIndex] keeps track of which line we're on (0, 1, or 2)
; [wcf64] keeps track of how much room we have left in the current line
xor a
ld [wJumptableIndex], a
ld a, 18
ld [wcf64], a
ld a, 6
.loop
push af
; load the 2-byte word data pointed to by bc
ld a, [bc]
ld e, a
inc bc
ld a, [bc]
ld d, a
inc bc
; if $0000, we're done
or e
jr z, .done
; preserving hl and bc, get the length of the word
push hl
push bc
2016-05-14 13:37:12 -07:00
call CopyMobileEZChatToC608
call GetLengthOfWordAtC608
ld e, c
pop bc
pop hl
; if the functions return 0, we're done
ld a, e
or a
jr z, .done
.loop2
; e contains the length of the word
; add 1 for the space, unless we're at the start of the line
ld a, [wcf64]
cp 18
jr z, .skip_inc
inc e
.skip_inc
; if the word fits, put it on the same line
cp e
jr nc, .same_line
; otherwise, go to the next line
ld a, [wJumptableIndex]
inc a
ld [wJumptableIndex], a
; if we're on line 2, insert "<NEXT>"
ld [hl], "<NEXT>"
rra
jr c, .got_line_terminator
; else, insert "<CONT>"
ld [hl], "<CONT>"
.got_line_terminator
inc hl
; init the next line, holding on to the same word
ld a, 18
ld [wcf64], a
dec e
jr .loop2
.same_line
; add the space, unless we're at the start of the line
cp 18
jr z, .skip_space
ld [hl], " "
inc hl
.skip_space
; deduct the length of the word
sub e
ld [wcf64], a
ld de, wc608
.place_string_loop
; load the string from de to hl
ld a, [de]
cp "@"
jr z, .done
inc de
ld [hli], a
jr .place_string_loop
.done
; next word?
pop af
dec a
jr nz, .loop
; we're finished, place "<DONE>"
ld [hl], "<DONE>"
; now, let's place the string from wc618 to bc
pop bc
ld hl, wc618
call PlaceHLTextAtBC
; restore the original values of [wJumptableIndex] and [wcf64]
pop hl
ld a, l
ld [wJumptableIndex], a
ld a, h
ld [wcf64], a
ret
2018-06-24 07:09:41 -07:00
GetLengthOfWordAtC608:
ld c, $0
ld hl, wc608
.loop
ld a, [hli]
cp "@"
ret z
inc c
jr .loop
2018-06-24 07:09:41 -07:00
CopyMobileEZChatToC608:
ldh a, [rSVBK]
push af
ld a, $1
ldh [rSVBK], a
ld a, "@"
ld hl, wc608
ld bc, NAME_LENGTH
call ByteFill
ld a, d
and a
2015-12-28 07:57:04 -08:00
jr z, .get_name
2016-05-14 13:37:12 -07:00
ld hl, MobileEZChatCategoryPointers
dec d
sla d
ld c, d
ld b, $0
add hl, bc
ld a, [hli]
ld c, a
ld a, [hl]
ld b, a
push bc
pop hl
ld c, e
ld b, $0
sla c
rl b
sla c
rl b
sla c
rl b
add hl, bc
2017-12-21 08:56:33 -08:00
ld bc, NAME_LENGTH_JAPANESE - 1
.copy_string
ld de, wc608
call CopyBytes
ld de, wc608
pop af
ldh [rSVBK], a
ret
2015-12-28 07:57:04 -08:00
.get_name
ld a, e
ld [wNamedObjectIndex], a
call GetPokemonName
2018-01-23 14:39:09 -08:00
ld hl, wStringBuffer1
2018-01-20 09:25:55 -08:00
ld bc, MON_NAME_LENGTH - 1
jr .copy_string
2018-06-24 07:09:41 -07:00
Function11c1ab:
ldh a, [hInMenu]
push af
ld a, $1
ldh [hInMenu], a
call Function11c1b9
pop af
ldh [hInMenu], a
ret
2018-06-24 07:09:41 -07:00
Function11c1b9:
2016-05-14 13:37:12 -07:00
call .InitKanaMode
ldh a, [rSVBK]
push af
ld a, $5
ldh [rSVBK], a
2016-05-14 13:37:12 -07:00
call EZChat_MasterLoop
pop af
ldh [rSVBK], a
ret
2018-06-24 07:09:41 -07:00
.InitKanaMode:
xor a
ld [wJumptableIndex], a
ld [wcf64], a
ld [wcf65], a
ld [wcf66], a
ld [wcd23], a
2015-12-26 18:59:03 -08:00
ld [wcd20], a
ld [wcd21], a
2015-12-26 18:59:03 -08:00
ld [wcd22], a
ld [wcd35], a
ld [wcd2b], a
ld a, $ff
ld [wcd24], a
2015-12-15 15:59:49 -08:00
ld a, [wMenuCursorY]
dec a
call Function11c254
call ClearBGPalettes
call ClearSprites
call ClearScreen
call Function11d323
call SetPalettes
call DisableLCD
2020-02-27 11:33:30 -08:00
ld hl, SelectStartGFX
2017-12-28 04:32:33 -08:00
ld de, vTiles2
ld bc, $60
call CopyBytes
2020-02-27 11:33:30 -08:00
ld hl, EZChatSlowpokeLZ
2017-12-28 04:32:33 -08:00
ld de, vTiles0
call Decompress
call EnableLCD
2017-12-24 09:47:30 -08:00
farcall ReloadMapPart
farcall ClearSpriteAnims
farcall LoadPokemonData
farcall Pokedex_ABCMode
ldh a, [rSVBK]
push af
ld a, $5
ldh [rSVBK], a
ld hl, wc6d0
2018-01-23 14:39:09 -08:00
ld de, wLYOverrides
ld bc, $100
call CopyBytes
pop af
ldh [rSVBK], a
2016-05-14 13:37:12 -07:00
call EZChat_GetCategoryWordsByKana
call EZChat_GetSeenPokemonByKana
ret
2018-06-24 07:09:41 -07:00
Function11c254:
push af
ld a, BANK(s4_a007)
call OpenSRAM
ld hl, s4_a007
pop af
sla a
sla a
ld c, a
sla a
add c
ld c, a
ld b, 0
add hl, bc
ld de, wcd36
2016-05-14 13:37:12 -07:00
ld bc, 12
call CopyBytes
call CloseSRAM
ret
2018-06-24 07:09:41 -07:00
EZChat_ClearBottom12Rows:
ld a, " "
hlcoord 0, 6
ld bc, (SCREEN_HEIGHT - 6) * SCREEN_WIDTH
call ByteFill
ret
2018-06-24 07:09:41 -07:00
EZChat_MasterLoop:
.loop
call JoyTextDelay
ldh a, [hJoyPressed]
ldh [hJoypadPressed], a
ld a, [wJumptableIndex]
bit 7, a
jr nz, .exit
call .DoJumptableFunction
2017-12-24 09:47:30 -08:00
farcall PlaySpriteAnimations
farcall ReloadMapPart
jr .loop
.exit
2017-12-24 09:47:30 -08:00
farcall ClearSpriteAnims
call ClearSprites
ret
2018-06-24 07:09:41 -07:00
.DoJumptableFunction:
2015-12-26 18:59:03 -08:00
jumptable .Jumptable, wJumptableIndex
2018-06-24 07:09:41 -07:00
.Jumptable:
2016-05-13 22:11:01 -07:00
dw .SpawnObjects ; 00
dw .InitRAM ; 01
dw Function11c35f ; 02
dw Function11c373 ; 03
dw Function11c3c2 ; 04
dw Function11c3ed ; 05
dw Function11c52c ; 06
dw Function11c53d ; 07
dw Function11c658 ; 08
dw Function11c675 ; 09
dw Function11c9bd ; 0a
dw Function11c9c3 ; 0b
dw Function11caad ; 0c
dw Function11cab3 ; 0d
dw Function11cb52 ; 0e
dw Function11cb66 ; 0f
dw Function11cbf5 ; 10
dw Function11ccef ; 11
dw Function11cd04 ; 12
dw Function11cd20 ; 13
dw Function11cd54 ; 14
dw Function11ce0b ; 15
dw Function11ce2b ; 16
2018-06-24 07:09:41 -07:00
.SpawnObjects:
depixel 3, 1, 2, 5
2018-01-02 09:25:13 -08:00
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call InitSpriteAnimStruct
depixel 8, 1, 2, 5
2016-05-13 22:11:01 -07:00
2018-01-02 09:25:13 -08:00
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_VAR1
add hl, bc
ld a, $1
ld [hl], a
2016-05-13 22:11:01 -07:00
depixel 9, 2, 2, 0
2018-01-02 09:25:13 -08:00
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_VAR1
add hl, bc
ld a, $3
ld [hl], a
2016-05-13 22:11:01 -07:00
depixel 10, 16
2018-01-02 09:25:13 -08:00
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_VAR1
add hl, bc
ld a, $4
ld [hl], a
2016-05-13 22:11:01 -07:00
depixel 10, 4
2018-01-02 09:25:13 -08:00
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_VAR1
add hl, bc
ld a, $5
ld [hl], a
2016-05-13 22:11:01 -07:00
depixel 10, 2
2018-01-02 09:25:13 -08:00
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_VAR1
add hl, bc
ld a, $2
ld [hl], a
2016-05-13 22:11:01 -07:00
ld hl, wcd23
set 1, [hl]
set 2, [hl]
jp Function11cfb5
2018-06-24 07:09:41 -07:00
.InitRAM:
ld a, $9
ld [wcd2d], a
ld a, $2
ld [wcd2e], a
ld [wcd2f], a
ld [wcd30], a
ld de, wcd2d
call Function11cfce
jp Function11cfb5
2018-06-24 07:09:41 -07:00
Function11c35f:
ld hl, wcd2f
inc [hl]
2015-12-26 18:59:03 -08:00
inc [hl]
dec hl
dec hl
dec [hl]
push af
ld de, wcd2d
call Function11cfce
pop af
ret nz
jp Function11cfb5
2018-06-24 07:09:41 -07:00
Function11c373:
ld hl, wcd30
inc [hl]
2015-12-26 18:59:03 -08:00
inc [hl]
dec hl
dec hl
dec [hl]
push af
ld de, wcd2d
call Function11cfce
pop af
ret nz
call Function11c38a
jp Function11cfb5
2018-06-24 07:09:41 -07:00
Function11c38a:
ld hl, Unknown_11c986
ld bc, wcd36
ld a, $6
.asm_11c392
push af
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
push hl
push de
pop hl
ld a, [bc]
inc bc
ld e, a
ld a, [bc]
inc bc
ld d, a
push bc
or e
jr z, .asm_11c3af
ld a, e
and d
cp $ff
jr z, .asm_11c3af
call Function11c05d
jr .asm_11c3b5
.asm_11c3af
ld de, String_11c3bc
call PlaceString
.asm_11c3b5
pop bc
pop hl
pop af
dec a
jr nz, .asm_11c392
ret
2018-06-24 07:09:41 -07:00
String_11c3bc:
db "ーーーーー@"
2018-06-24 07:09:41 -07:00
Function11c3c2:
2016-05-14 13:37:12 -07:00
call EZChat_ClearBottom12Rows
ld de, Unknown_11cfbe
call Function11d035
hlcoord 1, 7
ld de, String_11c4db
call PlaceString
hlcoord 1, 16
ld de, String_11c51b
call PlaceString
call Function11c4be
ld hl, wcd23
set 0, [hl]
ld hl, wcd24
res 0, [hl]
call Function11cfb5
2018-06-24 07:09:41 -07:00
Function11c3ed:
ld hl, wcd20
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and $8
jr nz, .asm_11c426
ld a, [de]
and $2
jr nz, .asm_11c41a
ld a, [de]
and $1
jr nz, .asm_11c42c
ld de, hJoyLast
ld a, [de]
and $40
jr nz, .asm_11c47c
ld a, [de]
and $80
jr nz, .asm_11c484
ld a, [de]
and $20
jr nz, .asm_11c48c
ld a, [de]
and $10
jr nz, .asm_11c498
ret
2015-12-28 07:57:04 -08:00
.asm_11c41a
call PlayClickSFX
.asm_11c41d
ld hl, wcd24
set 0, [hl]
ld a, $c
jr .asm_11c475
.asm_11c426
ld a, $8
ld [wcd20], a
ret
2015-12-28 07:57:04 -08:00
.asm_11c42c
ld a, [wcd20]
cp $6
jr c, .asm_11c472
sub $6
jr z, .asm_11c469
dec a
jr z, .asm_11c41d
ld hl, wcd36
ld c, $c
xor a
.asm_11c440
or [hl]
inc hl
dec c
jr nz, .asm_11c440
and a
jr z, .asm_11c460
ld de, Unknown_11cfba
call Function11cfce
decoord 1, 2
ld bc, wcd36
call Function11c08f
ld hl, wcd24
set 0, [hl]
ld a, $e
jr .asm_11c475
.asm_11c460
ld hl, wcd24
set 0, [hl]
ld a, $11
jr .asm_11c475
.asm_11c469
ld hl, wcd24
set 0, [hl]
ld a, $a
jr .asm_11c475
.asm_11c472
call Function11c4a5
.asm_11c475
ld [wJumptableIndex], a
call PlayClickSFX
ret
2015-12-28 07:57:04 -08:00
.asm_11c47c
ld a, [hl]
cp $3
ret c
sub $3
jr .asm_11c4a3
.asm_11c484
ld a, [hl]
cp $6
ret nc
add $3
jr .asm_11c4a3
.asm_11c48c
ld a, [hl]
and a
ret z
cp $3
ret z
cp $6
ret z
dec a
jr .asm_11c4a3
.asm_11c498
ld a, [hl]
cp $2
ret z
cp $5
ret z
cp $8
ret z
inc a
.asm_11c4a3
ld [hl], a
ret
2018-06-24 07:09:41 -07:00
Function11c4a5:
ld hl, wcd23
res 0, [hl]
ld a, [wcd2b]
and a
jr nz, .asm_11c4b7
xor a
ld [wcd21], a
ld a, $6
ret
2015-12-28 07:57:04 -08:00
.asm_11c4b7
xor a
2015-12-26 18:59:03 -08:00
ld [wcd22], a
ld a, $15
ret
2018-06-24 07:09:41 -07:00
Function11c4be:
ld a, $1
hlcoord 0, 6, wAttrmap
ld bc, $a0
call ByteFill
ld a, $7
hlcoord 0, 14, wAttrmap
ld bc, $28
call ByteFill
2017-12-24 09:47:30 -08:00
farcall ReloadMapPart
ret
2018-06-24 07:09:41 -07:00
String_11c4db:
db "6つのことば¯くみあわせます"
next "かえたいところ¯えらぶと でてくる"
next "ことばのグループから いれかえたい"
next "たんご¯えらんでください"
db "@"
2018-06-24 07:09:41 -07:00
String_11c51b:
db "ぜんぶけす やめる   けってい@"
2018-06-24 07:09:41 -07:00
Function11c52c:
2016-05-14 13:37:12 -07:00
call EZChat_ClearBottom12Rows
call EZChat_PlaceCategoryNames
call Function11c618
ld hl, wcd24
res 1, [hl]
call Function11cfb5
2018-06-24 07:09:41 -07:00
Function11c53d:
ld hl, wcd21
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and START
jr nz, .start
ld a, [de]
and SELECT
jr nz, .select
ld a, [de]
and B_BUTTON
jr nz, .b
ld a, [de]
and A_BUTTON
jr nz, .a
ld de, hJoyLast
ld a, [de]
and D_UP
jr nz, .up
ld a, [de]
and D_DOWN
jr nz, .down
ld a, [de]
and D_LEFT
jr nz, .left
ld a, [de]
and D_RIGHT
jr nz, .right
ret
.a
ld a, [wcd21]
2016-05-14 13:37:12 -07:00
cp 15
jr c, .got_category
sub $f
2016-05-14 13:37:12 -07:00
jr z, .done
dec a
2016-05-14 13:37:12 -07:00
jr z, .mode
jr .b
.start
ld hl, wcd24
set 0, [hl]
ld a, $8
ld [wcd20], a
.b
ld a, $4
2016-05-14 13:37:12 -07:00
jr .go_to_function
.select
ld a, [wcd2b]
xor $1
ld [wcd2b], a
ld a, $15
2016-05-14 13:37:12 -07:00
jr .go_to_function
2016-05-14 13:37:12 -07:00
.mode
ld a, $13
2016-05-14 13:37:12 -07:00
jr .go_to_function
2016-05-14 13:37:12 -07:00
.got_category
ld a, $8
2016-05-14 13:37:12 -07:00
.go_to_function
ld hl, wcd24
set 1, [hl]
ld [wJumptableIndex], a
call PlayClickSFX
ret
2016-05-14 13:37:12 -07:00
.done
ld a, [wcd20]
call Function11ca6a
call PlayClickSFX
ret
.up
ld a, [hl]
cp $3
ret c
sub $3
2016-05-14 13:37:12 -07:00
jr .finish_dpad
.down
ld a, [hl]
cp $f
ret nc
add $3
2016-05-14 13:37:12 -07:00
jr .finish_dpad
.left
ld a, [hl]
and a
ret z
cp $3
ret z
cp $6
ret z
cp $9
ret z
cp $c
ret z
cp $f
ret z
dec a
2016-05-14 13:37:12 -07:00
jr .finish_dpad
.right
ld a, [hl]
cp $2
ret z
cp $5
ret z
cp $8
ret z
cp $b
ret z
cp $e
ret z
cp $11
ret z
inc a
2016-05-14 13:37:12 -07:00
.finish_dpad
ld [hl], a
ret
2018-06-24 07:09:41 -07:00
EZChat_PlaceCategoryNames:
2016-05-14 13:37:12 -07:00
ld de, MobileEZChatCategoryNames
ld bc, Coords_11c63a
ld a, 15
.loop
push af
ld a, [bc]
inc bc
ld l, a
ld a, [bc]
inc bc
ld h, a
push bc
call PlaceString
2016-05-14 13:37:12 -07:00
; The category names are padded with "@".
; To find the next category, the system must
; find the first character at de that is not "@".
.find_next_string_loop
inc de
ld a, [de]
2016-05-14 13:37:12 -07:00
cp "@"
jr z, .find_next_string_loop
pop bc
pop af
dec a
2016-05-14 13:37:12 -07:00
jr nz, .loop
hlcoord 1, 17
2016-05-14 13:37:12 -07:00
ld de, EZChatString_Stop_Mode_Cancel
call PlaceString
ret
2018-06-24 07:09:41 -07:00
Function11c618:
ld a, $2
hlcoord 0, 6, wAttrmap
ld bc, $c8
call ByteFill
2017-12-24 09:47:30 -08:00
farcall ReloadMapPart
ret
2018-06-24 07:09:41 -07:00
EZChatString_Stop_Mode_Cancel:
db "けす    モード   やめる@"
2018-06-24 07:09:41 -07:00
Coords_11c63a:
dwcoord 1, 7
dwcoord 7, 7
dwcoord 13, 7
dwcoord 1, 9
dwcoord 7, 9
dwcoord 13, 9
dwcoord 1, 11
dwcoord 7, 11
dwcoord 13, 11
dwcoord 1, 13
dwcoord 7, 13
dwcoord 13, 13
dwcoord 1, 15
dwcoord 7, 15
dwcoord 13, 15
2018-06-24 07:09:41 -07:00
Function11c658:
2016-05-14 13:37:12 -07:00
call EZChat_ClearBottom12Rows
call Function11c770
ld de, Unknown_11cfc2
call Function11d035
call Function11c9ab
call Function11c7bc
call Function11c86e
ld hl, wcd24
res 3, [hl]
call Function11cfb5
2018-06-24 07:09:41 -07:00
Function11c675:
2016-05-05 12:07:37 -07:00
ld hl, wMobileCommsJumptableIndex
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and A_BUTTON
jr nz, .a
ld a, [de]
and B_BUTTON
jr nz, .b
ld a, [de]
and START
jr nz, .start
ld a, [de]
and SELECT
jr z, .select
ld a, [wcd26]
and a
ret z
sub $c
jr nc, .asm_11c699
xor a
.asm_11c699
ld [wcd26], a
jr .asm_11c6c4
.start
ld hl, wcd28
ld a, [wcd26]
add $c
cp [hl]
ret nc
ld [wcd26], a
ld a, [hl]
ld b, a
2016-05-05 12:07:37 -07:00
ld hl, wMobileCommsJumptableIndex
ld a, [wcd26]
add [hl]
jr c, .asm_11c6b9
cp b
jr c, .asm_11c6c4
.asm_11c6b9
ld a, [wcd28]
ld hl, wcd26
sub [hl]
dec a
2016-05-05 12:07:37 -07:00
ld [wMobileCommsJumptableIndex], a
.asm_11c6c4
call Function11c992
call Function11c7bc
call Function11c86e
ret
.select
ld de, hJoyLast
ld a, [de]
and D_UP
jr nz, .asm_11c708
ld a, [de]
and D_DOWN
jr nz, .asm_11c731
ld a, [de]
and D_LEFT
jr nz, .asm_11c746
ld a, [de]
and D_RIGHT
jr nz, .asm_11c755
ret
.a
call Function11c8f6
ld a, $4
ld [wcd35], a
jr .asm_11c6fc
.b
ld a, [wcd2b]
and a
jr nz, .asm_11c6fa
ld a, $6
jr .asm_11c6fc
.asm_11c6fa
ld a, $15
.asm_11c6fc
ld [wJumptableIndex], a
ld hl, wcd24
set 3, [hl]
call PlayClickSFX
ret
2015-12-28 07:57:04 -08:00
.asm_11c708
ld a, [hl]
cp $3
jr c, .asm_11c711
sub $3
jr .asm_11c76e
.asm_11c711
ld a, [wcd26]
sub $3
ret c
ld [wcd26], a
jr .asm_11c6c4
.asm_11c71c
ld hl, wcd28
ld a, [wcd26]
add $c
ret c
cp [hl]
ret nc
ld a, [wcd26]
add $3
ld [wcd26], a
jr .asm_11c6c4
.asm_11c731
ld a, [wcd28]
ld b, a
ld a, [wcd26]
add [hl]
add $3
cp b
ret nc
ld a, [hl]
cp $9
jr nc, .asm_11c71c
add $3
jr .asm_11c76e
.asm_11c746
ld a, [hl]
and a
ret z
cp $3
ret z
cp $6
ret z
cp $9
ret z
dec a
jr .asm_11c76e
.asm_11c755
ld a, [wcd28]
ld b, a
ld a, [wcd26]
add [hl]
inc a
cp b
ret nc
ld a, [hl]
cp $2
ret z
cp $5
ret z
cp $8
ret z
cp $b
ret z
inc a
.asm_11c76e
ld [hl], a
ret
2018-06-24 07:09:41 -07:00
Function11c770:
xor a
2016-05-05 12:07:37 -07:00
ld [wMobileCommsJumptableIndex], a
ld [wcd26], a
ld [wcd27], a
ld a, [wcd2b]
and a
2016-05-13 22:11:01 -07:00
jr nz, .cd2b_is_nonzero
ld a, [wcd21]
and a
2016-05-13 22:11:01 -07:00
jr z, .cd21_is_zero
; load from data array
dec a
sla a
2016-05-14 13:37:12 -07:00
ld hl, MobileEZChatData_WordAndPageCounts
ld c, a
ld b, 0
add hl, bc
ld a, [hli]
ld [wcd28], a
ld a, [hl]
2016-05-13 22:11:01 -07:00
.load
ld [wcd29], a
ret
2015-12-28 07:57:04 -08:00
2016-05-13 22:11:01 -07:00
.cd21_is_zero
; compute from [wc7d2]
ld a, [wc7d2]
ld [wcd28], a
2016-05-13 22:11:01 -07:00
.div_12
ld c, 12
call SimpleDivide
and a
2016-05-13 22:11:01 -07:00
jr nz, .no_need_to_floor
dec b
2016-05-13 22:11:01 -07:00
.no_need_to_floor
ld a, b
2016-05-13 22:11:01 -07:00
jr .load
.cd2b_is_nonzero
; compute from [wc6a8 + 2 * [wcd22]]
ld hl, wc6a8
2015-12-26 18:59:03 -08:00
ld a, [wcd22]
ld c, a
ld b, 0
add hl, bc
2015-12-26 18:59:03 -08:00
add hl, bc
ld a, [hl]
ld [wcd28], a
2016-05-13 22:11:01 -07:00
jr .div_12
2018-06-24 07:09:41 -07:00
Function11c7bc:
ld bc, Unknown_11c854
ld a, [wcd2b]
and a
jr nz, .asm_11c814
ld a, [wcd21]
ld d, a
and a
jr z, .asm_11c7e9
ld a, [wcd26]
ld e, a
.asm_11c7d0
ld a, [bc]
ld l, a
inc bc
ld a, [bc]
ld h, a
inc bc
and l
cp $ff
ret z
push bc
push de
call Function11c05d
pop de
pop bc
inc e
ld a, [wcd28]
cp e
jr nz, .asm_11c7d0
ret
2015-12-28 07:57:04 -08:00
.asm_11c7e9
2016-06-13 19:53:33 -07:00
ld hl, wListPointer
ld a, [wcd26]
ld e, a
add hl, de
.asm_11c7f1
push de
ld a, [hli]
ld e, a
ld d, 0
push hl
ld a, [bc]
ld l, a
inc bc
ld a, [bc]
ld h, a
inc bc
and l
cp $ff
jr z, .asm_11c811
push bc
call Function11c05d
pop bc
pop hl
pop de
inc e
ld a, [wcd28]
cp e
jr nz, .asm_11c7f1
ret
2015-12-28 07:57:04 -08:00
.asm_11c811
pop hl
pop de
ret
2015-12-28 07:57:04 -08:00
.asm_11c814
ld hl, wc648
ld a, [wcd22]
ld e, a
ld d, 0
add hl, de
2015-12-26 18:59:03 -08:00
add hl, de
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
push de
pop hl
ld a, [wcd26]
ld e, a
ld d, 0
add hl, de
2015-12-26 18:59:03 -08:00
add hl, de
ld a, [wcd26]
ld e, a
.asm_11c831
push de
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
push hl
ld a, [bc]
ld l, a
inc bc
ld a, [bc]
ld h, a
inc bc
and l
cp $ff
jr z, .asm_11c851
push bc
call Function11c05d
pop bc
pop hl
pop de
inc e
ld a, [wcd28]
cp e
jr nz, .asm_11c831
ret
2015-12-28 07:57:04 -08:00
.asm_11c851
pop hl
pop de
ret
2018-06-24 07:09:41 -07:00
Unknown_11c854:
dwcoord 2, 8
dwcoord 8, 8
dwcoord 14, 8
dwcoord 2, 10
dwcoord 8, 10
dwcoord 14, 10
dwcoord 2, 12
dwcoord 8, 12
dwcoord 14, 12
dwcoord 2, 14
dwcoord 8, 14
dwcoord 14, 14
dw -1
2018-06-24 07:09:41 -07:00
Function11c86e:
ld a, [wcd26]
and a
jr z, .asm_11c88a
hlcoord 2, 17
ld de, MobileString_Prev
call PlaceString
hlcoord 6, 17
ld c, $3
xor a
.asm_11c883
ld [hli], a
inc a
dec c
jr nz, .asm_11c883
jr .asm_11c895
.asm_11c88a
hlcoord 2, 17
ld c, $7
ld a, $7f
.asm_11c891
ld [hli], a
dec c
jr nz, .asm_11c891
.asm_11c895
ld hl, wcd28
ld a, [wcd26]
add $c
jr c, .asm_11c8b7
cp [hl]
jr nc, .asm_11c8b7
hlcoord 16, 17
ld de, MobileString_Next
call PlaceString
hlcoord 11, 17
ld a, $3
ld c, a
.asm_11c8b1
ld [hli], a
inc a
dec c
jr nz, .asm_11c8b1
ret
2015-12-28 07:57:04 -08:00
.asm_11c8b7
hlcoord 17, 16
ld a, $7f
ld [hl], a
hlcoord 11, 17
ld c, $7
.asm_11c8c2
ld [hli], a
dec c
jr nz, .asm_11c8c2
ret
BCD2String: ; unreferenced
inc a
push af
and $f
ldh [hDividend], a
pop af
and $f0
swap a
ldh [hDividend + 1], a
xor a
ldh [hDividend + 2], a
push hl
2017-12-24 09:47:30 -08:00
farcall Function11a80c
pop hl
ld a, [wcd63]
add ""
ld [hli], a
ld a, [wcd62]
add ""
ld [hli], a
ret
MobileString_Page: ; unreferenced
db "ぺージ@"
2018-06-24 07:09:41 -07:00
MobileString_Prev:
db "まえ@"
2018-06-24 07:09:41 -07:00
MobileString_Next:
db "つぎ@"
2018-06-24 07:09:41 -07:00
Function11c8f6:
ld a, [wcd20]
call Function11c95d
push hl
ld a, [wcd2b]
and a
jr nz, .asm_11c938
ld a, [wcd21]
ld d, a
and a
jr z, .asm_11c927
ld hl, wcd26
2016-05-05 12:07:37 -07:00
ld a, [wMobileCommsJumptableIndex]
add [hl]
.asm_11c911
ld e, a
.asm_11c912
pop hl
push de
call Function11c05d
pop de
ld a, [wcd20]
ld c, a
ld b, 0
ld hl, wcd36
add hl, bc
2015-12-26 18:59:03 -08:00
add hl, bc
ld [hl], e
inc hl
ld [hl], d
ret
2015-12-28 07:57:04 -08:00
.asm_11c927
ld hl, wcd26
2016-05-05 12:07:37 -07:00
ld a, [wMobileCommsJumptableIndex]
add [hl]
ld c, a
ld b, 0
2016-06-13 19:53:33 -07:00
ld hl, wListPointer
add hl, bc
ld a, [hl]
jr .asm_11c911
.asm_11c938
ld hl, wc648
ld a, [wcd22]
ld e, a
ld d, 0
add hl, de
2015-12-26 18:59:03 -08:00
add hl, de
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
push de
pop hl
ld a, [wcd26]
ld e, a
ld d, 0
add hl, de
2015-12-26 18:59:03 -08:00
add hl, de
2016-05-05 12:07:37 -07:00
ld a, [wMobileCommsJumptableIndex]
ld e, a
add hl, de
2015-12-26 18:59:03 -08:00
add hl, de
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
jr .asm_11c912
2018-06-24 07:09:41 -07:00
Function11c95d:
sla a
ld c, a
ld b, 0
ld hl, Unknown_11c986
add hl, bc
ld a, [hli]
ld c, a
ld a, [hl]
ld b, a
push bc
push bc
pop hl
ld a, $5
ld c, a
ld a, $7f
.asm_11c972
ld [hli], a
dec c
jr nz, .asm_11c972
dec hl
ld bc, -20
add hl, bc
ld a, $5
ld c, a
ld a, $7f
.asm_11c980
ld [hld], a
dec c
jr nz, .asm_11c980
pop hl
ret
Unknown_11c986:
dwcoord 1, 2
dwcoord 7, 2
dwcoord 13, 2
dwcoord 1, 4
dwcoord 7, 4
dwcoord 13, 4
2018-06-24 07:09:41 -07:00
Function11c992:
ld a, $8
hlcoord 2, 7
.asm_11c997
push af
ld a, $7f
push hl
ld bc, $11
call ByteFill
pop hl
ld bc, $14
add hl, bc
pop af
dec a
jr nz, .asm_11c997
ret
2018-06-24 07:09:41 -07:00
Function11c9ab:
ld a, $7
hlcoord 0, 6, wAttrmap
ld bc, $c8
call ByteFill
2017-12-24 09:47:30 -08:00
farcall ReloadMapPart
ret
2018-06-24 07:09:41 -07:00
Function11c9bd:
ld de, String_11ca38
call Function11ca7f
2018-06-24 07:09:41 -07:00
Function11c9c3:
ld hl, wcd2a
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and $1
jr nz, .asm_11c9de
ld a, [de]
and $2
jr nz, .asm_11c9e9
ld a, [de]
and $40
jr nz, .asm_11c9f7
ld a, [de]
and $80
jr nz, .asm_11c9fc
ret
2015-12-28 07:57:04 -08:00
.asm_11c9de
ld a, [hl]
and a
jr nz, .asm_11c9e9
call Function11ca5e
xor a
ld [wcd20], a
.asm_11c9e9
ld hl, wcd24
set 4, [hl]
ld a, $4
ld [wJumptableIndex], a
call PlayClickSFX
ret
2015-12-28 07:57:04 -08:00
.asm_11c9f7
ld a, [hl]
and a
ret z
dec [hl]
ret
2015-12-28 07:57:04 -08:00
.asm_11c9fc
ld a, [hl]
and a
ret nz
inc [hl]
ret
2018-06-24 07:09:41 -07:00
Function11ca01:
hlcoord 14, 7, wAttrmap
ld de, $14
ld a, $5
ld c, a
.asm_11ca0a
push hl
ld a, $6
ld b, a
ld a, $7
.asm_11ca10
ld [hli], a
dec b
jr nz, .asm_11ca10
pop hl
add hl, de
dec c
jr nz, .asm_11ca0a
2018-06-24 07:09:41 -07:00
Function11ca19:
hlcoord 0, 12, wAttrmap
ld de, $14
ld a, $6
ld c, a
.asm_11ca22
push hl
ld a, $14
ld b, a
ld a, $7
.asm_11ca28
ld [hli], a
dec b
jr nz, .asm_11ca28
pop hl
add hl, de
dec c
jr nz, .asm_11ca22
2017-12-24 09:47:30 -08:00
farcall ReloadMapPart
ret
2018-06-24 07:09:41 -07:00
String_11ca38:
db "とうろくちゅう<NO>あいさつ¯ぜんぶ"
next "けしても よろしいですか?@"
2018-06-24 07:09:41 -07:00
String_11ca57:
db "はい"
next "いいえ@"
2018-06-24 07:09:41 -07:00
Function11ca5e:
xor a
2016-05-14 13:37:12 -07:00
.loop
push af
call Function11ca6a
pop af
inc a
cp $6
2016-05-14 13:37:12 -07:00
jr nz, .loop
ret
2018-06-24 07:09:41 -07:00
Function11ca6a:
ld hl, wcd36
ld c, a
ld b, 0
add hl, bc
2015-12-26 18:59:03 -08:00
add hl, bc
ld [hl], b
inc hl
ld [hl], b
call Function11c95d
ld de, String_11c3bc
call PlaceString
ret
2018-06-24 07:09:41 -07:00
Function11ca7f:
push de
ld de, Unknown_11cfc6
call Function11cfce
ld de, Unknown_11cfca
call Function11cfce
hlcoord 1, 14
pop de
call PlaceString
hlcoord 16, 8
ld de, String_11ca57
call PlaceString
call Function11ca01
ld a, $1
ld [wcd2a], a
ld hl, wcd24
res 4, [hl]
call Function11cfb5
ret
2018-06-24 07:09:41 -07:00
Function11caad:
ld de, String_11cb1c
call Function11ca7f
2018-06-24 07:09:41 -07:00
Function11cab3:
ld hl, wcd2a
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and $1
jr nz, .asm_11cace
ld a, [de]
and $2
jr nz, .asm_11caf9
ld a, [de]
and $40
jr nz, .asm_11cb12
ld a, [de]
and $80
jr nz, .asm_11cb17
ret
2015-12-28 07:57:04 -08:00
.asm_11cace
call PlayClickSFX
ld a, [hl]
and a
jr nz, .asm_11cafc
ld a, [wcd35]
and a
jr z, .asm_11caf3
cp $ff
jr z, .asm_11caf3
ld a, $ff
ld [wcd35], a
hlcoord 1, 14
ld de, String_11cb31
call PlaceString
ld a, $1
ld [wcd2a], a
ret
2015-12-28 07:57:04 -08:00
.asm_11caf3
ld hl, wJumptableIndex
set 7, [hl]
ret
2015-12-28 07:57:04 -08:00
.asm_11caf9
call PlayClickSFX
.asm_11cafc
ld hl, wcd24
set 4, [hl]
ld a, $4
ld [wJumptableIndex], a
ld a, [wcd35]
cp $ff
ret nz
ld a, $1
ld [wcd35], a
ret
2015-12-28 07:57:04 -08:00
.asm_11cb12
ld a, [hl]
and a
ret z
dec [hl]
ret
2015-12-28 07:57:04 -08:00
.asm_11cb17
ld a, [hl]
and a
ret nz
inc [hl]
ret
2018-06-24 07:09:41 -07:00
String_11cb1c:
db "あいさつ<NO>とうろく¯ちゅうし"
next "しますか?@"
2018-06-24 07:09:41 -07:00
String_11cb31:
db "とうろくちゅう<NO>あいさつ<WA>ほぞん"
next "されません<GA>よろしい ですか?@"
2018-06-24 07:09:41 -07:00
Function11cb52:
ld hl, Unknown_11cc01
2015-12-15 15:59:49 -08:00
ld a, [wMenuCursorY]
.asm_11cb58
dec a
jr z, .asm_11cb5f
inc hl
2015-12-26 18:59:03 -08:00
inc hl
jr .asm_11cb58
.asm_11cb5f
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
call Function11ca7f
2018-06-24 07:09:41 -07:00
Function11cb66:
ld hl, wcd2a
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and $1
jr nz, .asm_11cb81
ld a, [de]
and $2
jr nz, .asm_11cbd7
ld a, [de]
and $40
jr nz, .asm_11cbeb
ld a, [de]
and $80
jr nz, .asm_11cbf0
ret
2015-12-28 07:57:04 -08:00
.asm_11cb81
ld a, [hl]
and a
jr nz, .asm_11cbd4
ld a, BANK(s4_a007)
call OpenSRAM
ld hl, s4_a007
2015-12-15 15:59:49 -08:00
ld a, [wMenuCursorY]
dec a
sla a
sla a
ld c, a
sla a
add c
ld c, a
ld b, 0
add hl, bc
ld de, wcd36
ld c, 12
.asm_11cba2
ld a, [de]
ld [hli], a
inc de
dec c
jr nz, .asm_11cba2
call CloseSRAM
call PlayClickSFX
ld de, Unknown_11cfc6
call Function11cfce
ld hl, Unknown_11cc7e
2015-12-15 15:59:49 -08:00
ld a, [wMenuCursorY]
.asm_11cbba
dec a
jr z, .asm_11cbc1
inc hl
2015-12-26 18:59:03 -08:00
inc hl
jr .asm_11cbba
.asm_11cbc1
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
hlcoord 1, 14
call PlaceString
ld hl, wJumptableIndex
inc [hl]
inc hl
ld a, $10
ld [hl], a
ret
2015-12-28 07:57:04 -08:00
.asm_11cbd4
call PlayClickSFX
.asm_11cbd7
ld de, Unknown_11cfba
call Function11cfce
call Function11c38a
ld hl, wcd24
set 4, [hl]
ld a, $4
ld [wJumptableIndex], a
ret
2015-12-28 07:57:04 -08:00
.asm_11cbeb
ld a, [hl]
and a
ret z
dec [hl]
ret
2015-12-28 07:57:04 -08:00
.asm_11cbf0
ld a, [hl]
and a
ret nz
inc [hl]
ret
2018-06-24 07:09:41 -07:00
Function11cbf5:
call WaitSFX
ld hl, wcf64
dec [hl]
ret nz
dec hl
set 7, [hl]
ret
2018-06-24 07:09:41 -07:00
Unknown_11cc01:
dw String_11cc09
dw String_11cc23
dw String_11cc42
dw String_11cc60
2018-06-24 07:09:41 -07:00
String_11cc09:
db "じこしょうかい は"
next "この あいさつで いいですか?@"
2018-06-24 07:09:41 -07:00
String_11cc23:
db "たいせん <GA>はじまるとき は"
next "この あいさつで いいですか?@"
2018-06-24 07:09:41 -07:00
String_11cc42:
db "たいせん <NI>かったとき は"
next "この あいさつで いいですか?@"
2018-06-24 07:09:41 -07:00
String_11cc60:
db "たいせん <NI>まけたとき は"
next "この あいさつで いいですか?@"
2018-06-24 07:09:41 -07:00
Unknown_11cc7e:
dw String_11cc86
dw String_11cc9d
dw String_11ccb9
dw String_11ccd4
2018-06-24 07:09:41 -07:00
String_11cc86:
db "じこしょうかい の"
next "あいさつ¯とうろくした!@"
2018-06-24 07:09:41 -07:00
String_11cc9d:
db "たいせん <GA>はじまるとき の"
next "あいさつ¯とうろくした!@"
2018-06-24 07:09:41 -07:00
String_11ccb9:
db "たいせん <NI>かったとき の"
next "あいさつ¯とうろくした!@"
2018-06-24 07:09:41 -07:00
String_11ccd4:
db "たいせん <NI>まけたとき の"
next "あいさつ¯とうろくした!@"
2018-06-24 07:09:41 -07:00
Function11ccef:
ld de, Unknown_11cfc6
call Function11cfce
hlcoord 1, 14
ld de, String_11cd10
call PlaceString
call Function11ca19
call Function11cfb5
2018-06-24 07:09:41 -07:00
Function11cd04:
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and a
ret z
ld a, $4
ld [wJumptableIndex], a
ret
2018-06-24 07:09:41 -07:00
String_11cd10:
db "なにか ことば¯いれてください@"
2018-06-24 07:09:41 -07:00
Function11cd20:
2016-05-14 13:37:12 -07:00
call EZChat_ClearBottom12Rows
ld de, Unknown_11cfc6
call Function11cfce
hlcoord 1, 14
ld a, [wcd2b]
ld [wcd2c], a
and a
jr nz, .asm_11cd3a
ld de, String_11cdc7
jr .asm_11cd3d
.asm_11cd3a
ld de, String_11cdd9
.asm_11cd3d
call PlaceString
hlcoord 4, 8
ld de, String_11cdf5
call PlaceString
call Function11cdaa
ld hl, wcd24
res 5, [hl]
call Function11cfb5
2018-06-24 07:09:41 -07:00
Function11cd54:
ld hl, wcd2c
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and A_BUTTON
jr nz, .asm_11cd6f
ld a, [de]
and B_BUTTON
jr nz, .asm_11cd73
ld a, [de]
and D_UP
jr nz, .asm_11cd8b
ld a, [de]
and D_DOWN
jr nz, .asm_11cd94
ret
.asm_11cd6f
ld a, [hl]
ld [wcd2b], a
.asm_11cd73
ld a, [wcd2b]
and a
jr nz, .asm_11cd7d
ld a, $6
jr .asm_11cd7f
.asm_11cd7d
ld a, $15
.asm_11cd7f
ld [wJumptableIndex], a
ld hl, wcd24
set 5, [hl]
call PlayClickSFX
ret
.asm_11cd8b
ld a, [hl]
and a
ret z
dec [hl]
ld de, String_11cdc7
jr .asm_11cd9b
.asm_11cd94
ld a, [hl]
and a
ret nz
inc [hl]
ld de, String_11cdd9
.asm_11cd9b
push de
ld de, Unknown_11cfc6
call Function11cfce
pop de
hlcoord 1, 14
call PlaceString
ret
2018-06-24 07:09:41 -07:00
Function11cdaa:
ld a, $2
hlcoord 0, 6, wAttrmap
ld bc, 6 * SCREEN_WIDTH
call ByteFill
ld a, $7
hlcoord 0, 12, wAttrmap
ld bc, 4 * SCREEN_WIDTH
call ByteFill
2017-12-24 09:47:30 -08:00
farcall ReloadMapPart
ret
2018-06-24 07:09:41 -07:00
String_11cdc7:
; Words will be displayed by category
db "ことば¯しゅるいべつに"
next "えらべます@"
2018-06-24 07:09:41 -07:00
String_11cdd9:
; Words will be displayed in alphabetical order
db "ことば¯アイウエオ の"
next "じゅんばんで ひょうじ します@"
2018-06-24 07:09:41 -07:00
String_11cdf5:
db "しゅるいべつ モード" ; Category mode
next "アイウエオ  モード@" ; ABC mode
2018-06-24 07:09:41 -07:00
Function11ce0b:
2016-05-14 13:37:12 -07:00
call EZChat_ClearBottom12Rows
hlcoord 1, 7
ld de, String_11cf79
call PlaceString
hlcoord 1, 17
2016-05-14 13:37:12 -07:00
ld de, EZChatString_Stop_Mode_Cancel
call PlaceString
call Function11c618
ld hl, wcd24
res 2, [hl]
call Function11cfb5
2018-06-24 07:09:41 -07:00
Function11ce2b:
2015-12-26 18:59:03 -08:00
ld a, [wcd22]
sla a
sla a
ld c, a
ld b, 0
ld hl, Unknown_11ceb9
add hl, bc
2018-08-25 11:39:24 -07:00
ld de, hJoypadPressed
ld a, [de]
and START
jr nz, .start
ld a, [de]
and SELECT
jr nz, .select
ld a, [de]
and A_BUTTON
jr nz, .a
ld a, [de]
and B_BUTTON
jr nz, .b
ld de, hJoyLast
ld a, [de]
and D_UP
jr nz, .up
ld a, [de]
and D_DOWN
jr nz, .down
ld a, [de]
and D_LEFT
jr nz, .left
ld a, [de]
and D_RIGHT
jr nz, .right
ret
.a
2015-12-26 18:59:03 -08:00
ld a, [wcd22]
cp NUM_KANA
jr c, .place
sub NUM_KANA
2016-05-14 13:37:12 -07:00
jr z, .done
dec a
2016-05-14 13:37:12 -07:00
jr z, .mode
jr .b
.start
ld hl, wcd24
set 0, [hl]
ld a, $8
ld [wcd20], a
.b
ld a, $4
jr .load
.select
ld a, [wcd2b]
xor $1
ld [wcd2b], a
ld a, $6
jr .load
.place
ld a, $8
jr .load
2016-05-14 13:37:12 -07:00
.mode
ld a, $13
.load
ld [wJumptableIndex], a
ld hl, wcd24
set 2, [hl]
call PlayClickSFX
ret
2016-05-14 13:37:12 -07:00
.done
ld a, [wcd20]
call Function11ca6a
call PlayClickSFX
ret
.left
inc hl
.down
inc hl
.right
inc hl
.up
ld a, [hl]
cp $ff
ret z
2015-12-26 18:59:03 -08:00
ld [wcd22], a
ret
2018-06-24 07:09:41 -07:00
Unknown_11ceb9:
; up left down right
2015-12-28 07:57:04 -08:00
db $ff, $01
db $05, $ff
db $ff, $02
db $06, $00
db $ff, $03
db $07, $01
db $ff, $04
db $08, $02
db $ff, $14
db $09, $03
db $00, $06
db $0a, $ff
db $01, $07
db $0b, $05
db $02, $08
db $0c, $06
db $03, $09
db $0d, $07
db $04, $19
db $0e, $08
db $05, $0b
db $0f, $ff
db $06, $0c
db $10, $0a
db $07, $0d
db $11, $0b
db $08, $0e
db $12, $0c
db $09, $1e
db $13, $0d
db $0a, $10
db $2d, $ff
db $0b, $11
db $2d, $0f
db $0c, $12
db $2d, $10
db $0d, $13
db $2d, $11
db $0e, $26
db $2d, $12
db $ff, $15
db $19, $04
db $ff, $16
db $1a, $14
db $ff, $17
db $1b, $15
db $ff, $18
db $1c, $16
db $ff, $23
db $1d, $17
db $14, $1a
db $1e, $09
db $15, $1b
db $1f, $19
db $16, $1c
db $20, $1a
db $17, $1d
db $21, $1b
db $18, $2b
db $22, $1c
db $19, $1f
db $26, $0e
db $1a, $20
db $27, $1e
db $1b, $21
db $28, $1f
db $1c, $22
db $29, $20
db $1d, $2c
db $2a, $21
db $ff, $24
db $2b, $18
db $ff, $25
db $2b, $23
db $ff, $ff
db $2b, $24
db $1e, $27
db $2e, $13
db $1f, $28
db $2e, $26
db $20, $29
db $2e, $27
db $21, $2a
db $2e, $28
db $22, $ff
db $2e, $29
db $23, $ff
db $2c, $1d
db $2b, $ff
db $2f, $22
db $0f, $2e
db $ff, $ff
db $26, $2f
db $ff, $2d
db $2c, $ff
db $ff, $2e
2018-06-24 07:09:41 -07:00
String_11cf79:
; Hiragana table
db "あいうえお なにぬねの や ゆ よ"
next "かきくけこ はひふへほ わ"
next "さしすせそ まみむめも そのた"
next "たちつてと らりるれろ"
db "@"
2018-06-24 07:09:41 -07:00
Function11cfb5:
ld hl, wJumptableIndex
inc [hl]
ret
Unknown_11cfba:
db 0, 0 ; start coords
db 20, 6 ; end coords
Unknown_11cfbe:
db 0, 14 ; start coords
db 20, 4 ; end coords
Unknown_11cfc2:
db 0, 6 ; start coords
db 20, 10 ; end coords
Unknown_11cfc6:
db 0, 12 ; start coords
db 20, 6 ; end coords
Unknown_11cfca:
db 14, 7 ; start coords
db 6, 5 ; end coords
2018-06-24 07:09:41 -07:00
Function11cfce:
hlcoord 0, 0
2016-05-13 22:11:01 -07:00
ld bc, SCREEN_WIDTH
ld a, [de]
inc de
push af
ld a, [de]
inc de
and a
2016-05-13 22:11:01 -07:00
.add_n_times
jr z, .done_add_n_times
add hl, bc
dec a
2016-05-13 22:11:01 -07:00
jr .add_n_times
.done_add_n_times
pop af
ld c, a
ld b, 0
add hl, bc
push hl
ld a, $79
ld [hli], a
ld a, [de]
inc de
dec a
2015-12-26 18:59:03 -08:00
dec a
2016-05-13 22:11:01 -07:00
jr z, .skip_fill
ld c, a
ld a, $7a
2016-05-13 22:11:01 -07:00
.fill_loop
ld [hli], a
dec c
2016-05-13 22:11:01 -07:00
jr nz, .fill_loop
.skip_fill
ld a, $7b
ld [hl], a
pop hl
2016-05-13 22:11:01 -07:00
ld bc, SCREEN_WIDTH
add hl, bc
ld a, [de]
dec de
dec a
2015-12-26 18:59:03 -08:00
dec a
2016-05-13 22:11:01 -07:00
jr z, .skip_section
ld b, a
2016-05-13 22:11:01 -07:00
.loop
push hl
ld a, $7c
ld [hli], a
ld a, [de]
dec a
2015-12-26 18:59:03 -08:00
dec a
2016-05-13 22:11:01 -07:00
jr z, .skip_row
ld c, a
ld a, $7f
2016-05-13 22:11:01 -07:00
.row_loop
ld [hli], a
dec c
2016-05-13 22:11:01 -07:00
jr nz, .row_loop
.skip_row
ld a, $7c
ld [hl], a
pop hl
push bc
2016-05-13 22:11:01 -07:00
ld bc, SCREEN_WIDTH
add hl, bc
pop bc
dec b
2016-05-13 22:11:01 -07:00
jr nz, .loop
.skip_section
ld a, $7d
ld [hli], a
ld a, [de]
dec a
2015-12-26 18:59:03 -08:00
dec a
2016-05-13 22:11:01 -07:00
jr z, .skip_remainder
ld c, a
ld a, $7a
2016-05-13 22:11:01 -07:00
.final_loop
ld [hli], a
dec c
2016-05-13 22:11:01 -07:00
jr nz, .final_loop
.skip_remainder
ld a, $7e
ld [hl], a
ret
2018-06-24 07:09:41 -07:00
Function11d035:
hlcoord 0, 0
2016-05-13 22:11:01 -07:00
ld bc, SCREEN_WIDTH
ld a, [de]
inc de
push af
ld a, [de]
inc de
and a
2016-05-13 22:11:01 -07:00
.add_n_times
jr z, .done_add_n_times
add hl, bc
dec a
2016-05-13 22:11:01 -07:00
jr .add_n_times
.done_add_n_times
pop af
ld c, a
ld b, 0
add hl, bc
push hl
ld a, $79
ld [hl], a
pop hl
push hl
ld a, [de]
dec a
inc de
ld c, a
add hl, bc
ld a, $7b
ld [hl], a
2016-05-13 22:11:01 -07:00
call .AddNMinusOneTimes
ld a, $7e
ld [hl], a
pop hl
push hl
2016-05-13 22:11:01 -07:00
call .AddNMinusOneTimes
ld a, $7d
ld [hl], a
pop hl
push hl
inc hl
push hl
2016-05-13 22:11:01 -07:00
call .AddNMinusOneTimes
pop bc
dec de
ld a, [de]
cp $2
2016-05-13 22:11:01 -07:00
jr z, .skip
dec a
2015-12-26 18:59:03 -08:00
dec a
2016-05-13 22:11:01 -07:00
.loop
push af
ld a, $7a
ld [hli], a
ld [bc], a
inc bc
pop af
dec a
2016-05-13 22:11:01 -07:00
jr nz, .loop
.skip
pop hl
ld bc, $14
add hl, bc
push hl
ld a, [de]
dec a
ld c, a
ld b, 0
add hl, bc
pop bc
inc de
ld a, [de]
cp $2
ret z
push bc
dec a
2015-12-26 18:59:03 -08:00
dec a
ld c, a
ld b, a
ld de, $14
2016-05-13 22:11:01 -07:00
.loop2
ld a, $7c
ld [hl], a
add hl, de
dec c
2016-05-13 22:11:01 -07:00
jr nz, .loop2
pop hl
2016-05-13 22:11:01 -07:00
.loop3
ld a, $7c
ld [hl], a
add hl, de
dec b
2016-05-13 22:11:01 -07:00
jr nz, .loop3
ret
2018-06-24 07:09:41 -07:00
.AddNMinusOneTimes:
ld a, [de]
dec a
2016-05-13 22:11:01 -07:00
ld bc, SCREEN_WIDTH
.add_n_minus_one_times
add hl, bc
dec a
2016-05-13 22:11:01 -07:00
jr nz, .add_n_minus_one_times
ret
2018-06-24 07:09:41 -07:00
AnimateEZChatCursor:
ld hl, SPRITEANIMSTRUCT_VAR1
add hl, bc
jumptable .Jumptable, hl
.Jumptable:
2015-12-26 18:59:03 -08:00
dw .zero
dw .one
dw .two
dw .three
dw .four
dw .five
dw .six
dw .seven
dw .eight
dw .nine
dw .ten
2018-06-24 07:09:41 -07:00
.zero
ld a, [wcd20]
sla a
2016-05-13 22:11:01 -07:00
ld hl, .Coords_Zero
ld e, $1
2015-12-26 18:59:03 -08:00
jr .load
2018-06-24 07:09:41 -07:00
.one
ld a, [wcd21]
sla a
2016-05-13 22:11:01 -07:00
ld hl, .Coords_One
ld e, $2
2015-12-26 18:59:03 -08:00
jr .load
2018-06-24 07:09:41 -07:00
.two
2016-05-13 22:11:01 -07:00
ld hl, .FramesetsIDs_Two
2015-12-26 18:59:03 -08:00
ld a, [wcd22]
ld e, a
ld d, 0
add hl, de
ld a, [hl]
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
2016-05-13 22:11:01 -07:00
2015-12-26 18:59:03 -08:00
ld a, [wcd22]
sla a
2016-05-13 22:11:01 -07:00
ld hl, .Coords_Two
ld e, $4
2015-12-26 18:59:03 -08:00
jr .load
2018-06-24 07:09:41 -07:00
.three
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_2
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
2016-05-05 12:07:37 -07:00
ld a, [wMobileCommsJumptableIndex]
sla a
2016-05-13 22:11:01 -07:00
ld hl, .Coords_Three
ld e, $8
2018-06-24 07:09:41 -07:00
.load
push de
ld e, a
ld d, 0
add hl, de
push hl
pop de
2015-12-26 18:59:03 -08:00
ld hl, SPRITEANIMSTRUCT_XCOORD
add hl, bc
ld a, [de]
inc de
ld [hli], a
ld a, [de]
ld [hl], a
pop de
ld a, e
2016-05-13 22:11:01 -07:00
call .UpdateObjectFlags
ret
2018-06-24 07:09:41 -07:00
.four
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_2
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
ld a, [wcd2a]
sla a
2016-05-13 22:11:01 -07:00
ld hl, .Coords_Four
ld e, $10
2015-12-26 18:59:03 -08:00
jr .load
2018-06-24 07:09:41 -07:00
.five
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_2
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
ld a, [wcd2c]
sla a
2016-05-13 22:11:01 -07:00
ld hl, .Coords_Five
ld e, $20
2015-12-26 18:59:03 -08:00
jr .load
2018-06-24 07:09:41 -07:00
.six
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_5
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
2016-05-13 22:11:01 -07:00
; X = [wcd4a] * 8 + 24
ld a, [wcd4a]
sla a
sla a
sla a
add $18
2016-05-13 22:11:01 -07:00
ld hl, SPRITEANIMSTRUCT_XCOORD
add hl, bc
ld [hli], a
2016-05-13 22:11:01 -07:00
; Y = 48
ld a, $30
ld [hl], a
2016-05-13 22:11:01 -07:00
ld a, $1
ld e, a
2016-05-13 22:11:01 -07:00
call .UpdateObjectFlags
ret
2018-06-24 07:09:41 -07:00
.seven
2016-05-14 13:37:12 -07:00
ld a, [wEZChatCursorYCoord]
cp $4
2018-01-02 09:25:13 -08:00
jr z, .cursor0
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3
2016-05-13 22:11:01 -07:00
jr .got_frameset
2018-01-02 09:25:13 -08:00
.cursor0
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_1
2016-05-13 22:11:01 -07:00
.got_frameset
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
2016-05-14 13:37:12 -07:00
ld a, [wEZChatCursorYCoord]
cp $4
jr z, .asm_11d1b1
2016-05-14 13:37:12 -07:00
; X = [wEZChatCursorXCoord] * 8 + 32
ld a, [wEZChatCursorXCoord]
sla a
sla a
sla a
add $20
2015-12-26 18:59:03 -08:00
ld hl, SPRITEANIMSTRUCT_XCOORD
add hl, bc
ld [hli], a
2016-05-14 13:37:12 -07:00
; Y = [wEZChatCursorYCoord] * 16 + 72
ld a, [wEZChatCursorYCoord]
sla a
sla a
sla a
sla a
add $48
ld [hl], a
ld a, $2
ld e, a
2016-05-13 22:11:01 -07:00
call .UpdateObjectFlags
ret
2015-12-28 07:57:04 -08:00
.asm_11d1b1
2016-05-14 13:37:12 -07:00
; X = [wEZChatCursorXCoord] * 40 + 24
ld a, [wEZChatCursorXCoord]
sla a
sla a
sla a
ld e, a
sla a
sla a
add e
add $18
2015-12-26 18:59:03 -08:00
ld hl, SPRITEANIMSTRUCT_XCOORD
add hl, bc
ld [hli], a
2016-05-13 22:11:01 -07:00
; Y = 138
ld a, $8a
ld [hl], a
ld a, $2
ld e, a
2016-05-13 22:11:01 -07:00
call .UpdateObjectFlags
ret
2018-06-24 07:09:41 -07:00
.nine
2015-12-26 18:59:03 -08:00
ld d, -13 * 8
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_7
2015-12-26 18:59:03 -08:00
jr .eight_nine_load
2018-06-24 07:09:41 -07:00
.eight
2015-12-26 18:59:03 -08:00
ld d, 2 * 8
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_6
2018-06-24 07:09:41 -07:00
.eight_nine_load
push de
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
ld a, [wcd4a]
sla a
sla a
sla a
ld e, a
sla a
add e
2015-12-26 18:59:03 -08:00
add 8 * 8
ld hl, SPRITEANIMSTRUCT_YCOORD
add hl, bc
ld [hld], a
pop af
ld [hl], a
ld a, $4
ld e, a
2016-05-13 22:11:01 -07:00
call .UpdateObjectFlags
ret
2018-06-24 07:09:41 -07:00
.ten
2018-01-02 12:02:08 -08:00
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_1
2015-12-05 12:38:25 -08:00
call ReinitSpriteAnimFrame
ld a, $8
ld e, a
2016-05-13 22:11:01 -07:00
call .UpdateObjectFlags
ret
2018-06-24 07:09:41 -07:00
.Coords_Zero:
2016-05-13 22:11:01 -07:00
dbpixel 1, 3, 5, 2
dbpixel 7, 3, 5, 2
dbpixel 13, 3, 5, 2
dbpixel 1, 5, 5, 2
dbpixel 7, 5, 5, 2
dbpixel 13, 5, 5, 2
dbpixel 1, 17, 5, 2
dbpixel 7, 17, 5, 2
dbpixel 13, 17, 5, 2
2018-06-24 07:09:41 -07:00
.Coords_One:
2016-05-13 22:11:01 -07:00
dbpixel 1, 8, 5, 2
dbpixel 7, 8, 5, 2
dbpixel 13, 8, 5, 2
dbpixel 1, 10, 5, 2
dbpixel 7, 10, 5, 2
dbpixel 13, 10, 5, 2
dbpixel 1, 12, 5, 2
dbpixel 7, 12, 5, 2
dbpixel 13, 12, 5, 2
dbpixel 1, 14, 5, 2
dbpixel 7, 14, 5, 2
dbpixel 13, 14, 5, 2
dbpixel 1, 16, 5, 2
dbpixel 7, 16, 5, 2
dbpixel 13, 16, 5, 2
dbpixel 1, 18, 5, 2
dbpixel 7, 18, 5, 2
dbpixel 13, 18, 5, 2
2018-06-24 07:09:41 -07:00
.Coords_Two:
2016-05-13 22:11:01 -07:00
dbpixel 2, 9 ; 00
dbpixel 3, 9 ; 01
dbpixel 4, 9 ; 02
dbpixel 5, 9 ; 03
dbpixel 6, 9 ; 04
dbpixel 2, 11 ; 05
dbpixel 3, 11 ; 06
dbpixel 4, 11 ; 07
dbpixel 5, 11 ; 08
dbpixel 6, 11 ; 09
dbpixel 2, 13 ; 0a
dbpixel 3, 13 ; 0b
dbpixel 4, 13 ; 0c
dbpixel 5, 13 ; 0d
dbpixel 6, 13 ; 0e
dbpixel 2, 15 ; 0f
dbpixel 3, 15 ; 10
dbpixel 4, 15 ; 11
dbpixel 5, 15 ; 12
dbpixel 6, 15 ; 13
dbpixel 8, 9 ; 14
dbpixel 9, 9 ; 15
dbpixel 10, 9 ; 16
dbpixel 11, 9 ; 17
dbpixel 12, 9 ; 18
dbpixel 8, 11 ; 19
dbpixel 9, 11 ; 1a
dbpixel 10, 11 ; 1b
dbpixel 11, 11 ; 1c
dbpixel 12, 11 ; 1d
dbpixel 8, 13 ; 1e
dbpixel 9, 13 ; 1f
dbpixel 10, 13 ; 20
dbpixel 11, 13 ; 21
dbpixel 12, 13 ; 22
dbpixel 14, 9 ; 23
dbpixel 16, 9 ; 24
dbpixel 18, 9 ; 25
dbpixel 8, 15 ; 26
dbpixel 9, 15 ; 27
dbpixel 10, 15 ; 28
dbpixel 11, 15 ; 29
dbpixel 12, 15 ; 2a
dbpixel 14, 11 ; 2b
dbpixel 14, 13 ; 2c
dbpixel 1, 18, 5, 2 ; 2d
dbpixel 7, 18, 5, 2 ; 2e
dbpixel 13, 18, 5, 2 ; 2f
2018-06-24 07:09:41 -07:00
.Coords_Three:
2016-05-13 22:11:01 -07:00
dbpixel 2, 10
dbpixel 8, 10
dbpixel 14, 10
dbpixel 2, 12
dbpixel 8, 12
dbpixel 14, 12
dbpixel 2, 14
dbpixel 8, 14
dbpixel 14, 14
dbpixel 2, 16
dbpixel 8, 16
dbpixel 14, 16
2018-06-24 07:09:41 -07:00
.Coords_Four:
2016-05-13 22:11:01 -07:00
dbpixel 16, 10
dbpixel 16, 12
2018-06-24 07:09:41 -07:00
.Coords_Five:
2016-05-13 22:11:01 -07:00
dbpixel 4, 10
dbpixel 4, 12
2018-06-24 07:09:41 -07:00
.FramesetsIDs_Two:
2018-01-02 12:02:08 -08:00
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 00
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 01
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 02
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 03
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 04
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 05
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 06
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 07
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 08
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 09
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 0a
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 0b
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 0c
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 0d
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 0e
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 0f
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 10
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 11
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 12
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 13
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 14
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 15
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 16
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 17
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 18
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 19
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 1a
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 1b
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 1c
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 1d
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 1e
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 1f
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 20
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 21
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 22
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 23
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 24
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 25
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 26
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 27
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 28
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 29
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 2a
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3 ; 2b
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_4 ; 2c
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_1 ; 2d
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_1 ; 2e
db SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_1 ; 2f
2016-05-13 22:11:01 -07:00
2018-06-24 07:09:41 -07:00
.UpdateObjectFlags:
ld hl, wcd24
and [hl]
2015-12-28 07:57:04 -08:00
jr nz, .update_y_offset
ld a, e
ld hl, wcd23
and [hl]
2015-12-28 07:57:04 -08:00
jr z, .reset_y_offset
ld hl, SPRITEANIMSTRUCT_VAR3
add hl, bc
ld a, [hl]
and a
2015-12-28 07:57:04 -08:00
jr z, .flip_bit_0
dec [hl]
ret
2015-12-28 07:57:04 -08:00
.flip_bit_0
ld a, $0
ld [hld], a
ld a, $1
xor [hl]
ld [hl], a
and a
2015-12-28 07:57:04 -08:00
jr nz, .update_y_offset
.reset_y_offset
ld hl, SPRITEANIMSTRUCT_YOFFSET
add hl, bc
xor a
ld [hl], a
ret
2015-12-28 07:57:04 -08:00
.update_y_offset
ld hl, SPRITEANIMSTRUCT_YCOORD
add hl, bc
ld a, $b0
sub [hl]
2015-12-28 07:57:04 -08:00
ld hl, SPRITEANIMSTRUCT_YOFFSET
add hl, bc
ld [hl], a
ret
2018-06-24 07:09:41 -07:00
Function11d323:
ldh a, [rSVBK]
push af
ld a, $5
ldh [rSVBK], a
ld hl, Palette_11d33a
2018-01-01 06:08:21 -08:00
ld de, wBGPals1
2015-12-28 07:57:04 -08:00
ld bc, 16 palettes
call CopyBytes
pop af
ldh [rSVBK], a
ret
Palette_11d33a:
RGB 31, 31, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 31, 16, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 23, 17, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 31, 31, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 31, 31, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 31, 31, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 31, 31, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 31, 31, 31
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
RGB 00, 00, 00
2018-06-24 07:09:41 -07:00
EZChat_GetSeenPokemonByKana:
ldh a, [rSVBK]
push af
ld hl, wc648
ld a, LOW(w5_d800)
ld [wcd2d], a
ld [hli], a
ld a, HIGH(w5_d800)
ld [wcd2e], a
ld [hl], a
2018-01-02 20:21:07 -08:00
ld a, LOW(EZChat_SortedPokemon)
ld [wcd2f], a
2018-01-02 20:21:07 -08:00
ld a, HIGH(EZChat_SortedPokemon)
ld [wcd30], a
ld a, LOW(wc6a8)
ld [wcd31], a
ld a, HIGH(wc6a8)
ld [wcd32], a
ld a, LOW(wc64a)
ld [wcd33], a
ld a, HIGH(wc64a)
ld [wcd34], a
2016-05-14 13:37:12 -07:00
ld hl, EZChat_SortedWords
ld a, (EZChat_SortedWords.End - EZChat_SortedWords) / 4
2018-06-24 07:09:41 -07:00
.MasterLoop:
push af
; read row
2016-05-13 22:11:01 -07:00
; offset
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
2016-05-13 22:11:01 -07:00
; size
ld a, [hli]
ld c, a
ld a, [hli]
ld b, a
; save the pointer to the next row
push hl
2016-05-13 22:11:01 -07:00
; add de to w3_d000
ld hl, w3_d000
add hl, de
; recover de from wcd2d (default: w5_d800)
ld a, [wcd2d]
ld e, a
ld a, [wcd2e]
ld d, a
; save bc for later
push bc
.loop1
; copy 2*bc bytes from 3:hl to 5:de
ld a, $3
ldh [rSVBK], a
ld a, [hli]
push af
ld a, $5
ldh [rSVBK], a
pop af
ld [de], a
inc de
ld a, $3
ldh [rSVBK], a
ld a, [hli]
push af
ld a, $5
ldh [rSVBK], a
pop af
ld [de], a
inc de
dec bc
ld a, c
or b
jr nz, .loop1
2016-05-13 22:11:01 -07:00
2018-01-02 20:21:07 -08:00
; recover the pointer from wcd2f (default: EZChat_SortedPokemon)
ld a, [wcd2f]
ld l, a
ld a, [wcd30]
ld h, a
; copy the pointer from [hl] to bc
ld a, [hli]
ld c, a
ld a, [hli]
ld b, a
; store the pointer to the next pointer back in wcd2f
ld a, l
ld [wcd2f], a
ld a, h
ld [wcd30], a
; push pop that pointer to hl
push bc
pop hl
ld c, $0
.loop2
; Have you seen this Pokemon?
ld a, [hl]
cp $ff
jr z, .done
call .CheckSeenMon
jr nz, .next
; If not, skip it.
inc hl
jr .loop2
.next
; If so, append it to the list at 5:de, and increase the count.
ld a, [hli]
ld [de], a
inc de
xor a
ld [de], a
inc de
inc c
jr .loop2
.done
; Remember the original value of bc from the table?
; Well, the stack remembers it, and it's popping it to hl.
pop hl
; Add the number of seen Pokemon from the list.
ld b, $0
add hl, bc
; Push pop to bc.
push hl
pop bc
; Load the pointer from [wcd31] (default: wc6a8)
ld a, [wcd31]
ld l, a
ld a, [wcd32]
ld h, a
; Save the quantity from bc to [hl]
ld a, c
ld [hli], a
ld a, b
ld [hli], a
; Save the new value of hl to [wcd31]
ld a, l
ld [wcd31], a
ld a, h
ld [wcd32], a
; Recover the pointer from [wcd33] (default: wc64a)
ld a, [wcd33]
ld l, a
ld a, [wcd34]
ld h, a
; Save the current value of de there
ld a, e
ld [wcd2d], a
ld [hli], a
ld a, d
ld [wcd2e], a
; Save the new value of hl back to [wcd33]
ld [hli], a
ld a, l
ld [wcd33], a
ld a, h
ld [wcd34], a
; Next row
pop hl
pop af
dec a
jr z, .ExitMasterLoop
jp .MasterLoop
.ExitMasterLoop:
pop af
ldh [rSVBK], a
ret
2018-06-24 07:09:41 -07:00
.CheckSeenMon:
push hl
push bc
push de
dec a
ld hl, rSVBK
ld e, $1
ld [hl], e
call CheckSeenMon
ld hl, rSVBK
ld e, $5
ld [hl], e
pop de
pop bc
pop hl
ret
2018-06-24 07:09:41 -07:00
EZChat_GetCategoryWordsByKana:
ldh a, [rSVBK]
push af
ld a, $3
ldh [rSVBK], a
2016-05-13 22:11:01 -07:00
; load pointers
2016-05-14 13:37:12 -07:00
ld hl, MobileEZChatCategoryPointers
ld bc, MobileEZChatData_WordAndPageCounts
2016-05-13 22:11:01 -07:00
; init WRAM registers
xor a
ld [wcd2d], a
inc a
ld [wcd2e], a
2016-05-13 22:11:01 -07:00
; enter the first loop
ld a, 14
2015-12-28 07:57:04 -08:00
.loop1
push af
2016-05-13 22:11:01 -07:00
; load the pointer to the category
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
push hl
2016-05-13 22:11:01 -07:00
; skip to the attributes
2017-12-21 08:56:33 -08:00
ld hl, NAME_LENGTH_JAPANESE - 1
add hl, de
2016-05-13 22:11:01 -07:00
; get the number of words in the category
ld a, [bc] ; number of entries to copy
inc bc
2015-12-26 18:59:03 -08:00
inc bc
push bc
2016-05-13 22:11:01 -07:00
2015-12-28 07:57:04 -08:00
.loop2
push af
push hl
2016-05-13 22:11:01 -07:00
; load offset at [hl]
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
2016-05-13 22:11:01 -07:00
; add to w3_d000
2015-12-28 07:57:04 -08:00
ld hl, w3_d000
add hl, de
2016-05-13 22:11:01 -07:00
; copy from wcd2d and increment [wcd2d] in place
ld a, [wcd2d]
ld [hli], a
inc a
ld [wcd2d], a
2016-05-13 22:11:01 -07:00
; copy from wcd2e
ld a, [wcd2e]
ld [hl], a
2016-05-13 22:11:01 -07:00
; next entry
pop hl
2015-12-28 07:57:04 -08:00
ld de, 8
add hl, de
pop af
dec a
2015-12-28 07:57:04 -08:00
jr nz, .loop2
2016-05-13 22:11:01 -07:00
; reset and go to next category
ld hl, wcd2d
xor a
ld [hli], a
inc [hl]
pop bc
pop hl
pop af
dec a
2015-12-28 07:57:04 -08:00
jr nz, .loop1
pop af
ldh [rSVBK], a
ret
2018-01-02 20:21:07 -08:00
INCLUDE "data/pokemon/ezchat_order.asm"
2020-02-27 11:33:30 -08:00
SelectStartGFX:
INCBIN "gfx/mobile/select_start.2bpp"
2020-02-27 11:33:30 -08:00
EZChatSlowpokeLZ:
INCBIN "gfx/pokedex/slowpoke.2bpp.lz"
2018-06-24 07:09:41 -07:00
MobileEZChatCategoryNames:
2020-02-27 11:33:30 -08:00
; entries correspond to EZCHAT_* constants
2015-12-28 07:57:04 -08:00
db "ポケモン@@" ; 00
db "タイプ@@@" ; 01
db "あいさつ@@" ; 02
db "ひと@@@@" ; 03
db "バトル@@@" ; 04
db "こえ@@@@" ; 05
db "かいわ@@@" ; 06
db "きもち@@@" ; 07
db "じょうたい@" ; 08
db "せいかつ@@" ; 09
db "しゅみ@@@" ; 0a
db "こうどう@@" ; 0b
db "じかん@@@" ; 0c
db "むすび@@@" ; 0d
db "あれこれ@@" ; 0e
2018-06-24 07:09:41 -07:00
MobileEZChatCategoryPointers:
; entries correspond to EZCHAT_* constants
2015-12-28 07:57:04 -08:00
dw .Types ; 01
dw .Greetings ; 02
dw .People ; 03
dw .Battle ; 04
dw .Exclamations ; 05
dw .Conversation ; 06
dw .Feelings ; 07
dw .Conditions ; 08
dw .Life ; 09
dw .Hobbies ; 0a
dw .Actions ; 0b
dw .Time ; 0c
dw .Farewells ; 0d
dw .ThisAndThat ; 0e
2018-06-24 07:09:41 -07:00
.Types:
db "あく@@@", $26, $0, $0
db "いわ@@@", $aa, $0, $0
db "エスパー@", $da, $0, $0
db "かくとう@", $4e, $1, $0
db "くさ@@@", $ba, $1, $0
db "ゴースト@", $e4, $1, $0
db "こおり@@", $e6, $1, $0
db "じめん@@", $68, $2, $0
db "タイプ@@", $e8, $2, $0
db "でんき@@", $8e, $3, $0
db "どく@@@", $ae, $3, $0
db "ドラゴン@", $bc, $3, $0
db "ノーマル@", $22, $4, $0
db "はがね@@", $36, $4, $0
db "ひこう@@", $5e, $4, $0
db "ほのお@@", $b2, $4, $0
db "みず@@@", $f4, $4, $0
db "むし@@@", $12, $5, $0
2018-06-24 07:09:41 -07:00
.Greetings:
db "ありがと@", $58, $0, $0
db "ありがとう", $5a, $0, $0
db "いくぜ!@", $80, $0, $0
db "いくよ!@", $82, $0, $0
db "いくわよ!", $84, $0, $0
db "いやー@@", $a6, $0, $0
db "おっす@@", $a, $1, $0
db "おはつです", $22, $1, $0
db "おめでとう", $2a, $1, $0
db "ごめん@@", $f8, $1, $0
db "ごめんよ@", $fa, $1, $0
db "こらっ@@", $fc, $1, $0
db "こんちは!", $a, $2, $0
db "こんにちは", $10, $2, $0
db "さようなら", $28, $2, $0
db "サンキュー", $2e, $2, $0
db "さんじょう", $30, $2, $0
db "しっけい@", $48, $2, $0
db "しつれい@", $4c, $2, $0
db "じゃーね@", $6c, $2, $0
db "すいません", $8c, $2, $0
db "それじゃ@", $ca, $2, $0
db "どうも@@", $a6, $3, $0
db "なんじゃ@", $ee, $3, $0
db "ハーイ@@", $2c, $4, $0
db "はいはい@", $32, $4, $0
db "バイバイ@", $34, $4, $0
db "へイ@@@", $8a, $4, $0
db "またね@@", $de, $4, $0
db "もしもし@", $32, $5, $0
db "やあ@@@", $3e, $5, $0
db "やっほー@", $4e, $5, $0
db "よう@@@", $62, $5, $0
db "ようこそ@", $64, $5, $0
db "よろしく@", $80, $5, $0
db "らっしゃい", $94, $5, $0
2018-06-24 07:09:41 -07:00
.People:
db "あいて@@", $1c, $0, $0
db "あたし@@", $36, $0, $0
db "あなた@@", $40, $0, $0
db "あなたが@", $42, $0, $0
db "あなたに@", $44, $0, $0
db "あなたの@", $46, $0, $0
db "あなたは@", $48, $0, $0
db "あなたを@", $4a, $0, $0
db "おかあさん", $e8, $0, $0
db "おじいさん", $fc, $0, $0
db "おじさん@", $2, $1, $0
db "おとうさん", $e, $1, $0
db "おとこのこ", $10, $1, $0
db "おとな@@", $14, $1, $0
db "おにいさん", $16, $1, $0
db "おねえさん", $18, $1, $0
db "おばあさん", $1c, $1, $0
db "おばさん@", $20, $1, $0
db "おれさま@", $34, $1, $0
db "おんなのこ", $3a, $1, $0
db "ガール@@", $40, $1, $0
db "かぞく@@", $52, $1, $0
db "かのじょ@", $72, $1, $0
db "かれ@@@", $7c, $1, $0
db "きみ@@@", $9a, $1, $0
db "きみが@@", $9c, $1, $0
db "きみに@@", $9e, $1, $0
db "きみの@@", $a0, $1, $0
db "きみは@@", $a2, $1, $0
db "きみを@@", $a4, $1, $0
db "ギャル@@", $ae, $1, $0
db "きょうだい", $b2, $1, $0
db "こども@@", $f0, $1, $0
db "じぶん@@", $54, $2, $0
db "じぶんが@", $56, $2, $0
db "じぶんに@", $58, $2, $0
db "じぶんの@", $5a, $2, $0
db "じぶんは@", $5c, $2, $0
db "じぶんを@", $5e, $2, $0
db "だれ@@@", $18, $3, $0
db "だれか@@", $1a, $3, $0
db "だれが@@", $1c, $3, $0
db "だれに@@", $1e, $3, $0
db "だれの@@", $20, $3, $0
db "だれも@@", $22, $3, $0
db "だれを@@", $24, $3, $0
db "ちゃん@@", $38, $3, $0
db "ともだち@", $b8, $3, $0
db "なかま@@", $d4, $3, $0
db "ひと@@@", $62, $4, $0
db "ボーイ@@", $98, $4, $0
db "ボク@@@", $a0, $4, $0
db "ボクが@@", $a2, $4, $0
db "ボクに@@", $a4, $4, $0
db "ボクの@@", $a6, $4, $0
db "ボクは@@", $a8, $4, $0
db "ボクを@@", $aa, $4, $0
db "みんな@@", $4, $5, $0
db "みんなが@", $6, $5, $0
db "みんなに@", $8, $5, $0
db "みんなの@", $a, $5, $0
db "みんなは@", $c, $5, $0
db "ライバル@", $8a, $5, $0
db "わたし@@", $c2, $5, $0
db "わたしが@", $c4, $5, $0
db "わたしに@", $c6, $5, $0
db "わたしの@", $c8, $5, $0
db "わたしは@", $ca, $5, $0
db "わたしを@", $cc, $5, $0
2018-06-24 07:09:41 -07:00
.Battle:
db "あいしょう", $18, $0, $0
db "いけ!@@", $88, $0, $0
db "いちばん@", $96, $0, $0
db "かくご@@", $4c, $1, $0
db "かたせて@", $54, $1, $0
db "かち@@@", $56, $1, $0
db "かつ@@@", $58, $1, $0
db "かった@@", $60, $1, $0
db "かったら@", $62, $1, $0
db "かって@@", $64, $1, $0
db "かてない@", $66, $1, $0
db "かてる@@", $68, $1, $0
db "かなわない", $70, $1, $0
db "きあい@@", $84, $1, $0
db "きめた@@", $a8, $1, $0
db "きりふだ@", $b6, $1, $0
db "くらえ@@", $c2, $1, $0
db "こい!@@", $da, $1, $0
db "こうげき@", $e0, $1, $0
db "こうさん@", $e2, $1, $0
db "こんじょう", $8, $2, $0
db "さいのう@", $16, $2, $0
db "さくせん@", $1a, $2, $0
db "さばき@@", $22, $2, $0
db "しょうぶ@", $7e, $2, $0
db "しょうり@", $80, $2, $0
db "せめ@@@", $b4, $2, $0
db "センス@@", $b6, $2, $0
db "たいせん@", $e6, $2, $0
db "たたかい@", $f6, $2, $0
db "ちから@@", $32, $3, $0
db "チャレンジ", $36, $3, $0
db "つよい@@", $58, $3, $0
db "つよすぎ@", $5a, $3, $0
db "つらい@@", $5c, $3, $0
db "つらかった", $5e, $3, $0
db "てかげん@", $6c, $3, $0
db "てき@@@", $6e, $3, $0
db "てんさい@", $90, $3, $0
db "でんせつ@", $94, $3, $0
db "トレーナー", $c6, $3, $0
db "にげ@@@", $4, $4, $0
db "ぬるい@@", $10, $4, $0
db "ねらう@@", $16, $4, $0
db "バトル@@", $4a, $4, $0
db "ファイト@", $72, $4, $0
db "ふっかつ@", $78, $4, $0
db "ポイント@", $94, $4, $0
db "ポケモン@", $ac, $4, $0
db "ほんき@@", $bc, $4, $0
db "まいった!", $c4, $4, $0
db "まけ@@@", $c8, $4, $0
db "まけたら@", $ca, $4, $0
db "まけて@@", $cc, $4, $0
db "まける@@", $ce, $4, $0
db "まもり@@", $ea, $4, $0
db "みかた@@", $f2, $4, $0
db "みとめない", $fe, $4, $0
db "みとめる@", $0, $5, $0
db "むてき@@", $16, $5, $0
db "もらった!", $3c, $5, $0
db "よゆう@@", $7a, $5, $0
db "よわい@@", $82, $5, $0
db "よわすぎ@", $84, $5, $0
db "らくしょう", $8e, $5, $0
db "りーダー@", $9e, $5, $0
db "ルール@@", $a0, $5, $0
db "レべル@@", $a6, $5, $0
db "わざ@@@", $be, $5, $0
2018-06-24 07:09:41 -07:00
.Exclamations:
db "@@@@", $0, $0, $0
db "@@@", $2, $0, $0
db "@@@", $4, $0, $0
db "@@@@", $6, $0, $0
db "⋯@@@@", $8, $0, $0
db "⋯!@@@", $a, $0, $0
db "⋯⋯⋯@@", $c, $0, $0
db "ー@@@@", $e, $0, $0
db "ーーー@@", $10, $0, $0
db "あーあ@@", $14, $0, $0
db "あーん@@", $16, $0, $0
db "あははー@", $52, $0, $0
db "あら@@@", $54, $0, $0
db "いえ@@@", $72, $0, $0
db "イエス@@", $74, $0, $0
db "うう@@@", $ac, $0, $0
db "うーん@@", $ae, $0, $0
db "うおー!@", $b0, $0, $0
db "うおりゃー", $b2, $0, $0
db "うひょー@", $bc, $0, $0
db "うふふ@@", $be, $0, $0
db "うわー@@", $ca, $0, $0
db "うわーん@", $cc, $0, $0
db "ええ@@@", $d2, $0, $0
db "えー@@@", $d4, $0, $0
db "えーん@@", $d6, $0, $0
db "えへへ@@", $dc, $0, $0
db "おいおい@", $e0, $0, $0
db "おお@@@", $e2, $0, $0
db "おっと@@", $c, $1, $0
db "がーん@@", $42, $1, $0
db "キャー@@", $aa, $1, $0
db "ギャー@@", $ac, $1, $0
db "ぐふふふふ", $bc, $1, $0
db "げっ@@@", $ce, $1, $0
db "しくしく@", $3e, $2, $0
db "ちえっ@@", $2e, $3, $0
db "てへ@@@", $86, $3, $0
db "ノー@@@", $20, $4, $0
db "はあー@@", $2a, $4, $0
db "はい@@@", $30, $4, $0
db "はっはっは", $48, $4, $0
db "ひいー@@", $56, $4, $0
db "ひゃあ@@", $6a, $4, $0
db "ふっふっふ", $7c, $4, $0
db "ふにゃ@@", $7e, $4, $0
db "ププ@@@", $80, $4, $0
db "ふふん@@", $82, $4, $0
db "ふん@@@", $88, $4, $0
db "へっへっへ", $8e, $4, $0
db "へへー@@", $90, $4, $0
db "ほーほほほ", $9c, $4, $0
db "ほら@@@", $b6, $4, $0
db "まあ@@@", $c0, $4, $0
db "むきー!!", $10, $5, $0
db "むふー@@", $18, $5, $0
db "むふふ@@", $1a, $5, $0
db "むむ@@@", $1c, $5, $0
db "よーし@@", $6a, $5, $0
db "よし!@@", $72, $5, $0
db "ラララ@@", $98, $5, $0
db "わーい@@", $ac, $5, $0
db "わーん!!", $b0, $5, $0
2018-01-19 17:48:33 -08:00
db "ワオ@@@", $b2, $5, $0
db "わっ!!@", $ce, $5, $0
db "わははは!", $d0, $5, $0
2018-06-24 07:09:41 -07:00
.Conversation:
db "あのね@@", $50, $0, $0
db "あんまり@", $6e, $0, $0
db "いじわる@", $8e, $0, $0
db "うそ@@@", $b6, $0, $0
db "うむ@@@", $c4, $0, $0
db "おーい@@", $e4, $0, $0
db "おすすめ@", $6, $1, $0
db "おばかさん", $1e, $1, $0
db "かなり@@", $6e, $1, $0
db "から@@@", $7a, $1, $0
db "きぶん@@", $98, $1, $0
db "けど@@@", $d6, $1, $0
db "こそ@@@", $ea, $1, $0
db "こと@@@", $ee, $1, $0
db "さあ@@@", $12, $2, $0
db "さっぱり@", $1e, $2, $0
db "さて@@@", $20, $2, $0
db "じゅうぶん", $72, $2, $0
db "すぐ@@@", $94, $2, $0
db "すごく@@", $98, $2, $0
db "すこしは@", $9a, $2, $0
db "すっっごい", $a0, $2, $0
db "ぜーんぜん", $b0, $2, $0
db "ぜったい@", $b2, $2, $0
db "それで@@", $ce, $2, $0
db "だけ@@@", $f2, $2, $0
db "だって@@", $fc, $2, $0
db "たぶん@@", $6, $3, $0
db "たら@@@", $14, $3, $0
db "ちょー@@", $3a, $3, $0
db "ちょっと@", $3c, $3, $0
db "ったら@@", $4e, $3, $0
db "って@@@", $50, $3, $0
db "ていうか@", $62, $3, $0
db "でも@@@", $88, $3, $0
db "どうしても", $9c, $3, $0
db "とうぜん@", $a0, $3, $0
db "どうぞ@@", $a2, $3, $0
db "とりあえず", $be, $3, $0
db "なあ@@@", $cc, $3, $0
db "なんて@@", $f4, $3, $0
db "なんでも@", $fc, $3, $0
db "なんとか@", $fe, $3, $0
db "には@@@", $8, $4, $0
db "バッチり@", $46, $4, $0
db "ばりばり@", $52, $4, $0
db "ほど@@@", $b0, $4, $0
db "ほんと@@", $be, $4, $0
db "まさに@@", $d0, $4, $0
db "マジ@@@", $d2, $4, $0
db "マジで@@", $d4, $4, $0
db "まったく@", $e4, $4, $0
db "まで@@@", $e6, $4, $0
db "まるで@@", $ec, $4, $0
db "ムード@@", $e, $5, $0
db "むしろ@@", $14, $5, $0
db "めちゃ@@", $24, $5, $0
db "めっぽう@", $28, $5, $0
db "もう@@@", $2c, $5, $0
db "モード@@", $2e, $5, $0
db "もっと@@", $36, $5, $0
db "もはや@@", $38, $5, $0
db "やっと@@", $4a, $5, $0
db "やっぱり@", $4c, $5, $0
db "より@@@", $7c, $5, $0
db "れば@@@", $a4, $5, $0
2018-06-24 07:09:41 -07:00
.Feelings:
db "あいたい@", $1a, $0, $0
db "あそびたい", $32, $0, $0
db "いきたい@", $7c, $0, $0
db "うかれて@", $b4, $0, $0
db "うれしい@", $c6, $0, $0
db "うれしさ@", $c8, $0, $0
db "エキサイト", $d8, $0, $0
db "えらい@@", $de, $0, $0
db "おかしい@", $ec, $0, $0
2018-01-19 17:48:33 -08:00
db "オッケー@", $8, $1, $0
db "かえりたい", $48, $1, $0
db "がっくし@", $5a, $1, $0
db "かなしい@", $6c, $1, $0
db "がんばって", $80, $1, $0
db "きがしない", $86, $1, $0
db "きがする@", $88, $1, $0
db "ききたい@", $8a, $1, $0
db "きになる@", $90, $1, $0
db "きのせい@", $96, $1, $0
db "きらい@@", $b4, $1, $0
db "くやしい@", $be, $1, $0
db "くやしさ@", $c0, $1, $0
db "さみしい@", $24, $2, $0
db "ざんねん@", $32, $2, $0
db "しあわせ@", $36, $2, $0
db "したい@@", $44, $2, $0
db "したくない", $46, $2, $0
db "しまった@", $64, $2, $0
db "しょんぼり", $82, $2, $0
db "すき@@@", $92, $2, $0
db "だいきらい", $da, $2, $0
db "たいくつ@", $dc, $2, $0
db "だいじ@@", $de, $2, $0
db "だいすき@", $e4, $2, $0
db "たいへん@", $ea, $2, $0
db "たのしい@", $0, $3, $0
db "たのしすぎ", $2, $3, $0
db "たべたい@", $8, $3, $0
db "ダメダメ@", $e, $3, $0
db "たりない@", $16, $3, $0
db "ちくしょー", $34, $3, $0
db "どうしよう", $9e, $3, $0
db "ドキドキ@", $ac, $3, $0
db "ナイス@@", $d0, $3, $0
db "のみたい@", $26, $4, $0
db "びっくり@", $60, $4, $0
db "ふあん@@", $74, $4, $0
db "ふらふら@", $86, $4, $0
db "ほしい@@", $ae, $4, $0
db "ボロボロ@", $b8, $4, $0
db "まだまだ@", $e0, $4, $0
db "まてない@", $e8, $4, $0
db "まんぞく@", $f0, $4, $0
db "みたい@@", $f8, $4, $0
db "めずらしい", $22, $5, $0
db "メラメラ@", $2a, $5, $0
db "やだ@@@", $46, $5, $0
db "やったー@", $48, $5, $0
db "やばい@@", $50, $5, $0
db "やばすぎる", $52, $5, $0
db "やられた@", $54, $5, $0
db "やられて@", $56, $5, $0
db "よかった@", $6e, $5, $0
db "ラブラブ@", $96, $5, $0
db "ロマン@@", $a8, $5, $0
db "ろんがい@", $aa, $5, $0
db "わから@@", $b4, $5, $0
db "わかり@@", $b6, $5, $0
db "わくわく@", $ba, $5, $0
2018-06-24 07:09:41 -07:00
.Conditions:
db "あつい@@", $38, $0, $0
db "あった@@", $3a, $0, $0
db "あり@@@", $56, $0, $0
db "ある@@@", $5e, $0, $0
db "あわてて@", $6a, $0, $0
db "いい@@@", $70, $0, $0
db "いか@@@", $76, $0, $0
db "イカス@@", $78, $0, $0
db "いきおい@", $7a, $0, $0
db "いける@@", $8a, $0, $0
db "いじょう@", $8c, $0, $0
db "いそがしい", $90, $0, $0
db "いっしょに", $9a, $0, $0
db "いっぱい@", $9c, $0, $0
db "いない@@", $a0, $0, $0
db "いや@@@", $a4, $0, $0
db "いる@@@", $a8, $0, $0
db "うまい@@", $c0, $0, $0
db "うまく@@", $c2, $0, $0
db "おおきい@", $e6, $0, $0
db "おくれ@@", $f2, $0, $0
db "おしい@@", $fa, $0, $0
db "おもしろい", $2c, $1, $0
db "おもしろく", $2e, $1, $0
db "かっこいい", $5c, $1, $0
db "かわいい@", $7e, $1, $0
db "かんぺき@", $82, $1, $0
db "けっこう@", $d0, $1, $0
db "げんき@@", $d8, $1, $0
db "こわい@@", $6, $2, $0
db "さいこう@", $14, $2, $0
db "さむい@@", $26, $2, $0
db "さわやか@", $2c, $2, $0
db "しかたない", $38, $2, $0
db "すごい@@", $96, $2, $0
db "すごすぎ@", $9c, $2, $0
db "すてき@@", $a4, $2, $0
db "たいした@", $e0, $2, $0
db "だいじょぶ", $e2, $2, $0
db "たかい@@", $ec, $2, $0
db "ただしい@", $f8, $2, $0
db "だめ@@@", $c, $3, $0
db "ちいさい@", $2c, $3, $0
db "ちがう@@", $30, $3, $0
db "つかれ@@", $48, $3, $0
db "とくい@@", $b0, $3, $0
db "とまらない", $b6, $3, $0
db "ない@@@", $ce, $3, $0
db "なかった@", $d2, $3, $0
db "なし@@@", $d8, $3, $0
db "なって@@", $dc, $3, $0
db "はやい@@", $50, $4, $0
db "ひかる@@", $5a, $4, $0
db "ひくい@@", $5c, $4, $0
db "ひどい@@", $64, $4, $0
db "ひとりで@", $66, $4, $0
db "ひま@@@", $68, $4, $0
db "ふそく@@", $76, $4, $0
db "へた@@@", $8c, $4, $0
db "まちがって", $e2, $4, $0
db "やさしい@", $42, $5, $0
db "よく@@@", $70, $5, $0
db "よわって@", $86, $5, $0
db "らく@@@", $8c, $5, $0
db "らしい@@", $90, $5, $0
db "わるい@@", $d4, $5, $0
2018-06-24 07:09:41 -07:00
.Life:
db "アルバイト", $64, $0, $0
db "うち@@@", $ba, $0, $0
db "おかね@@", $ee, $0, $0
db "おこづかい", $f4, $0, $0
db "おふろ@@", $24, $1, $0
db "がっこう@", $5e, $1, $0
db "きねん@@", $92, $1, $0
db "グループ@", $c6, $1, $0
db "ゲット@@", $d2, $1, $0
db "こうかん@", $de, $1, $0
db "しごと@@", $40, $2, $0
db "しゅぎょう", $74, $2, $0
db "じゅぎょう", $76, $2, $0
db "じゅく@@", $78, $2, $0
db "しんか@@", $88, $2, $0
db "ずかん@@", $90, $2, $0
db "せいかつ@", $ae, $2, $0
db "せんせい@", $b8, $2, $0
db "センター@", $ba, $2, $0
db "タワー@@", $28, $3, $0
db "つうしん@", $40, $3, $0
db "テスト@@", $7e, $3, $0
db "テレビ@@", $8c, $3, $0
db "でんわ@@", $96, $3, $0
db "どうぐ@@", $9a, $3, $0
db "トレード@", $c4, $3, $0
db "なまえ@@", $e8, $3, $0
db "ニュース@", $a, $4, $0
db "にんき@@", $c, $4, $0
db "パーティー", $2e, $4, $0
db "べんきょう", $92, $4, $0
db "マシン@@", $d6, $4, $0
db "めいし@@", $1e, $5, $0
db "メッセージ", $26, $5, $0
db "もようがえ", $3a, $5, $0
db "ゆめ@@@", $5a, $5, $0
db "ようちえん", $66, $5, $0
2018-01-19 17:48:33 -08:00
db "ラジオ@@", $92, $5, $0
db "ワールド@", $ae, $5, $0
2018-06-24 07:09:41 -07:00
.Hobbies:
db "アイドル@", $1e, $0, $0
db "アニメ@@", $4c, $0, $0
db "うた@@@", $b8, $0, $0
db "えいが@@", $d0, $0, $0
db "おかし@@", $ea, $0, $0
db "おしゃべり", $4, $1, $0
db "おままごと", $28, $1, $0
db "おもちゃ@", $30, $1, $0
db "おんがく@", $38, $1, $0
db "カード@@", $3e, $1, $0
db "かいもの@", $46, $1, $0
db "グルメ@@", $c8, $1, $0
db "ゲーム@@", $cc, $1, $0
db "ざっし@@", $1c, $2, $0
db "さんぽ@@", $34, $2, $0
db "じてんしゃ", $50, $2, $0
db "しゅみ@@", $7a, $2, $0
db "スポーツ@", $a8, $2, $0
db "ダイエット", $d8, $2, $0
db "たからもの", $f0, $2, $0
db "たび@@@", $4, $3, $0
db "ダンス@@", $2a, $3, $0
db "つり@@@", $60, $3, $0
db "デート@@", $6a, $3, $0
db "でんしゃ@", $92, $3, $0
db "ぬいぐるみ", $e, $4, $0
db "パソコン@", $3e, $4, $0
db "はな@@@", $4c, $4, $0
db "ヒーロー@", $58, $4, $0
db "ひるね@@", $6e, $4, $0
db "ヒロイン@", $70, $4, $0
db "ぼうけん@", $96, $4, $0
db "ボード@@", $9a, $4, $0
db "ボール@@", $9e, $4, $0
db "ほん@@@", $ba, $4, $0
db "マンガ@@", $ee, $4, $0
db "やくそく@", $40, $5, $0
db "やすみ@@", $44, $5, $0
db "よてい@@", $74, $5, $0
2018-06-24 07:09:41 -07:00
.Actions:
db "あう@@@", $20, $0, $0
db "あきらめ@", $24, $0, $0
db "あげる@@", $28, $0, $0
db "あせる@@", $2e, $0, $0
db "あそび@@", $30, $0, $0
db "あそぶ@@", $34, $0, $0
db "あつめ@@", $3e, $0, $0
db "あるき@@", $60, $0, $0
db "あるく@@", $62, $0, $0
db "いく@@@", $7e, $0, $0
db "いけ@@@", $86, $0, $0
db "おき@@@", $f0, $0, $0
db "おこり@@", $f6, $0, $0
db "おこる@@", $f8, $0, $0
db "おしえ@@", $fe, $0, $0
db "おしえて@", $0, $1, $0
db "おねがい@", $1a, $1, $0
db "おぼえ@@", $26, $1, $0
db "かえる@@", $4a, $1, $0
db "がまん@@", $74, $1, $0
db "きく@@@", $8c, $1, $0
db "きたえ@@", $8e, $1, $0
db "きめ@@@", $a6, $1, $0
db "くる@@@", $c4, $1, $0
db "さがし@@", $18, $2, $0
db "さわぎ@@", $2a, $2, $0
db "した@@@", $42, $2, $0
db "しって@@", $4a, $2, $0
db "して@@@", $4e, $2, $0
db "しない@@", $52, $2, $0
db "しまう@@", $60, $2, $0
db "じまん@@", $66, $2, $0
db "しらない@", $84, $2, $0
db "しる@@@", $86, $2, $0
db "しんじて@", $8a, $2, $0
db "する@@@", $aa, $2, $0
db "たべる@@", $a, $3, $0
db "つかう@@", $42, $3, $0
db "つかえ@@", $44, $3, $0
db "つかって@", $46, $3, $0
db "できない@", $70, $3, $0
db "できる@@", $72, $3, $0
db "でない@@", $84, $3, $0
db "でる@@@", $8a, $3, $0
db "なげる@@", $d6, $3, $0
db "なやみ@@", $ea, $3, $0
db "ねられ@@", $18, $4, $0
db "ねる@@@", $1a, $4, $0
db "のがし@@", $24, $4, $0
db "のむ@@@", $28, $4, $0
db "はしり@@", $3a, $4, $0
db "はしる@@", $3c, $4, $0
db "はたらき@", $40, $4, $0
db "はたらく@", $42, $4, $0
db "はまって@", $4e, $4, $0
db "ぶつけ@@", $7a, $4, $0
db "ほめ@@@", $b4, $4, $0
db "みせて@@", $f6, $4, $0
db "みて@@@", $fc, $4, $0
db "みる@@@", $2, $5, $0
db "めざす@@", $20, $5, $0
db "もって@@", $34, $5, $0
db "ゆずる@@", $58, $5, $0
db "ゆるす@@", $5c, $5, $0
db "ゆるせ@@", $5e, $5, $0
db "られない@", $9a, $5, $0
db "られる@@", $9c, $5, $0
db "わかる@@", $b8, $5, $0
db "わすれ@@", $c0, $5, $0
2018-06-24 07:09:41 -07:00
.Time:
db "あき@@@", $22, $0, $0
db "あさ@@@", $2a, $0, $0
db "あした@@", $2c, $0, $0
db "いちにち@", $94, $0, $0
db "いつか@@", $98, $0, $0
db "いつも@@", $9e, $0, $0
db "いま@@@", $a2, $0, $0
db "えいえん@", $ce, $0, $0
db "おととい@", $12, $1, $0
db "おわり@@", $36, $1, $0
db "かようび@", $78, $1, $0
db "きのう@@", $94, $1, $0
db "きょう@@", $b0, $1, $0
db "きんようび", $b8, $1, $0
db "げつようび", $d4, $1, $0
db "このあと@", $f4, $1, $0
db "このまえ@", $f6, $1, $0
db "こんど@@", $c, $2, $0
db "じかん@@", $3c, $2, $0
db "じゅうねん", $70, $2, $0
db "すいようび", $8e, $2, $0
db "スタート@", $9e, $2, $0
db "ずっと@@", $a2, $2, $0
db "ストップ@", $a6, $2, $0
db "そのうち@", $c4, $2, $0
db "ついに@@", $3e, $3, $0
db "つぎ@@@", $4a, $3, $0
db "どようび@", $ba, $3, $0
db "なつ@@@", $da, $3, $0
db "にちようび", $6, $4, $0
db "はじめ@@", $38, $4, $0
db "はる@@@", $54, $4, $0
db "ひる@@@", $6c, $4, $0
db "ふゆ@@@", $84, $4, $0
db "まいにち@", $c6, $4, $0
db "もくようび", $30, $5, $0
db "よなか@@", $76, $5, $0
db "よる@@@", $7e, $5, $0
db "らいしゅう", $88, $5, $0
2018-06-24 07:09:41 -07:00
.Farewells:
db "いたします", $92, $0, $0
db "おります@", $32, $1, $0
db "か!?@@", $3c, $1, $0
db "かい?@@", $44, $1, $0
db "かしら?@", $50, $1, $0
db "かな?@@", $6a, $1, $0
db "かも@@@", $76, $1, $0
db "くれ@@@", $ca, $1, $0
db "ございます", $e8, $1, $0
db "しがち@@", $3a, $2, $0
db "します@@", $62, $2, $0
db "じゃ@@@", $6a, $2, $0
db "じゃん@@", $6e, $2, $0
db "しよう@@", $7c, $2, $0
db "ぜ!@@@", $ac, $2, $0
db "ぞ!@@@", $bc, $2, $0
db "た@@@@", $d4, $2, $0
db "だ@@@@", $d6, $2, $0
db "だからね@", $ee, $2, $0
db "だぜ@@@", $f4, $2, $0
db "だった@@", $fa, $2, $0
db "だね@@@", $fe, $2, $0
db "だよ@@@", $10, $3, $0
db "だよねー!", $12, $3, $0
db "だわ@@@", $26, $3, $0
db "ッス@@@", $4c, $3, $0
db "ってかんじ", $52, $3, $0
db "っぱなし@", $54, $3, $0
db "つもり@@", $56, $3, $0
db "ていない@", $64, $3, $0
db "ている@@", $66, $3, $0
db "でーす!@", $68, $3, $0
db "でした@@", $74, $3, $0
db "でしょ?@", $76, $3, $0
db "でしょー!", $78, $3, $0
db "です@@@", $7a, $3, $0
db "ですか?@", $7c, $3, $0
db "ですよ@@", $80, $3, $0
db "ですわ@@", $82, $3, $0
db "どうなの?", $a4, $3, $0
db "どうよ?@", $a8, $3, $0
db "とかいって", $aa, $3, $0
db "なの@@@", $e0, $3, $0
db "なのか@@", $e2, $3, $0
db "なのだ@@", $e4, $3, $0
db "なのよ@@", $e6, $3, $0
db "なんだね@", $f2, $3, $0
db "なんです@", $f8, $3, $0
db "なんてね@", $fa, $3, $0
db "ね@@@@", $12, $4, $0
db "ねー@@@", $14, $4, $0
db "の@@@@", $1c, $4, $0
db "の?@@@", $1e, $4, $0
db "ばっかり@", $44, $4, $0
db "まーす!@", $c2, $4, $0
db "ます@@@", $d8, $4, $0
db "ますわ@@", $da, $4, $0
db "ません@@", $dc, $4, $0
db "みたいな@", $fa, $4, $0
db "よ!@@@", $60, $5, $0
db "よー@@@", $68, $5, $0
db "よーん@@", $6c, $5, $0
db "よね@@@", $78, $5, $0
db "るよ@@@", $a2, $5, $0
db "わけ@@@", $bc, $5, $0
db "わよ!@@", $d2, $5, $0
2018-06-24 07:09:41 -07:00
.ThisAndThat:
db "ああ@@@", $12, $0, $0
db "あっち@@", $3c, $0, $0
db "あの@@@", $4e, $0, $0
db "ありゃ@@", $5c, $0, $0
db "あれ@@@", $66, $0, $0
db "あれは@@", $68, $0, $0
db "あんな@@", $6c, $0, $0
db "こう@@@", $dc, $1, $0
db "こっち@@", $ec, $1, $0
db "この@@@", $f2, $1, $0
db "こりゃ@@", $fe, $1, $0
db "これ@@@", $0, $2, $0
db "これだ!@", $2, $2, $0
db "これは@@", $4, $2, $0
db "こんな@@", $e, $2, $0
db "そう@@@", $be, $2, $0
db "そっち@@", $c0, $2, $0
db "その@@@", $c2, $2, $0
db "そりゃ@@", $c6, $2, $0
db "それ@@@", $c8, $2, $0
db "それだ!@", $cc, $2, $0
db "それは@@", $d0, $2, $0
db "そんな@@", $d2, $2, $0
db "どう@@@", $98, $3, $0
db "どっち@@", $b2, $3, $0
db "どの@@@", $b4, $3, $0
db "どりゃ@@", $c0, $3, $0
db "どれ@@@", $c2, $3, $0
db "どれを@@", $c8, $3, $0
db "どんな@@", $ca, $3, $0
db "なに@@@", $de, $3, $0
db "なんか@@", $ec, $3, $0
db "なんだ@@", $f0, $3, $0
db "なんで@@", $f6, $3, $0
db "なんなんだ", $0, $4, $0
db "なんの@@", $2, $4, $0
2016-05-14 13:37:12 -07:00
MobileEZChatData_WordAndPageCounts:
macro_11f220: MACRO
2016-05-13 22:11:01 -07:00
; parameter: number of words
db \1
; 12 words per page (0-based indexing)
x = \1 / 12
if \1 % 12 == 0
x = x - 1
2016-05-13 22:11:01 -07:00
endc
db x
2017-12-28 13:31:16 -08:00
ENDM
2016-05-13 22:11:01 -07:00
macro_11f220 18 ; 01: Types
macro_11f220 36 ; 02: Greetings
macro_11f220 69 ; 03: People
macro_11f220 69 ; 04: Battle
macro_11f220 66 ; 05: Exclamations
macro_11f220 66 ; 06: Conversation
2016-06-07 05:13:08 -07:00
macro_11f220 69 ; 07: Feelings
macro_11f220 66 ; 08: Conditions
macro_11f220 39 ; 09: Life
macro_11f220 39 ; 0a: Hobbies
macro_11f220 69 ; 0b: Actions
macro_11f220 39 ; 0c: Time
macro_11f220 66 ; 0d: Farewells
macro_11f220 36 ; 0e: ThisAndThat
2016-05-14 13:37:12 -07:00
EZChat_SortedWords:
; Addresses in WRAM bank 3 where EZChat words beginning
; with the given kana are sorted in memory, and the pre-
; allocated size for each.
; These arrays are expanded dynamically to accomodate
; any Pokemon you've seen that starts with each kana.
macro_11f23c: MACRO
dw x - w3_d000, \1
x = x + 2 * \1
2017-12-28 13:31:16 -08:00
ENDM
x = $d012 ; w3_d012
2016-05-13 22:11:01 -07:00
macro_11f23c $2f ; a
macro_11f23c $1e ; i
macro_11f23c $11 ; u
macro_11f23c $09 ; e
macro_11f23c $2e ; o
macro_11f23c $24 ; ka_ga
macro_11f23c $1b ; ki_gi
macro_11f23c $09 ; ku_gu
macro_11f23c $07 ; ke_ge
macro_11f23c $1c ; ko_go
macro_11f23c $12 ; sa_za
macro_11f23c $2b ; shi_ji
macro_11f23c $10 ; su_zu
macro_11f23c $08 ; se_ze
macro_11f23c $0c ; so_zo
macro_11f23c $2c ; ta_da
macro_11f23c $09 ; chi_dhi
macro_11f23c $12 ; tsu_du
macro_11f23c $1b ; te_de
macro_11f23c $1a ; to_do
macro_11f23c $1c ; na
macro_11f23c $05 ; ni
macro_11f23c $02 ; nu
macro_11f23c $05 ; ne
macro_11f23c $07 ; no
macro_11f23c $16 ; ha_ba_pa
macro_11f23c $0e ; hi_bi_pi
macro_11f23c $0c ; fu_bu_pu
macro_11f23c $05 ; he_be_pe
macro_11f23c $16 ; ho_bo_po
macro_11f23c $19 ; ma
macro_11f23c $0e ; mi
macro_11f23c $08 ; mu
macro_11f23c $07 ; me
macro_11f23c $09 ; mo
macro_11f23c $0d ; ya
macro_11f23c $04 ; yu
macro_11f23c $14 ; yo
macro_11f23c $0b ; ra
macro_11f23c $01 ; ri
macro_11f23c $02 ; ru
macro_11f23c $02 ; re
macro_11f23c $02 ; ro
macro_11f23c $15 ; wa
x = $d000 ; w3_d000
2016-05-13 22:11:01 -07:00
macro_11f23c $09 ; end
.End