Move all misc/ and unknown/ files to meaningful directories

This commit is contained in:
Remy Oukaour
2017-12-15 13:21:47 -05:00
parent ebf3bfb6b2
commit dc76bf804f
22 changed files with 293 additions and 292 deletions

784
mobile/battle_tower_47.asm Executable file
View File

@@ -0,0 +1,784 @@
BattleTowerText:: ; 11c000
; Print text c for trainer [BT_OTTrainerClass]
; 1: Intro text
; 2: Player lost
; 3: Player won
ld a, [rSVBK]
push af
ld a, 3 ; BANK(BT_OTTrainerClass)
ld [rSVBK], a
IF DEF(CRYSTAL11)
ld hl, BT_OTTrainerClass
ELSE
ld hl, BT_OTName + 5
; BUG ALERT
; Instead of loading the Trainer Class, this routine
; loads the 6th character in the Trainer's name, then
; uses it to get the gender of the trainer.
; As a consequence, the enemy trainer's dialog will
; always be sampled from the female array.
ENDC
ld a, [hl]
dec a
ld e, a
ld d, 0
ld hl, BTTrainerClassGenders
add hl, de
ld a, [hl]
and a
jr nz, .female
; generate a random number between 0 and 24
ld a, [hRandomAdd]
and $1f
cp 25
jr c, .okay0
sub 25
.okay0
ld hl, BTMaleTrainerTexts
jr .proceed
.female
; generate a random number between 0 and 14
ld a, [hRandomAdd]
and $f
cp 15
jr c, .okay1
sub 15
.okay1
ld hl, BTFemaleTrainerTexts
.proceed
ld b, 0
dec c
jr nz, .restore
ld [BT_TrainerTextIndex], a
jr .okay2
.restore
ld a, [BT_TrainerTextIndex]
.okay2
push af
add hl, bc
add hl, bc
ld a, [hli]
ld c, a
ld a, [hl]
ld h, a
ld l, c
pop af
ld c, a
ld b, 0
add hl, bc
add hl, bc
ld a, [hli]
ld c, a
ld a, [hl]
ld l, c
ld h, a
bccoord 1, 14
pop af
ld [rSVBK], a
call PlaceHLTextAtBC
ret
; 11c05d
INCLUDE "mobile/fixed_words.asm"
BTTrainerClassGenders: ; 11f2f0
db MALE ; FALKNER
db FEMALE ; WHITNEY
db FEMALE ; BUGSY
db MALE ; MORTY
db MALE ; PRYCE
db FEMALE ; JASMINE
db MALE ; CHUCK
db FEMALE ; CLAIR
db MALE ; RIVAL1
db MALE ; POKEMON_PROF
db FEMALE ; WILL
db MALE ; CAL
db MALE ; BRUNO
db FEMALE ; KAREN
db MALE ; KOGA
db MALE ; CHAMPION
db MALE ; BROCK
db FEMALE ; MISTY
db MALE ; LT_SURGE
db MALE ; SCIENTIST
db FEMALE ; ERIKA
db MALE ; YOUNGSTER
db MALE ; SCHOOLBOY
db MALE ; BIRD_KEEPER
db FEMALE ; LASS
db FEMALE ; JANINE
db MALE ; COOLTRAINERM
db FEMALE ; COOLTRAINERF
db FEMALE ; BEAUTY
db MALE ; POKEMANIAC
db MALE ; GRUNTM
db MALE ; GENTLEMAN
db FEMALE ; SKIER
db FEMALE ; TEACHER
db FEMALE ; SABRINA
db MALE ; BUG_CATCHER
db MALE ; FISHER
db MALE ; SWIMMERM
db FEMALE ; SWIMMERF
db MALE ; SAILOR
db MALE ; SUPER_NERD
db MALE ; RIVAL2
db MALE ; GUITARIST
db MALE ; HIKER
db MALE ; BIKER
db MALE ; BLAINE
db MALE ; BURGLAR
db MALE ; FIREBREATHER
db MALE ; JUGGLER
db MALE ; BLACKBELT_T
db MALE ; EXECUTIVEM
db MALE ; PSYCHIC_T
db FEMALE ; PICNICKER
db MALE ; CAMPER
db FEMALE ; EXECUTIVEF
db MALE ; SAGE
db FEMALE ; MEDIUM
db MALE ; BOARDER
db MALE ; POKEFANM
db FEMALE ; KIMONO_GIRL
db FEMALE ; TWINS
db FEMALE ; POKEFANF
db MALE ; RED
db MALE ; BLUE
db MALE ; OFFICER
db FEMALE ; GRUNTF
BTMaleTrainerTexts: ; 11f332
dw .Greetings
dw .PlayerLost
dw .PlayerWon
.Greetings: ; 11f338
dw BTGreetingM1
dw BTGreetingM2
dw BTGreetingM3
dw BTGreetingM4
dw BTGreetingM5
dw BTGreetingM6
dw BTGreetingM7
dw BTGreetingM8
dw BTGreetingM9
dw BTGreetingM10
dw BTGreetingM11
dw BTGreetingM12
dw BTGreetingM13
dw BTGreetingM14
dw BTGreetingM15
dw BTGreetingM16
dw BTGreetingM17
dw BTGreetingM18
dw BTGreetingM19
dw BTGreetingM20
dw BTGreetingM21
dw BTGreetingM22
dw BTGreetingM23
dw BTGreetingM24
dw BTGreetingM25
.PlayerLost: ; 11f36a
dw BTLossM1
dw BTLossM2
dw BTLossM3
dw BTLossM4
dw BTLossM5
dw BTLossM6
dw BTLossM7
dw BTLossM8
dw BTLossM9
dw BTLossM10
dw BTLossM11
dw BTLossM12
dw BTLossM13
dw BTLossM14
dw BTLossM15
dw BTLossM16
dw BTLossM17
dw BTLossM18
dw BTLossM19
dw BTLossM20
dw BTLossM21
dw BTLossM22
dw BTLossM23
dw BTLossM24
dw BTLossM25
.PlayerWon: ; 11f39c
dw BTWinM1
dw BTWinM2
dw BTWinM3
dw BTWinM4
dw BTWinM5
dw BTWinM6
dw BTWinM7
dw BTWinM8
dw BTWinM9
dw BTWinM10
dw BTWinM11
dw BTWinM12
dw BTWinM13
dw BTWinM14
dw BTWinM15
dw BTWinM16
dw BTWinM17
dw BTWinM18
dw BTWinM19
dw BTWinM20
dw BTWinM21
dw BTWinM22
dw BTWinM23
dw BTWinM24
dw BTWinM25
BTFemaleTrainerTexts:
dw .Greetings
dw .PlayerLost
dw .PlayerWon
.Greetings: ; 11f3d4
dw BTGreetingF1
dw BTGreetingF2
dw BTGreetingF3
dw BTGreetingF4
dw BTGreetingF5
dw BTGreetingF6
dw BTGreetingF7
dw BTGreetingF8
dw BTGreetingF9
dw BTGreetingF10
dw BTGreetingF11
dw BTGreetingF12
dw BTGreetingF13
dw BTGreetingF14
dw BTGreetingF15
.PlayerLost: ; 11f3f2
dw BTLossF1
dw BTLossF2
dw BTLossF3
dw BTLossF4
dw BTLossF5
dw BTLossF6
dw BTLossF7
dw BTLossF8
dw BTLossF9
dw BTLossF10
dw BTLossF11
dw BTLossF12
dw BTLossF13
dw BTLossF14
dw BTLossF15
.PlayerWon: ; 11f410
dw BTWinF1
dw BTWinF2
dw BTWinF3
dw BTWinF4
dw BTWinF5
dw BTWinF6
dw BTWinF7
dw BTWinF8
dw BTWinF9
dw BTWinF10
dw BTWinF11
dw BTWinF12
dw BTWinF13
dw BTWinF14
dw BTWinF15
BTGreetingM1: ; 0x11f42e
text_jump BattleTowerText_0x1ec000
db "@"
BTLossM1: ; 0x11f433
text_jump BattleTowerText_0x1ec03b
db "@"
BTWinM1: ; 0x11f438
text_jump UnknownText_0x1ec060
db "@"
BTGreetingM2: ; 0x11f43d
text_jump BattleTowerText_0x1ec080
db "@"
BTLossM2: ; 0x11f442
text_jump UnknownText_0x1ec0a3
db "@"
BTWinM2: ; 0x11f447
text_jump UnknownText_0x1ec0c4
db "@"
BTGreetingM3: ; 0x11f44c
text_jump UnknownText_0x1ec0e1
db "@"
BTLossM3: ; 0x11f451
text_jump UnknownText_0x1ec108
db "@"
BTWinM3: ; 0x11f456
text_jump UnknownText_0x1ec12a
db "@"
BTGreetingM4: ; 0x11f45b
text_jump UnknownText_0x1ec14d
db "@"
BTLossM4: ; 0x11f460
text_jump UnknownText_0x1ec16f
db "@"
BTWinM4: ; 0x11f465
text_jump UnknownText_0x1ec190
db "@"
BTGreetingM5: ; 0x11f46a
text_jump UnknownText_0x1ec1ae
db "@"
BTLossM5: ; 0x11f46f
text_jump UnknownText_0x1ec1d0
db "@"
BTWinM5: ; 0x11f474
text_jump UnknownText_0x1ec1f4
db "@"
BTGreetingM6: ; 0x11f479
text_jump UnknownText_0x1ec216
db "@"
BTLossM6: ; 0x11f47e
text_jump UnknownText_0x1ec238
db "@"
BTWinM6: ; 0x11f483
text_jump UnknownText_0x1ec259
db "@"
BTGreetingM7: ; 0x11f488
text_jump UnknownText_0x1ec27b
db "@"
BTLossM7: ; 0x11f48d
text_jump UnknownText_0x1ec2a0
db "@"
BTWinM7: ; 0x11f492
text_jump UnknownText_0x1ec2c0
db "@"
BTGreetingM8: ; 0x11f497
text_jump UnknownText_0x1ec2d9
db "@"
BTLossM8: ; 0x11f49c
text_jump UnknownText_0x1ec2fe
db "@"
BTWinM8: ; 0x11f4a1
text_jump UnknownText_0x1ec320
db "@"
BTGreetingM9: ; 0x11f4a6
text_jump UnknownText_0x1ec33f
db "@"
BTLossM9: ; 0x11f4ab
text_jump UnknownText_0x1ec36c
db "@"
BTWinM9: ; 0x11f4b0
text_jump UnknownText_0x1ec389
db "@"
BTGreetingM10: ; 0x11f4b5
text_jump UnknownText_0x1ec3ad
db "@"
BTLossM10: ; 0x11f4ba
text_jump UnknownText_0x1ec3c5
db "@"
BTWinM10: ; 0x11f4bf
text_jump UnknownText_0x1ec3e5
db "@"
BTGreetingM11: ; 0x11f4c4
text_jump UnknownText_0x1ec402
db "@"
BTLossM11: ; 0x11f4c9
text_jump UnknownText_0x1ec411
db "@"
BTWinM11: ; 0x11f4ce
text_jump UnknownText_0x1ec41f
db "@"
BTGreetingM12: ; 0x11f4d3
text_jump UnknownText_0x1ec42e
db "@"
BTLossM12: ; 0x11f4d8
text_jump UnknownText_0x1ec461
db "@"
BTWinM12: ; 0x11f4dd
text_jump UnknownText_0x1ec4a0
db "@"
BTGreetingM13: ; 0x11f4e2
text_jump UnknownText_0x1ec4d6
db "@"
BTLossM13: ; 0x11f4e7
text_jump UnknownText_0x1ec4f5
db "@"
BTWinM13: ; 0x11f4ec
text_jump UnknownText_0x1ec512
db "@"
BTGreetingM14: ; 0x11f4f1
text_jump UnknownText_0x1ec532
db "@"
BTLossM14: ; 0x11f4f6
text_jump UnknownText_0x1ec54b
db "@"
BTWinM14: ; 0x11f4fb
text_jump UnknownText_0x1ec565
db "@"
BTGreetingM15: ; 0x11f500
text_jump UnknownText_0x1ec580
db "@"
BTLossM15: ; 0x11f505
text_jump UnknownText_0x1ec59d
db "@"
BTWinM15: ; 0x11f50a
text_jump UnknownText_0x1ec5b5
db "@"
BTGreetingM16: ; 0x11f50f
text_jump UnknownText_0x1ec5d3
db "@"
BTLossM16: ; 0x11f514
text_jump UnknownText_0x1ec5ee
db "@"
BTWinM16: ; 0x11f519
text_jump UnknownText_0x1ec60d
db "@"
BTGreetingM17: ; 0x11f51e
text_jump UnknownText_0x1ec631
db "@"
BTLossM17: ; 0x11f523
text_jump UnknownText_0x1ec651
db "@"
BTWinM17: ; 0x11f528
text_jump UnknownText_0x1ec68f
db "@"
BTGreetingM18: ; 0x11f52d
text_jump UnknownText_0x1ec6b1
db "@"
BTLossM18: ; 0x11f532
text_jump UnknownText_0x1ec6d0
db "@"
BTWinM18: ; 0x11f537
text_jump UnknownText_0x1ec708
db "@"
BTGreetingM19: ; 0x11f53c
text_jump UnknownText_0x1ec720
db "@"
BTLossM19: ; 0x11f541
text_jump UnknownText_0x1ec73e
db "@"
BTWinM19: ; 0x11f546
text_jump UnknownText_0x1ec75b
db "@"
BTGreetingM20: ; 0x11f54b
text_jump UnknownText_0x1ec77f
db "@"
BTLossM20: ; 0x11f550
text_jump UnknownText_0x1ec798
db "@"
BTWinM20: ; 0x11f555
text_jump UnknownText_0x1ec7bb
db "@"
BTGreetingM21: ; 0x11f55a
text_jump UnknownText_0x1ec7d8
db "@"
BTLossM21: ; 0x11f55f
text_jump UnknownText_0x1ec818
db "@"
BTWinM21: ; 0x11f564
text_jump UnknownText_0x1ec837
db "@"
BTGreetingM22: ; 0x11f569
text_jump UnknownText_0x1ec858
db "@"
BTLossM22: ; 0x11f56e
text_jump UnknownText_0x1ec876
db "@"
BTWinM22: ; 0x11f573
text_jump UnknownText_0x1ec898
db "@"
BTGreetingM23: ; 0x11f578
text_jump UnknownText_0x1ec8b1
db "@"
BTLossM23: ; 0x11f57d
text_jump UnknownText_0x1ec8d5
db "@"
BTWinM23: ; 0x11f582
text_jump UnknownText_0x1ec8f0
db "@"
BTGreetingM24: ; 0x11f587
text_jump UnknownText_0x1ec911
db "@"
BTLossM24: ; 0x11f58c
text_jump UnknownText_0x1ec928
db "@"
BTWinM24: ; 0x11f591
text_jump UnknownText_0x1ec949
db "@"
BTGreetingM25: ; 0x11f596
text_jump UnknownText_0x1ec969
db "@"
BTLossM25: ; 0x11f59b
text_jump UnknownText_0x1ec986
db "@"
BTWinM25: ; 0x11f5a0
text_jump UnknownText_0x1ec99b
db "@"
BTGreetingF1: ; 0x11f5a5
text_jump UnknownText_0x1ec9bd
db "@"
BTLossF1: ; 0x11f5aa
text_jump UnknownText_0x1ec9d9
db "@"
BTWinF1: ; 0x11f5af
text_jump UnknownText_0x1ec9f7
db "@"
BTGreetingF2: ; 0x11f5b4
text_jump UnknownText_0x1eca0a
db "@"
BTLossF2: ; 0x11f5b9
text_jump UnknownText_0x1eca2a
db "@"
BTWinF2: ; 0x11f5be
text_jump UnknownText_0x1eca47
db "@"
BTGreetingF3: ; 0x11f5c3
text_jump UnknownText_0x1eca64
db "@"
BTLossF3: ; 0x11f5c8
text_jump UnknownText_0x1eca82
db "@"
BTWinF3: ; 0x11f5cd
text_jump UnknownText_0x1eca9d
db "@"
BTGreetingF4: ; 0x11f5d2
text_jump UnknownText_0x1ecabf
db "@"
BTLossF4: ; 0x11f5d7
text_jump UnknownText_0x1ecade
db "@"
BTWinF4: ; 0x11f5dc
text_jump UnknownText_0x1ecafa
db "@"
BTGreetingF5: ; 0x11f5e1
text_jump UnknownText_0x1ecb19
db "@"
BTLossF5: ; 0x11f5e6
text_jump UnknownText_0x1ecb37
db "@"
BTWinF5: ; 0x11f5eb
text_jump UnknownText_0x1ecb55
db "@"
BTGreetingF6: ; 0x11f5f0
text_jump UnknownText_0x1ecb70
db "@"
BTLossF6: ; 0x11f5f5
text_jump UnknownText_0x1ecb92
db "@"
BTWinF6: ; 0x11f5fa
text_jump UnknownText_0x1ecbb6
db "@"
BTGreetingF7: ; 0x11f5ff
text_jump UnknownText_0x1ecbd9
db "@"
BTLossF7: ; 0x11f604
text_jump UnknownText_0x1ecbf3
db "@"
BTWinF7: ; 0x11f609
text_jump UnknownText_0x1ecc15
db "@"
BTGreetingF8: ; 0x11f60e
text_jump UnknownText_0x1ecc39
db "@"
BTLossF8: ; 0x11f613
text_jump UnknownText_0x1ecc55
db "@"
BTWinF8: ; 0x11f618
text_jump UnknownText_0x1ecc75
db "@"
BTGreetingF9: ; 0x11f61d
text_jump UnknownText_0x1ecc92
db "@"
BTLossF9: ; 0x11f622
text_jump UnknownText_0x1ecca7
db "@"
BTWinF9: ; 0x11f627
text_jump UnknownText_0x1eccc1
db "@"
BTGreetingF10: ; 0x11f62c
text_jump UnknownText_0x1eccd7
db "@"
BTLossF10: ; 0x11f631
text_jump UnknownText_0x1eccef
db "@"
BTWinF10: ; 0x11f636
text_jump UnknownText_0x1ecd0e
db "@"
BTGreetingF11: ; 0x11f63b
text_jump UnknownText_0x1ecd2b
db "@"
BTLossF11: ; 0x11f640
text_jump UnknownText_0x1ecd4d
db "@"
BTWinF11: ; 0x11f645
text_jump UnknownText_0x1ecd6b
db "@"
BTGreetingF12: ; 0x11f64a
text_jump UnknownText_0x1ecd8d
db "@"
BTLossF12: ; 0x11f64f
text_jump UnknownText_0x1ecdaf
db "@"
BTWinF12: ; 0x11f654
text_jump UnknownText_0x1ecdcf
db "@"
BTGreetingF13: ; 0x11f659
text_jump UnknownText_0x1ecded
db "@"
BTLossF13: ; 0x11f65e
text_jump UnknownText_0x1ece0d
db "@"
BTWinF13: ; 0x11f663
text_jump UnknownText_0x1ece2a
db "@"
BTGreetingF14: ; 0x11f668
text_jump UnknownText_0x1ece4b
db "@"
BTLossF14: ; 0x11f66d
text_jump UnknownText_0x1ece70
db "@"
BTWinF14: ; 0x11f672
text_jump UnknownText_0x1ece8a
db "@"
BTGreetingF15: ; 0x11f677
text_jump UnknownText_0x1ecea8
db "@"
BTLossF15: ; 0x11f67c
text_jump UnknownText_0x1ecec9
db "@"
BTWinF15: ; 0x11f681
text_jump UnknownText_0x1ecee8
db "@"

1772
mobile/battle_tower_5c.asm Executable file

File diff suppressed because it is too large Load Diff

View File

@@ -75,7 +75,7 @@ Function17005a: ; 17005a
; 1700b0
INCLUDE "misc/battle_tower_5c.asm"
INCLUDE "mobile/battle_tower_5c.asm"
Function170be4: ; 170be4
ld a, $5

929
mobile/mobile_5e.asm Normal file
View File

@@ -0,0 +1,929 @@
SECTION "Misc Crystal", ROMX
MobileAdapterGFX::
INCBIN "gfx/mobile/mobile_adapter.2bpp"
Function17a68f:: ; 17a68f (5e:668f)
call Function17a6a8
call Function17a751
ld hl, $d088
bit 5, [hl]
jr z, .asm_17a6a6
ld de, StringBuffer1 ; $d073
push de
call Function17a721
pop de
xor a
ret
.asm_17a6a6
scf
ret
Function17a6a8: ; 17a6a8 (5e:66a8)
push de
push bc
ld hl, StringBuffer2 ; $d086
ld bc, $a
xor a
call ByteFill
ld hl, Buffer1
ld bc, $10
ld a, $ff
call ByteFill
pop bc
ld a, c
and a
jr z, .asm_17a6c9
ld hl, $d088
set 4, [hl]
.asm_17a6c9
pop de
call Function17a6f5
call Function17aba0
callba Function106464
call Function17ac0c
callba HDMATransferAttrMapAndTileMapToWRAMBank3
call Function17abcf
callba LoadOW_BGPal7
callba Function49420
call SetPalettes
call DelayFrame
ret
Function17a6f5: ; 17a6f5 (5e:66f5)
ld hl, Buffer1
ld c, $0
ld b, $8
.asm_17a6fc
ld a, [de]
call Function17a713
jr c, .asm_17a70e
ld a, [de]
swap a
call Function17a713
jr c, .asm_17a70e
inc de
dec b
jr nz, .asm_17a6fc
.asm_17a70e
ld a, c
ld [$d08c], a
ret
Function17a713: ; 17a713 (5e:6713)
and $f
cp $a
jr nc, .asm_17a71d
ld [hli], a
inc c
and a
ret
.asm_17a71d
ld [hl], $ff
scf
ret
Function17a721: ; 17a721 (5e:6721)
push de
ld h, d
ld l, e
ld bc, $8
ld a, $ff
call ByteFill
pop de
ld hl, Buffer1
ld b, $8
.asm_17a732
ld c, $0
ld a, [hli]
cp $a
jr nc, .asm_17a748
ld c, a
ld a, [hli]
cp $a
jr nc, .asm_17a74c
swap a
or c
ld [de], a
inc de
dec b
jr nz, .asm_17a732
ret
.asm_17a748
ld a, $ff
ld [de], a
ret
.asm_17a74c
ld a, $f0
or c
ld [de], a
ret
Function17a751: ; 17a751 (5e:6751)
xor a
ld [$d087], a
.asm_17a755
call Function17a781
call Function17a7ae
call Function17a97b
call Function17a770
call Function17a78f
ld hl, $d08f
inc [hl]
ld a, [$d087]
bit 7, a
jr z, .asm_17a755
ret
Function17a770: ; 17a770 (5e:6770)
ld a, [hOAMUpdate]
push af
ld a, $1
ld [hOAMUpdate], a
call HideSprites
call Function17a9cb
pop af
ld [hOAMUpdate], a
ret
Function17a781: ; 17a781 (5e:6781)
ld a, [hInMenu]
push af
ld a, $1
ld [hInMenu], a
call JoyTextDelay
pop af
ld [hInMenu], a
ret
Function17a78f: ; 17a78f (5e:678f)
ld hl, $d088
bit 7, [hl]
res 7, [hl]
jr nz, .asm_17a79f
callba HDMATransferTileMapToWRAMBank3
ret
.asm_17a79f
callba ReloadMapPart
ret
; 17a7a6 (5e:67a6)
Function17a7a6: ; 17a7a6
ld a, [$d087]
inc a
ld [$d087], a
ret
Function17a7ae: ; 17a7ae (5e:67ae)
ld a, [$d087]
ld hl, Jumptable_17a7b6
rst JumpTable
ret
Jumptable_17a7b6: ; 17a7b6 (5e:67b6)
dw Function17a7c2
dw Function17a7cd
dw Function17a7d8
dw Function17a7ff
dw Function17a81a
dw Function17a7f4
Function17a7c2: ; 17a7c2 (5e:67c2)
ld a, $4
call Function17aad3
ld a, $1
ld [$d087], a
ret
Function17a7cd: ; 17a7cd (5e:67cd)
call Function17a83c
call Function17a8ae
ret c
call Function17a848
ret
Function17a7d8: ; 17a7d8 (5e:67d8)
call Function17a83c
call Function17a848
ld hl, $d08b
dec [hl]
ret nz
call Function17ac1d
call Function17ac2a
ld hl, $d088
set 7, [hl]
ld a, $1
ld [$d087], a
ret
Function17a7f4: ; 17a7f4 (5e:67f4)
ld hl, $d08b
dec [hl]
ret nz
ld hl, $d087
set 7, [hl]
ret
Function17a7ff: ; 17a7ff (5e:67ff)
ld hl, $d08b
dec [hl]
ret nz
call Function17ac1d
call Function17ac2a
ld hl, $d088
set 7, [hl]
ld hl, $d088
set 5, [hl]
ld hl, $d087
set 7, [hl]
ret
Function17a81a: ; 17a81a (5e:681a)
call IsSFXPlaying
ret nc
ld a, [hJoyPressed]
and $3
ret z
call ExitMenu
call Function17ac1d
call Function17ac2a
ld hl, $d088
set 7, [hl]
ld hl, $d088
res 6, [hl]
ld a, $1
ld [$d087], a
ret
Function17a83c: ; 17a83c (5e:683c)
ld a, [hJoyLast]
and $f0
ld c, a
ld a, [hJoyPressed]
and $b
or c
ld c, a
ret
Function17a848: ; 17a848 (5e:6848)
ld a, c
and $60
cp $60
jr z, .asm_17a876
ld a, c
and $50
cp $50
jr z, .asm_17a87d
ld a, c
and $a0
cp $a0
jr z, .asm_17a884
ld a, c
and $90
cp $90
jr z, .asm_17a88b
bit 6, c
jr nz, .asm_17a892
bit 7, c
jr nz, .asm_17a899
bit 5, c
jr nz, .asm_17a8a0
bit 4, c
jr nz, .asm_17a8a7
xor a
ret
.asm_17a876
ld a, $9
call Function17aad0
scf
ret
.asm_17a87d
ld a, $a
call Function17aad0
scf
ret
.asm_17a884
ld a, $b
call Function17aad0
scf
ret
.asm_17a88b
ld a, $c
call Function17aad0
scf
ret
.asm_17a892
ld a, $5
call Function17aad0
scf
ret
.asm_17a899
ld a, $6
call Function17aad0
scf
ret
.asm_17a8a0
ld a, $7
call Function17aad0
scf
ret
.asm_17a8a7
ld a, $8
call Function17aad0
scf
ret
Function17a8ae: ; 17a8ae (5e:68ae)
bit 1, c
jr nz, .asm_17a8bc
bit 0, c
jr nz, .asm_17a8cc
bit 3, c
jr nz, .asm_17a8d7
xor a
ret
.asm_17a8bc
ld a, $b
ld [$d08a], a
call Function17aa98
call Function17a943
call Function17aa88
scf
ret
.asm_17a8cc
call Function17aad7
call Function17aa98
call Function17a8de
scf
ret
.asm_17a8d7
ld a, $c
call Function17aad3
scf
ret
Function17a8de: ; 17a8de (5e:68de)
ld a, $2
call Function17aae0
ld a, [hl]
cp $f1
jr z, .asm_17a8fd
cp $f0
jr z, .asm_17a904
cp $f2
jr z, .asm_17a911
ld e, a
call Function17a964
ld a, $2
ld [$d087], a
call Function17aa88
ret
.asm_17a8fd
call Function17a943
call Function17aa88
ret
.asm_17a904
call Function17aad7
call Function17aa98
call Function17a91e
call Function17aa88
ret
.asm_17a911
call Function17aa98
ld a, $5
ld [$d087], a
xor a
call Function17aa88
ret
Function17a91e: ; 17a91e (5e:691e)
ld a, [$d08c]
cp $7
jr c, .asm_17a92c
ld a, $3
ld [$d087], a
xor a
ret
.asm_17a92c
call LoadStandardMenuDataHeader
call Function17a99e
ld hl, $d088
set 7, [hl]
ld hl, $d088
set 6, [hl]
ld a, $4
ld [$d087], a
scf
ret
Function17a943: ; 17a943 (5e:6943)
ld a, [$d08c]
and a
jr z, .asm_17a95d
dec a
ld [$d08c], a
ld c, a
ld b, $0
ld hl, Buffer1
add hl, bc
ld [hl], $ff
ld a, $2
ld [$d087], a
and a
ret
.asm_17a95d
ld a, $5
ld [$d087], a
xor a
ret
Function17a964: ; 17a964 (5e:6964)
ld a, [$d08c]
cp $10
jr nc, .asm_17a979
ld c, a
ld b, $0
inc a
ld [$d08c], a
ld hl, Buffer1
add hl, bc
ld [hl], e
and a
ret
.asm_17a979
scf
ret
Function17a97b: ; 17a97b (5e:697b)
hlcoord 1, 1
lb bc, 2, 18
call ClearBox
hlcoord 3, 2
ld de, Buffer1
ld a, [$d08c]
and a
ret z
ld c, a
.asm_17a990
ld a, [de]
inc de
cp $a
jr nc, .asm_17a99d
add $f6
ld [hli], a
dec c
jr nz, .asm_17a990
ret
.asm_17a99d
ret
Function17a99e: ; 17a99e (5e:699e)
hlcoord 0, 12
ld b, $4
ld c, $12
call Function17ac46
hlcoord 2, 14
ld de, String_17a9b2
call PlaceString
ret
; 17a9b2 (5e:69b2)
String_17a9b2: ; 17a9b2
db "でんわばんごうが ただしく"
next "はいって いません!"
db "@"
; 17a9cb
Function17a9cb: ; 17a9cb (5e:69cb)
ld de, Sprites ; $c400
ld hl, $d088
bit 6, [hl]
jr nz, .bit_6_set
call Function17a9e3
call Function17aa22
call Function17a9f5
ret
.bit_6_set
call Function17a9e3
ret
Function17a9e3: ; 17a9e3 (5e:69e3)
ld a, $3
ld [$d08e], a
ld hl, Unknown_17aa77
ld b, $8
ld c, $8
ld a, $5
call Function17aa4a
ret
Function17a9f5: ; 17a9f5 (5e:69f5)
ld a, [$d08c]
cp $10
ret nc
ld a, [$d08f]
swap a
and $1
add $1
ld [$d08e], a
ld a, [$d08c]
cp $10
jr c, .okay
dec a
.okay
ld c, $8
call SimpleMultiply
add $18
ld b, a
ld c, $11
ld hl, Unknown_17aa72
ld a, $4
call Function17aa4a
ret
Function17aa22: ; 17aa22 (5e:6a22)
ld a, $0
ld [$d08e], a
push de
ld a, $3
call Function17aae0
add a
add a
add a
add $0
push af
ld a, $4
call Function17aae0
add a
add a
add a
add $8
ld c, a
pop af
ld b, a
pop de
ld a, $0
ld hl, Unknown_17aa77
call Function17aa4a
ret
Function17aa4a: ; 17aa4a (5e:6a4a)
ld [$d08d], a
ld a, b
add $8
ld b, a
ld a, c
add $10
ld c, a
ld a, [hli]
.loop
push af
ld a, [hli]
add c
ld [de], a
inc de
ld a, [hli]
add b
ld [de], a
inc de
ld a, [$d08d]
add [hl]
inc hl
ld [de], a
inc de
ld a, [$d08e]
or [hl]
inc hl
ld [de], a
inc de
pop af
dec a
jr nz, .loop
ret
; 17aa72 (5e:6a72)
Unknown_17aa72: ; 17aa72
db 1
db 0, 0, 0, 0
; 17aa77
Unknown_17aa77: ; 17aa77
db 4
db 0, 0, 0, 0
db 0, 8, 1, 0
db 8, 0, 2, 0
db 8, 8, 3, 0
; 17aa88
Function17aa88: ; 17aa88 (5e:6a88)
jr c, asm_17aa91
ld de, SFX_SWITCH_POKEMON
call PlaySFX
ret
asm_17aa91: ; 17aa91 (5e:6a91)
ld de, SFX_WRONG
call PlaySFX
ret
Function17aa98: ; 17aa98 (5e:6a98)
ld a, $5
ld [$d08b], a
call Function17aaa9
call Function17aac3
ld hl, $d088
set 7, [hl]
ret
Function17aaa9: ; 17aaa9 (5e:6aa9)
ld a, $3
call Function17aae3
ld c, a
ld b, $0
hlcoord 0, 0, AttrMap
add hl, bc
push hl
ld a, $4
call Function17aae3
ld bc, $14
pop hl
call AddNTimes
ret
Function17aac3: ; 17aac3 (5e:6ac3)
ld a, $b
push hl
ld [hli], a
ld [hli], a
pop hl
ld de, SCREEN_WIDTH
add hl, de
ld [hli], a
ld [hli], a
ret
Function17aad0: ; 17aad0 (5e:6ad0)
call Function17aae0
Function17aad3: ; 17aad3 (5e:6ad3)
ld [$d089], a
ret
Function17aad7: ; 17aad7 (5e:6ad7)
push af
ld a, [$d089]
ld [$d08a], a
pop af
ret
Function17aae0: ; 17aae0 (5e:6ae0)
call Function17aad7
Function17aae3: ; 17aae3 (5e:6ae3)
push af
ld a, [$d08a]
ld bc, $d
ld hl, Unknown_17aaf7
call AddNTimes
pop af
ld c, a
ld b, $0
add hl, bc
ld a, [hl]
ret
; 17aaf7 (5e:6af7)
Unknown_17aaf7: ; 17aaf7
db $0, $0, $1, $6, $5, $9, $3, $2, $1, $2, $1, $2, $4
db $0, $0, $2, $9, $5, $a, $4, $0, $2, $a, $a, $3, $5
db $0, $0, $3, $c, $5, $b, $5, $1, $0, $1, $0, $4, $0
db $0, $0, $4, $6, $8, $0, $6, $5, $4, $5, $1, $5, $7
db $0, $0, $5, $9, $8, $1, $7, $3, $5, $0, $2, $6, $8
db $0, $0, $6, $c, $8, $2, $8, $4, $3, $1, $3, $7, $3
db $0, $0, $7, $6, $b, $3, $9, $8, $7, $8, $4, $8, $a
db $0, $0, $8, $9, $b, $4, $a, $6, $8, $3, $5, $9, $b
db $0, $0, $9, $c, $b, $5, $b, $7, $6, $4, $6, $a, $6
db $0, $0,$f2, $6, $e, $6, $0, $c, $a, $c, $7, $c, $0
db $0, $0, $0, $9, $e, $7, $1, $9, $b, $6, $8, $1, $1
db $0, $0,$f1, $c, $e, $8, $2, $a, $c, $7, $c, $2, $c
db $0, $0,$f0,$10, $e, $c, $c, $b, $9, $b, $9, $b, $9
; 17aba0
Function17aba0: ; 17aba0 (5e:6ba0)
ld a, [rVBK]
push af
ld a, $1
ld [rVBK], a
ld hl, VTiles5 tile $00
ld de, GFX_17afa5
lb bc, BANK(GFX_17afa5), $80
call Get2bpp
pop af
ld [rVBK], a
ld hl, VTiles0 tile $00
ld de, GFX_17afa5 + $4c0
lb bc, BANK(GFX_17afa5), 5
call Get2bpp
ld hl, VTiles0 tile $05
ld de, GFX_11601a
lb bc, BANK(GFX_11601a), 4
call Get2bpp
ret
Function17abcf: ; 17abcf (5e:6bcf)
ld a, [rSVBK]
push af
ld a, BANK(UnknBGPals)
ld [rSVBK], a
ld hl, Palette_17ac55
ld de, UnknBGPals ; $d000
ld bc, $30
call CopyBytes
ld hl, Palette_17ac95
ld de, UnknOBPals
ld bc, $40
call CopyBytes
ld hl, GFX_17afa5 + $510
ld de, UnknOBPals + 2 * 4
ld bc, $10
call CopyBytes
ld hl, MapObjectPals + 8
ld de, UnknOBPals + 6 * 4
ld bc, $8
ld a, BANK(MapObjectPals)
call FarCopyBytes
pop af
ld [rSVBK], a
ret
Function17ac0c: ; 17ac0c (5e:6c0c)
call Function17ac1d
call Function17ac2a
hlcoord 0, 0
ld b, 2
ld c, SCREEN_WIDTH - 2
call Function17ac46
ret
Function17ac1d: ; 17ac1d (5e:6c1d)
ld hl, Tilemap_17acd5
decoord 0, 4
ld bc, (SCREEN_HEIGHT - 4) * SCREEN_WIDTH
call CopyBytes
ret
Function17ac2a: ; 17ac2a (5e:6c2a)
ld hl, Tilemap_17ae3d
decoord 0, 4, AttrMap
ld bc, (SCREEN_HEIGHT - 4) * SCREEN_WIDTH
call CopyBytes
hlcoord 0, 4, AttrMap
ld bc, (SCREEN_HEIGHT - 4) * SCREEN_WIDTH
.loop
ld a, [hl]
or $8
ld [hli], a
dec bc
ld a, b
or c
jr nz, .loop
ret
Function17ac46: ; 17ac46 (5e:6c46)
ld a, [$d088]
bit 4, a
jr nz, .bit_4_set
call TextBox
ret
.bit_4_set
call Function3eea
ret
; 17ac55 (5e:6c55)
Palette_17ac55: ; 17ac55
RGB 0, 0, 0
RGB 9, 10, 25
RGB 16, 19, 31
RGB 31, 31, 31
RGB 5, 11, 9
RGB 7, 14, 12
RGB 17, 24, 22
RGB 28, 31, 31
RGB 0, 0, 0
RGB 3, 0, 10
RGB 3, 3, 16
RGB 6, 8, 25
RGB 5, 11, 9
RGB 28, 31, 31
RGB 7, 14, 12
RGB 17, 24, 22
RGB 0, 0, 0
RGB 5, 2, 16
RGB 8, 8, 26
RGB 13, 9, 17
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
RGB 0, 0, 0
Palette_17ac95: ; 17ac95
RGB 31, 31, 31
RGB 4, 3, 3
RGB 31, 13, 0
RGB 31, 31, 31
RGB 31, 31, 31
RGB 0, 0, 0
RGB 31, 31, 31
RGB 31, 31, 31
RGB 31, 0, 0
RGB 16, 3, 0
RGB 28, 19, 11
RGB 31, 31, 31
RGB 31, 16, 0
RGB 9, 6, 4
RGB 31, 16, 0
RGB 31, 24, 0
RGB 31, 18, 6
RGB 0, 3, 0
RGB 0, 9, 0
RGB 0, 12, 0
RGB 0, 16, 0
RGB 0, 22, 0
RGB 0, 25, 0
RGB 0, 27, 0
RGB 0, 31, 0
RGB 3, 31, 0
RGB 8, 31, 0
RGB 14, 31, 0
RGB 16, 31, 0
RGB 22, 31, 0
RGB 27, 31, 0
RGB 31, 31, 0
Tilemap_17acd5: ; 17acd5
INCBIN "gfx/unknown/17acd5.tilemap"
Tilemap_17ae3d: ; 17ae3d
INCBIN "gfx/unknown/17ae3d.tilemap"
GFX_17afa5:: ; 17afa5
INCBIN "gfx/unknown/17afa5.2bpp"

44
mobile/news/news.asm Normal file
View File

@@ -0,0 +1,44 @@
; http://forums.glitchcity.info/index.php?topic=7509.msg206449#msg206449
db $cc, $6b, $1e ; XXX
Function1f4003: ; 1f4003
; XXX
ld a, $6
call GetSRAMBank
ld hl, .news_data
ld de, $a000
ld bc, $1000
call CopyBytes
call CloseSRAM
ret
.news_data
INCBIN "mobile/news/news_1.bin"
Function1f4dbe: ; 1f4dbe
; XXX
ld a, $6
call GetSRAMBank
ld hl, .news_data
ld de, $a000
ld bc, $1000
call CopyBytes
call CloseSRAM
ret
.news_data
INCBIN "mobile/news/news_2.bin"
Function1f5d9f: ; 1f5d9f
ld a, $6
call GetSRAMBank
ld hl, .news_data
ld de, $a000
ld bc, $1000
call CopyBytes
call CloseSRAM
ret
.news_data
INCBIN "mobile/news/news_3.bin"

BIN
mobile/news/news_1.bin Normal file

Binary file not shown.

BIN
mobile/news/news_2.bin Normal file

Binary file not shown.

BIN
mobile/news/news_3.bin Normal file

Binary file not shown.

Binary file not shown.

Binary file not shown.