pokecrystal-board/maps/WhirlIslandLugiaChamber.asm
Remy Oukaour c05b7f41dd Renaming: (fix #412)
- MapTriggers / maptrigger → SceneScripts / scene_script
- XYTriggers / xy_trigger → CoordEvents / coord_event
- Signposts / signpost → BGEvents / bg_event
- PersonEvents / person_event → ObjectEvents / object_event
2017-12-24 14:33:17 -05:00

63 lines
1.0 KiB
NASM

const_value set 2
const WHIRLISLANDLUGIACHAMBER_LUGIA
WhirlIslandLugiaChamber_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 1
dbw MAPCALLBACK_OBJECTS, .Lugia
.Lugia:
checkevent EVENT_FOUGHT_LUGIA
iftrue .NoAppear
checkitem SILVER_WING
iftrue .Appear
jump .NoAppear
.Appear:
appear WHIRLISLANDLUGIACHAMBER_LUGIA
return
.NoAppear:
disappear WHIRLISLANDLUGIACHAMBER_LUGIA
return
Lugia:
faceplayer
opentext
writetext LugiaText
cry LUGIA
pause 15
closetext
setevent EVENT_FOUGHT_LUGIA
writecode VAR_BATTLETYPE, BATTLETYPE_FORCEITEM
loadwildmon LUGIA, 60
startbattle
disappear WHIRLISLANDLUGIACHAMBER_LUGIA
reloadmapafterbattle
end
LugiaText:
text "Gyaaas!"
done
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