shithub: pokecrystal

Download patch

ref: de8e7ca4222a52db05ef188c788e5675610ffa98
parent: a6c720078278fe9e043eb3b0ddfdcaebc9db394d
author: yenatch <[email protected]>
date: Mon Sep 9 10:17:03 EDT 2013

sgb layout predef

--- a/main.asm
+++ b/main.asm
@@ -12067,6 +12067,7 @@
 ; LoadSGBLayout
 	call CheckCGB
 	jp nz, Function8d59
+
 	ld a, b
 	cp $ff
 	jr nz, .asm_865a
@@ -12078,7 +12079,7 @@
 	ld l, a
 	ld h, 0
 	add hl, hl
-	ld de, $466f
+	ld de, Table866f
 	add hl, de
 	ld a, [hli]
 	ld h, [hl]
@@ -12088,8 +12089,564 @@
 	jp [hl]
 ; 866f
 
-INCBIN "baserom.gbc", $866f, $8a60 - $866f
+Table866f: ; 866f
+	dw Function86ad
+	dw Function86b4
+	dw Function875c
+	dw Function8763
+	dw Function87b2
+	dw Function8852
+	dw Function8859
+	dw Function8867
+	dw Function8860
+	dw Function88b1
+	dw Function87ab
+	dw Function88cd
+	dw Function8884
+	dw Function891a
+	dw Function873c
+	dw Function8897
+	dw Function882a
+	dw Function889e
+	dw Function8928
+	dw Function8890
+	dw Function884b
+	dw Function891a
+	dw Function8823
+	dw Function87e9
+	dw Function8921
+	dw Function89a6
+	dw Function89ad
+	dw Function89d9
+	dw Function89e0
+	dw Function8860
+	dw Function8969
+; 86ad
 
+Function86ad: ; 86ad
+	ld hl, $5c66
+	ld de, $5aa6
+	ret
+; 86b4
+
+Function86b4: ; 86b4
+	ld hl, $5aa6
+	call Function9809
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld a, [PlayerHPPal]
+	ld l, a
+	ld h, $0
+	add hl, hl
+	add hl, hl
+	ld de, $68be
+	add hl, de
+	ld a, [hli]
+	ld [$cdac], a
+	ld a, [hli]
+	ld [$cdad], a
+	ld a, [hli]
+	ld [$cdae], a
+	ld a, [hl]
+	ld [$cdaf], a
+	ld a, [EnemyHPPal]
+	ld l, a
+	ld h, $0
+	add hl, hl
+	add hl, hl
+	ld de, $68be
+	add hl, de
+	ld a, [hli]
+	ld [$cdb2], a
+	ld a, [hli]
+	ld [$cdb3], a
+	ld a, [hli]
+	ld [$cdb4], a
+	ld a, [hl]
+	ld [$cdb5], a
+	ld hl, $5cf6
+	ld de, $cdb9
+	ld bc, $0010
+	call CopyBytes
+	call Function9729
+	ld a, [hli]
+	ld [$cdbc], a
+	ld a, [hli]
+	ld [$cdbd], a
+	ld a, [hli]
+	ld [$cdbe], a
+	ld a, [hl]
+	ld [$cdbf], a
+	call Function973a
+	ld a, [hli]
+	ld [$cdc2], a
+	ld a, [hli]
+	ld [$cdc3], a
+	ld a, [hli]
+	ld [$cdc4], a
+	ld a, [hl]
+	ld [$cdc5], a
+	ld hl, $cda9
+	ld de, $cdb9
+	ld a, $1
+	ld [SGBPredef], a
+	ret
+; 873c
+
+Function873c: ; 873c
+	ld hl, $5bd6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld hl, $cdaa
+	ld [hl], $10
+	inc hl
+	inc hl
+	ld a, [PlayerHPPal]
+	add $2f
+	ld [hl], a
+	ld hl, $cda9
+	ld de, $5ad6
+	ret
+; 875c
+
+Function875c: ; 875c
+	ld hl, $5c76
+	ld de, $5a86
+	ret
+; 8763
+
+Function8763: ; 8763
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld a, [$cda1]
+	ld l, a
+	ld h, $0
+	add hl, hl
+	add hl, hl
+	ld de, $68be
+	add hl, de
+	ld a, [hli]
+	ld [$cdac], a
+	ld a, [hli]
+	ld [$cdad], a
+	ld a, [hli]
+	ld [$cdae], a
+	ld a, [hl]
+	ld [$cdaf], a
+	ld a, [CurPartySpecies]
+	ld bc, TempMonDVs
+	call Function974b
+	ld a, [hli]
+	ld [$cdb2], a
+	ld a, [hli]
+	ld [$cdb3], a
+	ld a, [hli]
+	ld [$cdb4], a
+	ld a, [hl]
+	ld [$cdb5], a
+	ld hl, $cda9
+	ld de, $5ac6
+	ret
+; 87ab
+
+Function87ab: ; 87ab
+	ld hl, $5c56
+	ld de, $cdaa
+	ret
+; 87b2
+
+Function87b2: ; 87b2
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld hl, $cdac
+	ld [hl], $9f
+	inc hl
+	ld [hl], $2a
+	inc hl
+	ld [hl], $5a
+	inc hl
+	ld [hl], $19
+	ld a, [CurPartySpecies]
+	call Function9775
+	ld a, [hli]
+	ld [$cdb2], a
+	ld a, [hli]
+	ld [$cdb3], a
+	ld a, [hli]
+	ld [$cdb4], a
+	ld a, [hl]
+	ld [$cdb5], a
+	ld hl, $cda9
+	ld de, $5ae6
+	ret
+; 87e9
+
+Function87e9: ; 87e9
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld hl, $cdac
+	ld [hl], $9f
+	inc hl
+	ld [hl], $2a
+	inc hl
+	ld [hl], $5a
+	inc hl
+	ld [hl], $19
+	ld a, [CurPartySpecies]
+	ld bc, TempMonDVs
+	call Function974b
+	ld a, [hli]
+	ld [$cdb2], a
+	ld a, [hli]
+	ld [$cdb3], a
+	ld a, [hli]
+	ld [$cdb4], a
+	ld a, [hl]
+	ld [$cdb5], a
+	ld hl, $cda9
+	ld de, $5ae6
+	ret
+; 8823
+
+Function8823: ; 8823
+	call Function87b2
+	ld de, $5af6
+	ret
+; 882a
+
+Function882a: ; 882a
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld hl, $cdac
+	ld [hl], $9f
+	inc hl
+	ld [hl], $2a
+	inc hl
+	ld [hl], $5a
+	inc hl
+	ld [hl], $19
+	ld hl, $cda9
+	ld de, $5a86
+	ret
+; 884b
+
+Function884b: ; 884b
+	ld hl, $5c36
+	ld de, $5a86
+	ret
+; 8852
+
+Function8852: ; 8852
+	ld hl, $5c96
+	ld de, $5b06
+	ret
+; 8859
+
+Function8859: ; 8859
+	ld hl, $5ca6
+	ld de, $5b76
+	ret
+; 8860
+
+Function8860: ; 8860
+	ld hl, $5cb6
+	ld de, $5a86
+	ret
+; 8867
+
+Function8867: ; 8867
+	ld b, $0
+	ld hl, $4878
+	add hl, bc
+	add hl, bc
+	add hl, bc
+	add hl, bc
+	ld e, [hl]
+	inc hl
+	ld d, [hl]
+	inc hl
+	ld a, [hli]
+	ld h, [hl]
+	ld l, a
+	ret
+; 8878
+
+INCBIN "baserom.gbc", $8878, $8884 - $8878
+
+Function8884: ; 8884
+	ld hl, $5b96
+	ld de, $5b56
+	ld a, $8
+	ld [SGBPredef], a
+	ret
+; 8890
+
+Function8890: ; 8890
+	ld hl, $5ba6
+	ld de, $5b86
+	ret
+; 8897
+
+Function8897: ; 8897
+	ld hl, $5c46
+	ld de, $5a86
+	ret
+; 889e
+
+Function889e: ; 889e
+	ld hl, $5a86
+	ld de, PlayerLightScreenCount
+	ld bc, $0010
+	call CopyBytes
+	ld hl, $5bb6
+	ld de, $5a86
+	ret
+; 88b1
+
+Function88b1: ; 88b1
+	ld hl, $5bd6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	call Function8a0c
+	ld hl, $cdaa
+	ld [hld], a
+	ld de, $5a86
+	ld a, $9
+	ld [SGBPredef], a
+	ret
+; 88cd
+
+Function88cd: ; 88cd
+	push bc
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	pop bc
+	ld a, c
+	and a
+	jr z, .asm_88ef
+	ld hl, $cdac
+	ld [hl], $e7
+	inc hl
+	ld [hl], $1c
+	inc hl
+	ld [hl], $62
+	inc hl
+	ld [hl], $c
+	jr .asm_8913
+
+.asm_88ef
+	ld hl, PartyMon1DVs
+	ld bc, $0030
+	ld a, [CurPartyMon]
+	call AddNTimes
+	ld c, l
+	ld b, h
+	ld a, [PlayerHPPal]
+	call Function974b
+	ld a, [hli]
+	ld [$cdac], a
+	ld a, [hli]
+	ld [$cdad], a
+	ld a, [hli]
+	ld [$cdae], a
+	ld a, [hl]
+	ld [$cdaf], a
+
+.asm_8913
+	ld hl, $cda9
+	ld de, $5a86
+	ret
+; 891a
+
+Function891a: ; 891a
+	ld hl, $5cb6
+	ld de, $5a86
+	ret
+; 8921
+
+Function8921: ; 8921
+	ld hl, $5bc6
+	ld de, $5a86
+	ret
+; 8928
+
+Function8928: ; 8928
+	ld hl, $5bd6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld hl, $5a86
+	ld de, $cdb9
+	ld bc, $0010
+	call CopyBytes
+	call Function8a0c
+	ld hl, $cdaa
+	ld [hl], a
+	ld hl, $cdac
+	ld [hl], $2e
+	ld hl, $cdbc
+	ld a, $5
+	ld [hli], a
+	ld a, [$cf83]
+	ld [hli], a
+	ld a, [$cf82]
+	ld [hli], a
+	ld a, [$cf85]
+	ld [hli], a
+	ld a, [$cf84]
+	ld [hl], a
+	ld hl, $cda9
+	ld de, $cdb9
+	ret
+; 8969
+
+Function8969: ; 8969
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld a, [CurPartySpecies]
+	ld l, a
+	ld h, $0
+	add hl, hl
+	add hl, hl
+	add hl, hl
+	ld de, $68ce
+	add hl, de
+	ld a, [$cf65]
+	and $3
+	sla a
+	sla a
+	ld c, a
+	ld b, $0
+	add hl, bc
+	ld a, [hli]
+	ld [$cdac], a
+	ld a, [hli]
+	ld [$cdad], a
+	ld a, [hli]
+	ld [$cdae], a
+	ld a, [hl]
+	ld [$cdaf], a
+	ld hl, $cda9
+	ld de, $5a86
+	ret
+; 89a6
+
+Function89a6: ; 89a6
+	ld hl, $5cd6
+	ld de, $5a86
+	ret
+; 89ad
+
+Function89ad: ; 89ad
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld a, [CurPartySpecies]
+	ld bc, TempMonDVs
+	call Function974b
+	ld a, [hli]
+	ld [$cdac], a
+	ld a, [hli]
+	ld [$cdad], a
+	ld a, [hli]
+	ld [$cdae], a
+	ld a, [hl]
+	ld [$cdaf], a
+	ld hl, $cda9
+	ld de, $5a86
+	ret
+; 89d9
+
+Function89d9: ; 89d9
+	ld hl, $5cc6
+	ld de, $5a86
+	ret
+; 89e0
+
+Function89e0: ; 89e0
+	ld hl, $5ce6
+	ld de, $cda9
+	ld bc, $0010
+	call CopyBytes
+	ld a, [CurPartySpecies]
+	ld bc, TempMonDVs
+	call Function9764
+	ld a, [hli]
+	ld [$cdac], a
+	ld a, [hli]
+	ld [$cdad], a
+	ld a, [hli]
+	ld [$cdae], a
+	ld a, [hl]
+	ld [$cdaf], a
+	ld hl, $cda9
+	ld de, $5a86
+	ret
+; 8a0c
+
+Function8a0c: ; 8a0c
+	ld a, [TimeOfDayPal]
+	cp $2
+	jr c, .asm_8a16
+	ld a, $19
+	ret
+
+.asm_8a16
+	ld a, [$d19a]
+	cp $2
+	jr z, .asm_8a39
+	cp $4
+	jr z, .asm_8a3c
+	cp $7
+	jr z, .asm_8a3c
+	cp $5
+	jr z, .asm_8a3f
+	cp $6
+	jr z, .asm_8a42
+	ld a, [MapGroup]
+	ld e, a
+	ld d, $0
+	ld hl, $4a45
+	add hl, de
+	ld a, [hl]
+	ret
+
+.asm_8a39
+	ld a, $0
+	ret
+
+.asm_8a3c
+	ld a, $18
+	ret
+
+.asm_8a3f
+	ld a, $6
+	ret
+
+.asm_8a42
+	ld a, $3
+	ret
+; 8a45
+
+INCBIN "baserom.gbc", $8a45, $8a60 - $8a45
+
 Function8a60: ; 8a60
 	push de
 	call Function9809
@@ -12857,7 +13414,12 @@
 	ret
 ; 9775
 
-INCBIN "baserom.gbc", $9775, $97ee - $9775
+Function9775: ; 9775
+	call Function97ee
+	ret
+; 9779
+
+INCBIN "baserom.gbc", $9779, $97ee - $9779
 
 Function97ee: ; 97ee
 	ld l, a