Wedding edited by Mousetat

groom='Mousetat'
bride='Pixlelight'


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 and name==bride 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