FANDOM


Created by Taz.

; Date/Time: 7:44:44 PM on 10/7/2010
; By Naddaz on TAZCO

Function Main()

NPC = Actor()

Player = Actor()
Npc = ContextActor()
Chatbox% = OpenDialog(Player, Npc, "Scout in training")
Chatoption% = Rand(1, 10) ;1 of 10 options, for npc chater.
DoEvents(600)



If (Chatoption = 1)
DialogOutPut(Player, Chatbox, "Busy leveling up here, you should talk to Grand Master.", 125, 23, 234)
DialogInput(Player, Chatbox, "Ok")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 2)
DialogOutPut(Player, Chatbox, "I am killing bears, my strength grows the more I level.", 125, 23, 234)
DialogInput(Player, Chatbox, "Ok")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 3)
DialogOutPut(Player, Chatbox, "Can I help you with something?", 125, 23, 234)
DialogInput(Player, Chatbox, "Not really.")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 4)
DialogOutPut(Player, Chatbox, "I dream of fighting all kinds of monsters, as I explore the world. ", 125, 23, 234)
DialogInput(Player, Chatbox, "Really")
DialogOutPut(Player, Chatbox, "Ya I hope to be the best melee fighter around.", 125, 23, 234)
DialogInput(Player, ChatBox, "Good luck to you.")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 5)
DialogOutPut(Player, Chatbox, "Training hard, will allow me to kill player killers even easyer.", 125, 23, 234)
DialogInput(Player, Chatbox, "Maybe you can help me one day.")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 6)
DialogOutPut(Player, Chatbox, "After I get my melee up, the plan is to focus on magic.", 125, 23, 234)
DialogInput(Player, Chatbox, "Ok")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 7)
DialogOutPut(Player, Chatbox, "Not much will stop the power of the Grand Master.", 125, 23, 234)
DialogInput(Player, Chatbox, "Ok")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 8)
DialogOutPut(Player, Chatbox, "I hear that leveling magic will increase spell levels, after you have bought and learned that spell.", 125, 23, 234)
DialogInput(Player, Chatbox, "Ok")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 9)
DialogOutPut(Player, Chatbox, "Abandoning a quest can be helpful, if you no longer want to do that quest.", 125, 23, 234)
DialogInput(Player, Chatbox, "Ok")
CloseDialog(PLayer, Chatbox)
Return

Elseif (Chatoption = 10)
DialogOutPut(Player, Chatbox, "The Grand Master holds a spell on these bears, so they will not attack newcomers.", 125, 23, 234)
DialogInput(Player, Chatbox, "Ok")
CloseDialog(PLayer, Chatbox)
Return
EndIf 


End Function