--
--[[ API ]]--
module={_NAME="grounds"};system.newGameTimer=0;system.officialMode={"",""}system.setAdmins=function()local a={}for b,c in next,module._FREEACCESS do if c>2 then a[b]=true end end;return a end;table.concat=function(d,e,f,g,h)local i=""e=e or""g,h=g or 1,h or#d;for b,c in next,d do if type(b)=="number"and(b>=g and b<=h)or true then i=i..(f and f(b,c)or c)..e end end;return string.sub(i,1,-1-#e)end;do local j=tfm.exec.newGame;tfm.exec.newGame=function(k)if os.time()>system.newGameTimer then system.newGameTimer=os.time()+6000;j(k)return true end;return false end;local l=tfm.exec.addImage;local m=tfm.exec.removeImage;tfm.exec.addImage=function(...)local n=l(...)if n then system.objects.image[n]=true end;return n end;tfm.exec.removeImage=function(n)m(n)if system.objects.image[n]then system.objects.image[n]=nil end end;local o=ui.addTextArea;ui.addTextArea=function(n,...)o(n,...)if not system.objects.textarea[n]then system.objects.textarea[n]=true end end;local p=tfm.exec.chatMessage;tfm.exec.chatMessage=function(i,q)if#i>1000 then local r=0;while#i>r do p(string.sub(i,r,r+1000),q)r=r+1001 end else p(i,q)end end;local s=system.loadPlayerData;system.loadPlayerData=function(q)if module._STATUS=="official"then return s(q)else if _G["eventPlayerDataLoaded"]then eventPlayerDataLoaded(q,"")end;return true end end;local t=system.savePlayerData;system.savePlayerData=function(q,u)if module._STATUS=="official"then t(q,u)return true else return false end end end;system.isRoom=string.byte(tfm.get.room.name,2)~=3;system.roomAdmins=system.setAdmins()system.miscAttrib=0;system.roomNumber,system.roomAttributes=(function()if system.isRoom then local v,w=string.match(tfm.get.room.name,"%*?#"..module._NAME.."(%d+)(.*)")return tonumber(v)or"",w or""else return"",""end end)()system.isPlayer=function(q)return tfm.get.room.playerList[q]and string.sub(q,1,1)~="*"and tfm.get.room.playerList[q].registrationDate and os.time()-(tfm.get.room.playerList[q].registrationDate or 0)>=432e6 or false end;system.players=function(x)local y,r=0,0;if x then y={}end;for b,c in next,tfm.get.room.playerList do if system.isPlayer(b)then if not c.isDead and not c.isVampire then if x then y[#y+1]=b else y=y+1 end end;r=r+1 end end;if x then return y else return y,r end end;currentTime,leftTime=0,0;system.loadTable=function(z)local d;for A in string.gmatch(z,"[^%.]+")do A=tonumber(A)and tonumber(A)or A;d=d and d[A]or _G[A]end;return d end;system.getTranslation=function(B,q)local C=string.format("mode.%s.translations.%s.%s",system.gameMode,q and mode[system.gameMode].info[q].langue or mode[system.gameMode].langue,B)return system.loadTable(C)or system.loadTable(string.gsub(C,"translations%..-%.",function()return"translations.en."end))end;system.looping=function(f,D)local z=1000/D;local C={}for E=0,1000-z,z do system.newTimer(function()C[#C+1]=system.newTimer(f,1000,true)end,1000+E,false)end;return C end;math.isNegative=function(F,G,H)return F<0 and(G or F)or(H or F)end;math.percent=function(F,I,c)c=c or 100;local J=F/I*c;return math.min(J,c)end;math.pythag=function(K,L,M,N,O)return(K-M)^2+(L-N)^2<=O^2 end;math.setLim=function(P,Q,R)return math.max(Q,math.min(R,P))end;string.split=function(P,S,f)local a={}for c in string.gmatch(P,S)do a[#a+1]=f and f(c)or c end;return a end;string.nick=function(T)return string.gsub(string.lower(T),"%a",string.upper,1)end;table.find=function(d,P,B,f)for b,c in next,d do local g=type(c)=="table"and B and c[B]or c;if(f and f(g)or g)==P then return true,b end end;return false,0 end;table.turnTable=function(F)return type(F)=="table"and F or{F}end;table.random=function(C)return type(C)=="table"and C[math.random(#C)]or math.random()end;table.shuffle=function(C)local U={}for c=1,#C do table.insert(U,math.random(#U),C[c])end;return U end;deactivateAccents=function(V)local W={a={"á","â","à","å","ã","ä"},e={"é","ê","è","ë"},i={"í","î","ì","ï"},o={"ó","ô","ò","õ","ö"},u={"ú","û","ù","ü"}}for b,c in next,W do for g=1,#c do V=string.gsub(V,c[g],tostring(b))end end;return V end;normalizeTime=function(X)return math.floor(X)+(X-math.floor(X)>=.5 and.5 or 0)end;disableChatCommand=function(Y)system.disableChatCommandDisplay(Y,true)system.disableChatCommandDisplay(string.lower(Y),true)system.disableChatCommandDisplay(string.upper(Y),true)end;normalizeTranslation=function()local C=mode[system.gameMode].translations;for b,c in next,C.en do for g,h in next,C do if g~="en"then if not h[b]then h[b]=c end end end end end;xml={}xml.parse=function(Z)Z=string.match(Z,"<P (.-)/>")or""local a={}for _,a0,P in string.gmatch(Z,"([%-%w]+)=([\"'])(.-)%2")do a[_]=P end;return a end;xml.attribFunc=function(Z,a1)local a2=xml.parse(Z)for b,c in next,a1 do if a2[c.attribute]then c.func(a2[c.attribute])end end end;xml.addAttrib=function(Z,a,a3)local a4=string.match(Z,"<P (.-)/>")or""for b,c in next,a do if not string.find(a4,c.tag)then Z=string.gsub(Z,"<P (.-)/>",function(a5)return string.format("<P %s=\"%s\" %s/>",c.tag,c.value,a5)end)end end;if a3 then tfm.exec.newGame(Z)else return Z end end;xml.getCoordinates=function(z)if string.find(z,";")then local F,I;local a6,P=string.match(z,"(%a);(%d+)")P=tonumber(P)if P then if a6=="x"then F=P else I=P end end;return F or 0,I or 0 else local a7={}for F,I in string.gmatch(z,"(%d+) ?, ?(%d+)")do a7[#a7+1]={x=F,y=I}end;return a7 end end;mode=setmetatable({},{__newindex=function(a,b,c)system.gameMode=b;rawset(a,b,c)end})

--[[ Edite abaixo ]]--

mode.NOME_DO_MINIGAME = {
	-- Translations
	translations = {
		en = {
			welcome = "Welcome to #NOME_DO_MINIGAME!",
		},
		br = {
			welcome = "Bem-vindo ao #NOME_DO_MINIGAME!",
		},
	},
	langue = "en",
	-- Init
	init = function()
	
	end,
	-- New Player
	eventNewPlayer = function(player)
		print("<VP>" .. system.getTranslation("welcome"))
	end,
}


--[[ Não mexa ]]--
system.objects={image={},textarea={}}events={}events.eventLoop=function(a,b)_G.currentTime=normalizeTime(a/1e3)_G.leftTime=normalizeTime(b/1e3)end;system.roomSettings={["@"]=function(a)system.roomAdmins[string.nick(a)]=true end,["#"]=function(b)system.miscAttrib=tonumber(b)or 1;system.miscAttrib=math.setLim(system.miscAttrib,1,99)end}system.setRoom=function()if system.isRoom and system.roomAttributes then local c=""for d in next,system.roomSettings do c=c..d end;for e,f in string.gmatch(system.roomAttributes,"(["..c.."])([^"..c.."]+)")do for d,g in next,system.roomSettings do if d==e then g(f)break end end end end end;execute={}system.setRoom()system.init=function(a)for b,c in next,{"Loop","NewGame","PlayerDied","PlayerGetCheese","PlayerVampire","PlayerWon","PlayerLeft","EmotePlayed","Keyboard","Mouse","PopupAnswer","TextAreaCallback","ChatCommand","ChatMessage","SummoningStart","SummoningEnd","SummoningCancel","NewPlayer","PlayerRespawn","ColorPicked"}do local d="event"..c;local e=false;for f,g in next,mode[system.gameMode]do if f==d then execute[d]=g;e=true;break end end;if not e then execute[d]=function()end end;_G[d]=function(...)if events[d]then events[d](...)end;execute[d](...)end end;if a then if mode[system.gameMode].reset then mode[system.gameMode].reset()end end;if _G["eventNewPlayer"]then table.foreach(tfm.get.room.playerList,eventNewPlayer)end;normalizeTranslation()mode[system.gameMode].init()end;system.init()
--