groom='groom'
bride='bride'


f=400
e=350
a=0
t=0
p=0
finale=0

groomanswer=0
brideanswer=0
positiongroomlock=1
positionbridelock=0
bridewalking=0
stop=5
facepaw=0
p={}

tfm.exec.disableAutoShaman(true)
tfm.exec.disableAutoTimeLeft(true)
tfm.exec.disableAfkDeath(true)
tfm.exec.disableAutoNewGame(true)
tfm.exec.newGame('@5014080')

function eventNewGame()
tfm.exec.movePlayer(groom,1380, 290,offset,0,0,offset)
tfm.exec.killPlayer(bride)
system.disableChatCommandDisplay("start",true)
for name,player in pairs(tfm.get.room.playerList) do
p[name]={facepaw=false}
end
end

function eventNewPlayer(a)
p[name]={facepaw=false}
tfm.exec.respawnPlayer(a)
end

function eventChatCommand(name, message)
if name==groom and message=="start" then
t=48
end
end

function eventLoop(currentTime,timeRemaining)
t=t+1
if positiongroomlock==1 then
tfm.exec.movePlayer(groom,1380, 290,offset,0,0,offset)
end

if positionbridelock==1 then
tfm.exec.movePlayer(bride,1320, 290,offset,0,0,offset)
end

if t==50 then
ui.addTextArea(1,"I believe everyone is here. We will now begin.",nil, 1350, 180,150,40, color,color,Alpha,false)
end

if t==60 then
ui.addTextArea(1,"Please welcome the bride!",nil, 1350, 180,150,40, color,color,Alpha,false)
tfm.exec.respawnPlayer(bride)
tfm.exec.movePlayer(bride,400, 350,offset,0,0,offset)
bridewalking=1
stop=0
end


if stop==0 then

if bridewalking==1 then
tfm.exec.movePlayer(bride,f, 350,offset,0,0,offset)
f=f+20
end

if f > 1145 then
e=e-3.5
tfm.exec.movePlayer(bride,f, e,offset,0,0,offset)
end

if f>=1300 then
stop=1
bridewalking=0
positionbridelock=1
ui.addTextArea(1,"She is here!",nil, 1350, 180,150,40, color,color,Alpha,false)
t=1000
end
end

if t==1006 then
ui.addTextArea(1,"Let us begin the ceremony.",nil, 1350, 180,150,40, color,color,Alpha,false)
end

if t==1012 then
ui.addTextArea(1,"We gathered to witness and celebrate",nil, 1350, 180,150,40, color,color,Alpha,false)
end

if t==1018 then
ui.addTextArea(1,"The union of 2 souls in ethernal companionship.",nil, 1350, 180,150,40, color,color,Alpha,false)
end

if t==1024 then
ui.addTextArea(1,"May they journey forth in prosperity and poverty",nil, 1350, 180,150,40, color,color,Alpha,false)
end

if t==1030 then
ui.addTextArea(1,"and in joy and hardship",nil, 1350, 180,150,40, color,color,Alpha,false)
end

if t==1036 then
ui.addTextArea(1,'Do you, '..groom..', agree to be bound together in love now and forever?',nil, 1350, 160,150,70, color,color,Alpha,false)
groomanswer=1
end

if groomanswer==1 and t==1037 then
ui.addPopup(5, 1, "Do you agree to marry "..bride.." and be bound together in love now and forever?", groom, 272, 131, 253, true)
end

if groomanswer==2 then
ui.addTextArea(3,"I do. Now and forever",nil ,1330,200,100)
t=2000
groomanswer=3
end

if t==2006 and groomanswer==3 then
ui.removeTextArea(3,nil)
ui.addTextArea(1,'And do you, '..bride..', agree to be bound together in love now and forever?',nil, 1350, 160,150,70, color,color,Alpha,false)
ui.addPopup(6, 1, "Do you agree to marry "..groom.." and be bound together in love now and forever?", bride, 272, 131, 253, true)
end

if brideanswer==1 then
ui.addTextArea(3,"I do. Now and forever",nil ,1270,200,100)
t=3000
brideanswer=2
end

if t==3006 and brideanswer==2 then
ui.removeTextArea(3,nil)
ui.addTextArea(1,'Then congratiulation! I declare this couple to be wed. Now you may kiss your spouse',nil, 1350, 180,150,50, color,color,Alpha,false)
end

if t==3012 then
ui.removeTextArea(3,nil)
tfm.exec.movePlayer(groom,1380, 290,offset,0,0,offset)
tfm.exec.movePlayer(bride,1320, 290,offset,0,0,offset)
tfm.exec.playEmote(bride,3,nil)
tfm.exec.playEmote(groom,3,nil)
for name,player in pairs(tfm.get.room.playerList) do
if name==groom or name==bride then
else
tfm.exec.playEmote(name,5,nil)
end
end
finale=1
positiongroomlock=0
positionbridelock=0
end

if t>=3020 and t<9000 then
ui.addTextArea(1,"Now lets partyyy!",nil, 1350, 180,150,40, color,color,Alpha,false)
for name,player in pairs(tfm.get.room.playerList) do
tfm.exec.playEmote(name,0,nil)
end
t=3020
end

if t>=9012 and t<9036 then
ui.addTextArea(1,'This is a disaster! The worst wedding I have ever attended! YOU WILL ALL PERISH!',nil, 1350, 160,200,70, color,color,Alpha,false)

for name,player in pairs(tfm.get.room.playerList) do
if name==bride or name==groom then
if groomanswer==5 then
tfm.exec.playEmote(bride,2,nil)
tfm.exec.playEmote(groom,1,nil)
else
tfm.exec.playEmote(bride,1,nil)
tfm.exec.playEmote(groom,2,nil)
end
elseif p[name].facepaw==false then
tfm.exec.playEmote(name,7,nil)
p[name].facepaw=true
end
end
end
if t==9036 then
positiongroomlock=0
positionbridelock=0
for name,player in pairs(tfm.get.room.playerList) do
tfm.exec.killPlayer(name)
end
ui.addTextArea(1,"I'M THE RULER OF 'EM ALL! HAHAHAHAHA!!",nil, 1350, 160,160,70, color,color,Alpha,false)
end
if t==9050 then
system.exit()
end
end

function eventPopupAnswer(popupID, name, answer)
if popupID==5 and name==groom then
if answer=="yes" then
groomanswer=2
else
groomanswer=5
t=9000
ui.addTextArea(3,"Screw this, I quit!",nil ,1330,200,100)
end
elseif popupID==6 then
if answer=="yes" then
brideanswer=1
else
brideanswer=5
t=9000
ui.addTextArea(3,"Screw this, I quit!",nil ,1270,200,100)
end
end
end