Func_4c000:
	push hl
	push de
	push bc
	push af
	call Func_4cb1b
	ld hl, wChannel0
	ld de, wdeb0 - wChannel0
.clearLoop
	xor a
	ld [hli], a
	dec de
	ld a, e
	or d
	jr nz, .clearLoop
	ld hl, rNR50
	xor a
	ld [hli], a
	ld [hli], a
	ld a, $80
	ld [hli], a
	ld hl, rNR10
	ld e, $4
.loop
	xor a
	ld [hli], a
	ld [hli], a
	ld a, $8
	ld [hli], a
	xor a
	ld [hli], a
	ld a, $80
	ld [hli], a
	dec e
	jr nz, .loop
	ld a, $8
	ld [wde9a], a
	ld a, $77
	ld [wde98], a
	call Func_4cb15
	pop af
	pop bc
	pop de
	pop hl
	ret

Func_4c042:
	ld a, [de]
	inc de
	and $7
	ld [wdeae], a
	ld c, a
	ld b, $0
	ld hl, ChannelPointers_Bank13
	add hl, bc
	add hl, bc
	ld c, [hl]
	inc hl
	ld b, [hl]
	ld hl, $0002
	add hl, bc
	res 0, [hl]
	push de
	xor a
	ld hl, $0000
	add hl, bc
	ld e, $32
.loop
	ld [hli], a
	dec e
	jr nz, .loop
	ld hl, $0017
	add hl, bc
	xor a
	ld [hli], a
	inc a
	ld [hl], a
	ld hl, $0028
	add hl, bc
	ld [hl], a
	pop de
	ld hl, $0005
	add hl, bc
	ld a, [de]
	ld [hli], a
	inc de
	ld a, [de]
	ld [hl], a
	inc de
	ld hl, $0000
	add hl, bc
	ld a, [wde9b]
	ld [hli], a
	ld a, [wde9c]
	ld [hl], a
	ret

Unused_4c08b: ; 4008b
	db $35, $39, $C8, $41, $3B

PlaySong_Bank13:
	push de
	call Func_4c000
	pop de
	call Func_4cb1b
	ld hl, wde9b
	ld [hl], e
	inc hl
	ld [hl], d
	ld hl, SongHeaderPointers_Bank13
	add hl, de
	add hl, de
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld a, [de]
	rlca
	rlca
	and $3
	inc a
.asm_4c0ac
	push af
	call Func_4c042
	call Func_4cadf
	pop af
	dec a
	jr nz, .asm_4c0ac
	call Func_4cb15
	ret

Unused_4c0bb: ; 400bb
	db $39, $A1, $43, $37, $53

PlaySoundEffect_Bank13:
	call Func_4cb1b
	ld hl, wde9b
	ld [hl], e
	inc hl
	ld [hl], d
	ld hl, SoundEffects_Bank13
	add hl, de
	add hl, de
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld a, [de]
	rlca
	rlca
	and $3
	inc a
.asm_4c0d7
	push af
	call Func_4c042
	ld hl, $0002
	add hl, bc
	set 3, [hl]
	call Func_4cadf
	pop af
	dec a
	jr nz, .asm_4c0d7
	call Func_4cb15
	ret

Unused_4c0ec:
; ???
	db $0E, $07, $00, $37

PlayCry_Bank13:
; Plays a Pokemon cry.
; Input: e = mon id
	call Func_4cb1b
	ld a, e
	and a
	ret z
	dec e
	ld d, $0
	ld hl, CryData_Bank13
	add hl, de
	add hl, de
	add hl, de
	add hl, de
	add hl, de
	add hl, de
	ld e, [hl]
	inc hl
	ld d, [hl]  ; de = base cry id
	inc hl
	ld a, [hli]
	ld [wdea8], a
	ld a, [hli]
	ld [wdea9], a  ; dea8 = cry pitch
	ld a, [hli]
	ld [wdeaa], a
	ld a, [hl]
	ld [wdeab], a  ; deaa = cry length
	ld hl, wde9b
	ld [hl], e
	inc hl
	ld [hl], d
	ld hl, CryBasePointers_Bank13
	add hl, de
	add hl, de
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld a, [de]
	rlca
	rlca
	and $3
	inc a
.asm_4c12a
	push af
	call Func_4c042
	ld hl, $0002
	add hl, bc
	set 5, [hl]
	ld hl, $0003
	add hl, bc
	set 4, [hl]
	ld hl, $0026
	add hl, bc
	ld a, [wdea8]
	ld [hli], a
	ld a, [wdea9]
	ld [hl], a
	ld a, [wde97]
	and $3
	cp $3
	jr nc, .asm_4c15b
	ld hl, $0017
	add hl, bc
	ld a, [wdeaa]
	ld [hli], a
	ld a, [wdeab]
	ld [hl], a
.asm_4c15b
	call Func_4cadf
	pop af
	dec a
	jr nz, .asm_4c12a
	ld a, [wdeac]
	and a
	jr nz, .asm_4c173
	ld a, [wde98]
	ld [wdeac], a
	ld a, $77
	ld [wde98], a
.asm_4c173
	ld a, $1
	ld [wdead], a
	call Func_4cb15
	ret

Unused_4c17c: ; 0x4017c
; ???
	db $C1, $41, $52, $00

Func_4c180:
	ld a, [wdd00]
	and a
	ret z
	xor a
	ld [wde97], a
	ld [wde99], a
	ld bc, wChannel0
.asm_4c18f
	ld hl, $0002
	add hl, bc
	bit 0, [hl]
	jp z, .asm_4c22d
	ld hl, $0014
	add hl, bc
	ld a, [hl]
	cp $2
	jr c, .asm_4c1a4
	dec [hl]
	jr .asm_4c1c1

.asm_4c1a4
	ld hl, $001c
	add hl, bc
	ld a, [hl]
	ld hl, $001b
	add hl, bc
	ld [hl], a
	ld hl, $0025
	add hl, bc
	ld a, [hl]
	ld hl, $0024
	add hl, bc
	ld [hl], a
	ld hl, $0003
	add hl, bc
	res 1, [hl]
	call Func_4c670
.asm_4c1c1
	ld hl, $000d
	add hl, bc
	ld a, [hli]
	ld [wde91], a
	ld a, [hli]
	ld [wde92], a
	ld a, [hli]
	ld [wde93], a
	ld a, [hl]
	ld [wde94], a
	call Func_4c4f0
	call Func_4c632
	ld a, [wdead]
	and a
	jr z, .asm_4c20a
	ld a, [wde97]
	cp $4
	jr nc, .asm_4c219
	ld hl, wChannel4 + 2
	bit 0, [hl]
	jr nz, .asm_4c204
	ld hl, wChannel5 + 2
	bit 0, [hl]
	jr nz, .asm_4c204
	ld hl, wChannel6 + 2
	bit 0, [hl]
	jr nz, .asm_4c204
	ld hl, wChannel7 + 2
	bit 0, [hl]
	jr z, .asm_4c20a
.asm_4c204
	ld hl, $000b
	add hl, bc
	set 5, [hl]
.asm_4c20a
	ld a, [wde97]
	cp $4
	jr nc, .asm_4c219
	ld hl, $00ca
	add hl, bc
	bit 0, [hl]
	jr nz, .asm_4c227
.asm_4c219
	call Func_4c24d
	ld hl, $0019
	add hl, bc
	ld a, [wde99]
	or [hl]
	ld [wde99], a
.asm_4c227
	ld hl, $000b
	add hl, bc
	xor a
	ld [hl], a
.asm_4c22d
	ld hl, $0032
	add hl, bc
	ld c, l
	ld b, h
	ld a, [wde97]
	inc a
	ld [wde97], a
	cp $8
	jp nz, .asm_4c18f
	call Func_4c40d
	ld a, [wde98]
	ld [rNR50], a
	ld a, [wde99]
	ld [rNR51], a
	ret

Func_4c24d:
	ld hl, PointerTable_4c25e
	ld a, [wde97]
	and $7
	add a
	ld e, a
	ld d, $0
	add hl, de
	ld a, [hli]
	ld h, [hl]
	ld l, a
	jp hl

PointerTable_4c25e:
	dw Func_4c26e
	dw Func_4c2e0
	dw Func_4c349
	dw Func_4c3cf
	dw Func_4c26e
	dw Func_4c2e0
	dw Func_4c349
	dw Func_4c3cf

Func_4c26e:
	ld hl, $000b
	add hl, bc
	bit 3, [hl]
	jr z, .asm_4c27b
	ld a, [wde9a]
	ld [rNR10], a
.asm_4c27b
	bit 5, [hl]
	jr nz, .asm_4c2ba
	bit 4, [hl]
	jr nz, .asm_4c2c6
	bit 6, [hl]
	jr nz, .asm_4c2b4
	bit 1, [hl]
	jr z, .asm_4c295
	ld a, [wde93]
	ld [rNR13], a
	ld a, [wde94]
	ld [rNR14], a
.asm_4c295
	bit 2, [hl]
	jr z, .asm_4c2a5
	ld a, [wde92]
	ld [rNR12], a
	ld a, [wde94]
	or $80
	ld [rNR14], a
.asm_4c2a5
	bit 0, [hl]
	ret z
	ld a, [wde91]
	ld d, a
	ld a, [rNR11]
	and $3f
	or d
	ld [rNR11], a
	ret

.asm_4c2b4
	ld a, [wde93]
	ld [rNR13], a
	ret

.asm_4c2ba
	ld a, $8
	ld [rNR12], a
	ld a, [wde94]
	or $80
	ld [rNR14], a
	ret

.asm_4c2c6
	ld hl, wde91
	ld a, $3f
	or [hl]
	ld [rNR11], a
	ld a, [wde92]
	ld [rNR12], a
	ld a, [wde93]
	ld [rNR13], a
	ld a, [wde94]
	or $80
	ld [rNR14], a
	ret

Func_4c2e0:
	ld hl, $000b
	add hl, bc
	bit 5, [hl]
	jr nz, .asm_4c323
	bit 4, [hl]
	jr nz, .asm_4c32f
	bit 6, [hl]
	jr nz, .asm_4c31d
	bit 1, [hl]
	jr z, .asm_4c2fe
	ld a, [wde93]
	ld [rNR23], a
	ld a, [wde94]
	ld [rNR24], a
.asm_4c2fe
	bit 2, [hl]
	jr z, .asm_4c30e
	ld a, [wde92]
	ld [rNR22], a
	ld a, [wde94]
	or $80
	ld [rNR24], a
.asm_4c30e
	bit 0, [hl]
	ret z
	ld a, [wde91]
	ld d, a
	ld a, [rNR21]
	and $3f
	or d
	ld [rNR21], a
	ret

.asm_4c31d
	ld a, [wde93]
	ld [rNR23], a
	ret

.asm_4c323
	ld a, $8
	ld [rNR22], a
	ld a, [wde94]
	or $80
	ld [rNR24], a
	ret

.asm_4c32f
	ld hl, wde91
	ld a, $3f
	or [hl]
	ld [rNR21], a
	ld a, [wde92]
	ld [rNR22], a
	ld a, [wde93]
	ld [rNR23], a
	ld a, [wde94]
	or $80
	ld [rNR24], a
	ret

Func_4c349:
	ld hl, $000b
	add hl, bc
	bit 5, [hl]
	jr nz, .asm_4c387
	bit 4, [hl]
	jr nz, .asm_4c38b
	bit 6, [hl]
	jr nz, .asm_4c381
	bit 1, [hl]
	jr z, .asm_4c367
	ld a, [wde93]
	ld [rNR33], a
	ld a, [wde94]
	ld [rNR34], a
.asm_4c367
	bit 2, [hl]
	ret z
	xor a
	ld [rNR30], a
	call LoadWavePattern_Bank13
	ld a, $80
	ld [rNR30], a
	ld a, [wde93]
	ld [rNR33], a
	ld a, [wde94]
	or $80
	ld [rNR34], a
	ret

.asm_4c381
	ld a, [wde93]
	ld [rNR33], a
	ret

.asm_4c387
	xor a
	ld [rNR30], a
	ret

.asm_4c38b
	ld a, $3f
	ld [rNR31], a
	xor a
	ld [rNR30], a
	call LoadWavePattern_Bank13
	ld a, $80
	ld [rNR30], a
	ld a, [wde93]
	ld [rNR33], a
	ld a, [wde94]
	or $80
	ld [rNR34], a
	ret

LoadWavePattern_Bank13:
	push hl
	ld a, [wde92]
	and $f
	ld l, a
	ld h, $0
	add hl, hl
	add hl, hl
	add hl, hl
	add hl, hl
	ld de, WavePatterns_Bank13
	add hl, de
	ld de, rWave_0
	push bc
	ld b, $10
.loop
	ld a, [hli]
	ld [de], a
	inc de
	dec b
	jr nz, .loop
	pop bc
	pop hl
	ld a, [wde92]
	and $f0
	sla a
	ld [rNR32], a  ; set volume of wave channel
	ret

Func_4c3cf:
	ld hl, $000b
	add hl, bc
	bit 5, [hl]
	jr nz, .asm_4c3f1
	bit 4, [hl]
	jr nz, .asm_4c3fa
	bit 1, [hl]
	jr z, .asm_4c3e4
	ld a, [wde93]
	ld [rNR43], a
.asm_4c3e4
	bit 2, [hl]
	ret z
	ld a, [wde92]
	ld [rNR42], a
	ld a, $80
	ld [rNR44], a
	ret

.asm_4c3f1
	ld a, $8
	ld [rNR42], a
	ld a, $80
	ld [rNR44], a
	ret

.asm_4c3fa
	ld a, $3f
	ld [rNR41], a
	ld a, [wde92]
	ld [rNR42], a
	ld a, [wde93]
	ld [rNR43], a
	ld a, $80
	ld [rNR44], a
	ret

Func_4c40d:
	ld a, [wdea2]
	and a
	ret z
	ld a, [wdea3]
	and a
	jr z, .asm_4c41d
	dec a
	ld [wdea3], a
	ret

.asm_4c41d
	ld a, [wdea2]
	ld d, a
	and $7f
	ld [wdea3], a
	ld a, [wde98]
	and $7
	bit 7, d
	jr nz, .asm_4c448
	and a
	jr z, .asm_4c435
	dec a
	jr .asm_4c454

.asm_4c435
	ld a, [wdea4]
	ld e, a
	ld a, [wdea5]
	ld d, a
	push bc
	call PlaySong_Bank13
	pop bc
	ld hl, wdea2
	set 7, [hl]
	ret

.asm_4c448
	cp $7
	jr nc, .asm_4c44f
	inc a
	jr .asm_4c454

.asm_4c44f
	xor a
	ld [wdea2], a
	ret

.asm_4c454
	ld d, a
	swap a
	or d
	ld [wde98], a
	ret

Func_4c45c:
	ld hl, $0003
	add hl, bc
	bit 1, [hl]
	ret z
	ld hl, $0014
	add hl, bc
	ld a, [hl]
	ld hl, wde95
	sub [hl]
	jr nc, .asm_4c470
	ld a, $1
.asm_4c470
	ld [hl], a
	ld hl, $000f
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, $001f
	add hl, bc
	ld a, e
	sub [hl]
	ld e, a
	ld a, d
	sbc $0
	ld d, a
	ld hl, $0020
	add hl, bc
	sub [hl]
	jr nc, .asm_4c4ab
	ld hl, $0004
	add hl, bc
	set 1, [hl]
	ld hl, $000f
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, $001f
	add hl, bc
	ld a, [hl]
	sub e
	ld e, a
	ld a, d
	sbc $0
	ld d, a
	ld hl, $0020
	add hl, bc
	ld a, [hl]
	sub d
	ld d, a
	jr .asm_4c4c9

.asm_4c4ab
	ld hl, $0004
	add hl, bc
	res 1, [hl]
	ld hl, $000f
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, $001f
	add hl, bc
	ld a, e
	sub [hl]
	ld e, a
	ld a, d
	sbc $0
	ld d, a
	ld hl, $0020
	add hl, bc
	sub [hl]
	ld d, a
.asm_4c4c9
	push bc
	ld hl, wde95
	ld b, $0
.asm_4c4cf
	inc b
	ld a, e
	sub [hl]
	ld e, a
	jr nc, .asm_4c4cf
	ld a, d
	and a
	jr z, .asm_4c4dc
	dec d
	jr .asm_4c4cf

.asm_4c4dc
	ld a, e
	add [hl]
	ld d, b
	pop bc
	ld hl, $0021
	add hl, bc
	ld [hl], d
	ld hl, $0022
	add hl, bc
	ld [hl], a
	ld hl, $0023
	add hl, bc
	xor a
	ld [hl], a

	; fall through

Func_4c4f0:
	ld hl, $0003
	add hl, bc
	bit 2, [hl]
	jr z, .asm_4c50b
	ld hl, $001a
	add hl, bc
	ld a, [hl]
	rlca
	rlca
	ld [hl], a
	and $c0
	ld [wde91], a
	ld hl, $000b
	add hl, bc
	set 0, [hl]
.asm_4c50b
	ld hl, $0003
	add hl, bc
	bit 4, [hl]
	jr z, .asm_4c529
	ld hl, $0026
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, wde93
	ld a, [hli]
	ld h, [hl]
	ld l, a
	add hl, de
	ld e, l
	ld d, h
	ld hl, wde93
	ld [hl], e
	inc hl
	ld [hl], d
.asm_4c529
	ld hl, $0003
	add hl, bc
	bit 1, [hl]
	jp z, .asm_4c5c1
	ld hl, $000f
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, $0004
	add hl, bc
	bit 1, [hl]
	jr z, .asm_4c574
	ld hl, $0021
	add hl, bc
	ld l, [hl]
	ld h, $0
	add hl, de
	ld d, h
	ld e, l
	ld hl, $0022
	add hl, bc
	ld a, [hl]
	ld hl, $0023
	add hl, bc
	add [hl]
	ld [hl], a
	ld a, $0
	adc e
	ld e, a
	ld a, $0
	adc d
	ld d, a
	ld hl, $0020
	add hl, bc
	ld a, [hl]
	cp d
	jp c, .asm_4c5a1
	jr nz, .asm_4c5b4
	ld hl, $001f
	add hl, bc
	ld a, [hl]
	cp e
	jp c, .asm_4c5a1
	jr .asm_4c5b4

.asm_4c574
	ld a, e
	ld hl, $0021
	add hl, bc
	ld e, [hl]
	sub e
	ld e, a
	ld a, d
	sbc $0
	ld d, a
	ld hl, $0022
	add hl, bc
	ld a, [hl]
	add a
	ld [hl], a
	ld a, e
	sbc $0
	ld e, a
	ld a, d
	sbc $0
	ld d, a
	ld hl, $0020
	add hl, bc
	ld a, d
	cp [hl]
	jr c, .asm_4c5a1
	jr nz, .asm_4c5b4
	ld hl, $001f
	add hl, bc
	ld a, e
	cp [hl]
	jr nc, .asm_4c5b4
.asm_4c5a1
	ld hl, $0003
	add hl, bc
	res 1, [hl]
	ld hl, $0004
	add hl, bc
	res 1, [hl]
	ld hl, $0020
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
.asm_4c5b4
	ld hl, $000f
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	ld hl, $000b
	add hl, bc
	set 1, [hl]
.asm_4c5c1
	ld hl, $0003
	add hl, bc
	bit 0, [hl]
	jr z, .asm_4c61a
	ld hl, $001b
	add hl, bc
	ld a, [hl]
	and a
	jr nz, .asm_4c5e3
	ld hl, $001d
	add hl, bc
	ld a, [hl]
	and a
	jr z, .asm_4c61a
	ld d, a
	ld hl, $001e
	add hl, bc
	ld a, [hl]
	and $f
	jr z, .asm_4c5e6
.asm_4c5e3
	dec [hl]
	jr .asm_4c61a

.asm_4c5e6
	ld a, [hl]
	swap [hl]
	or [hl]
	ld [hl], a
	ld a, [wde93]
	ld e, a
	ld hl, $0004
	add hl, bc
	bit 0, [hl]
	jr z, .asm_4c605
	res 0, [hl]
	ld a, d
	and $f
	ld d, a
	ld a, e
	sub d
	jr nc, .asm_4c611
	ld a, $0
	jr .asm_4c611

.asm_4c605
	set 0, [hl]
	ld a, d
	and $f0
	swap a
	add e
	jr nc, .asm_4c611
	ld a, $ff
.asm_4c611
	ld [wde93], a
	ld hl, $000b
	add hl, bc
	set 6, [hl]
.asm_4c61a
	ld hl, $0003
	add hl, bc
	bit 3, [hl]
	ret z
	ld hl, $0024
	add hl, bc
	ld a, [hl]
	and a
	jr z, .asm_4c62b
	dec [hl]
	ret

.asm_4c62b
	ld hl, $000b
	add hl, bc
	set 5, [hl]
	ret

Func_4c632:
	ld hl, $0002
	add hl, bc
	bit 4, [hl]
	ret z
	ld a, [wde9f]
	and a
	jr z, .asm_4c644
	dec a
	ld [wde9f], a
	ret

.asm_4c644
	ld hl, wde9d
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld a, [de]
	inc de
	cp $ff
	ret z
	and $f
	inc a
	ld [wde9f], a
	ld a, [de]
	inc de
	ld [wde92], a
	ld a, [de]
	inc de
	ld [wde93], a
	xor a
	ld [wde94], a
	ld hl, wde9d
	ld [hl], e
	inc hl
	ld [hl], d
	ld hl, $000b
	add hl, bc
	set 4, [hl]
	ret

Func_4c670:
	call Func_4ca10
	cp $ff
	jr z, .asm_4c6c9
	cp $d0
	jr c, .asm_4c680
.asm_4c67b
	call Func_4c786
	jr Func_4c670

.asm_4c680
	ld hl, $0002
	add hl, bc
	bit 3, [hl]
	jp nz, Func_4c723
	bit 5, [hl]
	jp nz, Func_4c723
	bit 4, [hl]
	jp nz, Func_4c750
	ld a, [wde96]
	and $f
	call Func_4ca5b
	ld a, [wde96]
	swap a
	and $f
	jr z, .asm_4c6c2
	ld hl, $0011
	add hl, bc
	ld [hl], a
	ld e, a
	ld hl, $0012
	add hl, bc
	ld d, [hl]
	call Func_4ca2b
	ld hl, $000f
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	ld hl, $000b
	add hl, bc
	set 4, [hl]
	jp Func_4c45c

.asm_4c6c2
	ld hl, $000b
	add hl, bc
	set 5, [hl]
	ret

.asm_4c6c9
	ld hl, $0002
	add hl, bc
	bit 1, [hl]
	jr nz, .asm_4c67b
	ld a, [wde97]
	cp $4
	jr nc, .asm_4c6e0
	ld hl, $00ca
	add hl, bc
	bit 0, [hl]
	jr nz, .asm_4c6f6
.asm_4c6e0
	ld hl, $0002
	add hl, bc
	bit 5, [hl]
	call nz, Func_4c704
	ld a, [wde97]
	cp $4
	jr nz, .asm_4c6f6
	xor a
	ld [rNR10], a
	ld [wde9a], a
.asm_4c6f6
	ld hl, $0002
	add hl, bc
	res 0, [hl]
	ld hl, $0000
	add hl, bc
	xor a
	ld [hli], a
	ld [hli], a
	ret

Func_4c704:
	ld a, [wde97]
	cp $4
	ret nz
	xor a
	ld hl, wChannel5 + $26
	ld [hli], a
	ld [hl], a
	ld hl, wChannel7 + $26
	ld [hli], a
	ld [hl], a
	ld a, [wdeac]
	ld [wde98], a
	xor a
	ld [wdeac], a
	ld [wdead], a
	ret

Func_4c723:
	ld hl, $000b
	add hl, bc
	set 4, [hl]
	ld a, [wde96]
	call Func_4ca5b
	call Func_4ca10
	ld hl, $000e
	add hl, bc
	ld [hl], a
	call Func_4ca10
	ld hl, $000f
	add hl, bc
	ld [hl], a
	ld a, [wde97]
	and $3
	cp $3
	ret z
	call Func_4ca10
	ld hl, $0010
	add hl, bc
	ld [hl], a
	ret

Func_4c750:
	ld a, [wde97]
	cp $3
	ret nz
	ld a, [wde96]
	and $f
	call Func_4ca5b
	ld a, [wdea1]
	ld e, a
	ld d, $0
	ld hl, Drumkits_Bank13
	add hl, de
	add hl, de
	ld a, [hli]
	ld h, [hl]
	ld l, a
	ld a, [wde96]
	swap a
	and $f
	ret z
	ld e, a
	ld d, $0
	add hl, de
	add hl, de
	ld a, [hli]
	ld [wde9d], a
	ld a, [hl]
	ld [wde9e], a
	xor a
	ld [wde9f], a
	ret

Func_4c786:
	ld a, [wde96]
	sub $d0
	ld e, a
	ld d, $0
	ld hl, PointerTable_4c797
	add hl, de
	add hl, de
	ld a, [hli]
	ld h, [hl]
	ld l, a
	jp hl

PointerTable_4c797:
	dw Func_4c9b6
	dw Func_4c9b6
	dw Func_4c9b6
	dw Func_4c9b6
	dw Func_4c9b6
	dw Func_4c9b6
	dw Func_4c9b6
	dw Func_4c9b6
	dw Func_4c973
	dw Func_4c9c1
	dw Func_4c9aa
	dw Func_4c994
	dw Func_4c9a1
	dw Func_4c987
	dw Func_4c939
	dw Func_4c951
	dw Func_4c8ff
	dw Func_4c8c4
	dw Func_4c8b5
	dw Func_4c95f
	dw Func_4c9ca
	dw Func_4c9da
	dw Func_4c926
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c9e9
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4ca05
	dw Func_4ca0b
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c7f7
	dw Func_4c885
	dw Func_4c88e
	dw Func_4c833
	dw Func_4c843
	dw Func_4c80d
	dw Func_4c7f8

Func_4c7f7:
	ret

Func_4c7f8:
	ld hl, $0002
	add hl, bc
	res 1, [hl]
	ld hl, $0007
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, $0005
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	ret

Func_4c80d:
	call Func_4ca10
	ld e, a
	call Func_4ca10
	ld d, a
	push de
	ld hl, $0005
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, $0007
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	pop de
	ld hl, $0005
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	ld hl, $0002
	add hl, bc
	set 1, [hl]
	ret

Func_4c833:
	call Func_4ca10
	ld e, a
	call Func_4ca10
	ld d, a
	ld hl, $0005
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	ret

Func_4c843:
	call Func_4ca10
	ld hl, $0002
	add hl, bc
	bit 2, [hl]
	jr nz, .asm_4c859
	and a
	jr z, .asm_4c862
	dec a
	set 2, [hl]
	ld hl, $0016
	add hl, bc
	ld [hl], a
.asm_4c859
	ld hl, $0016
	add hl, bc
	ld a, [hl]
	and a
	jr z, .asm_4c872
	dec [hl]
.asm_4c862
	call Func_4ca10
	ld e, a
	call Func_4ca10
	ld d, a
	ld hl, $0005
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	ret

.asm_4c872
	ld hl, $0002
	add hl, bc
	res 2, [hl]
	ld hl, $0005
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	inc de
	inc de
	ld [hl], d
	dec hl
	ld [hl], e
	ret

Func_4c885:
	call Func_4ca10
	ld hl, $000c
	add hl, bc
	ld [hl], a
	ret

Func_4c88e:
	call Func_4ca10
	ld hl, $000c
	add hl, bc
	cp [hl]
	jr z, .asm_4c8a5
	ld hl, $0005
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	inc de
	inc de
	ld [hl], d
	dec hl
	ld [hl], e
	ret

.asm_4c8a5
	call Func_4ca10
	ld e, a
	call Func_4ca10
	ld d, a
	ld hl, $0005
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	ret

Func_4c8b5:
	call Func_4ca10
	ld hl, $0025
	add hl, bc
	ld [hl], a
	ld hl, $0003
	add hl, bc
	set 3, [hl]
	ret

Func_4c8c4:
	ld hl, $0003
	add hl, bc
	set 0, [hl]
	ld hl, $0004
	add hl, bc
	res 0, [hl]
	call Func_4ca10
	ld hl, $001c
	add hl, bc
	ld [hl], a
	ld hl, $001b
	add hl, bc
	ld [hl], a
	call Func_4ca10
	ld hl, $001d
	add hl, bc
	ld d, a
	and $f0
	swap a
	srl a
	ld e, a
	adc $0
	swap a
	or e
	ld [hl], a
	ld hl, $001e
	add hl, bc
	ld a, d
	and $f
	ld d, a
	swap a
	or d
	ld [hl], a
	ret

Func_4c8ff:
	call Func_4ca10
	ld [wde95], a
	call Func_4ca10
	ld d, a
	and $f
	ld e, a
	ld a, d
	swap a
	and $f
	ld d, a
	call Func_4ca2b
	ld hl, $001f
	add hl, bc
	ld [hl], e
	ld hl, $0020
	add hl, bc
	ld [hl], d
	ld hl, $0003
	add hl, bc
	set 1, [hl]
	ret

Func_4c926:
	ld hl, $0003
	add hl, bc
	set 4, [hl]
	ld hl, $0027
	add hl, bc
	call Func_4ca10
	ld [hld], a
	call Func_4ca10
	ld [hl], a
	ret

Func_4c939:
	ld hl, $0003
	add hl, bc
	set 2, [hl]
	call Func_4ca10
	rrca
	rrca
	ld hl, $001a
	add hl, bc
	ld [hl], a
	and $c0
	ld hl, $000d
	add hl, bc
	ld [hl], a
	ret

Func_4c951:
	ld hl, $0002
	add hl, bc
	bit 3, [hl]
	jr z, .asm_4c95c
	res 3, [hl]
	ret

.asm_4c95c
	set 3, [hl]
	ret

Func_4c95f:
	ld hl, $0002
	add hl, bc
	bit 4, [hl]
	jr z, .asm_4c96a
	res 4, [hl]
	ret

.asm_4c96a
	set 4, [hl]
	call Func_4ca10
	ld [wdea1], a
	ret

Func_4c973:
	call Func_4ca10
	ld hl, $0028
	add hl, bc
	ld [hl], a
	ld a, [wde97]
	and $3
	cp $3
	ret z
	call Func_4c9a1
	ret

Func_4c987:
	call Func_4ca10
	ld [wde9a], a
	ld hl, $000b
	add hl, bc
	set 3, [hl]
	ret

Func_4c994:
	call Func_4ca10
	rrca
	rrca
	and $c0
	ld hl, $000d
	add hl, bc
	ld [hl], a
	ret

Func_4c9a1:
	call Func_4ca10
	ld hl, $000e
	add hl, bc
	ld [hl], a
	ret

Func_4c9aa:
	call Func_4ca10
	ld d, a
	call Func_4ca10
	ld e, a
	call Func_4ca95
	ret

Func_4c9b6:
	ld hl, $0012
	add hl, bc
	ld a, [wde96]
	and $7
	ld [hl], a
	ret

Func_4c9c1:
	call Func_4ca10
	ld hl, $0013
	add hl, bc
	ld [hl], a
	ret

Func_4c9ca:
	ld a, [wde97]
	call Func_4caf4
	call Func_4ca10
	ld hl, $0019
	add hl, bc
	and [hl]
	ld [hl], a
	ret

Func_4c9da:
	call Func_4ca10
	ld a, [wdea2]
	and a
	ret nz
	ld a, [wde96]
	ld [wde98], a
	ret

Func_4c9e9:
	call Func_4ca10
	; cast to s16
	ld e, a
	cp $80
	jr nc, .asm_4c9f5
	ld d, $0
	jr .asm_4c9f7

.asm_4c9f5
	ld d, $ff
.asm_4c9f7
	ld hl, $0017
	add hl, bc
	ld a, [hli]
	ld h, [hl]
	ld l, a
	add hl, de
	ld e, l
	ld d, h
	call Func_4ca95
	ret

Func_4ca05:
	ld a, $1
	ld [wdead], a
	ret

Func_4ca0b:
	xor a
	ld [wdead], a
	ret

Func_4ca10:
	push hl
	push de
	ld hl, $0005
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld a, [de]
	ld [wde96], a
	inc de
	ld hl, $0005
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	pop de
	pop hl
	ld a, [wde96]
	ret

Func_4ca2b:
	ld hl, $0013
	add hl, bc
	ld a, [hl]
	swap a
	and $f
	add d
	push af
	ld hl, $0013
	add hl, bc
	ld a, [hl]
	and $f
	ld l, a
	ld d, $0
	ld h, d
	add hl, de
	add hl, hl
	ld de, Data_4cb20 
	add hl, de
	ld e, [hl]
	inc hl
	ld d, [hl]
	pop af
.asm_4ca4b
	cp $7
	jr nc, .asm_4ca56
	sra d
	rr e
	inc a
	jr .asm_4ca4b

.asm_4ca56
	ld a, d
	and $7
	ld d, a
	ret

Func_4ca5b:
	inc a
	ld e, a
	ld d, $0
	ld hl, $0028
	add hl, bc
	ld a, [hl]
	ld l, $0
	call Func_4ca86
	ld a, l
	ld hl, $0017
	add hl, bc
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld hl, $0015
	add hl, bc
	ld l, [hl]
	call Func_4ca86
	ld e, l
	ld d, h
	ld hl, $0015
	add hl, bc
	ld [hl], e
	ld hl, $0014
	add hl, bc
	ld [hl], d
	ret

Func_4ca86:
	ld h, $0
.asm_4ca88
	srl a
	jr nc, .asm_4ca8d
	add hl, de
.asm_4ca8d
	sla e
	rl d
	and a
	jr nz, .asm_4ca88
	ret

Func_4ca95:
	push bc
	ld a, [wde97]
	cp $4
	jr nc, .asm_4cab7
	ld bc, wChannel0
	call Func_4cad1
	ld bc, wChannel1
	call Func_4cad1
	ld bc, wChannel2
	call Func_4cad1
	ld bc, wChannel3
	call Func_4cad1
	jr .asm_4cacf

.asm_4cab7
	ld bc, wChannel4
	call Func_4cad1
	ld bc, wChannel5
	call Func_4cad1
	ld bc, wChannel6
	call Func_4cad1
	ld bc, wChannel7
	call Func_4cad1
.asm_4cacf
	pop bc
	ret

Func_4cad1:
	ld hl, $0017
	add hl, bc
	ld [hl], e
	inc hl
	ld [hl], d
	xor a
	ld hl, $0015
	add hl, bc
	ld [hl], a
	ret

Func_4cadf:
	call Func_4cb06
	ld a, [wdeae]
	jr .asm_4caea

	ld a, [wde97]
.asm_4caea
	call Func_4caf4
	ld hl, $0002
	add hl, bc
	set 0, [hl]
	ret

Func_4caf4:
	push de
	and $3
	ld e, a
	ld d, $0
	ld hl, Data_4cc8e
	add hl, de
	ld a, [hl]
	ld hl, $0019
	add hl, bc
	ld [hl], a
	pop de
	ret

Func_4cb06:
	ld a, [wdeae]
	and $3
	cp $0
	ret nz
	xor a
	ld [rNR10], a
	ld [wde9a], a
	ret

Func_4cb15:
	ld a, $1
	ld [wdd00], a
	ret

Func_4cb1b:
	xor a
	ld [wdd00], a
	ret

Data_4cb20:
	dw $0000
	dw $f82c
	dw $f89d
	dw $f907
	dw $f96b
	dw $f9ca
	dw $fa23
	dw $fa77
	dw $fac7
	dw $fb12
	dw $fb58
	dw $fb9b
	dw $fbda
	dw $fc16
	dw $fc4e
	dw $fc83
	dw $fcb5
	dw $fce5
	dw $fd11
	dw $fd3b
	dw $fd63
	dw $fd89
	dw $fdac
	dw $fdcd
	dw $fded

WavePatterns_Bank13:
WavePattern0_Bank13:
	db $02, $46, $8A, $CE, $FF, $FE, $ED, $DC, $CB, $A9, $87, $65, $44, $33, $22, $11
WavePattern1_Bank13:
	db $02, $46, $8A, $CE, $EF, $FF, $FE, $EE, $DD, $CB, $A9, $87, $65, $43, $22, $11
WavePattern2_Bank13:
	db $01, $23, $43, $21, $FE, $CA, $8A, $CE, $01, $23, $43, $21, $FE, $CA, $8A, $CE
WavePattern3_Bank13:
	db $00, $11, $22, $33, $44, $33, $22, $11, $FF, $EE, $CC, $AA, $88, $AA, $CC, $EE
WavePattern4_Bank13:
	db $00, $11, $22, $33, $44, $33, $22, $11, $FF, $EE, $CC, $AA, $88, $AA, $CC, $EE

INCLUDE "audio/drumkits_13.asm"

Data_4cc8e:
	db $11, $22, $44, $88

ChannelPointers_Bank13:
	dw wChannel0
	dw wChannel1
	dw wChannel2
	dw wChannel3
	dw wChannel4
	dw wChannel5
	dw wChannel6
	dw wChannel7

SongHeaderPointers_Bank13: ; 0x4cca2
	dw Music_Nothing13
	dw Music_EndCredits
	dw Music_NameEntry

INCLUDE "audio/music/nothing13.asm"
INCLUDE "audio/music/endcredits.asm"
INCLUDE "audio/music/nameentry.asm"

SoundEffects_Bank13:
	dw Sfx_SoundEffect0_Bank13
	dw Sfx_SoundEffect1_Bank13
	dw Sfx_SoundEffect2_Bank13
	dw Sfx_SoundEffect3_Bank13
	dw Sfx_SoundEffect4_Bank13
	dw Sfx_SoundEffect5_Bank13
	dw Sfx_SoundEffect6_Bank13
	dw Sfx_SoundEffect7_Bank13
	dw Sfx_SoundEffect8_Bank13
	dw Sfx_SoundEffect9_Bank13
	dw Sfx_SoundEffect10_Bank13
	dw Sfx_SoundEffect11_Bank13
	dw Sfx_SoundEffect12_Bank13
	dw Sfx_SoundEffect13_Bank13
	dw Sfx_SoundEffect14_Bank13
	dw Sfx_SoundEffect15_Bank13
	dw Sfx_SoundEffect16_Bank13
	dw Sfx_SoundEffect17_Bank13
	dw Sfx_SoundEffect18_Bank13
	dw Sfx_SoundEffect19_Bank13
	dw Sfx_SoundEffect20_Bank13
	dw Sfx_SoundEffect21_Bank13
	dw Sfx_SoundEffect22_Bank13
	dw Sfx_SoundEffect23_Bank13
	dw Sfx_SoundEffect24_Bank13
	dw Sfx_SoundEffect25_Bank13
	dw Sfx_SoundEffect26_Bank13
	dw Sfx_SoundEffect27_Bank13
	dw Sfx_SoundEffect28_Bank13
	dw Sfx_SoundEffect29_Bank13
	dw Sfx_SoundEffect30_Bank13
	dw Sfx_SoundEffect31_Bank13
	dw Sfx_SoundEffect32_Bank13
	dw Sfx_SoundEffect33_Bank13
	dw Sfx_SoundEffect34_Bank13
	dw Sfx_SoundEffect35_Bank13
	dw Sfx_SoundEffect36_Bank13
	dw Sfx_SoundEffect37_Bank13
	dw Sfx_SoundEffect38_Bank13
	dw Sfx_SoundEffect39_Bank13
	dw Sfx_SoundEffect40_Bank13
	dw Sfx_SoundEffect41_Bank13
	dw Sfx_SoundEffect42_Bank13
	dw Sfx_SoundEffect43_Bank13
	dw Sfx_SoundEffect44_Bank13
	dw Sfx_SoundEffect45_Bank13
	dw Sfx_SoundEffect46_Bank13
	dw Sfx_SoundEffect47_Bank13
	dw Sfx_SoundEffect48_Bank13
	dw Sfx_SoundEffect49_Bank13
	dw Sfx_SoundEffect50_Bank13
	dw Sfx_SoundEffect51_Bank13
	dw Sfx_SoundEffect52_Bank13
	dw Sfx_SoundEffect53_Bank13
	dw Sfx_SoundEffect54_Bank13
	dw Sfx_SoundEffect55_Bank13
	dw Sfx_SoundEffect56_Bank13
	dw Sfx_SoundEffect57_Bank13
	dw Sfx_SoundEffect58_Bank13
	dw Sfx_SoundEffect59_Bank13
	dw Sfx_SoundEffect60_Bank13
	dw Sfx_SoundEffect61_Bank13
	dw Sfx_SoundEffect62_Bank13
	dw Sfx_SoundEffect63_Bank13
	dw Sfx_SoundEffect64_Bank13
	dw Sfx_SoundEffect65_Bank13
	dw Sfx_SoundEffect66_Bank13
	dw Sfx_SoundEffect67_Bank13
	dw Sfx_SoundEffect68_Bank13
	dw Sfx_SoundEffect69_Bank13
	dw Sfx_SoundEffect70_Bank13
	dw Sfx_SoundEffect71_Bank13
	dw Sfx_SoundEffect72_Bank13
	dw Sfx_SoundEffect73_Bank13
	dw Sfx_SoundEffect74_Bank13
	dw Sfx_SoundEffect75_Bank13
	dw Sfx_SoundEffect76_Bank13
	dw Sfx_SoundEffect77_Bank13

INCLUDE "audio/sfx_13.asm"

CryBasePointers_Bank13:
	dw Cry_00_Bank13
	dw Cry_01_Bank13
	dw Cry_02_Bank13
	dw Cry_03_Bank13
	dw Cry_04_Bank13
	dw Cry_05_Bank13
	dw Cry_06_Bank13
	dw Cry_07_Bank13
	dw Cry_08_Bank13
	dw Cry_09_Bank13
	dw Cry_0A_Bank13
	dw Cry_0B_Bank13
	dw Cry_0C_Bank13
	dw Cry_0D_Bank13
	dw Cry_0E_Bank13
	dw Cry_0F_Bank13
	dw Cry_10_Bank13
	dw Cry_11_Bank13
	dw Cry_12_Bank13
	dw Cry_13_Bank13
	dw Cry_14_Bank13
	dw Cry_15_Bank13
	dw Cry_16_Bank13
	dw Cry_17_Bank13
	dw Cry_18_Bank13
	dw Cry_19_Bank13
	dw Cry_1A_Bank13
	dw Cry_1B_Bank13
	dw Cry_1C_Bank13
	dw Cry_1D_Bank13
	dw Cry_1E_Bank13
	dw Cry_1F_Bank13
	dw Cry_20_Bank13
	dw Cry_21_Bank13
	dw Cry_22_Bank13
	dw Cry_23_Bank13
	dw Cry_24_Bank13
	dw Cry_25_Bank13

CryData_Bank13:
; Each entry is in the following format:
; [base cry id], [pitch], [length
	dw $000F, $0080, $0081  ; BULBASAUR
	dw $000F, $0020, $0100  ; IVYSAUR
	dw $000F, $0000, $0140  ; VENUSAUR
	dw $0004, $0060, $00C0  ; CHARMANDER
	dw $0004, $0020, $00C0  ; CHARMELEON
	dw $0004, $0000, $0100  ; CHARIZARD
	dw $001D, $0060, $00C0  ; SQUIRTLE
	dw $001D, $0020, $00C0  ; WARTORTLE
	dw $0013, $0000, $0100  ; BLASTOISE
	dw $0016, $0080, $00A0  ; CATERPIE
	dw $001C, $00CC, $0081  ; METAPOD
	dw $0016, $0077, $00C0  ; BUTTERFREE
	dw $0015, $00EE, $0081  ; WEEDLE
	dw $0013, $00FF, $0081  ; KAKUNA
	dw $0013, $0060, $0100  ; BEEDRILL
	dw $000E, $00DF, $0084  ; PIDGEY
	dw $0014, $0028, $0140  ; PIDGEOTTO
	dw $0014, $0011, $017F  ; PIDGEOT
	dw $0022, $0000, $0100  ; RATTATA
	dw $0022, $0020, $017F  ; RATICATE
	dw $0010, $0000, $0100  ; SPEAROW
	dw $0018, $0040, $0120  ; FEAROW
	dw $0017, $0012, $00C0  ; EKANS
	dw $0017, $00E0, $0090  ; ARBOK
	dw $000F, $00EE, $0081  ; PIKACHU
	dw $0009, $00EE, $0088  ; RAICHU
	dw $0000, $0020, $00C0  ; SANDSHREW
	dw $0000, $00FF, $017F  ; SANDSLASH
	dw $0001, $0000, $0100  ; NIDORAN_F
	dw $0001, $002C, $0160  ; NIDORINA
	dw $000A, $0000, $0100  ; NIDOQUEEN
	dw $0000, $0000, $0100  ; NIDORAN_M
	dw $0000, $002C, $0140  ; NIDORINO
	dw $0009, $0000, $0100  ; NIDOKING
	dw $0019, $00CC, $0081  ; CLEFAIRY
	dw $0019, $00AA, $00A0  ; CLEFABLE
	dw $0024, $004F, $0090  ; VULPIX
	dw $0024, $0088, $00E0  ; NINETALES
	dw $000E, $00FF, $00B5  ; JIGGLYPUFF
	dw $000E, $0068, $00E0  ; WIGGLYTUFF
	dw $001D, $00E0, $0100  ; ZUBAT
	dw $001D, $00FA, $0100  ; GOLBAT
	dw $0008, $00DD, $0081  ; ODDISH
	dw $0008, $00AA, $00C0  ; GLOOM
	dw $0023, $0022, $017F  ; VILEPLUME
	dw $001E, $0020, $0160  ; PARAS
	dw $001E, $0042, $017F  ; PARASECT
	dw $001A, $0044, $00C0  ; VENONAT
	dw $001A, $0029, $0100  ; VENOMOTH
	dw $000B, $00AA, $0081  ; DIGLETT
	dw $000B, $002A, $0090  ; DUGTRIO
	dw $0019, $0077, $0090  ; MEOWTH
	dw $0019, $0099, $017F  ; PERSIAN
	dw $0021, $0020, $00E0  ; PSYDUCK
	dw $0021, $00FF, $00C0  ; GOLDUCK
	dw $000A, $00DD, $00E0  ; MANKEY
	dw $000A, $00AF, $00C0  ; PRIMEAPE
	dw $001F, $0020, $00C0  ; GROWLITHE
	dw $0015, $0000, $0100  ; ARCANINE
	dw $000E, $00FF, $017F  ; POLIWAG
	dw $000E, $0077, $00E0  ; POLIWHIRL
	dw $000E, $0000, $017F  ; POLIWRATH
	dw $001C, $00C0, $0081  ; ABRA
	dw $001C, $00A8, $0140  ; KADABRA
	dw $001C, $0098, $017F  ; ALAKAZAM
	dw $001F, $00EE, $0081  ; MACHOP
	dw $001F, $0048, $00E0  ; MACHOKE
	dw $001F, $0008, $0140  ; MACHAMP
	dw $0021, $0055, $0081  ; BELLSPROUT
	dw $0025, $0044, $00A0  ; WEEPINBELL
	dw $0025, $0066, $014C  ; VICTREEBEL
	dw $001A, $0000, $0100  ; TENTACOOL
	dw $001A, $00EE, $017F  ; TENTACRUEL
	dw $0024, $00F0, $0090  ; GEODUDE
	dw $0024, $0000, $0100  ; GRAVELER
	dw $0012, $00E0, $00C0  ; GOLEM
	dw $0025, $0000, $0100  ; PONYTA
	dw $0025, $0020, $0140  ; RAPIDASH
	dw $0002, $0000, $0100  ; SLOWPOKE
	dw $001F, $0000, $0100  ; SLOWBRO
	dw $001C, $0080, $00E0  ; MAGNEMITE
	dw $001C, $0020, $0140  ; MAGNETON
	dw $0010, $00DD, $0081  ; FARFETCH_D
	dw $000B, $00BB, $0081  ; DODUO
	dw $000B, $0099, $00A0  ; DODRIO
	dw $000C, $0088, $0140  ; SEEL
	dw $000C, $0023, $017F  ; DEWGONG
	dw $0005, $0000, $0100  ; GRIMER
	dw $0007, $00EF, $017F  ; MUK
	dw $0018, $0000, $0100  ; SHELLDER
	dw $0018, $006F, $0160  ; CLOYSTER
	dw $001C, $0000, $0100  ; GASTLY
	dw $001C, $0030, $00C0  ; HAUNTER
	dw $0007, $0000, $017F  ; GENGAR
	dw $0017, $00FF, $0140  ; ONIX
	dw $000D, $0088, $00A0  ; DROWZEE
	dw $000D, $00EE, $00C0  ; HYPNO
	dw $0020, $0020, $0160  ; KRABBY
	dw $0020, $00EE, $0160  ; KINGLER
	dw $0006, $00ED, $0100  ; VOLTORB
	dw $0006, $00A8, $0110  ; ELECTRODE
	dw $000B, $0000, $0100  ; EXEGGCUTE
	dw $000D, $0000, $0100  ; EXEGGUTOR
	dw $0019, $0000, $0100  ; CUBONE
	dw $0008, $004F, $00E0  ; MAROWAK
	dw $0012, $0080, $0140  ; HITMONLEE
	dw $000C, $00EE, $0140  ; HITMONCHAN
	dw $000C, $0000, $0100  ; LICKITUNG
	dw $0012, $00E6, $015D  ; KOFFING
	dw $0012, $00FF, $017F  ; WEEZING
	dw $0004, $0000, $0100  ; RHYHORN
	dw $0011, $0000, $0100  ; RHYDON
	dw $0014, $000A, $0140  ; CHANSEY
	dw $0012, $0000, $0100  ; TANGELA
	dw $0003, $0000, $0100  ; KANGASKHAN
	dw $0019, $0099, $0090  ; HORSEA
	dw $0019, $003C, $0081  ; SEADRA
	dw $0016, $0080, $00C0  ; GOLDEEN
	dw $0016, $0010, $017F  ; SEAKING
	dw $001E, $0002, $00A0  ; STARYU
	dw $001E, $0000, $0100  ; STARMIE
	dw $0020, $0008, $00C0  ; MR_MIME
	dw $0016, $0000, $0100  ; SCYTHER
	dw $000D, $00FF, $017F  ; JYNX
	dw $0006, $008F, $017F  ; ELECTABUZZ
	dw $0004, $00FF, $00B0  ; MAGMAR
	dw $0014, $0000, $0100  ; PINSIR
	dw $001D, $0011, $00C0  ; TAUROS
	dw $0017, $0080, $0080  ; MAGIKARP
	dw $0017, $0000, $0100  ; GYARADOS
	dw $001B, $0000, $0100  ; LAPRAS
	dw $000E, $00FF, $017F  ; DITTO
	dw $001A, $0088, $00E0  ; EEVEE
	dw $001A, $00AA, $017F  ; VAPOREON
	dw $001A, $003D, $0100  ; JOLTEON
	dw $001A, $0010, $00A0  ; FLAREON
	dw $0025, $00AA, $017F  ; PORYGON
	dw $001F, $00F0, $0081  ; OMANYTE
	dw $001F, $00FF, $00C0  ; OMASTAR
	dw $0016, $00BB, $00C0  ; KABUTO
	dw $0018, $00EE, $0081  ; KABUTOPS
	dw $0023, $0020, $0170  ; AERODACTYL
	dw $0005, $0055, $0081  ; SNORLAX
	dw $0009, $0080, $00C0  ; ARTICUNO
	dw $0018, $00FF, $0100  ; ZAPDOS
	dw $0009, $00F8, $00C0  ; MOLTRES
	dw $000F, $0060, $00C0  ; DRATINI
	dw $000F, $0040, $0100  ; DRAGONAIR
	dw $000F, $003C, $0140  ; DRAGONITE
	dw $001E, $0099, $017F  ; MEWTWO
	dw $001E, $00EE, $017F  ; MEW

INCLUDE "audio/cries_13.asm"