Add credits strings pointers and constants.

5 files changed, 243 insertions, 86 deletions

diff --git a/constants.asm b/constants.asm
index 03c24b8d..80b15cab 100644
--- a/constants.asm
+++ b/constants.asm
@@ -13,7 +13,7 @@ INCLUDE "constants/audio_constants.asm"
 INCLUDE "constants/battle_anim_constants.asm"
 INCLUDE "constants/battle_constants.asm"
 INCLUDE "constants/collision_constants.asm"
-;INCLUDE "constants/credits_constants.asm"
+INCLUDE "constants/credits_constants.asm"
 INCLUDE "constants/cry_constants.asm"
 INCLUDE "constants/engine_flags.asm"
 INCLUDE "constants/event_flags.asm"
diff --git a/constants/credits_constants.asm b/constants/credits_constants.asm
new file mode 100644
index 00000000..686f73ba
--- /dev/null
+++ b/constants/credits_constants.asm
@@ -0,0 +1,78 @@
+; CreditsStringsPointers indexes (see data/credits_strings_pointers.asm)
+	const_def
+	const SATOSHI_TAJIRI
+	const JUNICHI_MASUDA
+	const TETSUYA_WATANABE
+	const SHIGEKI_MORIMOTO
+	const SOUSUKE_TAMADA
+	const TAKENORI_OOTA
+	const KEN_SUGIMORI
+	const MOTOFUMI_FUJIWARA
+	const ATSUKO_NISHIDA
+	const MUNEO_SAITO
+	const SATOSHI_OOTA
+	const RENA_YOSHIKAWA
+	const JUN_OKUTANI
+	const HIRONOBU_YOSHIDA
+	const ASUKA_IWASHITA
+	const GO_ICHINOSE
+	const MORIKAZU_AOKI
+	const KOHJI_NISHINO
+	const KENJI_MATSUSHIMA
+	const TOSHINOBU_MATSUMIYA
+	const SATORU_IWATA
+	const NOBUHIRO_SEYA
+	const KAZUHITO_SEKINE
+	const TETSUJI_OOTA
+	const NCL_SUPER_MARIO_CLUB
+	const SARUGAKUCHO
+	const AKITO_MORI
+	const TAKAHIRO_HARADA
+	const TOHRU_HASHIMOTO
+	const NOBORU_MATSUMOTO
+	const TAKEHIRO_IZUSHI
+	const TAKASHI_KAWAGUCHI
+	const TSUNEKAZU_ISHIHARA
+	const HIROSHI_YAMAUCHI
+	const KENJI_SAIKI
+	const ATSUSHI_TADA
+	const NAOKO_KAWAKAMI
+	const HIROYUKI_ZINNAI
+	const KUNIMI_KAWAMURA
+	const GAIL_TILDEN
+	const HIRO_NAKAMURA
+	const JEFF_KALLES
+	const WILLIAM_GIESE
+	const NOB_OGASAWARA
+	const RANDY_SHOEMAKE
+	const KATHY_HUGUENARD
+	const JOEL_SIMON
+	const TERUKI_MURAKAWA
+	const KAZUYOSHI_OSAWA
+	const KIMIKO_NAKAMICHI
+	const CREDIT_END
+	const STAFF
+	const DIRECTOR
+	const SUBDIRECTOR
+	const PROGRAMMERS
+	const GRAPHICS_DIRECTOR
+	const MONSTER_DESIGN
+	const GRAPHICS_DESIGN
+	const CREDIT_MUSIC
+	const CREDIT_SOUND_EFFECTS
+	const GAME_DESIGN
+	const GAME_SCENARIO
+	const TOOL_PROGRAMMING
+	const PARAMETRIC_DESIGN
+	const SCRIPT_DESIGN
+	const MAP_DATA_DESIGN
+	const MAP_DESIGN
+	const PRODUCT_TESTING
+	const SPECIAL_THANKS
+	const PRODUCERS
+	const EXECUTIVE_PRODUCER
+	const COPYRIGHT
+	const US_VERSION_STAFF
+	const US_COORDINATION
+	const TEXT_TRANSLATION
+	const PAAD_TESTING
diff --git a/data/credits_strings.asm b/data/credits_strings.asm
index 3825e577..d863b56c 100644
--- a/data/credits_strings.asm
+++ b/data/credits_strings.asm
@@ -1,88 +1,88 @@
-CreditsStrings:
-; entries correspond to constants/credits_constants.asm
-.SatoshiTajiri:       db "   SATOSHI TAJIRI@"         ; "たじり　さとし@"
-.JunichiMasuda:       db "   JUNICHI MASUDA@"         ; "ますだ　じゅんいち@"
-.TetsuyaWatanabe:     db "  TETSUYA WATANABE@"        ; "わたなべ　てつや@"
-.ShigekiMorimoto:     db "  SHIGEKI MORIMOTO@"        ; "もりもと　しげき@"
-.SousukeTamada:       db "   SOUSUKE TAMADA@"         ; "たまだ　そうすけ@"
-.TakenoriOota:        db "   TAKENORI OOTA@"          ; "おおた　たけのり@"
-.KenSugimori:         db "    KEN SUGIMORI@"          ; "すぎもり　けん@"
-.MotofumiFujiwara:    db " MOTOFUMI FUJIWARA@"        ; "ふじわら　もとふみ@"
-.AtsukoNishida:       db "   ATSUKO NISHIDA@"         ; "にしだ　あつこ@"
-.MuneoSaito:          db "    MUNEO SAITO@"           ; "さいとう　むねお@"
-.SatoshiOota:         db "    SATOSHI OOTA@"          ; "おおた　さとし@"
-.RenaYoshikawa:       db "   RENA YOSHIKAWA@"         ; "よしかわ　れな@"
-.JunOkutani:          db "    JUN OKUTANI@"           ; "おくたに　じゅん@"
-.HironobuYoshida:     db "  HIRONOBU YOSHIDA@"        ; "よしだ　ひろのぶ@"
-.AsukaIwashita:       db "   ASUKA IWASHITA@"         ; "いわした　あすか@"
-.GoIchinose:          db "    GO ICHINOSE@"           ; "いちのせ　ごう@"
-.MorikazuAoki:        db "   MORIKAZU AOKI@"          ; "あおき　もりかず@"
-.KohjiNishino:        db "   KOHJI NISHINO@"          ; "にしの　こうじ@"
-.KenjiMatsushima:     db "  KENJI MATSUSHIMA@"        ; "まつしま　けんじ@"
-.ToshinobuMatsumiya:  db "TOSHINOBU MATSUMIYA@"       ; "まつみや　としのぶ@"
-.SatoruIwata:         db "    SATORU IWATA@"          ; "いわた　さとる@"
-.NobuhiroSeya:        db "   NOBUHIRO SEYA@"          ; "せや　のぶひろ@"
-.KazuhitoSekine:      db "  KAZUHITO SEKINE@"         ; "せきね　かずひと@"
-.TetsujiOota:         db "    TETSUJI OOTA@"          ; "おおた　てつじ@"
-.NclSuperMarioClub:   db "NCL SUPER MARIO CLUB@"      ; "スーパーマりオクラブ@"
-.Sarugakucho:         db "    SARUGAKUCHO@"           ; "さるがくちょう@"
-.AkitoMori:           db "     AKITO MORI@"           ; "もり　あきと@"
-.TakahiroHarada:      db "  TAKAHIRO HARADA@"         ; "はらだ　たかひろ@"
-.TohruHashimoto:      db "  TOHRU HASHIMOTO@"         ; "はしもと　とおる@"
-.NoboruMatsumoto:     db "  NOBORU MATSUMOTO@"        ; "まつもと　のぼる@"
-.TakehiroIzushi:      db "  TAKEHIRO IZUSHI@"         ; "いずし　たけひろ@"
-.TakashiKawaguchi:    db " TAKASHI KAWAGUCHI@"        ; "かわぐち　たかし@"
-.TsunekazuIshihara:   db " TSUNEKAZU ISHIHARA@"       ; "いしはら　つねかず@"
-.HiroshiYamauchi:     db "  HIROSHI YAMAUCHI@"        ; "やまうち　ひろし@"
-.KenjiSaiki:          db "    KENJI SAIKI@"           ; "さいき　けんじ@"
-.AtsushiTada:         db "    ATSUSHI TADA@"          ; "ただ　あつし@"
-.NaokoKawakami:       db "   NAOKO KAWAKAMI@"         ; "かわかみ　なおこ@"
-.HiroyukiZinnai:      db "  HIROYUKI ZINNAI@"         ; "じんない　ひろゆき@"
-.KunimiKawamura:      db "  KUNIMI KAWAMURA@"         ; "かわむら　くにみ@"
-.GailTilden:          db "    GAIL TILDEN@"
-.HiroNakamura:        db "   HIRO NAKAMURA@"
-.JeffKalles:          db "    JEFF KALLES@"
-.WilliamGiese:        db "   WILLIAM GIESE@"
-.NobOgasawara:        db "   NOB OGASAWARA@"
-.RandyShoemake:       db "   RANDY SHOEMAKE@"
-.KathyHuguenard:      db "  KATHY HUGUENARD@"
-.JoelSimon:           db "     JOEL SIMON@"
-.TerukiMurakawa:      db "  TERUKI MURAKAWA@"
-.KazuyoshiOsawa:      db "  KAZUYOSHI OSAWA@"
-.KimikoNakamichi:     db "  KIMIKO NAKAMICHI@"
-.End:                 db "END@"                       ; "おしまい@"
-.Staff:               db "      #MON"                 ; "ポケットモンスター"
-                    IF DEF(_GOLD)
-	                next "    GOLD VERSION"
-                    ELIF DEF(_SILVER)
-                    next "   SILVER VERSION"
-                    ENDC
-	                next "       STAFF@"
-.Director:            db "      DIRECTOR@"            ; "エグゼクティブ　ディレクター@"
-.SubDirector:         db "    SUB DIRECTOR@"
-.Programmers:         db "    PROGRAMMERS@"           ; "プログラム@"
-.GraphicsDirector:    db " GRAPHICS DIRECTOR@"        ; "グラフィック　ディレクター@"
-.MonsterDesign:       db "   MONSTER DESIGN@"         ; "#　デザイン@"
-.GraphicsDesign:      db "  GRAPHICS DESIGN@"         ; "グラフィック　デザイン@"
-.Music:               db "       MUSIC@"              ; "おんがく@"
-.SoundEffects:        db "   SOUND EFFECTS@"          ; "サウンド　エフェクト@"
-.GameDesign:          db "    GAME DESIGN@"           ; "ゲームデザイン@"
-.GameScenario:        db "   GAME SCENARIO@"          ; "シナりオ@"
-.ToolProgramming:     db "  TOOL PROGRAMMING@"        ; "ツール　プログラム@"
-.ParametricDesign:    db " PARAMETRIC DESIGN@"        ; "パラメーター　せってい@"
-.ScriptDesign:        db "   SCRIPT DESIGN@"          ; "スクりプト　せってい@"
-.MapDataDesign:       db "  MAP DATA DESIGN@"         ; "マップデータ　せってい@"
-.MapDesign:           db "     MAP DESIGN@"           ; "マップ　デザイン@"
-.ProductTesting:      db "  PRODUCT TESTING@"         ; "デバッグプレイ@"
-.SpecialThanks:       db "   SPECIAL THANKS@"         ; "スぺシャルサンクス@"
-.Producers:           db "     PRODUCERS@"            ; "プロデューサー@"
-.ExecutiveProducer:   db " EXECUTIVE PRODUCER@"       ; "エグゼクティブ　プロデューサー@"
-.UsVersionStaff:      db "  US VERSION STAFF@"
-.UsCoordination:      db "  US COORDINATION@"
-.TextTranslation:     db "  TEXT TRANSLATION@"
-.PaadTesting:         db "    PAAD TESTING@"
+CreditsStrings: ; used for BANK(CreditsStrings)
 
-.Copyright:
+Credits_SatoshiTajiri:       db "   SATOSHI TAJIRI@"         ; "たじり　さとし@"
+Credits_JunichiMasuda:       db "   JUNICHI MASUDA@"         ; "ますだ　じゅんいち@"
+Credits_TetsuyaWatanabe:     db "  TETSUYA WATANABE@"        ; "わたなべ　てつや@"
+Credits_ShigekiMorimoto:     db "  SHIGEKI MORIMOTO@"        ; "もりもと　しげき@"
+Credits_SousukeTamada:       db "   SOUSUKE TAMADA@"         ; "たまだ　そうすけ@"
+Credits_TakenoriOota:        db "   TAKENORI OOTA@"          ; "おおた　たけのり@"
+Credits_KenSugimori:         db "    KEN SUGIMORI@"          ; "すぎもり　けん@"
+Credits_MotofumiFujiwara:    db " MOTOFUMI FUJIWARA@"        ; "ふじわら　もとふみ@"
+Credits_AtsukoNishida:       db "   ATSUKO NISHIDA@"         ; "にしだ　あつこ@"
+Credits_MuneoSaito:          db "    MUNEO SAITO@"           ; "さいとう　むねお@"
+Credits_SatoshiOota:         db "    SATOSHI OOTA@"          ; "おおた　さとし@"
+Credits_RenaYoshikawa:       db "   RENA YOSHIKAWA@"         ; "よしかわ　れな@"
+Credits_JunOkutani:          db "    JUN OKUTANI@"           ; "おくたに　じゅん@"
+Credits_HironobuYoshida:     db "  HIRONOBU YOSHIDA@"        ; "よしだ　ひろのぶ@"
+Credits_AsukaIwashita:       db "   ASUKA IWASHITA@"         ; "いわした　あすか@"
+Credits_GoIchinose:          db "    GO ICHINOSE@"           ; "いちのせ　ごう@"
+Credits_MorikazuAoki:        db "   MORIKAZU AOKI@"          ; "あおき　もりかず@"
+Credits_KohjiNishino:        db "   KOHJI NISHINO@"          ; "にしの　こうじ@"
+Credits_KenjiMatsushima:     db "  KENJI MATSUSHIMA@"        ; "まつしま　けんじ@"
+Credits_ToshinobuMatsumiya:  db "TOSHINOBU MATSUMIYA@"       ; "まつみや　としのぶ@"
+Credits_SatoruIwata:         db "    SATORU IWATA@"          ; "いわた　さとる@"
+Credits_NobuhiroSeya:        db "   NOBUHIRO SEYA@"          ; "せや　のぶひろ@"
+Credits_KazuhitoSekine:      db "  KAZUHITO SEKINE@"         ; "せきね　かずひと@"
+Credits_TetsujiOota:         db "    TETSUJI OOTA@"          ; "おおた　てつじ@"
+Credits_NclSuperMarioClub:   db "NCL SUPER MARIO CLUB@"      ; "スーパーマりオクラブ@"
+Credits_Sarugakucho:         db "    SARUGAKUCHO@"           ; "さるがくちょう@"
+Credits_AkitoMori:           db "     AKITO MORI@"           ; "もり　あきと@"
+Credits_TakahiroHarada:      db "  TAKAHIRO HARADA@"         ; "はらだ　たかひろ@"
+Credits_TohruHashimoto:      db "  TOHRU HASHIMOTO@"         ; "はしもと　とおる@"
+Credits_NoboruMatsumoto:     db "  NOBORU MATSUMOTO@"        ; "まつもと　のぼる@"
+Credits_TakehiroIzushi:      db "  TAKEHIRO IZUSHI@"         ; "いずし　たけひろ@"
+Credits_TakashiKawaguchi:    db " TAKASHI KAWAGUCHI@"        ; "かわぐち　たかし@"
+Credits_TsunekazuIshihara:   db " TSUNEKAZU ISHIHARA@"       ; "いしはら　つねかず@"
+Credits_HiroshiYamauchi:     db "  HIROSHI YAMAUCHI@"        ; "やまうち　ひろし@"
+Credits_KenjiSaiki:          db "    KENJI SAIKI@"           ; "さいき　けんじ@"
+Credits_AtsushiTada:         db "    ATSUSHI TADA@"          ; "ただ　あつし@"
+Credits_NaokoKawakami:       db "   NAOKO KAWAKAMI@"         ; "かわかみ　なおこ@"
+Credits_HiroyukiZinnai:      db "  HIROYUKI ZINNAI@"         ; "じんない　ひろゆき@"
+Credits_KunimiKawamura:      db "  KUNIMI KAWAMURA@"         ; "かわむら　くにみ@"
+Credits_GailTilden:          db "    GAIL TILDEN@"
+Credits_HiroNakamura:        db "   HIRO NAKAMURA@"
+Credits_JeffKalles:          db "    JEFF KALLES@"
+Credits_WilliamGiese:        db "   WILLIAM GIESE@"
+Credits_NobOgasawara:        db "   NOB OGASAWARA@"
+Credits_RandyShoemake:       db "   RANDY SHOEMAKE@"
+Credits_KathyHuguenard:      db "  KATHY HUGUENARD@"
+Credits_JoelSimon:           db "     JOEL SIMON@"
+Credits_TerukiMurakawa:      db "  TERUKI MURAKAWA@"
+Credits_KazuyoshiOsawa:      db "  KAZUYOSHI OSAWA@"
+Credits_KimikoNakamichi:     db "  KIMIKO NAKAMICHI@"
+Credits_End:                 db "END@"                       ; "おしまい@"
+Credits_Staff:               db "      #MON"                 ; "ポケットモンスター"
+                           IF DEF(_GOLD)
+                           next "    GOLD VERSION"
+                           ELIF DEF(_SILVER)
+                           next "   SILVER VERSION"
+                           ENDC
+                           next "       STAFF@"
+Credits_Director:            db "      DIRECTOR@"            ; "エグゼクティブ　ディレクター@"
+Credits_SubDirector:         db "    SUB DIRECTOR@"
+Credits_Programmers:         db "    PROGRAMMERS@"           ; "プログラム@"
+Credits_GraphicsDirector:    db " GRAPHICS DIRECTOR@"        ; "グラフィック　ディレクター@"
+Credits_MonsterDesign:       db "   MONSTER DESIGN@"         ; "#　デザイン@"
+Credits_GraphicsDesign:      db "  GRAPHICS DESIGN@"         ; "グラフィック　デザイン@"
+Credits_Music:               db "       MUSIC@"              ; "おんがく@"
+Credits_SoundEffects:        db "   SOUND EFFECTS@"          ; "サウンド　エフェクト@"
+Credits_GameDesign:          db "    GAME DESIGN@"           ; "ゲームデザイン@"
+Credits_GameScenario:        db "   GAME SCENARIO@"          ; "シナりオ@"
+Credits_ToolProgramming:     db "  TOOL PROGRAMMING@"        ; "ツール　プログラム@"
+Credits_ParametricDesign:    db " PARAMETRIC DESIGN@"        ; "パラメーター　せってい@"
+Credits_ScriptDesign:        db "   SCRIPT DESIGN@"          ; "スクりプト　せってい@"
+Credits_MapDataDesign:       db "  MAP DATA DESIGN@"         ; "マップデータ　せってい@"
+Credits_MapDesign:           db "     MAP DESIGN@"           ; "マップ　デザイン@"
+Credits_ProductTesting:      db "  PRODUCT TESTING@"         ; "デバッグプレイ@"
+Credits_SpecialThanks:       db "   SPECIAL THANKS@"         ; "スぺシャルサンクス@"
+Credits_Producers:           db "     PRODUCERS@"            ; "プロデューサー@"
+Credits_ExecutiveProducer:   db " EXECUTIVE PRODUCER@"       ; "エグゼクティブ　プロデューサー@"
+Credits_UsVersionStaff:      db "  US VERSION STAFF@"
+Credits_UsCoordination:      db "  US COORDINATION@"
+Credits_TextTranslation:     db "  TEXT TRANSLATION@"
+Credits_PaadTesting:         db "    PAAD TESTING@"
+
+Credits_Copyright:
 	;    (C) 1  9  9  5 - 2  0  0  0     N  i  n  t  e  n  d  o
 	db   $60,$61,$62,$63,$7a,$7b,$7c,$7d,$65,$66,$67,$68,$69,$6a
 	;    (C) 1  9  9  5 - 2  0  0  0    C  r  e  a  t  u  r  e  s     i  n  c .
diff --git a/data/credits_strings_pointers.asm b/data/credits_strings_pointers.asm
new file mode 100644
index 00000000..4d79bfad
--- /dev/null
+++ b/data/credits_strings_pointers.asm
@@ -0,0 +1,78 @@
+CreditsStringsPointers:
+; entries correspond to constants/credits_constants.asm
+	dw Credits_SatoshiTajiri
+	dw Credits_JunichiMasuda
+	dw Credits_TetsuyaWatanabe
+	dw Credits_ShigekiMorimoto
+	dw Credits_SousukeTamada
+	dw Credits_TakenoriOota
+	dw Credits_KenSugimori
+	dw Credits_MotofumiFujiwara
+	dw Credits_AtsukoNishida
+	dw Credits_MuneoSaito
+	dw Credits_SatoshiOota
+	dw Credits_RenaYoshikawa
+	dw Credits_JunOkutani
+	dw Credits_HironobuYoshida
+	dw Credits_AsukaIwashita
+	dw Credits_GoIchinose
+	dw Credits_MorikazuAoki
+	dw Credits_KohjiNishino
+	dw Credits_KenjiMatsushima
+	dw Credits_ToshinobuMatsumiya
+	dw Credits_SatoruIwata
+	dw Credits_NobuhiroSeya
+	dw Credits_KazuhitoSekine
+	dw Credits_TetsujiOota
+	dw Credits_NclSuperMarioClub
+	dw Credits_Sarugakucho
+	dw Credits_AkitoMori
+	dw Credits_TakahiroHarada
+	dw Credits_TohruHashimoto
+	dw Credits_NoboruMatsumoto
+	dw Credits_TakehiroIzushi
+	dw Credits_TakashiKawaguchi
+	dw Credits_TsunekazuIshihara
+	dw Credits_HiroshiYamauchi
+	dw Credits_KenjiSaiki
+	dw Credits_AtsushiTada
+	dw Credits_NaokoKawakami
+	dw Credits_HiroyukiZinnai
+	dw Credits_KunimiKawamura
+	dw Credits_GailTilden
+	dw Credits_HiroNakamura
+	dw Credits_JeffKalles
+	dw Credits_WilliamGiese
+	dw Credits_NobOgasawara
+	dw Credits_RandyShoemake
+	dw Credits_KathyHuguenard
+	dw Credits_JoelSimon
+	dw Credits_TerukiMurakawa
+	dw Credits_KazuyoshiOsawa
+	dw Credits_KimikoNakamichi
+	dw Credits_End
+	dw Credits_Staff
+	dw Credits_Director
+	dw Credits_SubDirector
+	dw Credits_Programmers
+	dw Credits_GraphicsDirector
+	dw Credits_MonsterDesign
+	dw Credits_GraphicsDesign
+	dw Credits_Music
+	dw Credits_SoundEffects
+	dw Credits_GameDesign
+	dw Credits_GameScenario
+	dw Credits_ToolProgramming
+	dw Credits_ParametricDesign
+	dw Credits_ScriptDesign
+	dw Credits_MapDataDesign
+	dw Credits_MapDesign
+	dw Credits_ProductTesting
+	dw Credits_SpecialThanks
+	dw Credits_Producers
+	dw Credits_ExecutiveProducer
+	dw Credits_Copyright
+	dw Credits_UsVersionStaff
+	dw Credits_UsCoordination
+	dw Credits_TextTranslation
+	dw Credits_PaadTesting
diff --git a/main.asm b/main.asm
index 26103c43..5c5ca415 100644
--- a/main.asm
+++ b/main.asm
@@ -462,7 +462,8 @@ HallOfFame::
 RedCredits::
 	dr $86446, $86632
 _HallOfFamePC::
-	dr $86632, $87bfd
+	dr $86632, $87b65
+INCLUDE "data/credits_strings_pointers.asm"
 
 
 SECTION "bank23", ROMX