if ds_list_find_index(global.KHDB,global.CurrentRoom+string(8)) = -1{
if Yap=0 MsgBox.Msg="Hello, hello, hello!        #I like challenging adventuring types to my questions.         #In other words, I challenge people to quizzes."
if Yap=1 {
if instance_number(TabSaved)=1{
MsgBox.Msg="You look like you're ready for the Gaius Quiz...          #Want to take it?         #It'll cost 20 Ryubies to do so..."
MsgBox.Question=2
MsgBox.QChoose=0
MsgBox.QTxt="Sure#No"
}else MsgBox.Msg="...but before you take my quiz, you must #go save Tabitha.         #I know, that sounds stupid, but it'll be worth it."}

if Yap=2{
if instance_number(TabSaved)=1{
if MsgBox.QChoose=0 {
if global.Cash>= 20 {MsgBox.Msg="#Very good, lad!         #First question..."
global.Cash-=20
MsgBox.QChoose=3
}else MsgBox.Msg="Hey, you need more money before you take this!        #Come back later when you have 20 Ryubies to #spend, okay?"
} else Yap=18
MsgBox.Question=0
}else MsgBox.Msg="!"
}

if Yap=3 {
if MsgBox.QChoose=3{MsgBox.Msg="#You know Tiel, that cute pink-haired girl?          #What kind of a girl is she?"
MsgBox.QTxt = "A. Human#B. Arling#C. Elfling#D. Fairian"
MsgBox.Question=4
MsgBox.QChoose=0
}else MsgBox.Msg="!"
}

if Yap=4 {
if MsgBox.QChoose=2 MsgBox.Msg="Yes, an Elfling! The pointy ears and lovely eyes #give it away...         #not to mention her big heart..." else Yap=17
MsgBox.Question=0
}

if Yap=5 {MsgBox.Msg="Next Question!        #You know the green-haired guy?         #What's his name?"
MsgBox.QTxt = "A. Jules#B. Verne#C. Herman#D. Melville"
MsgBox.Question=4
MsgBox.QChoose=0}

if Yap=6 {
if MsgBox.QChoose=1 MsgBox.Msg="#That's right! ...it's not his full name, but I'll #give it to you." else Yap=17
MsgBox.Question=0
}

if Yap=7 {MsgBox.Msg="#Question Number 3!       #What's the standard price for three Hearts?"
MsgBox.QTxt = "A. 10 Ryubies#B. 20 Ryubies#C. 50 Ryubies#D. 100 Ryubies"
MsgBox.Question=4
MsgBox.QChoose=0}

if Yap=8 {if MsgBox.QChoose=0 MsgBox.Msg="#Yep, that's about right! They'd be cheaper if you #were a knight of Sierr, though..." else Yap=17
MsgBox.Question=0
}

if Yap=9 {MsgBox.Msg="#Number 4!         #How do you save your game?"
MsgBox.QTxt = "A. Pause, then select Save#B. Hold A, B, Select, and Start#C. Does it automatically#D. Talk to a Crystal Statue"
MsgBox.Question=4
MsgBox.QChoose=0}

if Yap=10 {if MsgBox.QChoose=3 MsgBox.Msg="#That's right. This game relies on save points.        #...whatever a game is..." else Yap=17
MsgBox.Question=0
}

if Yap=11 {MsgBox.Msg="Fifth Question!         #Tiel lives with someone else in town.         #Who does she live with?"
MsgBox.QTxt = "A. Me#B. Tabitha#C. Charlotte#D. Some old man"
MsgBox.Question=4
MsgBox.QChoose=0}

if Yap=12 {if MsgBox.QChoose=1 MsgBox.Msg="Very good. ...though I bet you'd love it if she lived #with you.          #You'll get your chance, though." else Yap=17
MsgBox.Question=0
}

if Yap=13 {MsgBox.Msg="...Final Question!          #Have you and Tiel ever been... you know, a thing?         #...like an item or a couple when you were younger?"
MsgBox.QTxt = "A. Yes!#B. ...uhh...#C. No#D. Objection!"
MsgBox.Question=4
MsgBox.QChoose=0}

if Yap=14 {if MsgBox.QChoose=0 {
MsgBox.Msg="I knew it! I knew it all along!         #As your reward, I'm making you carry a lot more #bombs!"
BomBag.BombsMax+=30
BomBag.Bombs+=30
} else Yap=17
MsgBox.Question=0
}
if Yap=15 MsgBox.Msg="#Say hi to Tiel once in a while.         #One day, if you try hard enough, she'll return the favor."

if Yap=16 {MsgBox.Msg="!"
ds_list_add(global.KHDB,global.CurrentRoom+string(8))
sound_play(ItemGet)
}
if Yap=17 MsgBox.Msg="Whoops!        #You guessed wrong.       #Now, you'll have to try again, and it'll still #cost you..."
if Yap=18 MsgBox.Msg="#Well, try it again later!         #See you then!"
if Yap=19 MsgBox.Msg="!"
}else{
if Yap=0 MsgBox.Msg="You've already passed my quiz...         #Now go find my buddies and try THEIR quizzes.        #...or did you do that already?"
if Yap=1 MsgBox.Msg="!"
}