G,O,a,c={},{},0,"00cccc"

function eventNewPlayer(nick)
system.bindMouse(nick,true)
end

for nick in pairs(tfm.get.room.playerList) do
eventNewPlayer(nick)
end

function eventMouse(nick,x,y)
if a==0 then
for v,k in pairs({{"player",37,G,"playerName"},{"object",36,O,"id"}}) do
i=1
for v,stat in pairs(tfm.get.room[k[1].."List"]) do
if stat.x>x-20 and stat.x<x+20 and stat.y>y-20 and stat.y<y+20 then
tfm.exec.displayParticle(k[2],stat.x,stat.y,0,0,0,0)
k[3][i ]={id=stat[k[4]],t=stat.type,g=stat.ghost}
a,i,c=1,i+1,"cccc00"
end
end
end
eventLoop()
elseif a>0 then
for v,k in pairs({{G,"Player",37},{O,"Object",36}}) do
for v,cos in pairs(k[1]) do
tfm.exec["move"..k[2]](cos.id,x,y,n,1,1)
tfm.exec.displayParticle(k[3],x,y,0,0,0,0)
end
end
if a==2 then
for v,obj in pairs(O) do
tfm.exec.addShamanObject(obj.t,x,y,n,n,n,obj.g)
end
end
G,O,a,c={},{},0,"00cccc"
end
ui.addTextArea(1,"",nil,x-15,y-15,30,30,"0x"..c,"0x"..c,0.5)
end

function eventLoop()
for v,k in pairs({{G,"Player"},{O,"Object"}}) do
for v,cos in pairs(k[1]) do
tfm.exec["move"..k[2]](cos.id,10,-500,false,1,-40)
end
end
end

function eventNewGame()
if O~=nil then
a=2
end
end