LaurelForestPokemonOnlyCharmander:
	faceplayer
	cry CHARMANDER
	waitsfx
	opentext
	loadvar wItemQuantityChangeBuffer, 1
	checkitem GIANT_ROCK
	sif false, then
		setevent EVENT_POKEONLY_TALKED_TO_CHARMANDER
		jumptext .explanation_text
	sendif
	checkevent EVENT_POKEONLY_TALKED_TO_CHARMANDER
	setevent EVENT_POKEONLY_TALKED_TO_CHARMANDER
	sif false
		writetext .explanation_text
	checkevent EVENT_POKEONLY_CHARMANDER_PUSHED_BOULDER_1
	iftrue .blockWater
	loadvar wItemQuantityChangeBuffer, 2
	checkitem GIANT_ROCK
	iftrue .placeBothRocks
	writetext .first_rock_text
	closetext
	scall .PlaceFirstRock
	jumptext .need_another_rock_text
.placeBothRocks
	writetext .both_rocks_text
	closetext
	scall .PlaceFirstRock
	jump .afterPlacingFirstRock
.blockWater
	writetext .second_rock_text
	closetext
.afterPlacingFirstRock
	changeblock 48, 26, $85
	playsound SFX_STRENGTH
	reloadmappart
	pause 64
	changeblock 46, 26, $5d
	playsound SFX_WHIRLWIND
	reloadmappart
	pause 16
	changeblock 44, 26, $5d
	reloadmappart
	pause 16
	changeblock 44, 28, $5d
	playsound SFX_WHIRLWIND
	reloadmappart
	pause 16
	changeblock 46, 28, $5d
	reloadmappart
	pause 16
	changeblock 46, 30, $5d
	playsound SFX_WHIRLWIND
	reloadmappart
	pause 16
	scall TriggerFillPond
	reloadmappart
	
	setevent EVENT_POKEONLY_CHARMANDER_PUSHED_BOULDER_2
	takeitem GIANT_ROCK, 1
	showtext .water_vanished_text
	writehalfword .cross_bridge
	checkcode VAR_FACING
	sif =, RIGHT
		writehalfword .cross_bridge_player_to_the_left
	applymovement 3, -1
	disappear 3
	end

.PlaceFirstRock
	changeblock $30, $1a, $cf
	playsound SFX_STRENGTH
	reloadmappart
	pause 64
	setevent EVENT_POKEONLY_CHARMANDER_PUSHED_BOULDER_1
	takeitem GIANT_ROCK, 1
	end
	
.cross_bridge
	step_left
	step_left
	step_left
	step_up
	step_up
	step_up
	step_right
	step_up
	step_up
	step_end

.cross_bridge_player_to_the_left
	step_down
	step_left
	step_left
	step_up
	step_left
	step_up
	step_up
	step_up
	step_up
	step_up
	step_end

.explanation_text
	db TX_COMPRESSED, $62, $7d, $11

	db $c4, $02, $80, $be, $70, $18, $d6, $0a, $3e, $7a
	db $47, $90, $c8, $cc, $96, $34, $5a, $26, $5a
	db $e5, $56, $01, $5c, $c0, $28, $40, $fa, $88, $93, $59
	db $fc, $06, $93, $30, $77, $8a, $2b, $e8, $59, $52, $3c
	db $bc, $f9, $c0, $e1, $84, $c1, $61, $7e, $3e
	db $09, $50, $6a, $24, $48, $5a, $41, $f1

	db $00, $52, $4d, $67, $13, $a8, $96, $18, $ac
	db $de, $40, $5f, $39, $56, $82, $96, $19, $c9
	db $d8, $0b, $49, $ca, $b6, $cd, $70, $2d, $5c, $0e
	db $0f, $5a, $4e, $55, $a0, $a9, $e0, $a5
	db $a6, $80

.first_rock_text
	db TX_COMPRESSED, $c7, $d5, $f2, $71, $61, $65, $4a

	db $94, $01, $49, $db, $8f, $8f, $94, $dc, $a8, $2b, $52

	db $e2, $03, $85, $a4, $26, $0e, $e0, $41, $8d, $7c
	db $69, $e2

.second_rock_text
	db TX_COMPRESSED, $ac, $81, $b4, $9a, $e2, $c2, $ca, $97

	db $10, $18, $e7, $78, $a2, $0c, $e0, $f0, $96, $91
	db $a1, $ea, $87, $de, $ca, $82, $b5, $2a, $78
	db $29, $e2

.both_rocks_text
	db TX_COMPRESSED, $2a, $a0, $ce, $ea, $f9, $38, $b0, $b2, $a4, $8a
	
	db $50, $05, $27, $6e, $3e, $3e, $53, $72, $a0, $ad, $4b
	
	db $88, $0e, $16, $90, $99, $69, $37, $e2, $b0, $da
	db $5e, $08, $31, $af
	db $8d, $3c, $40

.need_another_rock_text
	db TX_COMPRESSED, $62, $fb, $f4, $f0, $7e, $04, $87, $16, $16, $54
	db $9e, $1a, $09, $4c, $86, $40, $b5, $ca, $65
	db $84, $02, $be, $85, $95, $28, $1c, $30, $96, $93
	db $7a, $ad, $b3, $5f

	db $80, $0a, $e8, $25, $67, $07, $84, $a8, $e2, $77
	db $2f, $69, $03, $69, $35, $c5, $85, $95, $2f, $7b
	db $d4, $d0

.water_vanished_text
	db TX_COMPRESSED, $73, $a7, $f2, $a0, $d5, $f8, $90, $d5, $32, $3c
	db $bd, $69, $39, $56, $d9, $ae, $03, $69, $06, $84
	db $aa, $b4, $ed, $cc, $35, $17

	db $4a, $00, $1e, $18, $fe, $dd, $9a, $ff, $1d, $16
	db $3c, $c8, $5f, $19, $39, $8a, $f5, $95, $28, $90, $be, $7f
	db $54, $f8, $5f, $9a, $4c, $cc, $ee, $78
	db $d3, $c4

