pokecrystal-board/maps/KurtsHouse.asm
2015-07-10 02:45:35 -06:00

710 lines
13 KiB
NASM

KurtsHouse_MapScriptHeader:
; trigger count
db 0
; callback count
db 1
; callbacks
dbw 2, UnknownScript_0x18e154
UnknownScript_0x18e154:
checkevent EVENT_CLEARED_SLOWPOKE_WELL
iffalse UnknownScript_0x18e177
checkevent $00c0
iftrue UnknownScript_0x18e177
checkflag $0050
iftrue UnknownScript_0x18e16f
disappear $5
appear $2
disappear $6
appear $3
return
UnknownScript_0x18e16f:
disappear $2
appear $5
disappear $3
appear $6
UnknownScript_0x18e177:
return
KurtScript_0x18e178:
faceplayer
loadfont
checkevent $0035
iftrue UnknownScript_0x18e1cc
checkevent EVENT_CLEARED_SLOWPOKE_WELL
iftrue UnknownScript_0x18e1bf
writetext UnknownText_0x18e473
closetext
loadmovesprites
special Functionc48f
setevent $06fa
checkcode VAR_FACING
if_equal $1, UnknownScript_0x18e1ab
spriteface $0, DOWN
playsound SFX_FLY
applymovement $2, MovementData_0x18e466
playsound SFX_EXIT_BUILDING
disappear $2
waitbutton
special RestartMapMusic
end
UnknownScript_0x18e1ab:
spriteface $0, DOWN
playsound SFX_FLY
applymovement $2, MovementData_0x18e46c
playsound SFX_EXIT_BUILDING
disappear $2
waitbutton
special RestartMapMusic
end
UnknownScript_0x18e1bf:
writetext UnknownText_0x18e615
keeptextopen
verbosegiveitem LURE_BALL, 1
iffalse UnknownScript_0x18e2b2
setevent $0035
UnknownScript_0x18e1cc:
checkevent $0000
iftrue UnknownScript_0x18e29f
checkevent $0258
iftrue UnknownScript_0x18e2b4
checkevent $0259
iftrue UnknownScript_0x18e2ca
checkevent $025a
iftrue UnknownScript_0x18e2e0
checkevent $025b
iftrue UnknownScript_0x18e2f6
checkevent $025c
iftrue UnknownScript_0x18e30c
checkevent $025d
iftrue UnknownScript_0x18e322
checkevent $025e
iftrue UnknownScript_0x18e338
checkevent EVENT_CAN_GIVE_GS_BALL_TO_KURT
iftrue UnknownScript_0x18e34e
UnknownScript_0x18e202:
checkevent $0001
iftrue UnknownScript_0x18e212
checkevent $0002
iftrue UnknownScript_0x18e212
writetext UnknownText_0x18e6c9
closetext
UnknownScript_0x18e212:
checkitem RED_APRICORN
iftrue UnknownScript_0x18e249
checkitem BLU_APRICORN
iftrue UnknownScript_0x18e249
checkitem YLW_APRICORN
iftrue UnknownScript_0x18e249
checkitem GRN_APRICORN
iftrue UnknownScript_0x18e249
checkitem WHT_APRICORN
iftrue UnknownScript_0x18e249
checkitem BLK_APRICORN
iftrue UnknownScript_0x18e249
checkitem PNK_APRICORN
iftrue UnknownScript_0x18e249
checkevent $0001
iftrue UnknownScript_0x18e2ae
checkevent $0002
iftrue UnknownScript_0x18e243
loadmovesprites
end
UnknownScript_0x18e243:
writetext UnknownText_0x18e6c9
closetext
loadmovesprites
end
UnknownScript_0x18e249:
writetext UnknownText_0x18e736
keeptextopen
setevent $0002
special Function88018
if_equal $0, UnknownScript_0x18e2a5
if_equal $59, UnknownScript_0x18e275
if_equal $5c, UnknownScript_0x18e27b
if_equal $5d, UnknownScript_0x18e281
if_equal $61, UnknownScript_0x18e287
if_equal $63, UnknownScript_0x18e28d
if_equal $65, UnknownScript_0x18e293
setevent $0258
jump UnknownScript_0x18e299
UnknownScript_0x18e275:
setevent $0259
jump UnknownScript_0x18e299
UnknownScript_0x18e27b:
setevent $025a
jump UnknownScript_0x18e299
UnknownScript_0x18e281:
setevent $025b
jump UnknownScript_0x18e299
UnknownScript_0x18e287:
setevent $025c
jump UnknownScript_0x18e299
UnknownScript_0x18e28d:
setevent $025d
jump UnknownScript_0x18e299
UnknownScript_0x18e293:
setevent $025e
jump UnknownScript_0x18e299
UnknownScript_0x18e299:
setevent $0000
setflag $0050
UnknownScript_0x18e29f:
writetext UnknownText_0x18e779
closetext
loadmovesprites
end
UnknownScript_0x18e2a5:
writetext UnknownText_0x18e7bc
closetext
loadmovesprites
end
UnknownScript_0x18e2ab:
setevent $0001
UnknownScript_0x18e2ae:
writetext UnknownText_0x18e82a
closetext
UnknownScript_0x18e2b2:
loadmovesprites
end
UnknownScript_0x18e2b4:
checkflag $0050
iftrue UnknownScript_0x18e3c5
writetext UnknownText_0x18e7fb
keeptextopen
verbosegiveitem2 LEVEL_BALL, $16
iffalse UnknownScript_0x18e2b2
UnknownScript_0x18e2c4:
clearevent $0258
jump UnknownScript_0x18e2ab
UnknownScript_0x18e2ca:
checkflag $0050
iftrue UnknownScript_0x18e3c5
writetext UnknownText_0x18e7fb
keeptextopen
verbosegiveitem2 LURE_BALL, $16
iffalse UnknownScript_0x18e2b2
UnknownScript_0x18e2da:
clearevent $0259
jump UnknownScript_0x18e2ab
UnknownScript_0x18e2e0:
checkflag $0050
iftrue UnknownScript_0x18e3c5
writetext UnknownText_0x18e7fb
keeptextopen
verbosegiveitem2 MOON_BALL, $16
iffalse UnknownScript_0x18e2b2
UnknownScript_0x18e2f0:
clearevent $025a
jump UnknownScript_0x18e2ab
UnknownScript_0x18e2f6:
checkflag $0050
iftrue UnknownScript_0x18e3c5
writetext UnknownText_0x18e7fb
keeptextopen
verbosegiveitem2 FRIEND_BALL, $16
iffalse UnknownScript_0x18e2b2
UnknownScript_0x18e306:
clearevent $025b
jump UnknownScript_0x18e2ab
UnknownScript_0x18e30c:
checkflag $0050
iftrue UnknownScript_0x18e3c5
writetext UnknownText_0x18e7fb
keeptextopen
verbosegiveitem2 FAST_BALL, $16
iffalse UnknownScript_0x18e2b2
UnknownScript_0x18e31c:
clearevent $025c
jump UnknownScript_0x18e2ab
UnknownScript_0x18e322:
checkflag $0050
iftrue UnknownScript_0x18e3c5
writetext UnknownText_0x18e7fb
keeptextopen
verbosegiveitem2 HEAVY_BALL, $16
iffalse UnknownScript_0x18e2b2
UnknownScript_0x18e332:
clearevent $025d
jump UnknownScript_0x18e2ab
UnknownScript_0x18e338:
checkflag $0050
iftrue UnknownScript_0x18e3c5
writetext UnknownText_0x18e7fb
keeptextopen
verbosegiveitem2 LOVE_BALL, $16
iffalse UnknownScript_0x18e2b2
UnknownScript_0x18e348:
clearevent $025e
jump UnknownScript_0x18e2ab
UnknownScript_0x18e34e:
checkevent $00bf
iftrue UnknownScript_0x18e368
checkitem GS_BALL
iffalse UnknownScript_0x18e202
writetext UnknownText_0x18e8ab
closetext
loadmovesprites
setevent $00bf
takeitem GS_BALL, 1
setflag $0050
end
UnknownScript_0x18e368:
checkflag $0050
iffalse UnknownScript_0x18e378
writetext UnknownText_0x18e934
closetext
writetext UnknownText_0x18e949
closetext
loadmovesprites
end
UnknownScript_0x18e378:
writetext UnknownText_0x18e95c
closetext
loadmovesprites
setevent $00c0
clearevent EVENT_CAN_GIVE_GS_BALL_TO_KURT
clearevent $00bf
special Functionc48f
pause 20
showemote $0, $2, 30
checkcode VAR_FACING
if_equal $1, UnknownScript_0x18e3a2
spriteface $0, DOWN
playsound SFX_FLY
applymovement $2, MovementData_0x18e466
jump UnknownScript_0x18e3ac
UnknownScript_0x18e3a2:
spriteface $0, DOWN
playsound SFX_FLY
applymovement $2, MovementData_0x18e46c
UnknownScript_0x18e3ac:
playsound SFX_EXIT_BUILDING
disappear $2
clearevent $07a4
waitbutton
special RestartMapMusic
domaptrigger GROUP_AZALEA_TOWN, MAP_AZALEA_TOWN, $2
end
KurtScript_0x18e3bd:
faceplayer
loadfont
checkevent $00bf
iftrue UnknownScript_0x18e3e0
UnknownScript_0x18e3c5:
checkevent $00bb
iffalse UnknownScript_0x18e3d4
writetext UnknownText_0x18e7d8
closetext
loadmovesprites
spriteface $5, UP
end
UnknownScript_0x18e3d4:
writetext UnknownText_0x18e863
closetext
loadmovesprites
spriteface $5, UP
setevent $00bb
end
UnknownScript_0x18e3e0:
writetext UnknownText_0x18e934
closetext
spriteface $5, UP
writetext UnknownText_0x18e949
closetext
loadmovesprites
end
KurtsGranddaughter1:
faceplayer
checkevent $0000
iftrue KurtsGranddaughter2Subscript
checkevent $0001
iftrue KurtsGranddaughterFunScript
checkevent $00c0
iftrue .Lonely
checkevent $0030
iftrue .Dad
checkevent EVENT_CLEARED_SLOWPOKE_WELL
iftrue .SlowpokeBack
checkevent $06fa
iftrue .Lonely
loadfont
writetext KurtsGranddaughterSlowpokeGoneText
closetext
loadmovesprites
end
.SlowpokeBack
loadfont
writetext KurtsGranddaughterSlowpokeBackText
closetext
loadmovesprites
end
.Lonely
loadfont
writetext KurtsGranddaughterLonelyText
closetext
loadmovesprites
end
.Dad
loadfont
writetext KurtsGranddaughterDadText
closetext
loadmovesprites
end
KurtsGranddaughter2:
faceplayer
KurtsGranddaughter2Subscript:
loadfont
checkevent $00bf
iftrue .GSBall
writetext KurtsGranddaughterHelpText
closetext
loadmovesprites
spriteface $6, RIGHT
end
.GSBall
writetext KurtsGranddaughterGSBallText
closetext
loadmovesprites
spriteface $6, RIGHT
end
KurtsGranddaughterFunScript:
loadfont
writetext KurtsGranddaughterFunText
closetext
loadmovesprites
end
KurtsHouseSlowpoke:
faceplayer
loadfont
writetext KurtsHouseSlowpokeText
cry SLOWPOKE
closetext
loadmovesprites
end
KurtsHouseOakPhoto:
jumptext KurtsHouseOakPhotoText
KurtsHouseCelebiStatue:
jumptext KurtsHouseCelebiStatueText
KurtsHouseBookshelf:
jumpstd difficultbookshelf
KurtsHouseRadio:
jumpstd radio2
MovementData_0x18e466:
big_step_down
big_step_down
big_step_down
big_step_down
big_step_down
step_end
MovementData_0x18e46c:
big_step_right
big_step_down
big_step_down
big_step_down
big_step_down
big_step_down
step_end
UnknownText_0x18e473:
text "Hm? Who are you?"
para "<PLAYER>, eh? You"
line "want me to make"
cont "some BALLS?"
para "Sorry, but that'll"
line "have to wait."
para "Do you know TEAM"
line "ROCKET? Ah, don't"
para "worry. I'll tell"
line "you anyhow."
para "TEAM ROCKET's an"
line "evil gang that"
para "uses #MON for"
line "their dirty work."
para "They're supposed"
line "to have disbanded"
cont "three years ago."
para "Anyway, they're at"
line "the WELL, cutting"
para "off SLOWPOKETAILS"
line "for sale!"
para "So I'm going to"
line "go give them a"
cont "lesson in pain!"
para "Hang on, SLOWPOKE!"
line "Old KURT is on his"
cont "way!"
done
UnknownText_0x18e615:
text "KURT: Hi, <PLAYER>!"
para "You handled your-"
line "self like a real"
cont "hero at the WELL."
para "I like your style!"
para "I would be honored"
line "to make BALLS for"
para "a trainer like"
line "you."
para "This is all I have"
line "now, but take it."
done
UnknownText_0x18e6c9:
text "KURT: I make BALLS"
line "from APRICORNS."
para "Collect them from"
line "trees and bring"
cont "'em to me."
para "I'll make BALLS"
line "out of them."
done
UnknownText_0x18e736:
text "KURT: You have an"
line "APRICORN for me?"
para "Fine! I'll turn it"
line "into a BALL."
done
UnknownText_0x18e779:
text "KURT: It'll take a"
line "day to make you a"
para "BALL. Come back"
line "for it later."
done
UnknownText_0x18e7bc:
text "KURT: Oh…"
line "That's a letdown."
done
UnknownText_0x18e7d8:
text "KURT: I'm working!"
line "Don't bother me!"
done
UnknownText_0x18e7fb:
text "KURT: Ah, <PLAYER>!"
line "I just finished"
cont "your BALL. Here!"
done
UnknownText_0x18e82a:
text "KURT: That turned"
line "out great."
para "Try catching"
line "#MON with it."
done
UnknownText_0x18e863:
text "KURT: Now that my"
line "granddaughter is"
para "helping me, I can"
line "work much faster."
done
UnknownText_0x18e8ab:
text "Wh-what is that?"
para "I've never seen"
line "one before."
para "It looks a lot"
line "like a # BALL,"
para "but it appears to"
line "be something else."
para "Let me check it"
line "for you."
done
UnknownText_0x18e934:
text "I'm checking it"
line "now."
done
UnknownText_0x18e949:
text "Ah-ha! I see!"
line "So…"
done
UnknownText_0x18e95c:
text "<PLAYER>!"
para "This BALL started"
line "to shake while I"
cont "was checking it."
para "There must be"
line "something to this!"
done
KurtsGranddaughterSlowpokeGoneText:
text "The SLOWPOKE are"
line "gone… Were they"
para "taken away by bad"
line "people?"
done
KurtsGranddaughterLonelyText:
text "Grandpa's gone…"
line "I'm so lonely…"
done
KurtsGranddaughterSlowpokeBackText:
text "The SLOWPOKE my"
line "dad gave me came"
para "back! Its TAIL is"
line "growing back too!"
done
KurtsGranddaughterDadText:
text "Dad works at SILPH"
line "where he studies"
cont "# BALLS."
para "I have to stay"
line "home with Grandpa"
cont "and SLOWPOKE."
done
KurtsGranddaughterHelpText:
text "I get to help"
line "Grandpa now!"
para "We'll make good"
line "BALLS for you, so"
cont "please wait!"
done
KurtsGranddaughterFunText:
text "It's fun to make"
line "BALLS!"
done
KurtsGranddaughterGSBallText:
text "Grandpa's checking"
line "a BALL right now."
para "So I'm waiting"
line "till he's done."
done
KurtsHouseSlowpokeText:
text "SLOWPOKE: …"
line "Yawn?"
done
KurtsHouseOakPhotoText:
text "…A young PROF."
line "OAK?"
done
KurtsHouseCelebiStatueText:
text "It's a statue of"
line "the forest's pro-"
cont "tector."
done
KurtsHouse_MapEventHeader:
; filler
db 0, 0
; warps
db 2
warp_def $7, $3, 4, GROUP_AZALEA_TOWN, MAP_AZALEA_TOWN
warp_def $7, $4, 4, GROUP_AZALEA_TOWN, MAP_AZALEA_TOWN
; xy triggers
db 0
; signposts
db 7
signpost 1, 6, $0, KurtsHouseRadio
signpost 0, 8, $0, KurtsHouseOakPhoto
signpost 0, 9, $0, KurtsHouseOakPhoto
signpost 1, 5, $0, KurtsHouseBookshelf
signpost 1, 2, $0, KurtsHouseBookshelf
signpost 1, 3, $0, KurtsHouseBookshelf
signpost 1, 4, $0, KurtsHouseCelebiStatue
; people-events
db 5
person_event SPRITE_KURT, 6, 7, $6, $0, 255, 255, $0, 0, KurtScript_0x18e178, $073e
person_event SPRITE_TWIN, 7, 9, $3, $0, 255, 255, $0, 0, KurtsGranddaughter1, $078c
person_event SPRITE_SLOWPOKE, 7, 10, $1, $0, 255, 255, $0, 0, KurtsHouseSlowpoke, $06fd
person_event SPRITE_KURT, 7, 18, $7, $0, 255, 255, $0, 0, KurtScript_0x18e3bd, $073f
person_event SPRITE_TWIN, 8, 15, $9, $0, 255, 255, $0, 0, KurtsGranddaughter2, $078d