pokecrystal-board/maps/IcePathB1F.asm

const_value set 2
	const ICEPATHB1F_BOULDER1
	const ICEPATHB1F_BOULDER2
	const ICEPATHB1F_BOULDER3
	const ICEPATHB1F_BOULDER4
	const ICEPATHB1F_POKE_BALL

IcePathB1F_MapScriptHeader:
.MapTriggers:
	db 0

.MapCallbacks:
	db 1

	; callbacks

	dbw MAPCALLBACK_CMDQUEUE, .SetUpStoneTable

.SetUpStoneTable:
	writecmdqueue .CommandQueue
	return

.CommandQueue:
	dbw CMDQUEUE_STONETABLE, .StoneTable ; check if any stones are sitting on a warp
	dw 0 ; filler

.StoneTable:
	stonetable 3, ICEPATHB1F_BOULDER1, .Boulder1
	stonetable 4, ICEPATHB1F_BOULDER2, .Boulder2
	stonetable 5, ICEPATHB1F_BOULDER3, .Boulder3
	stonetable 6, ICEPATHB1F_BOULDER4, .Boulder4
	db -1

.Boulder1:
	disappear ICEPATHB1F_BOULDER1
	clearevent EVENT_BOULDER_IN_ICE_PATH_1A
	jump .FinishBoulder

.Boulder2:
	disappear ICEPATHB1F_BOULDER2
	clearevent EVENT_BOULDER_IN_ICE_PATH_2A
	jump .FinishBoulder

.Boulder3:
	disappear ICEPATHB1F_BOULDER3
	clearevent EVENT_BOULDER_IN_ICE_PATH_3A
	jump .FinishBoulder

.Boulder4:
	disappear ICEPATHB1F_BOULDER4
	clearevent EVENT_BOULDER_IN_ICE_PATH_4A
	jump .FinishBoulder

.FinishBoulder:
	pause 30
	scall .BoulderFallsThrough
	opentext
	writetext IcePathBoulderFellThroughText
	waitbutton
	closetext
	end

.BoulderFallsThrough:
	playsound SFX_STRENGTH
	earthquake 80
	end


IcePathB1FBoulder:
	jumpstd strengthboulder

IcePathB1FIron:
	itemball IRON

IcePathB1FHiddenMaxPotion:
	dwb EVENT_ICE_PATH_B1F_HIDDEN_MAX_POTION, MAX_POTION


IcePathBoulderFellThroughText:
	text "The boulder fell"
	line "through."
	done


IcePathB1F_MapEventHeader:
	; filler
	db 0, 0

.Warps:
	db 8
	warp_def $f, $3, 3, ICE_PATH_1F
	warp_def $3, $11, 1, ICE_PATH_B2F_MAHOGANY_SIDE
	warp_def $2, $b, 3, ICE_PATH_B2F_MAHOGANY_SIDE ; hole
	warp_def $7, $4, 4, ICE_PATH_B2F_MAHOGANY_SIDE ; hole
	warp_def $c, $5, 5, ICE_PATH_B2F_MAHOGANY_SIDE ; hole
	warp_def $d, $c, 6, ICE_PATH_B2F_MAHOGANY_SIDE ; hole
	warp_def $19, $5, 4, ICE_PATH_1F
	warp_def $1b, $b, 1, ICE_PATH_B2F_BLACKTHORN_SIDE

.XYTriggers:
	db 0

.Signposts:
	db 1
	signpost 30, 17, SIGNPOST_ITEM, IcePathB1FHiddenMaxPotion

.PersonEvents:
	db 5
	person_event SPRITE_BOULDER, 7, 11, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_1
	person_event SPRITE_BOULDER, 8, 7, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_2
	person_event SPRITE_BOULDER, 9, 8, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_3
	person_event SPRITE_BOULDER, 7, 17, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_4
	person_event SPRITE_POKE_BALL, 35, 5, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, PERSONTYPE_ITEMBALL, 0, IcePathB1FIron, EVENT_ICE_PATH_B1F_IRON
Person event constants for each map 2015-11-27 00:22:14 -05:00			`const_value set 2`
			`const ICEPATHB1F_BOULDER1`
			`const ICEPATHB1F_BOULDER2`
			`const ICEPATHB1F_BOULDER3`
			`const ICEPATHB1F_BOULDER4`
			`const ICEPATHB1F_POKE_BALL`

Trim address comments from maps. 2015-07-10 02:45:35 -06:00			`IcePathB1F_MapScriptHeader:`
Added labels to different parts of the map script and event headers 2015-07-21 00:02:21 -04:00			`.MapTriggers:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`db 0`

Added labels to different parts of the map script and event headers 2015-07-21 00:02:21 -04:00			`.MapCallbacks:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`db 1`

			`; callbacks`

Mr Pokemons House 2016-01-06 16:59:56 -05:00			`dbw MAPCALLBACK_CMDQUEUE, .SetUpStoneTable`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
CmdQueues 2015-11-18 23:16:25 -05:00			`.SetUpStoneTable:`
			`writecmdqueue .CommandQueue`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`return`

CmdQueues 2015-11-18 23:16:25 -05:00			`.CommandQueue:`
More annotations of HP bar animations, including an oversight by GameFreak resulting in super-slow HP bars for Pokemon with over 48 HP 2016-03-08 19:54:06 -05:00			`dbw CMDQUEUE_STONETABLE, .StoneTable ; check if any stones are sitting on a warp`
			`dw 0 ; filler`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
CmdQueues 2015-11-18 23:16:25 -05:00			`.StoneTable:`
No more ItemFragment 2015-12-15 10:55:56 -05:00			`stonetable 3, ICEPATHB1F_BOULDER1, .Boulder1`
			`stonetable 4, ICEPATHB1F_BOULDER2, .Boulder2`
			`stonetable 5, ICEPATHB1F_BOULDER3, .Boulder3`
			`stonetable 6, ICEPATHB1F_BOULDER4, .Boulder4`
			`db -1`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
CmdQueues 2015-11-18 23:16:25 -05:00			`.Boulder1:`
Person event constants for each map 2015-11-27 00:22:14 -05:00			`disappear ICEPATHB1F_BOULDER1`
Updated signpost items and person_event flags 2015-07-18 15:46:38 -04:00			`clearevent EVENT_BOULDER_IN_ICE_PATH_1A`
CmdQueues 2015-11-18 23:16:25 -05:00			`jump .FinishBoulder`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
CmdQueues 2015-11-18 23:16:25 -05:00			`.Boulder2:`
Person event constants for each map 2015-11-27 00:22:14 -05:00			`disappear ICEPATHB1F_BOULDER2`
Updated signpost items and person_event flags 2015-07-18 15:46:38 -04:00			`clearevent EVENT_BOULDER_IN_ICE_PATH_2A`
CmdQueues 2015-11-18 23:16:25 -05:00			`jump .FinishBoulder`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
CmdQueues 2015-11-18 23:16:25 -05:00			`.Boulder3:`
Person event constants for each map 2015-11-27 00:22:14 -05:00			`disappear ICEPATHB1F_BOULDER3`
Updated signpost items and person_event flags 2015-07-18 15:46:38 -04:00			`clearevent EVENT_BOULDER_IN_ICE_PATH_3A`
CmdQueues 2015-11-18 23:16:25 -05:00			`jump .FinishBoulder`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
CmdQueues 2015-11-18 23:16:25 -05:00			`.Boulder4:`
Person event constants for each map 2015-11-27 00:22:14 -05:00			`disappear ICEPATHB1F_BOULDER4`
Updated signpost items and person_event flags 2015-07-18 15:46:38 -04:00			`clearevent EVENT_BOULDER_IN_ICE_PATH_4A`
CmdQueues 2015-11-18 23:16:25 -05:00			`jump .FinishBoulder`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
CmdQueues 2015-11-18 23:16:25 -05:00			`.FinishBoulder:`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00			`pause 30`
CmdQueues 2015-11-18 23:16:25 -05:00			`scall .BoulderFallsThrough`
opentext and breeding 2015-12-09 18:25:44 -05:00			`opentext`
No more ItemFragment 2015-12-15 10:55:56 -05:00			`writetext IcePathBoulderFellThroughText`
Rename several script commands 2015-11-25 10:16:29 -05:00			`waitbutton`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00			`closetext`
			`end`

CmdQueues 2015-11-18 23:16:25 -05:00			`.BoulderFallsThrough:`
Music and sound effect constants in map events. 2014-04-30 06:04:35 -04:00			`playsound SFX_STRENGTH`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00			`earthquake 80`
			`end`

Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
Trim address comments from maps. 2015-07-10 02:45:35 -06:00			`IcePathB1FBoulder:`
More std_scripts enums. 2015-06-23 15:02:58 -06:00			`jumpstd strengthboulder`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
No more ItemFragment 2015-12-15 10:55:56 -05:00			`IcePathB1FIron:`
			`itemball IRON`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
Replaced SignpostItem with Hidden(ItemName) 2015-12-15 11:21:58 -05:00			`IcePathB1FHiddenMaxPotion:`
Updated signpost items and person_event flags 2015-07-18 15:46:38 -04:00			`dwb EVENT_ICE_PATH_B1F_HIDDEN_MAX_POTION, MAX_POTION`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
No more ItemFragment 2015-12-15 10:55:56 -05:00			`IcePathBoulderFellThroughText:`
Text macros in maps/. Looks fine at a glance. 2014-03-06 00:29:44 -05:00			`text "The boulder fell"`
			`line "through."`
			`done`
remove incbins in IcePathB1F 2013-04-30 22:32:03 -04:00
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
Trim address comments from maps. 2015-07-10 02:45:35 -06:00			`IcePathB1F_MapEventHeader:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`; filler`
			`db 0, 0`

Added labels to different parts of the map script and event headers 2015-07-21 00:02:21 -04:00			`.Warps:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`db 8`
Replaced GROUP_, MAP_ references with the map macro Updated macros that rely on the GROUP_, MAP_ constants to use the map macro Added GROUP_NONE and MAP_NONE for the sake of compatibility with this new scheme Added new macro elevfloor to simplify the definition of elevators under this new scheme 2015-07-23 12:59:19 -04:00			`warp_def $f, $3, 3, ICE_PATH_1F`
			`warp_def $3, $11, 1, ICE_PATH_B2F_MAHOGANY_SIDE`
More annotations of HP bar animations, including an oversight by GameFreak resulting in super-slow HP bars for Pokemon with over 48 HP 2016-03-08 19:54:06 -05:00			`warp_def $2, $b, 3, ICE_PATH_B2F_MAHOGANY_SIDE ; hole`
			`warp_def $7, $4, 4, ICE_PATH_B2F_MAHOGANY_SIDE ; hole`
			`warp_def $c, $5, 5, ICE_PATH_B2F_MAHOGANY_SIDE ; hole`
			`warp_def $d, $c, 6, ICE_PATH_B2F_MAHOGANY_SIDE ; hole`
Replaced GROUP_, MAP_ references with the map macro Updated macros that rely on the GROUP_, MAP_ constants to use the map macro Added GROUP_NONE and MAP_NONE for the sake of compatibility with this new scheme Added new macro elevfloor to simplify the definition of elevators under this new scheme 2015-07-23 12:59:19 -04:00			`warp_def $19, $5, 4, ICE_PATH_1F`
			`warp_def $1b, $b, 1, ICE_PATH_B2F_BLACKTHORN_SIDE`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
Added labels to different parts of the map script and event headers 2015-07-21 00:02:21 -04:00			`.XYTriggers:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`db 0`

Added labels to different parts of the map script and event headers 2015-07-21 00:02:21 -04:00			`.Signposts:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`db 1`
Replaced SignpostItem with Hidden(ItemName) 2015-12-15 11:21:58 -05:00			`signpost 30, 17, SIGNPOST_ITEM, IcePathB1FHiddenMaxPotion`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00
Added labels to different parts of the map script and event headers 2015-07-21 00:02:21 -04:00			`.PersonEvents:`
Split map scripts, text, events from main.asm The commit we deserve 2013-02-17 01:54:07 -05:00			`db 5`
Globally introduce PERSONTYPE constants 2015-11-15 15:07:20 -05:00			`person_event SPRITE_BOULDER, 7, 11, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_1`
			`person_event SPRITE_BOULDER, 8, 7, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_2`
			`person_event SPRITE_BOULDER, 9, 8, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_3`
			`person_event SPRITE_BOULDER, 7, 17, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, IcePathB1FBoulder, EVENT_BOULDER_IN_ICE_PATH_4`
No more ItemFragment 2015-12-15 10:55:56 -05:00			`person_event SPRITE_POKE_BALL, 35, 5, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, PERSONTYPE_ITEMBALL, 0, IcePathB1FIron, EVENT_ICE_PATH_B1F_IRON`