pokecrystal-board/mobile/fixed_words.asm
Rangi 9dec80b07e Add meaningful aliases for wd265
Introduce MONICON_* constants
Introduce BATTLEPLAYERACTION_* constants
2018-07-29 00:25:52 -04:00

4139 lines
71 KiB
NASM
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

; 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.
Function11c05d:
ld a, e
or d
jr z, .error
ld a, e
and d
cp $ff
jr z, .error
push hl
call CopyMobileEZChatToC608
pop hl
call PlaceString
and a
ret
.error
ld c, l
ld b, h
scf
ret
Function11c075:
push de
ld a, c
call Function11c254
pop de
ld bc, wcd36
call Function11c08f
ret
Unreferenced_Function11c082:
push de
ld a, c
call Function11c254
pop de
ld bc, wcd36
call PrintEZChatBattleMessage
ret
Function11c08f:
ld l, e
ld h, d
push hl
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
jr c, .okay
inc bc
.okay
ld l, c
ld h, b
pop bc
pop af
dec a
jr nz, .loop
pop hl
ld de, 2 * SCREEN_WIDTH
add hl, de
ld a, $3
.loop2
push af
ld a, [bc]
ld e, a
inc bc
ld a, [bc]
ld d, a
inc bc
push bc
call Function11c05d
jr c, .okay2
inc bc
.okay2
ld l, c
ld h, b
pop bc
pop af
dec a
jr nz, .loop2
ret
PrintEZChatBattleMessage:
; Use up to 6 words from bc to print text starting at de.
; Preserve $cf63, $cf64
ld a, [wJumptableIndex]
ld l, a
ld a, [wcf64]
ld h, a
push hl
; reset value at c618 (not preserved)
ld hl, $c618
ld a, $0
ld [hli], a
; preserve de
push de
; $cf63 keeps track of which line we're on (0, 1, or 2)
; $cf64 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 ; up to 6 times
.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
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, $c608
.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 c618 to bc
pop bc
ld hl, $c618
call PlaceHLTextAtBC
; restore the original values of $cf63 and $cf64
pop hl
ld a, l
ld [wJumptableIndex], a
ld a, h
ld [wcf64], a
ret
GetLengthOfWordAtC608:
ld c, $0
ld hl, $c608
.loop
ld a, [hli]
cp "@"
ret z
inc c
jr .loop
CopyMobileEZChatToC608:
ld a, [rSVBK]
push af
ld a, $1
ld [rSVBK], a
ld a, "@"
ld hl, $c608
ld bc, NAME_LENGTH
call ByteFill
ld a, d
and a
jr z, .get_name
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
ld bc, NAME_LENGTH_JAPANESE - 1
.copy_string
ld de, $c608
call CopyBytes
ld de, $c608
pop af
ld [rSVBK], a
ret
.get_name
ld a, e
ld [wNamedObjectIndexBuffer], a
call GetPokemonName
ld hl, wStringBuffer1
ld bc, MON_NAME_LENGTH - 1
jr .copy_string
Function11c1ab:
ld a, [hInMenu]
push af
ld a, $1
ld [hInMenu], a
call Function11c1b9
pop af
ld [hInMenu], a
ret
Function11c1b9:
call .InitKanaMode
ld a, [rSVBK]
push af
ld a, $5
ld [rSVBK], a
call EZChat_MasterLoop
pop af
ld [rSVBK], a
ret
.InitKanaMode:
xor a
ld [wJumptableIndex], a
ld [wcf64], a
ld [wcf65], a
ld [wcf66], a
ld [wcd23], a
ld [wcd20], a
ld [wcd21], a
ld [wcd22], a
ld [wcd35], a
ld [wcd2b], a
ld a, $ff
ld [wcd24], a
ld a, [wMenuCursorY]
dec a
call Function11c254
call ClearBGPalettes
call ClearSprites
call ClearScreen
call Function11d323
call SetPalettes
call DisableLCD
ld hl, GFX_11d67e
ld de, vTiles2
ld bc, $60
call CopyBytes
ld hl, LZ_11d6de
ld de, vTiles0
call Decompress
call EnableLCD
farcall ReloadMapPart
farcall ClearSpriteAnims
farcall LoadPokemonData
farcall Pokedex_ABCMode
ld a, [rSVBK]
push af
ld a, $5
ld [rSVBK], a
ld hl, $c6d0
ld de, wLYOverrides
ld bc, $100
call CopyBytes
pop af
ld [rSVBK], a
call EZChat_GetCategoryWordsByKana
call EZChat_GetSeenPokemonByKana
ret
Function11c254:
push af
ld a, $4
call GetSRAMBank
ld hl, $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
ld bc, 12
call CopyBytes
call CloseSRAM
ret
EZChat_ClearBottom12Rows:
ld a, " "
hlcoord 0, 6
ld bc, (SCREEN_HEIGHT - 6) * SCREEN_WIDTH
call ByteFill
ret
EZChat_MasterLoop:
.loop
call JoyTextDelay
ld a, [hJoyPressed]
ld [hJoypadPressed], a
ld a, [wJumptableIndex]
bit 7, a
jr nz, .exit
call .DoJumptableFunction
farcall PlaySpriteAnimations
farcall ReloadMapPart
jr .loop
.exit
farcall ClearSpriteAnims
call ClearSprites
ret
.DoJumptableFunction:
jumptable .Jumptable, wJumptableIndex
.Jumptable:
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
.SpawnObjects:
depixel 3, 1, 2, 5
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call _InitSpriteAnimStruct
depixel 8, 1, 2, 5
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call _InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_0C
add hl, bc
ld a, $1
ld [hl], a
depixel 9, 2, 2, 0
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call _InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_0C
add hl, bc
ld a, $3
ld [hl], a
depixel 10, 16
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call _InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_0C
add hl, bc
ld a, $4
ld [hl], a
depixel 10, 4
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call _InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_0C
add hl, bc
ld a, $5
ld [hl], a
depixel 10, 2
ld a, SPRITE_ANIM_INDEX_EZCHAT_CURSOR
call _InitSpriteAnimStruct
ld hl, SPRITEANIMSTRUCT_0C
add hl, bc
ld a, $2
ld [hl], a
ld hl, wcd23
set 1, [hl]
set 2, [hl]
jp Function11cfb5
.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
Function11c35f:
ld hl, wcd2f
inc [hl]
inc [hl]
dec hl
dec hl
dec [hl]
push af
ld de, wcd2d
call Function11cfce
pop af
ret nz
jp Function11cfb5
Function11c373:
ld hl, wcd30
inc [hl]
inc [hl]
dec hl
dec hl
dec [hl]
push af
ld de, wcd2d
call Function11cfce
pop af
ret nz
call Function11c38a
jp Function11cfb5
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
String_11c3bc:
db "ーーーーー@"
Function11c3c2:
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
Function11c3ed:
ld hl, wcd20 ; wcd20
ld de, hJoypadPressed ; $ffa3
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
.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 ; wcd20
ret
.asm_11c42c
ld a, [wcd20] ; 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
.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
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
.asm_11c4b7
xor a
ld [wcd22], a
ld a, $15
ret
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
farcall ReloadMapPart
ret
String_11c4db:
db "6つのことば¯くみあわせます"
next "かえたいところ¯えらぶと でてくる"
next "ことばのグループから いれかえたい"
next "たんご¯えらんでください"
db "@"
String_11c51b:
db "ぜんぶけす やめる   けってい@"
Function11c52c:
call EZChat_ClearBottom12Rows
call EZChat_PlaceCategoryNames
call Function11c618
ld hl, wcd24
res 1, [hl]
call Function11cfb5
Function11c53d:
ld hl, wcd21
ld de, hJoypadPressed ; $ffa3
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]
cp 15
jr c, .got_category
sub $f
jr z, .done
dec a
jr z, .mode
jr .b
.start
ld hl, wcd24
set 0, [hl]
ld a, $8
ld [wcd20], a ; wcd20
.b
ld a, $4
jr .go_to_function
.select
ld a, [wcd2b]
xor $1
ld [wcd2b], a
ld a, $15
jr .go_to_function
.mode
ld a, $13
jr .go_to_function
.got_category
ld a, $8
.go_to_function
ld hl, wcd24
set 1, [hl]
ld [wJumptableIndex], a
call PlayClickSFX
ret
.done
ld a, [wcd20] ; wcd20
call Function11ca6a
call PlayClickSFX
ret
.up
ld a, [hl]
cp $3
ret c
sub $3
jr .finish_dpad
.down
ld a, [hl]
cp $f
ret nc
add $3
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
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
.finish_dpad
ld [hl], a
ret
EZChat_PlaceCategoryNames:
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
; 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]
cp "@"
jr z, .find_next_string_loop
pop bc
pop af
dec a
jr nz, .loop
hlcoord 1, 17
ld de, EZChatString_Stop_Mode_Cancel
call PlaceString
ret
Function11c618:
ld a, $2
hlcoord 0, 6, wAttrMap
ld bc, $c8
call ByteFill
farcall ReloadMapPart
ret
EZChatString_Stop_Mode_Cancel:
db "けす    モード   やめる@"
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
Function11c658:
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
Function11c675:
ld hl, wMobileCommsJumptableIndex
ld de, hJoypadPressed ; $ffa3
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
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
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
.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
Function11c770:
xor a
ld [wMobileCommsJumptableIndex], a
ld [wcd26], a
ld [wcd27], a
ld a, [wcd2b]
and a
jr nz, .cd2b_is_nonzero
ld a, [wcd21]
and a
jr z, .cd21_is_zero
; load from data array
dec a
sla a
ld hl, MobileEZChatData_WordAndPageCounts
ld c, a
ld b, 0
add hl, bc
ld a, [hli]
ld [wcd28], a
ld a, [hl]
.load
ld [wcd29], a
ret
.cd21_is_zero
; compute from [wc7d2]
ld a, [wc7d2]
ld [wcd28], a
.div_12
ld c, 12
call SimpleDivide
and a
jr nz, .no_need_to_floor
dec b
.no_need_to_floor
ld a, b
jr .load
.cd2b_is_nonzero
; compute from [c6a8 + 2 * [cd22]]
ld hl, $c6a8 ; $c68a + 30
ld a, [wcd22]
ld c, a
ld b, 0
add hl, bc
add hl, bc
ld a, [hl]
ld [wcd28], a
jr .div_12
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
.asm_11c7e9
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
.asm_11c811
pop hl
pop de
ret
.asm_11c814
ld hl, $c648
ld a, [wcd22]
ld e, a
ld d, $0
add hl, de
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
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
.asm_11c851
pop hl
pop de
ret
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
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
.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:
inc a
push af
and $f
ld [hDividend], a
pop af
and $f0
swap a
ld [hDividend + 1], a
xor a
ld [hDividend + 2], a
push hl
farcall Function11a80c
pop hl
ld a, [wcd63]
add ""
ld [hli], a
ld a, [wcd62]
add ""
ld [hli], a
ret
MobileString_Page:
db "ぺージ@"
MobileString_Prev:
db "まえ@"
MobileString_Next:
db "つぎ@"
Function11c8f6:
ld a, [wcd20] ; 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
ld a, [wMobileCommsJumptableIndex]
add [hl]
.asm_11c911
ld e, a
.asm_11c912
pop hl
push de
call Function11c05d
pop de
ld a, [wcd20] ; wcd20
ld c, a
ld b, $0
ld hl, wcd36
add hl, bc
add hl, bc
ld [hl], e
inc hl
ld [hl], d
ret
.asm_11c927
ld hl, wcd26
ld a, [wMobileCommsJumptableIndex]
add [hl]
ld c, a
ld b, $0
ld hl, wListPointer
add hl, bc
ld a, [hl]
jr .asm_11c911
.asm_11c938
ld hl, $c648
ld a, [wcd22]
ld e, a
ld d, $0
add hl, de
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
add hl, de
ld a, [wMobileCommsJumptableIndex]
ld e, a
add hl, de
add hl, de
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
jr .asm_11c912
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
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
Function11c9ab:
ld a, $7
hlcoord 0, 6, wAttrMap
ld bc, $c8
call ByteFill
farcall ReloadMapPart
ret
Function11c9bd:
ld de, String_11ca38
call Function11ca7f
Function11c9c3:
ld hl, wcd2a
ld de, hJoypadPressed ; $ffa3
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
.asm_11c9de
ld a, [hl]
and a
jr nz, .asm_11c9e9
call Function11ca5e
xor a
ld [wcd20], a ; wcd20
.asm_11c9e9
ld hl, wcd24
set 4, [hl]
ld a, $4
ld [wJumptableIndex], a
call PlayClickSFX
ret
.asm_11c9f7
ld a, [hl]
and a
ret z
dec [hl]
ret
.asm_11c9fc
ld a, [hl]
and a
ret nz
inc [hl]
ret
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
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
farcall ReloadMapPart
ret
String_11ca38:
db "とうろくちゅう<NO>あいさつ¯ぜんぶ"
next "けしても よろしいですか?@"
String_11ca57:
db "はい"
next "いいえ@"
Function11ca5e:
xor a
.loop
push af
call Function11ca6a
pop af
inc a
cp $6
jr nz, .loop
ret
Function11ca6a:
ld hl, wcd36
ld c, a
ld b, $0
add hl, bc
add hl, bc
ld [hl], b
inc hl
ld [hl], b
call Function11c95d
ld de, String_11c3bc
call PlaceString
ret
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
Function11caad:
ld de, String_11cb1c
call Function11ca7f
Function11cab3:
ld hl, wcd2a
ld de, hJoypadPressed ; $ffa3
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
.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
.asm_11caf3
ld hl, wJumptableIndex
set 7, [hl]
ret
.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
.asm_11cb12
ld a, [hl]
and a
ret z
dec [hl]
ret
.asm_11cb17
ld a, [hl]
and a
ret nz
inc [hl]
ret
String_11cb1c:
db "あいさつ<NO>とうろく¯ちゅうし"
next "しますか?@"
String_11cb31:
db "とうろくちゅう<NO>あいさつ<WA>ほぞん"
next "されません<GA>よろしい ですか?@"
Function11cb52:
ld hl, Unknown_11cc01
ld a, [wMenuCursorY]
.asm_11cb58
dec a
jr z, .asm_11cb5f
inc hl
inc hl
jr .asm_11cb58
.asm_11cb5f
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
call Function11ca7f
Function11cb66:
ld hl, wcd2a
ld de, hJoypadPressed ; $ffa3
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
.asm_11cb81
ld a, [hl]
and a
jr nz, .asm_11cbd4
ld a, $4
call GetSRAMBank
ld hl, $a007
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, $c
.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
ld a, [wMenuCursorY]
.asm_11cbba
dec a
jr z, .asm_11cbc1
inc hl
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
.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
.asm_11cbeb
ld a, [hl]
and a
ret z
dec [hl]
ret
.asm_11cbf0
ld a, [hl]
and a
ret nz
inc [hl]
ret
Function11cbf5:
call WaitSFX
ld hl, wcf64
dec [hl]
ret nz
dec hl
set 7, [hl]
ret
Unknown_11cc01:
dw String_11cc09
dw String_11cc23
dw String_11cc42
dw String_11cc60
String_11cc09:
db "じこしょうかい は"
next "この あいさつで いいですか?@"
String_11cc23:
db "たいせん <GA>はじまるとき は"
next "この あいさつで いいですか?@"
String_11cc42:
db "たいせん <NI>かったとき は"
next "この あいさつで いいですか?@"
String_11cc60:
db "たいせん <NI>まけたとき は"
next "この あいさつで いいですか?@"
Unknown_11cc7e:
dw String_11cc86
dw String_11cc9d
dw String_11ccb9
dw String_11ccd4
String_11cc86:
db "じこしょうかい の"
next "あいさつ¯とうろくした!@"
String_11cc9d:
db "たいせん <GA>はじまるとき の"
next "あいさつ¯とうろくした!@"
String_11ccb9:
db "たいせん <NI>かったとき の"
next "あいさつ¯とうろくした!@"
String_11ccd4:
db "たいせん <NI>まけたとき の"
next "あいさつ¯とうろくした!@"
Function11ccef:
ld de, Unknown_11cfc6
call Function11cfce
hlcoord 1, 14
ld de, String_11cd10
call PlaceString
call Function11ca19
call Function11cfb5
Function11cd04:
ld de, hJoypadPressed ; $ffa3
ld a, [de]
and a
ret z
ld a, $4
ld [wJumptableIndex], a
ret
String_11cd10:
db "なにか ことば¯いれてください@"
Function11cd20:
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
Function11cd54:
ld hl, wcd2c
ld de, hJoypadPressed ; $ffa3
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
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
farcall ReloadMapPart
ret
String_11cdc7:
; Words will be displayed by category
db "ことば¯しゅるいべつに"
next "えらべます@"
String_11cdd9:
; Words will be displayed in alphabetical order
db "ことば¯アイウエオ の"
next "じゅんばんで ひょうじ します@"
String_11cdf5:
db "しゅるいべつ モード" ; Category mode
next "アイウエオ  モード@" ; ABC mode
Function11ce0b:
call EZChat_ClearBottom12Rows
hlcoord 1, 7
ld de, String_11cf79
call PlaceString
hlcoord 1, 17
ld de, EZChatString_Stop_Mode_Cancel
call PlaceString
call Function11c618
ld hl, wcd24
res 2, [hl]
call Function11cfb5
Function11ce2b:
ld a, [wcd22]
sla a
sla a
ld c, a
ld b, 0
ld hl, Unknown_11ceb9
add hl, bc
ld de, hJoypadPressed ; $ffa3
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
ld a, [wcd22]
cp NUM_KANA
jr c, .place
sub NUM_KANA
jr z, .done
dec a
jr z, .mode
jr .b
.start
ld hl, wcd24
set 0, [hl]
ld a, $8
ld [wcd20], a ; wcd20
.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
.mode
ld a, $13
.load
ld [wJumptableIndex], a
ld hl, wcd24
set 2, [hl]
call PlayClickSFX
ret
.done
ld a, [wcd20] ; wcd20
call Function11ca6a
call PlayClickSFX
ret
.left
inc hl
.down
inc hl
.right
inc hl
.up
ld a, [hl]
cp $ff
ret z
ld [wcd22], a
ret
Unknown_11ceb9:
; up left down right
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
String_11cf79:
; Hiragana table
db "あいうえお なにぬねの や ゆ よ"
next "かきくけこ はひふへほ わ"
next "さしすせそ まみむめも そのた"
next "たちつてと らりるれろ"
db "@"
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
Function11cfce:
hlcoord 0, 0
ld bc, SCREEN_WIDTH
ld a, [de]
inc de
push af
ld a, [de]
inc de
and a
.add_n_times
jr z, .done_add_n_times
add hl, bc
dec a
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
dec a
jr z, .skip_fill
ld c, a
ld a, $7a
.fill_loop
ld [hli], a
dec c
jr nz, .fill_loop
.skip_fill
ld a, $7b
ld [hl], a
pop hl
ld bc, SCREEN_WIDTH
add hl, bc
ld a, [de]
dec de
dec a
dec a
jr z, .skip_section
ld b, a
.loop
push hl
ld a, $7c
ld [hli], a
ld a, [de]
dec a
dec a
jr z, .skip_row
ld c, a
ld a, $7f
.row_loop
ld [hli], a
dec c
jr nz, .row_loop
.skip_row
ld a, $7c
ld [hl], a
pop hl
push bc
ld bc, SCREEN_WIDTH
add hl, bc
pop bc
dec b
jr nz, .loop
.skip_section
ld a, $7d
ld [hli], a
ld a, [de]
dec a
dec a
jr z, .skip_remainder
ld c, a
ld a, $7a
.final_loop
ld [hli], a
dec c
jr nz, .final_loop
.skip_remainder
ld a, $7e
ld [hl], a
ret
Function11d035:
hlcoord 0, 0
ld bc, SCREEN_WIDTH
ld a, [de]
inc de
push af
ld a, [de]
inc de
and a
.add_n_times
jr z, .done_add_n_times
add hl, bc
dec a
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
call .AddNMinusOneTimes
ld a, $7e
ld [hl], a
pop hl
push hl
call .AddNMinusOneTimes
ld a, $7d
ld [hl], a
pop hl
push hl
inc hl
push hl
call .AddNMinusOneTimes
pop bc
dec de
ld a, [de]
cp $2
jr z, .skip
dec a
dec a
.loop
push af
ld a, $7a
ld [hli], a
ld [bc], a
inc bc
pop af
dec a
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
dec a
ld c, a
ld b, a
ld de, $14
.loop2
ld a, $7c
ld [hl], a
add hl, de
dec c
jr nz, .loop2
pop hl
.loop3
ld a, $7c
ld [hl], a
add hl, de
dec b
jr nz, .loop3
ret
.AddNMinusOneTimes:
ld a, [de]
dec a
ld bc, SCREEN_WIDTH
.add_n_minus_one_times
add hl, bc
dec a
jr nz, .add_n_minus_one_times
ret
AnimateEZChatCursor:
ld hl, SPRITEANIMSTRUCT_0C
add hl, bc
ld a, [hl]
ld e, a
ld d, 0
ld hl, .Jumptable
add hl, de
add hl, de
ld a, [hli]
ld h, [hl]
ld l, a
jp hl
.Jumptable:
dw .zero
dw .one
dw .two
dw .three
dw .four
dw .five
dw .six
dw .seven
dw .eight
dw .nine
dw .ten
.zero
ld a, [wcd20] ; wcd20
sla a
ld hl, .Coords_Zero
ld e, $1
jr .load
.one
ld a, [wcd21]
sla a
ld hl, .Coords_One
ld e, $2
jr .load
.two
ld hl, .FramesetsIDs_Two
ld a, [wcd22]
ld e, a
ld d, $0
add hl, de
ld a, [hl]
call ReinitSpriteAnimFrame
ld a, [wcd22]
sla a
ld hl, .Coords_Two
ld e, $4
jr .load
.three
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_2
call ReinitSpriteAnimFrame
ld a, [wMobileCommsJumptableIndex]
sla a
ld hl, .Coords_Three
ld e, $8
.load
push de
ld e, a
ld d, $0
add hl, de
push hl
pop de
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
call .UpdateObjectFlags
ret
.four
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_2
call ReinitSpriteAnimFrame
ld a, [wcd2a]
sla a
ld hl, .Coords_Four
ld e, $10
jr .load
.five
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_2
call ReinitSpriteAnimFrame
ld a, [wcd2c]
sla a
ld hl, .Coords_Five
ld e, $20
jr .load
.six
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_5
call ReinitSpriteAnimFrame
; X = [wcd4a] * 8 + 24
ld a, [wcd4a]
sla a
sla a
sla a
add $18
ld hl, SPRITEANIMSTRUCT_XCOORD
add hl, bc
ld [hli], a
; Y = 48
ld a, $30
ld [hl], a
ld a, $1
ld e, a
call .UpdateObjectFlags
ret
.seven
ld a, [wEZChatCursorYCoord]
cp $4
jr z, .cursor0
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_3
jr .got_frameset
.cursor0
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_1
.got_frameset
call ReinitSpriteAnimFrame
ld a, [wEZChatCursorYCoord]
cp $4
jr z, .asm_11d1b1
; X = [wEZChatCursorXCoord] * 8 + 32
ld a, [wEZChatCursorXCoord]
sla a
sla a
sla a
add $20
ld hl, SPRITEANIMSTRUCT_XCOORD
add hl, bc
ld [hli], a
; 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
call .UpdateObjectFlags
ret
.asm_11d1b1
; X = [wEZChatCursorXCoord] * 40 + 24
ld a, [wEZChatCursorXCoord]
sla a
sla a
sla a
ld e, a
sla a
sla a
add e
add $18
ld hl, SPRITEANIMSTRUCT_XCOORD
add hl, bc
ld [hli], a
; Y = 138
ld a, $8a
ld [hl], a
ld a, $2
ld e, a
call .UpdateObjectFlags
ret
.nine
ld d, -13 * 8
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_7
jr .eight_nine_load
.eight
ld d, 2 * 8
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_6
.eight_nine_load
push de
call ReinitSpriteAnimFrame
ld a, [wcd4a]
sla a
sla a
sla a
ld e, a
sla a
add e
add 8 * 8
ld hl, SPRITEANIMSTRUCT_YCOORD
add hl, bc
ld [hld], a
pop af
ld [hl], a
ld a, $4
ld e, a
call .UpdateObjectFlags
ret
.ten
ld a, SPRITE_ANIM_FRAMESET_EZCHAT_CURSOR_1
call ReinitSpriteAnimFrame
ld a, $8
ld e, a
call .UpdateObjectFlags
ret
.Coords_Zero:
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
.Coords_One:
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
.Coords_Two:
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
.Coords_Three:
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
.Coords_Four:
dbpixel 16, 10
dbpixel 16, 12
.Coords_Five:
dbpixel 4, 10
dbpixel 4, 12
.FramesetsIDs_Two:
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
.UpdateObjectFlags:
ld hl, wcd24
and [hl]
jr nz, .update_y_offset
ld a, e
ld hl, wcd23
and [hl]
jr z, .reset_y_offset
ld hl, SPRITEANIMSTRUCT_0E
add hl, bc
ld a, [hl]
and a
jr z, .flip_bit_0
dec [hl]
ret
.flip_bit_0
ld a, $0
ld [hld], a
ld a, $1
xor [hl]
ld [hl], a
and a
jr nz, .update_y_offset
.reset_y_offset
ld hl, SPRITEANIMSTRUCT_YOFFSET
add hl, bc
xor a
ld [hl], a
ret
.update_y_offset
ld hl, SPRITEANIMSTRUCT_YCOORD
add hl, bc
ld a, $b0
sub [hl]
ld hl, SPRITEANIMSTRUCT_YOFFSET
add hl, bc
ld [hl], a
ret
Function11d323:
ld a, [rSVBK]
push af
ld a, $5
ld [rSVBK], a
ld hl, Palette_11d33a
ld de, wBGPals1
ld bc, 16 palettes
call CopyBytes
pop af
ld [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
EZChat_GetSeenPokemonByKana:
ld a, [rSVBK]
push af
ld hl, $c648
ld a, LOW(w5_d800)
ld [wcd2d], a
ld [hli], a
ld a, HIGH(w5_d800)
ld [wcd2e], a
ld [hl], a
ld a, LOW(EZChat_SortedPokemon)
ld [wcd2f], a
ld a, HIGH(EZChat_SortedPokemon)
ld [wcd30], a
ld a, LOW($c6a8)
ld [wcd31], a
ld a, HIGH($c6a8)
ld [wcd32], a
ld a, LOW($c64a)
ld [wcd33], a
ld a, HIGH($c64a)
ld [wcd34], a
ld hl, EZChat_SortedWords
ld a, (EZChat_SortedWords.End - EZChat_SortedWords) / 4
.MasterLoop:
push af
; read row
; offset
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
; size
ld a, [hli]
ld c, a
ld a, [hli]
ld b, a
; save the pointer to the next row
push hl
; 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
ld [rSVBK], a
ld a, [hli]
push af
ld a, $5
ld [rSVBK], a
pop af
ld [de], a
inc de
ld a, $3
ld [rSVBK], a
ld a, [hli]
push af
ld a, $5
ld [rSVBK], a
pop af
ld [de], a
inc de
dec bc
ld a, c
or b
jr nz, .loop1
; 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: $c6a8)
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: $c64a)
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
ld [rSVBK], a
ret
.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
EZChat_GetCategoryWordsByKana:
ld a, [rSVBK]
push af
ld a, $3
ld [rSVBK], a
; load pointers
ld hl, MobileEZChatCategoryPointers
ld bc, MobileEZChatData_WordAndPageCounts
; init WRAM registers
xor a
ld [wcd2d], a
inc a
ld [wcd2e], a
; enter the first loop
ld a, 14
.loop1
push af
; load the pointer to the category
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
push hl
; skip to the attributes
ld hl, NAME_LENGTH_JAPANESE - 1
add hl, de
; get the number of words in the category
ld a, [bc] ; number of entries to copy
inc bc
inc bc
push bc
.loop2
push af
push hl
; load offset at [hl]
ld a, [hli]
ld e, a
ld a, [hl]
ld d, a
; add to w3_d000
ld hl, w3_d000
add hl, de
; copy from wcd2d and increment [wcd2d] in place
ld a, [wcd2d]
ld [hli], a
inc a
ld [wcd2d], a
; copy from wcd2e
ld a, [wcd2e]
ld [hl], a
; next entry
pop hl
ld de, 8
add hl, de
pop af
dec a
jr nz, .loop2
; reset and go to next category
ld hl, wcd2d
xor a
ld [hli], a
inc [hl]
pop bc
pop hl
pop af
dec a
jr nz, .loop1
pop af
ld [rSVBK], a
ret
INCLUDE "data/pokemon/ezchat_order.asm"
GFX_11d67e:
INCBIN "gfx/pokedex/select_start.2bpp"
LZ_11d6de:
INCBIN "gfx/pokedex/slowpoke.2bpp.lz"
MobileEZChatCategoryNames:
; Fixed message categories
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
MobileEZChatCategoryPointers:
; entries correspond to EZCHAT_* constants
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
.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
.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
.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
.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
.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
db "ワオ@@@", $b2, $5, $0
db "わっ!!@", $ce, $5, $0
db "わははは!", $d0, $5, $0
.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
.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
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
.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
.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
db "ラジオ@@", $92, $5, $0
db "ワールド@", $ae, $5, $0
.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
.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
.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
.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
.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
MobileEZChatData_WordAndPageCounts:
macro_11f220: MACRO
; parameter: number of words
db \1
; 12 words per page (0-based indexing)
x = \1 / 12
if \1 % 12 == 0
x = x + -1
endc
db x
ENDM
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
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
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
ENDM
x = $d012
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
macro_11f23c $09 ; end
.End