shithub: pokecrystal

Download patch

ref: c0e07f5e5d131566d0765c87ac797f3d3018a020
parent: 6856667b36fcb6a7f97259cc519583d80a632849
author: yenatch <[email protected]>
date: Tue Mar 4 23:32:35 EST 2014

Items and dolls bought by Mom.

--- a/main.asm
+++ b/main.asm
@@ -74189,11 +74189,27 @@
 	ret
 ; 90233 (24:4233)
 
-INCBIN "baserom.gbc",$90233,$9026f - $90233
+INCBIN "baserom.gbc",$90233,$90241 - $90233
+
+UnknownScript_0x90241: ; 0x90241
+	refreshscreen $0
+	3callasm Function9026f
+	2ptcall $d048
+	closetext
+	3callasm Function902eb
+	loadmovesprites
+	3callasm Function113e5
+	end
+; 0x90255
+
+INCBIN "baserom.gbc",$90255,$9026f - $90255
+
+Function9026f: ; 9026f
 	call Function9027c
 	call Function9027c
 	callba Function1060d3
 	ret
+; 9027c
 
 ; known jump sources: 9026f (24:426f), 90272 (24:4272)
 Function9027c: ; 9027c (24:427c)
@@ -88262,8 +88278,8 @@
 	push hl
 	ld a, [$d265]
 	ld b, a
-	ld c, $0
-	ld hl, $791c
+	ld c, 0
+	ld hl, Unknown_fb91c
 .asm_fb8fc
 	inc c
 	ld a, [hli]
@@ -88282,7 +88298,7 @@
 	ld a, [$d265]
 	dec a
 	ld hl, Unknown_fb91c
-	ld b, $0
+	ld b, 0
 	ld c, a
 	add hl, bc
 	ld a, [hl]
@@ -88786,12 +88802,12 @@
 	call Functionfbd9d
 .asm_fbd64
 	call ClearBox
-	jr asm_fbd91
+	jr Functionfbd91
 
 ; no known jump sources
 Functionfbd69: ; fbd69 (3e:7d69)
 	callba BattleCommanda6
-	jr asm_fbd77
+	jr Functionfbd77
 
 ; no known jump sources
 Functionfbd71: ; fbd71 (3e:7d71)
@@ -88798,7 +88814,7 @@
 	callba BattleCommanda7
 
 ; known jump sources: fbd6f (3e:7d6f)
-asm_fbd77: ; fbd77 (3e:7d77)
+Functionfbd77: ; fbd77 (3e:7d77)
 	xor a
 	ld [hBGMapMode], a ; $ff00+$d4
 	ld a, [hBattleTurn] ; $ff00+$e4
@@ -88814,7 +88830,7 @@
 	ld [$FF00+$ad], a
 	ld a, $13
 	call Predef
-asm_fbd91: ; fbd91 (3e:7d91)
+Functionfbd91: ; fbd91 (3e:7d91)
 	ld a, $1
 	ld [hBGMapMode], a ; $ff00+$d4
 	ret
@@ -89679,14 +89695,19 @@
 	ret nc
 	call Functionfd0c3
 	ret nc
-	ld b, $3f
-	ld de, $500f
+	ld b, BANK(UnknownScript_0xfd00f)
+	ld de, UnknownScript_0xfd00f
 	callba Function97c4f
 	scf
 	ret
 ; fd00f
 
-INCBIN "baserom.gbc",$fd00f,$fd017 - $fd00f
+UnknownScript_0xfd00f: ; 0xfd00f
+	3callasm Functionfd017
+	3jump UnknownScript_0x90241
+; 0xfd017
+
+Functionfd017: ; fd017
 	call Functionfd0a6
 	call Functionfd0eb
 	ld a, [$dc18]
@@ -89697,7 +89718,7 @@
 .asm_fd027
 	ld a, $1
 	ld [$dbf9], a
-	ld bc, CurFruit ; $d03f
+	ld bc, $d03f
 	ld hl, $0
 	add hl, bc
 	ld [hl], $0
@@ -89712,8 +89733,8 @@
 	ld a, d
 	ld [hl], a
 	ret
+; fd044
 
-
 Functionfd044: ; fd044
 	ld a, [$dc17]
 	cp $a
@@ -89823,22 +89844,36 @@
 	ld de, $6
 	add hl, de
 	ld a, [hli]
-	ld de, $50fd
+	ld de, UnknownScript_0xfd0fd
 	cp $1
 	ret z
-	ld de, $510a
+	ld de, UnknownScript_0xfd10a
 	ret
 ; fd0fd (3f:50fd)
 
-INCBIN "baserom.gbc",$fd0fd,$fd117 - $fd0fd
+UnknownScript_0xfd0fd: ; 0xfd0fd
+	2writetext UnknownText_0xfd1b1
+	2writetext UnknownText_0xfd1b6
+	2writetext UnknownText_0xfd1bb
+	2writetext UnknownText_0xfd1c0
+	end
+; 0xfd10a
 
+UnknownScript_0xfd10a: ; 0xfd10a
+	2writetext UnknownText_0xfd1b1
+	2writetext UnknownText_0xfd1c5
+	2writetext UnknownText_0xfd1bb
+	2writetext UnknownText_0xfd1ca
+	end
+; 0xfd117
 
+
 Functionfd117: ; fd117
 	ld a, [$dc18]
 	and a
 	jr z, .asm_fd123
 	dec a
-	ld de, $5136
+	ld de, Unknown_fd136
 	jr .asm_fd12e
 
 .asm_fd123
@@ -89848,11 +89883,11 @@
 	xor a
 
 .asm_fd12b
-	ld de, $515e
+	ld de, Unknown_fd15e
 
 .asm_fd12e
 	ld l, a
-	ld h, $0
+	ld h, 0
 	add hl, hl
 	add hl, hl
 	add hl, hl
@@ -89860,13 +89895,72 @@
 	ret
 ; fd136
 
-INCBIN "baserom.gbc",$fd136,$fd1d0 - $fd136
+Unknown_fd136: ; fd136
+	db $00, $00, $00, $00, $02, $58, $01, SUPER_POTION
+	db $00, $00, $00, $00, $00, $5a, $01, ANTIDOTE
+	db $00, $00, $00, $00, $00, $b4, $01, POKE_BALL
+	db $00, $00, $00, $00, $01, $c2, $01, ESCAPE_ROPE
+	db $00, $00, $00, $00, $01, $f4, $01, GREAT_BALL
+; fd15e
 
+Unknown_fd15e: ; fd15e
+	db $00, $03, $84, $00, $02, $58, $01, SUPER_POTION
+	db $00, $0f, $a0, $00, $01, $0e, $01, REPEL
+	db $00, $1b, $58, $00, $02, $58, $01, SUPER_POTION
+	db $00, $27, $10, $00, $07, $08, $02, $23 ; CHARMANDER_DOLL
+	db $00, $3a, $98, $00, $0b, $b8, $01, MOON_STONE
+	db $00, $4a, $38, $00, $02, $58, $01, SUPER_POTION
+	db $00, $75, $30, $00, $12, $c0, $02, $20 ; CLEFAIRY_DOLL
+	db $00, $9c, $40, $00, $03, $84, $01, HYPER_POTION
+	db $00, $c3, $50, $00, $1f, $40, $02, $1e ; PIKACHU_DOLL
+	db $01, $86, $a0, $00, $59, $10, $02, $1a ; SNORLAX_DOLL
+; fd1ae
+
+INCBIN "baserom.gbc", $fd1ae, $fd1b1 - $fd1ae
+
+UnknownText_0xfd1b1: ; 0xfd1b1
+	; Hi,  ! How are you?
+	text_jump UnknownText_0x1bc615
+	db "@"
+; 0xfd1b6
+
+UnknownText_0xfd1b6: ; 0xfd1b6
+	; I found a useful item shopping, so
+	text_jump UnknownText_0x1bc62a
+	db "@"
+; 0xfd1bb
+
+UnknownText_0xfd1bb: ; 0xfd1bb
+	; I bought it with your money. Sorry!
+	text_jump UnknownText_0x1bc64e
+	db "@"
+; 0xfd1c0
+
+UnknownText_0xfd1c0: ; 0xfd1c0
+	; It's in your PC. You'll like it!
+	text_jump UnknownText_0x1bc673
+	db "@"
+; 0xfd1c5
+
+UnknownText_0xfd1c5: ; 0xfd1c5
+	; While shopping today, I saw this adorable doll, so
+	text_jump UnknownText_0x1bc693
+	db "@"
+; 0xfd1ca
+
+UnknownText_0xfd1ca: ; 0xfd1ca
+	; It's in your room. You'll love it!
+	text_jump UnknownText_0x1bc6c7
+	db "@"
+; 0xfd1cf
+
+INCBIN "baserom.gbc", $fd1cf, $fd1d0 - $fd1cf
+
 Functionfd1d0: ; fd1d0
 	ret
 ; fd1d1
 
-INCBIN "baserom.gbc",$fd1d1,$fd1d2 - $fd1d1
+INCBIN "baserom.gbc", $fd1d1, $fd1d2 - $fd1d1
 
 
 SECTION "bank40", ROMX, BANK[$40]