if Yap = 0 {MsgBox.Msg = "Oh, hi again, "+global.Name+"!         #You know, daddy would like you to spend dinner with #us...          #Personally, that doesn't sound too bad..."
Talk=1}

if Yap = 1 {MsgBox.Msg = "#Would you like have dinner with us?            #I'm certain you'll like it..."
MsgBox.QTxt = "Sure.#uhh... no."
MsgBox.Question = 2
MsgBox.QChoose = 0
}

if Yap = 2 { if MsgBox.QChoose = 1 {MsgBox.Msg = "#...but what about daddy?          #He's rather anxious to have you over..." 
}else MsgBox.Msg = "#Thank you, "+global.Name+"!            #...he'll just WANT to meet you!"
MsgBox.Question = 0
}

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

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 {
Talk=1
MsgBox.Msg = "#...an honorary knight? Wow..."
GameCam.direction=point_direction(GameCam.x,GameCam.y,x,y)
}

if Yap = 12 {
Talk=0
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 = 13 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 = 14 {MsgBox.Msg = "#What?"
GameCam.direction=point_direction(GameCam.x,GameCam.y,x,y)
Talk=1
}

if Yap = 15 {MsgBox.Msg = "You have proven yourself worthy for her hand in #marriage as far as I'm concerned...          #...well, that is, if she feels it should be arranged."
Talk=0
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
}

if Yap = 16 {MsgBox.Msg = "Daddy!           #I know he's cute, but I can't marry him yet!          #There's so much more studying for me to do before #I let a guy in my life!"
Talk=1
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
GameCam.direction=GameCam.direction-32
direction= point_direction(x,y,DaKing.x,DaKing.y)
}

if Yap = 17 {MsgBox.Msg = "#...please, pardon my daughter.           #She IS a little immature."
Talk=0
GameCam.direction=GameCam.direction+24
}

if Yap = 18 {MsgBox.Msg = "...oh, daddy...         #It's not that I hate the idea of marriage... it's just I'm #not ready for it.          #Marriage is scary when you think about it."
GameCam.direction=point_direction(GameCam.x,GameCam.y,x,y)
Talk=1
}
if Yap = 19 {MsgBox.Msg = "#Well...         #Maybe some other time, dear?"
Talk=0
GameCam.x=1064
GameCam.y=448
GameCam.z=24
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
}

if Yap = 20 {
MsgBox.Msg = "#Perhaps, daddy... if he's interested..."
direction=point_direction(x,y,Rick.x,Rick.y)
Talk=1
}

if Yap = 21 {MsgBox.Msg = "Anyway, Sir "+global.Name+", I shall give you the Sierr #Royal Crest, a shiny medallion with the mark of Sierr #upon it."
GameCam.x=1064
GameCam.y=392
GameCam.z=24
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
Talk=0
}

if Yap = 22 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 = 23 MsgBox.Msg = "#It will be your duty to serve the crown, but you don't #have any attachment to it."

if Yap = 24 {
Rick.Talk=1
MsgBox.Msg = "#Thank you... I think."
GameCam.direction= point_direction(GameCam.x,GameCam.y,Rick.x,Rick.y)
}

if Yap = 25 {
Rick.Talk=0
MsgBox.Msg = "#Very good, Sir "+global.Name+", very good.       #Now, who wants another round?"
GameCam.x=1064
GameCam.y=448
GameCam.z=24
GameCam.direction=point_direction(GameCam.x,GameCam.y,DaKing.x,DaKing.y)
}

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

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