pokecrystal/maps/WhirlIslandLugiaChamber.asm

63 lines
1.0 KiB
NASM
Raw Normal View History

2015-11-27 05:22:14 +00:00
const_value set 2
const WHIRLISLANDLUGIACHAMBER_LUGIA
2015-07-10 08:45:35 +00:00
WhirlIslandLugiaChamber_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 1
2016-04-07 10:13:59 +00:00
dbw MAPCALLBACK_OBJECTS, .Lugia
.Lugia:
2013-09-24 07:48:58 +00:00
checkevent EVENT_FOUGHT_LUGIA
2016-04-07 10:13:59 +00:00
iftrue .NoAppear
checkitem SILVER_WING
2016-04-07 10:13:59 +00:00
iftrue .Appear
jump .NoAppear
.Appear:
2015-11-27 05:22:14 +00:00
appear WHIRLISLANDLUGIACHAMBER_LUGIA
return
.NoAppear:
2015-11-27 05:22:14 +00:00
disappear WHIRLISLANDLUGIACHAMBER_LUGIA
return
2016-04-07 10:13:59 +00:00
Lugia:
faceplayer
2015-12-09 23:25:44 +00:00
opentext
2016-04-07 10:13:59 +00:00
writetext LugiaText
cry LUGIA
pause 15
2015-11-25 15:16:29 +00:00
closetext
2013-09-24 07:48:58 +00:00
setevent EVENT_FOUGHT_LUGIA
writecode VAR_BATTLETYPE, BATTLETYPE_FORCEITEM
loadwildmon LUGIA, 60
startbattle
2015-11-27 05:22:14 +00:00
disappear WHIRLISLANDLUGIACHAMBER_LUGIA
reloadmapafterbattle
end
2016-04-07 10:13:59 +00:00
LugiaText:
text "Gyaaas!"
done
2015-07-10 08:45:35 +00:00
WhirlIslandLugiaChamber_MapEventHeader:
; filler
db 0, 0
.Warps:
db 1
warp_def $d, $9, 3, WHIRL_ISLAND_B2F
.CoordEvents:
db 0
.BGEvents:
db 0
.ObjectEvents:
db 1
object_event SPRITE_LUGIA, 5, 9, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, Lugia, EVENT_WHIRL_ISLAND_LUGIA_CHAMBER_LUGIA