if Yap = 0 MsgBox.Msg = "So, "+global.Name+", you've returned!         #Listen, since you've done a lot of great service for us, #the King has taken notice, and wants you over for #dinner."

if Yap = 1 {MsgBox.Msg = "#Would you like have dinner with the King?            #I'm sure he has a reason..."
MsgBox.QTxt = "Sure.#uhh... no."
MsgBox.Question = 2
MsgBox.QChoose = 0
}

if Yap = 2 { if MsgBox.QChoose = 1{MsgBox.Msg = "#...still...          #Think about it." 
}else MsgBox.Msg = "#All right, "+global.Name+"...            #...I shall inform the King at once."
MsgBox.Question = 0
}

if Yap = 3 {if MsgBox.QChoose = 0{
MsgBox.Msg = "?."
instance_create(0,0,SimpleFadeInOut)
MsgBox.Msg = "?."
MsgBox.Dist = 0
MsgBox.Act = 0
MsgBox.Letter = 1
Yap = 4
alarm[4]=30
Persist=8
Rick.Strafe=0
Targeted=0
} else MsgBox.Msg = "!"
}

if Yap = 5{
SimpleFadeInOut.Act = 1
Yap = 6
with NPC {
visible=0
}
DaKing.visible=1
visible=1
DaKing.x=1064
DaKing.y=280
DaKing.z=8

x=1106
y=360
z=8

Rick.x=1012
Rick.y=360
Rick.z=8
Rick.direction=0
Rick.visible=1
GameCam.x=1064
GameCam.y=448
GameCam.z=24
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
}

if Yap = 6 MsgBox.Msg = "#So... you're "+global.Name+", the young hero of Sierr...        #I was wondering why you kept passing through here."

if Yap = 7 MsgBox.Msg = "Well, "+global.Name+", it has come to my attention #that you have gained the trust of my daughter, the #lovely princess Sabrina.           #Even my loyal subjects agree."

if Yap = 8 MsgBox.Msg = "I must aknowledge you have great skill with a sword.         #Much like your father, you've bested a Dragon or #two in battle.         #...and you've certainly helped us out, too."

if Yap = 9 MsgBox.Msg = "I believe that my lovely daughter would want you to #become the man to help out the kingdom when it's #in need.        #So, without further ado..."

if Yap = 10 MsgBox.Msg = "I know this isn't really formal, but by the power #vested in me, King Johannes the fifth, I dub thee, #SIR "+global.Name+", an honorary knight of Sierr."

if Yap = 11 {MsgBox.Msg = "This means that the kingdom of Sierr can depend #upon you, but you're not bound to the rules of the #Royal Guard."
GameCam.x=1064
GameCam.y=400
GameCam.z=24
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
}

if Yap = 12 MsgBox.Msg = "This also has some interesting perks, like discounts #at stores, an estate if you wish... and, if you want, #and if she so desires, my daughter's hand."

if Yap = 13 MsgBox.Msg = "Anyway, Sir "+global.Name+", I shall give you the Sierr #Royal Crest, a shiny medallion with the mark of Sierr #upon it."

if Yap = 14 MsgBox.Msg = "Once you have it, everyone will know that you will be #there to protect them from evil.        #...and you get 50-percent-off discounts at local stores!           #Isn't that nice?"

if Yap = 15 MsgBox.Msg = "#It will be your duty to serve the crown, but you don't #have any attachment to it."

if Yap = 16 {MsgBox.Msg = "Though I do not know what your feelings are for #my daughter are at this point in time, I must request #that you try to bring her back in one piece."
GameCam.direction= point_direction(GameCam.x,GameCam.y,Rick.x,Rick.y)
}

if Yap = 17 MsgBox.Msg = "The Dragonian wants to give Sabrina the forbidden #kiss... which means not only would she rather die, #but we all could, too."

if Yap = 18 {MsgBox.Msg = "If you don't do it for her, do it for me, and for your #own life as well...        #I'm counting on you, Sir "+global.Name+"!"
GameCam.x=1064
GameCam.y=448
GameCam.z=24
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
}

if Yap = 19 {global.SabHeart+=1
global.SabLove +=90
global.SQItemD = 19
ds_list_add(global.KHDB,"SLOVE")
Yap = 20
alarm[4] =30
instance_create(0,0,SimpleFadeInOut)
MsgBox.Msg = "?."
MsgBox.Dist = 0
MsgBox.Act = 0
MsgBox.Letter = 1
}

if Yap = 21{MsgBox.Msg = "!"
SimpleFadeInOut.Act = 1
Dialog = "Scripts/SabrinaC.txt"
Persist=0
with NPC {visible=1}
DaKing.x=692
DaKing.y=180
DaKing.z=24
x=964
y=972
z=8
}