Merge branch '2Tie-master'

1 files changed, 83 insertions, 0 deletions

diff --git a/engine/unknown_boxes.asm b/engine/unknown_boxes.asm
new file mode 100644
index 0000000..648d5cb
--- /dev/null
+++ b/engine/unknown_boxes.asm
@@ -0,0 +1,83 @@
+INCLUDE "constants.asm"
+
+SECTION "engine/unknown_boxes.asm", ROMX
+
+Function1130a: ; 04:530A
+	ret
+	
+Function1130b: ; 04:530B
+	ld a, [wPartyCount]
+	cp PARTY_LENGTH
+	jr c, .bigjump
+	ld a, [wBoxListLength]
+	cp $1E
+	jr nc, .fullbox
+	xor a
+	ld [wca44], a
+	ld a, [wMonDexIndex]
+	ld [wcdd7], a
+	callab AddPokemonToBox
+	call RecievePokemon
+	predef Functiondd5c
+	and $7F
+	add a, $F7
+	ld hl, wStringBuffer2
+	ld [hli], a
+	ld [hl], "@"
+	ld hl, BoxCantHoldText
+	call PrintText
+	scf
+	ret
+.fullbox	
+	ld hl, BoxFullText
+	call PrintText
+	and a
+	ret
+.bigjump
+	call RecievePokemon
+	predef Functiond886
+	scf
+	ret
+	
+RecievePokemon: ; 04:5357
+	ld a, [wMonDexIndex]
+	push af
+	ld [wNamedObjectIndexBuffer], a
+	dec a
+	ld c, a
+	ld hl, wPokedexOwned
+	ld b, 01 ;SET_FLAG
+	predef SmallFarFlagAction
+	pop af
+	ld [wNamedObjectIndexBuffer], a
+	call GetPokemonName
+	ld hl, RecievePokemonText
+	jp PrintText
+	
+RecievePokemonText: ; 04:5377
+	text "<PLAYER>は"
+	line "@"
+	
+	db $01, $26, $CD
+	
+	text "を　てにいれた！@"
+	
+	db $0B, "@" 
+	
+BoxCantHoldText: ; 04:538B
+	text "#を　もちきれないので"
+	line "<PC>の　ボックス@"
+	db $01, $31, $CD
+	text "　に"
+	cont "@"
+	db $01, $17, $DF
+	text "を　てんそうした！"
+	done
+	
+BoxFullText: ; 04:53B6
+	text "#を　もちきれません！"
+	para "ボックスも　いっぱいで"
+	line "てんそうできません！"
+	para "#センターなどで"
+	line "ボックスを　かえてきて　ください"
+	done
\ No newline at end of file