Speech Select

local tArg = {...}

local X = tArg[1]
local Y = tArg[2]
local Character = tArg[3]
local Reaction = tArg[4]
local Topic = tArg[5]
local Noun = tArg[6]
local Adjec = tArg[7]

local Options--Happy,Angry,Scared,Neutral
local Text
if Topic == "PointOut" then
    Options = {"thats a pretty nice @A","WHY MUST THERE BE A @A!","why is that there?(Pointing at @A)","hey its a @A"}
elseif Topic == "Disc" then
    Options = {"hey! isnt that a @B @A?","A Pretty Useless @B @A","get that @B @A away from me!","its a @B @A"}
elseif Topic == "Personal" then
    Options = {"thats my @A"}
elseif Topic == "Character" then

elseif Topic == "Tragedy" then

end

Text = Options[Reaction]
Text = (string.sub(Options[Reaction],1,string.find(Options[Reaction],"@A")-1)..Noun)..string.sub(Options[Reaction],string.find(Options[Reaction],"@A")+1,string.len(Options[Reaction]))
if Adjec ~= nil then Text = string.sub(Text,1,string.find(Text,"@B")-1)..Adjec..string.sub(Text,string.find(Text,"@B")+1,string.len(Text)) end
term.setCursorPos(X,Y)
term.write(Text)