shithub: pokecrystal

Download patch

ref: 7d03634d680de9a0e5cfd3a5044438b0ebb5e13e
parent: 7ab25c9f5996f4d9179a25363b38d62bdac0ddd9
author: yenatch <[email protected]>
date: Mon Apr 28 11:08:20 EDT 2014

Kanto mon Special stats for the Time Machine.

--- a/main.asm
+++ b/main.asm
@@ -36318,7 +36318,7 @@
 	ld [rSC], a
 
 .asm_28091
-	ld de, $0000
+	ld de, MUSIC_NONE
 	call PlayMusic
 	ld c, $3
 	call DelayFrames
@@ -36422,13 +36422,13 @@
 	ld [$d102], a
 	ld a, $d3
 	ld [$d103], a
-	ld de, $0000
+	ld de, MUSIC_NONE
 	call PlayMusic
 	ld a, [$ffcb]
 	cp $2
-	ld c, $42
+	ld c, 66
 	call z, DelayFrames
-	ld de, $002b
+	ld de, MUSIC_ROUTE_30
 	call PlayMusic
 	jp Function287e3
 ; 28177
@@ -36461,7 +36461,7 @@
 	ld [rSC], a
 
 .asm_281ae
-	ld de, $0000
+	ld de, MUSIC_NONE
 	call PlayMusic
 	ld c, $3
 	call DelayFrames
@@ -36498,7 +36498,7 @@
 	ld [rIF], a
 	ld a, $1d
 	ld [rIE], a
-	ld de, $0000
+	ld de, MUSIC_NONE
 	call PlayMusic
 	call Function287ab
 	ld hl, $d26b
@@ -36664,16 +36664,16 @@
 	ld [$d102], a
 	ld a, $d3
 	ld [$d103], a
-	ld de, $0000
+	ld de, MUSIC_NONE
 	call PlayMusic
 	ld a, [$ffcb]
 	cp $2
-	ld c, $42
+	ld c, 66
 	call z, DelayFrames
 	ld a, [InLinkBattle]
 	cp $3
 	jr nz, .asm_283a9
-	ld a, $c
+	ld a, CAL
 	ld [OtherTrainerClass], a
 	call Functionfdb
 	callba Function4d354
@@ -36721,7 +36721,7 @@
 	jp Function28b22
 
 .asm_283a9
-	ld de, $002b
+	ld de, MUSIC_ROUTE_30
 	call PlayMusic
 	jp Function287e3
 ; 283b2
@@ -37008,6 +37008,7 @@
 	ld bc, $1a
 	call CopyBytes
 	pop bc
+
 	ld hl, $001f
 	add hl, bc
 	ld a, [hl]
@@ -37014,6 +37015,7 @@
 	ld [de], a
 	ld [CurPartyLevel], a
 	inc de
+
 	push bc
 	ld hl, $0024
 	add hl, bc
@@ -37020,19 +37022,22 @@
 	ld bc, $0008
 	call CopyBytes
 	pop bc
+
 	push de
 	push bc
+
 	ld a, [bc]
 	dec a
 	push bc
-	ld b, $0
+	ld b, 0
 	ld c, a
-	ld hl, Unknown_fb656
+	ld hl, KantoMonSpecials
 	add hl, bc
-	ld a, BANK(Unknown_fb656)
+	ld a, BANK(KantoMonSpecials)
 	call GetFarByte
 	ld [BaseSpecialAttack], a
 	pop bc
+
 	ld hl, $000a
 	add hl, bc
 	ld c, $5
@@ -37039,8 +37044,10 @@
 	ld b, $1
 	ld a, $d
 	call Predef
+
 	pop bc
 	pop de
+
 	ld a, [$ffb5]
 	ld [de], a
 	inc de
@@ -95485,8 +95492,161 @@
 	jr .asm_fb636
 ; fb656
 
-Unknown_fb656: ; fb656
-INCBIN "baserom.gbc",$fb656,$fb6ed - $fb656
+KantoMonSpecials: ; fb656
+; The original special base stat for
+; each Kanto monster from Red/Blue.
+	db  65 ; BULBASAUR
+	db  80 ; IVYSAUR
+	db 100 ; VENUSAUR
+	db  50 ; CHARMANDER
+	db  65 ; CHARMELEON
+	db  85 ; CHARIZARD
+	db  50 ; SQUIRTLE
+	db  65 ; WARTORTLE
+	db  85 ; BLASTOISE
+	db  20 ; CATERPIE
+	db  25 ; METAPOD
+	db  80 ; BUTTERFREE
+	db  20 ; WEEDLE
+	db  25 ; KAKUNA
+	db  45 ; BEEDRILL
+	db  35 ; PIDGEY
+	db  50 ; PIDGEOTTO
+	db  70 ; PIDGEOT
+	db  25 ; RATTATA
+	db  50 ; RATICATE
+	db  31 ; SPEAROW
+	db  61 ; FEAROW
+	db  40 ; EKANS
+	db  65 ; ARBOK
+	db  50 ; PIKACHU
+	db  90 ; RAICHU
+	db  30 ; SANDSHREW
+	db  55 ; SANDSLASH
+	db  40 ; NIDORAN_F
+	db  55 ; NIDORINA
+	db  75 ; NIDOQUEEN
+	db  40 ; NIDORAN_M
+	db  55 ; NIDORINO
+	db  75 ; NIDOKING
+	db  60 ; CLEFAIRY
+	db  85 ; CLEFABLE
+	db  65 ; VULPIX
+	db 100 ; NINETALES
+	db  25 ; JIGGLYPUFF
+	db  50 ; WIGGLYTUFF
+	db  40 ; ZUBAT
+	db  75 ; GOLBAT
+	db  75 ; ODDISH
+	db  85 ; GLOOM
+	db 100 ; VILEPLUME
+	db  55 ; PARAS
+	db  80 ; PARASECT
+	db  40 ; VENONAT
+	db  90 ; VENOMOTH
+	db  45 ; DIGLETT
+	db  70 ; DUGTRIO
+	db  40 ; MEOWTH
+	db  65 ; PERSIAN
+	db  50 ; PSYDUCK
+	db  80 ; GOLDUCK
+	db  35 ; MANKEY
+	db  60 ; PRIMEAPE
+	db  50 ; GROWLITHE
+	db  80 ; ARCANINE
+	db  40 ; POLIWAG
+	db  50 ; POLIWHIRL
+	db  70 ; POLIWRATH
+	db 105 ; ABRA
+	db 120 ; KADABRA
+	db 135 ; ALAKAZAM
+	db  35 ; MACHOP
+	db  50 ; MACHOKE
+	db  65 ; MACHAMP
+	db  70 ; BELLSPROUT
+	db  85 ; WEEPINBELL
+	db 100 ; VICTREEBEL
+	db 100 ; TENTACOOL
+	db 120 ; TENTACRUEL
+	db  30 ; GEODUDE
+	db  45 ; GRAVELER
+	db  55 ; GOLEM
+	db  65 ; PONYTA
+	db  80 ; RAPIDASH
+	db  40 ; SLOWPOKE
+	db  80 ; SLOWBRO
+	db  95 ; MAGNEMITE
+	db 120 ; MAGNETON
+	db  58 ; FARFETCH_D
+	db  35 ; DODUO
+	db  60 ; DODRIO
+	db  70 ; SEEL
+	db  95 ; DEWGONG
+	db  40 ; GRIMER
+	db  65 ; MUK
+	db  45 ; SHELLDER
+	db  85 ; CLOYSTER
+	db 100 ; GASTLY
+	db 115 ; HAUNTER
+	db 130 ; GENGAR
+	db  30 ; ONIX
+	db  90 ; DROWZEE
+	db 115 ; HYPNO
+	db  25 ; KRABBY
+	db  50 ; KINGLER
+	db  55 ; VOLTORB
+	db  80 ; ELECTRODE
+	db  60 ; EXEGGCUTE
+	db 125 ; EXEGGUTOR
+	db  40 ; CUBONE
+	db  50 ; MAROWAK
+	db  35 ; HITMONLEE
+	db  35 ; HITMONCHAN
+	db  60 ; LICKITUNG
+	db  60 ; KOFFING
+	db  85 ; WEEZING
+	db  30 ; RHYHORN
+	db  45 ; RHYDON
+	db 105 ; CHANSEY
+	db 100 ; TANGELA
+	db  40 ; KANGASKHAN
+	db  70 ; HORSEA
+	db  95 ; SEADRA
+	db  50 ; GOLDEEN
+	db  80 ; SEAKING
+	db  70 ; STARYU
+	db 100 ; STARMIE
+	db 100 ; MR__MIME
+	db  55 ; SCYTHER
+	db  95 ; JYNX
+	db  85 ; ELECTABUZZ
+	db  85 ; MAGMAR
+	db  55 ; PINSIR
+	db  70 ; TAUROS
+	db  20 ; MAGIKARP
+	db 100 ; GYARADOS
+	db  95 ; LAPRAS
+	db  48 ; DITTO
+	db  65 ; EEVEE
+	db 110 ; VAPOREON
+	db 110 ; JOLTEON
+	db 110 ; FLAREON
+	db  75 ; PORYGON
+	db  90 ; OMANYTE
+	db 115 ; OMASTAR
+	db  45 ; KABUTO
+	db  70 ; KABUTOPS
+	db  60 ; AERODACTYL
+	db  65 ; SNORLAX
+	db 125 ; ARTICUNO
+	db 125 ; ZAPDOS
+	db 125 ; MOLTRES
+	db  50 ; DRATINI
+	db  70 ; DRAGONAIR
+	db 100 ; DRAGONITE
+	db 154 ; MEWTWO
+	db 100 ; MEW
+; fb6ed
 
 
 INCLUDE "event/name_rater.asm"