Control

--local local local
tfm.exec.disableAutoShaman()
tfm.exec.disableAutoShaman(true)
click=os.time();

adm="Rianmojang1"

initial_id=2

tfm.exec.disableAutoScore()

--[[
events:
event:xis = X
event:bolinha = O
event:triangulo = Δ
event:quadrado = ₾
]]--

ui.addTextArea(1, "", adm, 402, 267, 393, 121, 0x666666, 0x000000, 1, true)
ui.addTextArea(2, "<font size=\"15\"><p align='center'><a href='event:cima'><B>↑</B></a></p>", adm, 450, 276, 24, 27, 0x000001, 0x000000, 1, true)
ui.addTextArea(3, "<font size=\"15\"><p align='center'><a href='event:esquerda'><B>←</B></a></p>", adm, 415, 316, 24, 27, 0x000001, 0x000000, 1, true)
ui.addTextArea(4, "<font size=\"15\"><p align='center'><a href='event:baixo'><B>↓</B></a></p>", adm, 450, 355, 24, 27, 0x000001, 0x000000, 1, true)
ui.addTextArea(5, "<font size=\"15\"><p align='center'><a href='event:direita'><B>→</B></a></p>", adm, 488, 316, 24, 27, 0x000001, 0x000000, 1, true)
ui.addTextArea(6, "<R><font size=\"18\"><p align='center'><a href='event:bolinha'><B>O</B></a></p>", adm, 756, 316, 24, 24, 0x000001, 0x000000, 1, true)
ui.addTextArea(7, "<VP><font size=\"18\"><p align='center'><a href='event:triangulo'><B>Δ</B></a></p>", adm, 720, 276, 24, 24, 0x000001, 0x000000, 1, true)
ui.addTextArea(8, "<BL><font size=\"17\"><p align='center'><a href='event:xis'><B>X</B></a></p>", adm, 720, 356, 24, 24, 0x000001, 0x000000, 1, true)
ui.addTextArea(9, "<ROSE><font size=\"18\"><p align='center'><a href='event:quadrado'><B>₾</B></a></p>", adm, 685, 316, 24, 24, 0x000001, 0x000000, 1, true)
ui.addTextArea(10, "<font size=\"10\"><p align='center'><a href='event:start'><B>start</B></a></p>", adm, 536, 334, 52, 20, 0x000001, 0x000000, 1, true)
ui.addTextArea(11, "<font size=\"10\"><p align='center'><a href='event:select'><B>select</B></a></p>", adm, 610, 334, 52, 20, 0x000001, 0x000000, 1, true)

function eventNewGame()
	obj=tfm.exec.addShamanObject(initial_id,200,300)

	object={
		id=initial_id,
		x=tfm.get.room.objectList[obj].x,
		y=tfm.get.room.objectList[obj].y,
	}

	for i,v in pairs(tfm.get.room.playerList) do
		score=v.score
	end

	tfm.exec.setPlayerScore(adm,score*2,false)
end

function updateObject()
	tfm.exec.removeObject(obj)
	obj=tfm.exec.addShamanObject(object.id,object.x,object.y)
	object.x=tfm.get.room.objectList[obj].x
	object.y=tfm.get.room.objectList[obj].y
	click=os.time();
end

function eventTextAreaCallback(id, name, link)
	if click < os.time()-500 then
		if link == "quadrado" then
		    object.id=6
		    updateObject()
		end

		if link == "triangulo" then
		    object.id=7
		    updateObject()
		end

		if link == "bolinha" then
		    object.id=2
		    updateObject()
		end

		if link == "cima" then
			object.y = object.y - 10
			updateObject()
		end

		if link == "baixo" then
			object.y = object.y + 10
			updateObject()
		end

		if link == "esquerda" then
			object.x = object.x - 10
			updateObject(id)
		end

		if link == "direita" then
			object.x = object.x + 10
			updateObject(id)
		end
	end
end

tfm.exec.newGame('@7122065')