1 files changed, 49 insertions, 0 deletions
diff --git a/engine/pokedex/unown_dex.asm b/engine/pokedex/unown_dex.asm
new file mode 100755
index 00000000..1b66a4ac
--- /dev/null
+++ b/engine/pokedex/unown_dex.asm
@@ -0,0 +1,49 @@
+UpdateUnownDex:
+	ld a, [wUnownLetter]
+	ld c, a
+	ld b, NUM_UNOWN
+	ld hl, wUnownDex
+.loop
+	ld a, [hli]
+	and a
+	jr z, .done
+	cp c
+	ret z
+	dec b
+	jr nz, .loop
+	ret
+
+.done
+	dec hl
+	ld [hl], c
+	ret
+
+PrintUnownWord:
+	hlcoord 4, 15
+	ld bc, 12
+	ld a, " "
+	call ByteFill
+	ld a, [wDexCurUnownIndex]
+	ld e, a
+	ld d, 0
+	ld hl, wUnownDex
+	add hl, de
+	ld a, [hl]
+	ld e, a
+	ld d, 0
+	ld hl, UnownWords
+	add hl, de
+	add hl, de
+	ld a, [hli]
+	ld e, a
+	ld d, [hl]
+	hlcoord 4, 15
+.loop
+	ld a, [de]
+	cp -1
+	ret z
+	inc de
+	ld [hli], a
+	jr .loop
+
+INCLUDE "data/pokemon/unown_words.asm"