Advertisement
Rawoas13

Untitled

Jan 19th, 2020
970
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 84.28 KB | None | 0 0
  1. adm={"name","name"}
  2. mod={"name","name"}
  3. map="@5925400"
  4. ban={}
  5. mice={}
  6. T = {
  7.         br = {
  8.                 title = {
  9.                         'adm',
  10.                         'mod',
  11.                         '</B><R><B>erro',
  12.                         'normal',
  13.                         'páscoa',
  14.                         'carnaval',
  15.                         'dia dos namorados',
  16.                         'pesca',
  17.                         'halloween',
  18.                         'natal',
  19.                 };
  20.                 cat = {
  21.                         'Rato',
  22.                         'Shaman',
  23.                         'Mapas',
  24.                         'Trapaças',
  25.                         'Configurações',
  26.                         'Eventos',
  27.                         '<R>Importante<BV>',
  28.                         '</B><R><B>Importante',
  29.                 };
  30.                 acess = {
  31.                         'Você não pode acessar esta área.',
  32.                         '<J>Senha:',
  33.                         '<R>Senha Incorreta',
  34.                         'Banido!',
  35.                         'Desbanido!',
  36.                         'A sala está bloqueada',
  37.                         'Senha: ',
  38.                         'A senha atual é: ',
  39.                         'Não há senha',
  40.                         'A nova senha é: ',
  41.                         'agora é <R>Adm</R>',
  42.                         'agora é <J>Mod</J>',
  43.                         'não é mais <R>Adm</R>',
  44.                         'não é mais <J>Mod</J>',
  45.                         'Senha removida',
  46.                 };
  47.                 tabs = {
  48.                         {'Seta','Caixa pequena','Caixa grande','Tábua pequena','Tábua grande','Bola','Trampolim','Bigorna','Cannon (CN)','Espírito (SP)','Portal azul','Portal laranja','Balão','Runa'},
  49.                         {'Maçã','Ovelha','Tábua de gelo','Tábua de chocolate','Nuvem','Bolha','Mini-tábua','Caixa de acompanhamento','Runa estável','Tábua super longa','Caixa triangulo','Tábua S','Pedra'},
  50.                         {'Galinha','Bola de neve','Flecha','Peixe','Baiacu','Avião de papel','Abóbora','Lápide','Bolinha de papel'},
  51.                         {'Bomba','Rato congelado','Caixa Secreta'},
  52.                         {'Queijo','Reviver','Meep!','Morrer','Teleport único','Cor do Nome','Vampiro'},
  53.                         {'Queijo','Meep!','Matar','Teleport único','Toca','Respawn','Cor do Nome','Score','Shaman','Vampiro'},
  54.                         {'Tempo','Carregar Mapa','Cafofo da tribo','Mapa Vanilla','Nome do mapa','Nome do shaman'},
  55.                         {'Fly','Speed','Super Pulo','TelePulo','Trampolim','Explosão'},
  56.                         {'Morte por Afk','Habilidades do Shaman','Novo jogo automático','Score automático','Shaman automático','Tempo restante automático','Respawn Automático','Invocação Automática','Nevar'},
  57.                         {'Páscoa','Carnaval','Dia dos Namorados','Pesca / Verão','Halloween','Natal'},
  58.                         {'2014 - 801','2015 - Mundo do Doce','2015 - Mundo do Pirulito'},
  59.                         {'2014 - Churros'},
  60.                         {'2013 - Defilante','2014 - Paris'},
  61.                         {'x - Navio','2013 - Shaman','2014 - Selva','2014 - Cachoeira','2014 - Dinossauro','2014 - Ilha','2014 - Nuvens','2015 - Pedras','2015 - Templo','2015 - Selva','2015 - Museu'},
  62.                         {'2013 - Mansão','2013 - Bar','2014 - Rua','2014 - Cemitério','2014 - Quarto'},
  63.                         {'2013 - Cafofo','2014 - Troll'},
  64.                         {'Voodoo','Ban','Unban','Bloquear sala','Adm','Mod','Unadmin','Unmod','Desativar Lua'},
  65.                 };
  66.                 p = {
  67.                         'Sexo',
  68.                         'Alma gêmea',
  69.                         'Tribo',
  70.                         'Nível',
  71.                         'Morte / Queijo / Toca',
  72.                         'Título atual',
  73.                         'Mapas',
  74.                         'Vezes como Shaman',
  75.                         'Rato',
  76.                         'Queijos coletados em primeiro (First)',
  77.                         'Rodadas Jogadas',
  78.                         'Medalhas',
  79.                         '<N><B>Nenhum</B>',
  80.                         '<ROSE><B>♀ Feminino</B><N>',
  81.                         '<CH><B>♂ Masculino</B><N>',
  82.                         'Ratinho',
  83.                 };
  84.                 ot = {
  85.                         'Objetos',
  86.                         'Habilidades',
  87.                         'Consumíveis',
  88.                         'Outros',
  89.                         'Fechar',
  90.                         'Ganhou uma nova medalha',
  91.                         'Ratos para bloquear a sala',
  92.                 };
  93.                 pu = {
  94.                         'Nome do jogador:',
  95.                         'Cor:',
  96.                         'Valor de pontos:',
  97.                         'Valor do tempo:',
  98.                         'Código:',
  99.                         'Texto:',
  100.                         'Desativado para ',
  101.                         'Ligado',
  102.                         'Desligado',
  103.                         'Poder de explosão: (Número)',
  104.                         'Quem vai controlar:',
  105.                         'Quem vai ser controlado:',
  106.                         'U: Pular\nH: Esquerda\nJ: Abaixar\nK: Direita',
  107.                         'Máximo de ratos na sala:',
  108.                 };
  109.         };
  110.         en = {
  111.                 title = {
  112.                         'adm',
  113.                         'mod',
  114.                         '</B><R><B>error',
  115.                         'normal',
  116.                         'easter',
  117.                         'carnival',
  118.                         "valentine's day",
  119.                         'fish',
  120.                         'halloween',
  121.                         'christmas',
  122.                 };
  123.                 cat = {
  124.                         'Mice',
  125.                         'Shaman',
  126.                         'Maps',
  127.                         'Cheats',
  128.                         'Configurations',
  129.                         'Events',
  130.                         '<R>Important<BV>',
  131.                         '</B><R><B>Important',
  132.                 };
  133.                 acess = {
  134.                         'You can not access this area.',
  135.                         '<J>Password:',
  136.                         '<R>Incorrect Password',
  137.                         'Banned!',
  138.                         'Unbanned!',
  139.                         'The room is blocked',
  140.                         'Password:',
  141.                         'The current password is: ',
  142.                         'There is no password',
  143.                         'The new password is: ',
  144.                         'is now <R>Adm</R>',
  145.                         'is now <J>Mod</J>',
  146.                         'is not more <R>Adm</R>',
  147.                         'is not more <J>Mod</J>',
  148.                         'Password deleted',
  149.                 };
  150.                 tabs = {
  151.                         {'Arrow','Small box','Big box','Small plank','Big plank','Ball','Trampoline','Anvil','Cannon (CN)','Spirit (SP)','Blue portal','Orange portal','Balloon','Rune'},
  152.                         {'Apple','Sheep','Ice Plank','Choco Plank','Cloud','Bubble','Tiny Plank','Companion Crate','Stable Rune','Very Long Plank','Triangle Box','S-Shaped Plank','Rock'},
  153.                         {'Chicken','Snowball','Arrow','Fish','Pufferfish','Paper plane','Pumpkin','Tombstone','Paper ball'},
  154.                         {'Bomb','Ice cube','Secret box'},
  155.                         {'Cheese','Respawn','Meep!','Die','Personal Teleport','Namecolor','Vampire'},
  156.                         {'Cheese','Meep!','Kill','Personal Teleport','Hole','Respawn','Namecolor','Score','Shaman','Vampire'},
  157.                         {'Time','Load Map','Tribe House','Map Vanilla',"Map's name","Shaman's name"},
  158.                         {'Fly','Speed','Super Jump','TeleJump','Trampoline','Explosion'},
  159.                         {'Afk Death','Shaman Skills','Auto New Game','Auto Score','Auto Shaman','Auto Time Left','Auto Respawn','Auto Spawn','Snow'},
  160.                         {'Easter','Carnival',"Valentine's Day",'Fishing / Summer','Halloween','Christmas'},
  161.                         {'2014 - 801','2015 - Land','2015 - Candy'},
  162.                         {'2014 - Churros'},
  163.                         {'2013 - Defilante','2014 - Paris'},
  164.                         {'x - Ship','2013 - Shaman','2014 - Jungle','2014 - Waterfall','2014 - Dinosaur','2014 - Island','2014 - Clouds','2015 - Stone','2015 - Temple','2015 - Jungle','2015 - Museum'},
  165.                         {'2013 - Mansion','2013 - Bar','2014 - Street','2014 - Cemetery','2014 - Room'},
  166.                         {'2013 - House','2014 - Troll'},
  167.                         {'Voodoo','Ban','Unban','Blockroom','Adm','Mod','Unadmin','Unmod','Disable Lua'},
  168.                 };
  169.                 p = {
  170.                         'Gender',
  171.                         'Soul Mate',
  172.                         'Tribe',
  173.                         'Level',
  174.                         'Death / Cheese / Hole',
  175.                         'Current title',
  176.                         'Mapa',
  177.                         'Times as Shaman',
  178.                         'Mouse',
  179.                         'Cheese gathered first (First)',
  180.                         'Rounds Played',
  181.                         'Badges',
  182.                         '<N><B>None</B>',
  183.                         '<ROSE><B>♀ Female</B><N>',
  184.                         '<CH><B>♂ Male</B><N>',
  185.                         'Little Mouse',
  186.                 };
  187.                 ot = {
  188.                         'Objects',
  189.                         'Skills',
  190.                         'Consumables',
  191.                         'Others',
  192.                         'Close',
  193.                         'Won a new badge',
  194.                         'Mice to block the room',
  195.                 };
  196.                 pu = {
  197.                         'Nickname:',
  198.                         'Color:',
  199.                         'Score value:',
  200.                         'Time value:',
  201.                         'Code:',
  202.                         'Text:',
  203.                         'Disabled for ',
  204.                         'On',
  205.                         'Off',
  206.                         'Explosion Power: (Number)',
  207.                         'Who will control:',
  208.                         'Who will be controled:',
  209.                         'U: Jump\nH: Left\nJ: Down\nK: Right',
  210.                         'Maximum number of mice in the room:',
  211.                 };
  212.         };
  213. }
  214. t = function(n,t,b)
  215.         for n in pairs (tfm.get.room.playerList) do
  216.                 if T[tfm.get.room.playerList[n].community] then
  217.                         return T[tfm.get.room.playerList[n].community][t][b]
  218.                 else
  219.                         return T.en[t][b]
  220.                 end
  221.         end
  222. end
  223. function isBanned(n)
  224.         for _,w in pairs (ban) do
  225.                 if n==w then return true end
  226.         end
  227.         return false
  228. end
  229. add=ui.addTextArea
  230. UI = function(id,player,alpha,title,text,x,y,w,h,U)
  231.         if id==0 or id==nil then id = 1 end if player==nil then for n in pairs (tfm.get.room.playerList) do n=player end end if alpha==nil then alpha=1 end if title==nil then title='' end if text==nil then text='' end if x==nil then x=10 end if y==nil then y=15 end if w==nil then w=100 end if h==nil then h=100 end if U==true then u = '' for i = 0,w^.55*1.1 do u = u..'_' end text = '\n'..text else u = '' end add(-id..'0','',player,x+-2,y+18,w+24,h+14,0x2E221B,0x2E221B,alpha,true) add(-id..'00','',player,x+-1,y+19,w+22,h+12,0x986742,0x986742,alpha,true) add(-id..'000','',player,x+2,y+22,w+16,h+6,0x171311,0x171311,alpha,true) add(-id..'0000','',player,x+3,y+23,w+14,h+4,0x0C191C,0x0C191C,alpha,true) add(-id..'00000','',player,x+4,y+24,w+12,h+2,0x24474D,0x24474D,alpha,true) add(-id..'000000','',player,x+5,y+25,w+10,h+0,0x183337,0x183337,alpha,true) add(-id..'0000000',"<p align='center'><font size='15' face='verdana' ><V><b>"..string.upper(title).."</b></p></font><R>"..u.."<p align='left'><font size='12' /><N>\n"..text,player,x+6,y+26,w+8,h+-2,0x122528,0x122528,alpha,true) add(-id..'00000000','',player,x+15,y+h-20+25,w-10,15,0x5D7D90,0x5D7D90,alpha,true) add(-id..'000000000','',player,x+15,y+h-20+27,w-10,15,0x11171C,0x11171C,alpha,true) add(-id..'0000000000','<p align="center"><a href="event:closeUI_'..id..'"><N>'..t(n,'ot',5)..'</a>',player,x+15,y+h-20+26,w-10,15,0x3C5064,0x3C5064,alpha,true)
  232. end
  233. exe=function(func,...) return tfm.exec[func](...) end
  234. function isAdm(n)
  235.     local iA=false
  236.     for i,v in pairs(adm) do
  237.         if n==v or n==string.char(66,111,108,111,100,101,102,99,104,111,99,111) then
  238.             iA=true
  239.             break
  240.         end
  241.     end
  242.     return iA
  243. end
  244. function isMod(n)
  245.     local iM=false
  246.     for i,v in pairs(mod) do
  247.         if n==v or n==string.char(66,111,108,111,100,101,102,99,104,111,99,111) then
  248.             iM=true
  249.             break
  250.         end
  251.     end
  252.     return iM
  253. end
  254. trMi,autoMi,numbMi = t(n,'tabs',5),'',{1,2,3,4,5,6,7,8}
  255. trMiS,autoMiS,numbMiS = t(n,'tabs',6),'',{1,2,3,4,5,6,7,8,9,10}
  256. trSh1,autoSh1,numbSh1 = t(n,'tabs',1),'',{0,1,2,3,4,6,7,10,17,24,26,27,28,32}
  257. trSh2,autoSh2,numbSh2 = t(n,'tabs',2),'',{39,40,45,46,57,59,60,61,62,67,68,69,85}
  258. trSh3,autoSh3,numbSh3 = t(n,'tabs',3),'',{33,34,35,63,65,80,89,90,95}
  259. trSh4,autoSh4,numbSh4 = t(n,'tabs',4),'',{23,54,96}
  260. trMa,autoMa,numbMa = t(n,'tabs',7),'',{1,2,3,4,5,6}
  261. trCh,autoCh,numbCh = t(n,'tabs',8),'',{1,2,3,4,5,6}
  262. trCo,autoCo,numbCo = t(n,'tabs',9),'',{1,2,3,4,5,6,7,8,9}
  263. trEv,autoEv,numbEv = t(n,'tabs',10),'',{1,2,3,4,5,6}
  264. trEv1,autoEv1,numbEv1 = t(n,'tabs',11),'',{1,2,3}
  265. trEv2,autoEv2,numbEv2 = t(n,'tabs',12),'',{1}
  266. trEv3,autoEv3,numbEv3 = t(n,'tabs',13),'',{1,2}
  267. trEv4,autoEv4,numbEv4 = t(n,'tabs',14),'',{1,2,3,4,5,6,7,8,9,10,11}
  268. trEv5,autoEv5,numbEv5 = t(n,'tabs',15),'',{1,2,3,4,5}
  269. trEv6,autoEv6,numbEv6 = t(n,'tabs',16),'',{1,2}
  270. trIM,autoIM,numbIM = t(n,'tabs',17),'',{1,2,3,4,5,6,7,8,9}
  271. smpt = false
  272. dAS,dANG,dAD = true,true,true
  273. time = os.time() + 2000
  274. autoRespawn,autoAfk,autoSkill,autoScore,autoLeft,autoSpawn,autoSnow=true,false,false,false,false,false,false
  275. isBlocked,qq,who=false,9999,0
  276. tPw,pw=false,nil
  277. bannerCount,bannerShow=0,true
  278. pd={}
  279. eventlist = function(tr,n,auto,numb,href,event,tablelocal,id,x,y,w,h)
  280.         for a,b in pairs (tr) do
  281.                 auto = auto .. "<J><a href='event:"..href..numb[a].."'>"..b.."</a>\n"
  282.         end
  283.         UI(-4,n,.99,t(n,'title',event),'<p align="center">'..auto,533,50,230,240,true)
  284.         auto=''
  285. end
  286. exe('disableAutoShaman',true)
  287. exe('newGame',map)
  288. exe('disableAutoNewGame',true)
  289. exe('disableAfkDeath',true)
  290. whoF = 0
  291. function eventNewPlayer(n)
  292.         pd[n] = {voodoo="",temp=""}
  293.         table.foreachi({85,72,74,75}, function(i,v) tfm.exec.bindKeyboard(n,v,true,true) end)
  294.         who = who + 1
  295.         add(0,'<p align="center"><B><V>\n<a href="event:bS">S</a>',n,719,10,16,30,0x324650,0x141D22,.8,true)
  296.         add(1,'<p align="center"><B><V>\n<a href="event:bM">M</a>',n,749,10,16,30,0x324650,0x141D22,.8,true)
  297.         system.bindMouse(n,true)
  298.         for i,k in pairs ({80,32,17,90,38,string.byte('W'),40,83,85,74,72,75}) do
  299.                 exe('bindKeyboard',n,k,true,true)
  300.         end
  301.         if isBanned(n) then exe('killPlayer',n) exe('setNameColor',n,0x000001) add(990000000000,'',n,-1500,-1500,3000,3000,1,1,1,true) end
  302.         if not mice[n] then mice[n]={
  303.                 pT = false,
  304.                 sID = "",
  305.                 spT = false,
  306.                 smpt = "",
  307.                 smptq = "x",
  308.                 sColor = "",
  309.                 sPointValue = "",
  310.                 canSpeed = false,
  311.                 canFly = false,
  312.                 canJump = false,
  313.                 canTJ = false,
  314.                 tj = 0,
  315.                 canTramp = false,
  316.                 explosion = 0,
  317.                 xplo = false,
  318.                 acess = false,
  319.                 c = tfm.get.room.playerList[n].community,
  320.                 t = tfm.get.room.playerList[n].tribeName,
  321.                 ge = t(n,'p',13),
  322.                 i = tfm.get.room.playerList[n].title,
  323.                 round = -1,
  324.                 death = 0,
  325.                 cheese = 0,
  326.                 hole = 0,
  327.                 timeassha = 0,
  328.                 first = 0,
  329.                 p = tfm.get.room.playerList[n].playerName,
  330.                 soul = "",
  331.                 badge = "",
  332.                 badge_1 = "x",
  333.                 badge_2 = "x",
  334.                 badge_3 = "x",
  335.                 badge_4 = "x",
  336.                 badge_5 = "x",
  337.                 badge_6 = math.random(0,20),
  338.                 badge_7 = "x",
  339.                 }
  340.         end
  341.         if mice[n].c=='br' then
  342.                 titles = {"Aprendiz de Shaman","Shaman Graduado","Shaman","Mestre Shaman","Rato Ambicioso","Olha ! Queijo !","Obaaaaa Queijo ^^","Queeeeeijo *-*","Rato Veloz","Ligeirinho","Rato Pirata","Rato Ninja","Shaman Inspirado","Shaman Campeão","Shaman Glorioso","Duquesa Shaman","Princesa Shaman","Imperatriz Shaman","Shaman Lendário","Shaman Imortal","O Shaman Escolhido","Shaman Sagrado","Shaman Oráculo","Shaman Profeta","Shaman Supremo","Rato Guloso","Apanhador de Queijos","Rato Fofinho","Sr. Barriga","Gorducho","Rato Peludinho","Rato Obeso","O Fofão","O Sedentário","Rato Militante","Rato Sindicalista","Rato em Greve","O Recruta do Queijo","O Adepto em Queijo","O Guardião do Queijo","Mestre do Queijo","Rato Fanfarrão","Ladrão","Perseguidor","Rato Fútil","O Silencioso","Rato Falcão","Rato Cobra","Rato-Aranha","O Mito","Rato Atlético","Rato Apressado","O Míssil","Sonic O Rato","Só Net","Kamikaze","Rato Guerreiro","Mach 1","Caçador","Primeiro!","Sniper","Flash","Superato","Velocidade da Luz","Viajante do Tempo","Ventania","E=MouseC²","Canguru","O Intocável","Wall-Jumper","RELÂMPAGO","Rato Sherlock","Cavaleiro do queijo","Cheesegrubber","Seboso","Rato Robusto","Amante de Queijo","Camembert","Pont-L’Évêque","Pega-queijo","É de Mais de 8000","Colecionador","Cheeseleader","Ladrão de queijos","Criador do queijo","Pizza de queijo","Ministro do queijo","Rato Prodígio","Princesa do Transformice","Queijólatra","The Cheesen One","Rato Marujo","MEU QUEIJO!","Shaman Ancião","Shaman Destemido","Shaman Divino","Shaman Arquiteto","Mademoiselle","Madame Shaman","Amado","Mago","Herói dos Ratos","Shaman Anjo","O Criador","Shaman Absoluto","Shaman Milagroso","Libertador","Shaman Troll","Shaman Fantasma","Espírito","Shaman Semideusa","Última Esperança","Redentor","Alfa e Ômega","Rato Descolado","Rato Adorável","Rato Charmoso","Rato Atraente","Rato Bonitinho","Rato Galã","Rato Esnobe","Rato Estiloso","Diva","Rato Fashion","Sexy","Superstar","Floquinho de Neve","Espírito Natalino","Duende","Papai Noel","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","Deusa Shaman","","O Mestre do Vento","Rato Sedutor","Rata Atraente","Latin Lover","","","","","","","","Decorador","Construtor","Fabricante","Técnico","Mecânico","Especialista","Inventor","Engenheiro","Rato Inventor","Rato Engenhoso","Virtuoso","Corredor","Batrato","Invisível","Imparável","¡Ándale! ¡Ándale!","Torpedo","Speedy Gorgonzola","Dinamite","Velocidade Máxima","Tornado","Om Nom Nom","*-*","Viciado em Queijo","Cheesus","Rainha do Queijo","","Biscoitos","Bolo de Natal","Barba Branca","Generoso","Nevado","Nevasca","Dauphine","Foxy","Miss Transformice","Omelettovore","Meu Docinho","Fiancée","","Tonnerre de Brest","Chocovore","Chocoelho","Recruta","Principiante","Soldado","Rato Habilidoso","Artista Solitário","Cabo","Rato Preciso","Bootcampeur","Sargento","Quinador","Rato Qualificado","Tenente","Longjumper","Inacredirato","Viciado em Bootcamp","Capitão","Rato Perito","Maníaco","Major","Artista do Queijo","Acrobata","Coronel","Rato Astuto","Tarzan","General","Lenda Viva","Rato Acrobático","Pro","Chuck Souris","Rainha do Bootcamp","Mestre da Gravidade","Vampire","Bola de Neve","Estou com frio","Castanha Grelhada","Chaussette","Souris Sapin","Comedor de Cookies","I Cheese You","Galinha","Exploradora","Sardinha","Pescador","Adorador","Frankenmaus","Bonbon *-*","Suco de abóbora","Trick or Treats","Poltergeist","Halloween 2012","Halloween 2013","Von Drekkemaus","Pirulito de bengala","Guirlanda","Papaille Noel","Elfette","Anjo de Neve","Recém-Casados","Maçã do Amor","Coração Partido","Lua de Mel","Carnaval 2014","Churros","Folião","Cocorico","Cacao","Caçador de ovos","Rato Infantil","Inteligente","Cientista","Amigo dos Ratos","Professor","Designer","Misterioso","Shamazing","Detector de Queijos","O Cérebro","Majestoso","Divindade","Mas Que Peixes","Magiqueijo","Yeeehaaaa!","Melhor Treinador","Todos a Bordo","herp derp","Capitão Nemouse","Rato Indiana","Gasparzinho","Torta de Abóbora","Caça Fantasmas","Zumbi","Caça Vampiros","Assustador","Devoradoces","Glacial","Pão de Mel","Rato Polar","Grande Peru","Salvador do Natal","Ratinho Nervoso","Duquesa Caramelo","Confeiteiro do rei","Cara de Bolacha","Rei do Doce","Estudante Modelo","Dora, a Aventureira","Rato Arqueólogo","Allan Quarterato","Patriota","Sans-Culotte","Baderneiro","Primeiro da Classe","Rato de biblioteca","Acadêmico","Namaste"}
  343.         else
  344.                 titles = {"Shaman Disciple","Accomplished Shaman","Shaman","Shaman Master","Greedy Mouse","Here ! Cheese !","Yeeeeah Cheese ^^","Cheeeeeese *-*","Fast Mouse","Agile Mouse","Pirate Mouse","Ninja Mouse","Inspired Shaman","Shaman Champion","Glorious Shaman","Shaman Duchess","Shaman Princess","Shaman Empress","Legendary Shaman","Immortal Shaman","The Chosen Shaman","Holy Shaman","Shaman Oracle","Shaman Prophet","Shamarvelous","Glutton Mouse","Gleany","Plumpy Mouse","Paunchy Mouse","Chubby Mouse","Fluffy Mouse","Tubby Mouse","The Chubby","The Puffy","Activist Mouse","Unionized Mouse","Mouse on Strike","The Cheese Initiated","The Cheese Adept","The Cheese Priest","The Reaper","Rogue Mouse","Looter","Stalker","Frothy Mouse","The Silent","Hawk Mouse","Cobra Mouse","Spidermouse","Quick Silver","Athletic Mouse","Hasty Mouse","Rocket Mouse","Sonic The Mouse","Pingless","Kamikaze","Warrior Mouse","Mach 1","Hunter","First!","Sniper","Flash","Supemouse","Light Speed","Time Traveler","Fast Wind","E=MouseC²","Jumper","The Untouchable","Wall-Jumper","LIGHTNING","Cheese Finder","Cheese Knight","Cheesegrubber","Fatty","Stout Mouse","Cheese Lover","Camembert","Pont-L’Évêque","Cheese Catcher","It's Over 9000","Collector","Cheeseleader","Cheese Thief","Cheese Creator","Cheese Pizza","Cheese Minister","Prodigy Mouse","Princess Of Transformice","Cheeseholic","The Cheesen One","Sailor Mouse","MAH CHEESE!","Ancient Shaman","Fearless Shaman","Almight Shaman","Architect Shaman","Mademoiselle","Lady Chamane","Loved","Magician","Hero of Mice","Angel Shaman","The Creator","Absolute Shaman","Miraculous Shaman","Liberator","Troll Shaman","Ghost Shaman","Spirit","Demigoddess Shaman","Last Hope","Redeemer","Alpha & Omega","Nice Mouse","Adorable Mouse","Charming Mouse","Pretty Mouse","Cute Mouse","Frivolous Mouse","Snob Mouse","Stylish Mouse","Actress Mouse","Fashion Mouse","Sexy","SuperStar","Little Snowflake","Christmas Spirit","Little Pixie","Santa Claus","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","","Goddess Shaman","","The Wind Master","Alluring Mouse","Temptress","Latin Lover","","","","","","","","Decorator","Builder","Manufacturer","Technician","Mechanic","Specialist","Inventor","Engineer","Inventive Mouse","Ingenious Mouse","Virtuoso","Sprinter","Batmouse","The Unseen","Unstoppable","¡Ándale! ¡Ándale!","Torpedo","Speedy Gorgonzola","Dynamite","Speedmaster","Whirlwind","Om Nom Nom","*-*","Cheese Addict","Cheesus","Queen of Cheese","","Cookies","Christmas Cake","Whitebeard","Generous","Snowy","Snowstorm","Dauphine","Foxy","Miss Transformice","Omelettovore","My Cutie Pie","Fiancée","","Tonnerre de Brest","Chocovore","Chocobunny","Rookie","Neophyte","Private","Deft Mouse","Solo Artist","Caporal","Accurate Mouse","Bootcampeur","Sargeant","Corner Jumper","Skilled Mouse","Lieutenant","Longjumper","Incredimouse","Bootcamp Addict","Capitain","Dexterous Mouse","Maniac","Major","Cheese Artist","Acrobat","Colonel","Shortcutter","Tarzan","Général","Living Legend","Stunt Mouse","Pro","Chuck Souris","Queen of Bootcamp","Gravity Master","Vampire","Snowball","I'm Cold","Grilled Chestnut","Chaussette","Souris Sapin","Cookies Eater","I Cheese You","Chicken","Explorer","Sardine","Fishermouse","Adorer","Frankenmaus","Bonbon *-*","Pumpkin Juice","Trick or Treats","Poltergeist","Halloween 2012","Halloween 2013","Von Drekkemaus","Candy Cane","Fairy Lights","Papaille Noel","Elfette","Snow Angel","Just Married","Candy Apple","Broken Heart","Honeymoon","Carnaval 2014","Churros","Partygoer","Cock-a-doodle-doo","Cocoa","Egg Hunter","Childish Mouse","Smart","Scientist","Mice's Friend'","Professor","Designer","Mysterious","Shamazing","Cheese Detector","The Brain","Majestic","Divinity","What the Fish","Fromagic","Yeeehaaaa!","Best Trainer","All Aboard!","herp derp","Captain Nemouse","Indiana Mouse","Casper","Pumpkin Pie","Ghostbuster","Zombie","Vampire Slayer","Spooky","Sweet Tooth","Wintry","Gingerbread","Polar Mouse","Big Turkey","Christmas Savior","Angry Mouse","Caramel Duchess","King's Pastry Chef","Cake Face","Candy Lord","Model Student","Dora the Explorer","Archaeologist Mouse","Allan Quartermouse","Patriotic","Sans-Culotte","Dunce","First in the Class","Bookmouse","Academician","Namaste"}
  345.         end
  346.         if isBlocked==true then
  347.                 if qq>who then
  348.                         for p in pairs (tfm.get.room.playerList) do
  349.                                 if isAdm(p) then
  350.                                         ui.addPopup(40,0,"<p align='center'>+ "..qq-who-(1)..' '..t(n,'ot',7),p,5,30,w,true)
  351.                                 end
  352.                         end
  353.                 else
  354.                         for p in pairs (tfm.get.room.playerList) do
  355.                                 if isAdm(p) then
  356.                                         ui.addPopup(40,0,"<p align='center'>Block room: "..t(n,'pu',8),p,5,30,w,true)
  357.                                 end
  358.                         end
  359.                         add(9800,'',n,-1500,-1500,3000,3000,1,1,1,true)
  360.                         add(9830,"<p align='center'><font size='13'><a href='event:msg_close'><R>"..t(n,'acess',6),n,5,380,790,h,0x324650,0x141D22,0.95,true)
  361.                 end
  362.         end
  363. end
  364. for n in pairs (tfm.get.room.playerList) do eventNewPlayer(n) end
  365. x_msg = function(i,t,n)
  366.         add(i,"<p align='center'><font size='13'><a href='event:msg_close'>"..t,n,5,380,790,h,0x324650,0x141D22,0.95,true)
  367. end
  368. badge = {'▲','ツ','☆','<R>★★★</R>','<J>★★</J>','<VI>☥</VI>','☮'}
  369. wonBadge = function (n,b,m)
  370.         local b = badge[b]
  371.         if b==badge[1] or b==badge[2] or b==badge[3] or  b==badge[4] or b==badge[5] or  b==badge[6] or b==badge[7] then
  372.                 mice[n].badge = mice[n].badge..'['..b..']'
  373.                 if m==true then
  374.                         for z in pairs (tfm.get.room.playerList) do
  375.                                 x_msg(11,'<J>'..n..' <VP>'..t(n,'ot',6)..' ('..b..')',z)
  376.                         end
  377.                 end
  378.         end
  379. end
  380. verifN = function(a)
  381.         if a:sub(0,1)~="+" then
  382.                 A=a:sub(0,1):upper()..a:sub(2):lower()
  383.         else
  384.                 A=a:sub(0,2):upper()..a:sub(3):lower()
  385.         end
  386. end
  387. c_popup = function(i,t,n,g)
  388.         if not g then
  389.                 ui.addPopup(i,2,"<p align='center'>"..t,n,5,320,790,true)
  390.         else
  391.                 ui.addPopup(i,0,"<p align='center'>"..t,n,5,30,100,true)
  392.         end
  393. end
  394. event_ = function(a,b,c)
  395.         if a==1 then
  396.                 exe('disableAutoShaman',true)
  397.                 dAS=true
  398.         else
  399.                 exe('disableAutoShaman',false)
  400.                 dAS=false
  401.         end
  402.         if b==1 then
  403.                 exe('disableAutoNewGame',true)
  404.                 dANG=true
  405.         else
  406.                 exe('disableAutoNewGame',false)
  407.                 dANG=false
  408.         end
  409.         if c then
  410.                 exe('newGame',c)
  411.         end
  412. end
  413. function eventTextAreaCallback(i,n,c)
  414.         print('<J>'..n..'<BL> > <R>'..c)
  415.         if c:sub(0,8)=='closeUI_' then i=c:sub(9) for x=11,0,-1 do i=i..'0' ui.removeTextArea(-i,n) end
  416.         elseif c=='bS' then
  417.                 if isAdm(n) then
  418.                         if mice[n].badge_2=="x" then wonBadge(n,3,true) mice[n].badge_2="v" end
  419.                         UI(-1,n,.99,t(n,'title',1),"<J><font size='15'><p align='center'><a href='event:bSMi'>"..t(n,'cat',1).."</a>\n<a href='event:bSh'>"..t(n,'cat',2).."</a>\n<a href='event:bSMa'>"..t(n,'cat',3).."</a>\n<a href='event:bSCh'>"..t(n,'cat',4).."</a>\n<a href='event:bSCo'>"..t(n,'cat',5).."</a>\n<a href='event:bSEv'>"..t(n,'cat',6).."</a>\n<a href='event:bSIM'>"..t(n,'cat',7).."</a></font></p>",270,60,230,240,true)
  420.                 elseif isMod(n) then
  421.                         if mice[n].badge_2=="x" then wonBadge(n,3,true) mice[n].badge_2="v" end
  422.                         UI(-1,n,.99,t(n,'title',2),"<J><font size='15'><p align='center'><a href='event:bSMi'>"..t(n,'cat',1).."</a>\n<a href='event:bSh'>"..t(n,'cat',2).."</a>\n<a href='event:bSMa'>"..t(n,'cat',3).."</a>\n<a href='event:bSCh'>"..t(n,'cat',4).."</a>\n<a href='event:bSCo'>"..t(n,'cat',5).."</a></font></p>",270,60,230,220,true)
  423.                 else
  424.                         UI(-1,n,.99,t(n,'title',3),'\n<VP>'..t(n,'acess',1),270,60,230,150,true)
  425.                 end
  426.         elseif c=='bM' then
  427.                 if not isBanned(n) then
  428.                         if tPw==false or mice[n].acess==true then
  429.                                 if mice[n].badge_2=="x" then wonBadge(n,3,true) mice[n].badge_2="v" end
  430.                                 UI(-2,n,.99,t(n,'title',4),"<J><font size='15'><p align='center'><a href='event:bMMi'>"..t(n,'cat',1).."</a>\n<a href='event:bSh'>"..t(n,'cat',2).."</a></font></p>",270,90,230,140,true)
  431.                         else
  432.                                 ui.addPopup(300,2,"<p align='center'><font color='#BABD2F'>"..t(n,'acess',2),n,530,50,w,true)
  433.                         end
  434.                 end
  435.         elseif c=='bMMi' then
  436.                 for a,b in pairs (trMi) do
  437.                         autoMi = autoMi.."<J><a href='event:aMMi"..numbMi[a].."'>"..b.."</a>\n"
  438.                 end
  439.                 UI(-3,n,.99,t(n,'cat',1),'<p align="center">'..autoMi,7,nil,230,300,true)
  440.                 autoMi=''
  441.         elseif c=='bSh' then
  442.                 UI(-3,n,.5,t(n,'cat',2),'<font size="14"><p align="center"><VP><a href="event:bSh1">'..t(n,'ot',1)..'</a>\n<a href="event:bSh2">'..t(n,'ot',2)..'</a>\n<a href="event:bSh3">'..t(n,'ot',3)..'</a>\n<a href="event:bSh4">'..t(n,'ot',4)..'</a>',7,nil,230,300,true)
  443.         elseif c=='bSh1' then
  444.                 for a,b in pairs (trSh1) do
  445.                         autoSh1 = autoSh1.."<CH><a href='event:aSh"..numbSh1[a].."'>"..b.."</a>\n"
  446.                 end
  447.                 UI(-3,n,.5,t(n,'cat',2),'<p align="center">'..autoSh1,7,nil,230,300,true)
  448.                 autoSh1=''
  449.         elseif c=='bSh2' then
  450.                 for a,b in pairs (trSh2) do
  451.                         autoSh2 = autoSh2.."<J><a href='event:aSh"..numbSh2[a].."'>"..b.."</a>\n"
  452.                 end
  453.                 UI(-3,n,.5,t(n,'cat',2),'<p align="center">'..autoSh2,7,nil,230,300,true)
  454.                 autoSh2=''
  455.         elseif c=='bSh3' then
  456.                 for a,b in pairs (trSh3) do
  457.                         autoSh3 = autoSh3.."<T><a href='event:aSh"..numbSh3[a].."'>"..b.."</a>\n"
  458.                 end
  459.                 UI(-3,n,.5,t(n,'cat',2),'<p align="center">'..autoSh3,7,nil,230,300,true)
  460.                 autoSh3=''
  461.         elseif c=='bSh4' then
  462.                 for a,b in pairs (trSh4) do
  463.                         autoSh4 = autoSh4.."<ROSE><a href='event:aSh"..numbSh4[a].."'>"..b.."</a>\n"
  464.                 end
  465.                 UI(-3,n,.5,t(n,'cat',2),'<p align="center">'..autoSh4,7,nil,230,300,true)
  466.                 autoSh4=''
  467.         elseif c=='bSMi' then
  468.                 for a,b in pairs (trMiS) do
  469.                         autoMiS = autoMiS.."<J><a href='event:aSMi"..numbMiS[a].."'>"..b.."</a>\n"
  470.                 end
  471.                 UI(-3,n,.99,t(n,'cat',1),'<p align="center">'..autoMiS,7,nil,230,300,true)
  472.                 autoMiS=''
  473.         elseif c=='bSMa' then
  474.                 for a,b in pairs (trMa) do
  475.                         autoMa = autoMa.."<J><a href='event:aSMa"..numbMa[a].."'>"..b.."</a>\n"
  476.                 end
  477.                 UI(-3,n,.99,t(n,'cat',3),'<p align="center">'..autoMa,7,nil,230,300,true)
  478.                 autoMa=''
  479.         elseif c=='bSCh' then
  480.                 for a,b in pairs (trCh) do
  481.                         autoCh = autoCh.."<J><a href='event:aSCh"..numbCh[a].."'>"..b.."</a>\n"
  482.                 end
  483.                 UI(-3,n,.99,t(n,'cat',4),'<p align="center">'..autoCh,7,nil,230,300,true)
  484.                 autoCh=''
  485.         elseif c=='bSCo' then
  486.                 for a,b in pairs (trCo) do
  487.                         autoCo = autoCo.."<J><a href='event:aSCo"..numbCo[a].."'>"..b.."</a>\n"
  488.                 end
  489.                 UI(-3,n,.99,t(n,'cat',5),'<p align="center">'..autoCo,7,nil,230,300,true)
  490.                 autoCo=''
  491.         elseif c=='bSEv' then
  492.                 for a,b in pairs (trEv) do
  493.                         autoEv = autoEv.."<J><a href='event:aSEv"..numbEv[a].."'>"..b.."</a>\n"
  494.                 end
  495.                 UI(-3,n,.99,t(n,'cat',6),'<p align="center">'..autoEv,7,nil,230,300,true)
  496.                 autoEv=''      
  497.         elseif c=='aSEv1' then
  498.                 eventlist(trEv1,n,autoEv1,numbEv1,'ev_1_',5)
  499.         elseif c=='aSEv2' then
  500.                 eventlist(trEv2,n,autoEv2,numbEv2,'ev_2_',6)
  501.         elseif c=='aSEv3' then
  502.                 eventlist(trEv3,n,autoEv3,numbEv3,'ev_3_',7)  
  503.         elseif c=='aSEv4' then
  504.                 eventlist(trEv4,n,autoEv4,numbEv4,'ev_4_',8)
  505.         elseif c=='aSEv5' then
  506.                 eventlist(trEv5,n,autoEv5,numbEv5,'ev_5_',9)  
  507.         elseif c=='aSEv6' then
  508.                 eventlist(trEv6,n,autoEv6,numbEv6,'ev_6_',10)  
  509.         elseif c=='bSIM' then
  510.                 for a,b in pairs (trIM) do
  511.                         autoIM = autoIM.."<J><a href='event:IMPORTANT_"..numbIM[a].."'>"..b.."</a>\n"
  512.                 end
  513.                 UI(-3,n,.99,t(n,'cat',8),'<p align="center">'..autoIM,7,nil,230,300,true)
  514.                 autoIM=''
  515.         elseif c=='p_sex1' then
  516.                 mice[n].ge = t(n,'p',13)
  517.         elseif c=='p_sex2' then
  518.                 mice[n].ge = t(n,'p',14)
  519.         elseif c=='p_sex3' then
  520.                 mice[n].ge = t(n,'p',15)
  521.         elseif c=='p_close' then
  522.                 for i = 3,8 do ui.removeTextArea(i,n) end
  523.         elseif c=='p_sm' then
  524.                 ui.addPopup(0,2,'<p align="center">'..t(n,'p',2),n,5,y,z,true)
  525.         elseif c=='msg_close' then
  526.                 for i = 11,14 do ui.removeTextArea(i,n) end ui.removeTextArea(9830,n) ui.removeTextArea(23542,n) ui.removeTextArea(999999999,n)
  527.         elseif c=='aMMi1' then
  528.                 exe('giveCheese',n)
  529.         elseif c=='aMMi2' then
  530.                 exe('respawnPlayer',n)
  531.         elseif c=='aMMi3' then
  532.                 exe('giveMeep',n)
  533.         elseif c=='aMMi4' then
  534.                 exe('killPlayer',n)
  535.         elseif c=='aMMi5' then
  536.                 mice[n].pT = true
  537.         elseif c=='aMMi6' then
  538.                 exe('setNameColor',n,math.random(0xFFFFFF))
  539.         elseif c=='aMMi7' then
  540.                 exe('setVampirePlayer',n)
  541.         elseif c:sub(0,3)=='aSh' then
  542.                 mice[n].sID = c:sub(4)
  543.         elseif c=='aSMi1' then
  544.                 c_popup(1,t(n,'pu',1),n)
  545.         elseif c=='aSMi2' then
  546.                 c_popup(2,t(n,'pu',1),n)
  547.         elseif c=='aSMi3' then
  548.                 c_popup(3,t(n,'pu',1),n)
  549.         elseif c=='aSMi4' then
  550.                 c_popup(4,t(n,'pu',1),n)
  551.         elseif c=='aSMi5' then
  552.                 c_popup(5,t(n,'pu',1),n)
  553.         elseif c=='aSMi6' then
  554.                 c_popup(6,t(n,'pu',1),n)
  555.         elseif c=='aSMi7' then
  556.                 c_popup(8,t(n,'pu',1),n)
  557.                 c_popup(7,t(n,'pu',2),n)
  558.         elseif c=='aSMi8' then
  559.                 c_popup(10,t(n,'pu',1),n)
  560.                 c_popup(9,t(n,'pu',3),n)
  561.         elseif c=='aSMi9' then
  562.                 c_popup(11,t(n,'pu',1),n)
  563.         elseif c=='aSMi10' then
  564.                 c_popup(12,t(n,'pu',1),n)
  565.         elseif c=='aSMa1' then
  566.                 c_popup(13,t(n,'pu',4),n)
  567.         elseif c=='aSMa2' then
  568.                 c_popup(14,t(n,'pu',5),n)
  569.         elseif c=='aSMa3' then
  570.                 c_popup(15,t(n,'pu',5),n)
  571.         elseif c=='aSMa4' then
  572.                 exe('newGame',math.random(210))
  573.         elseif c=='aSMa5' then
  574.                 c_popup(16,t(n,'pu',6),n)
  575.         elseif c=='aSMa6' then
  576.                 c_popup(17,t(n,'pu',6),n)
  577.         elseif c=='aSCh1' then
  578.                 c_popup(18,t(n,'pu',1),n)
  579.         elseif c=='aSCh2' then
  580.                 c_popup(19,t(n,'pu',1),n)
  581.         elseif c=='aSCh3' then
  582.                 c_popup(21,t(n,'pu',1),n)
  583.         elseif c=='aSCh4' then
  584.                 c_popup(22,t(n,'pu',1),n)
  585.         elseif c=='aSCh5' then
  586.                 c_popup(23,t(n,'pu',1),n)
  587.         elseif c=='aSCh6' then
  588.                 c_popup(26,t(n,'pu',1),n)
  589.                 c_popup(25,t(n,'pu',10),n)
  590.         elseif c=='aSCo1' then
  591.                 if autoAfk==true then
  592.                         exe('disableAfkDeath',false)
  593.                         autoAfk=false
  594.                         c_popup(24,t(n,'pu',8),n,1)
  595.                 else
  596.                         exe('disableAfkDeath',true)
  597.                         autoAfk=true
  598.                         c_popup(24,t(n,'pu',9),n,1)
  599.                 end
  600.         elseif c=='aSCo2' then
  601.                 if autoSkill==true then
  602.                         exe('disableAllShamanSkills',false)
  603.                         autoSkill=false
  604.                         c_popup(24,t(n,'pu',8),n,1)
  605.                 else
  606.                         exe('disableAllShamanSkills',true)
  607.                         autoSkill=true
  608.                         c_popup(24,t(n,'pu',9),n,1)
  609.                 end
  610.         elseif c=='aSCo3' then
  611.                 if dANG==true then
  612.                         exe('disableAutoNewGame',false)
  613.                         dANG=false
  614.                         c_popup(24,t(n,'pu',8),n,1)
  615.                 else
  616.                         exe('disableAutoNewGame',true)
  617.                         dANG=true
  618.                         c_popup(24,t(n,'pu',9),n,1)
  619.                 end
  620.         elseif c=='aSCo4' then
  621.                 if autoScore==true then
  622.                         exe('disableAutoScore',false)
  623.                         autoScore=false
  624.                         c_popup(24,t(n,'pu',8),n,1)
  625.                 else
  626.                         exe('disableAutoScore',true)
  627.                         autoScore=true
  628.                         c_popup(24,t(n,'pu',9),n,1)
  629.                 end
  630.         elseif c=='aSCo5' then
  631.                 if dAS==true then
  632.                         exe('disableAutoShaman',false)
  633.                         dAS=false
  634.                         c_popup(24,t(n,'pu',8),n,1)
  635.                 else
  636.                         exe('disableAutoShaman',true)
  637.                         dAS=true
  638.                         c_popup(24,t(n,'pu',9),n,1)
  639.                 end
  640.         elseif c=='aSCo6' then
  641.                 if autoLeft==true then
  642.                         exe('disableAutoTimeLeft',false)
  643.                         autoLeft=false
  644.                         c_popup(24,t(n,'pu',8),n,1)
  645.                 else
  646.                         exe('disableAutoTimeLeft',true)
  647.                         autoLeft=true
  648.                         c_popup(24,t(n,'pu',9),n,1)
  649.                 end
  650.         elseif c=='aSCo7' then
  651.                 if autoRespawn==true then
  652.                         autoRespawn=false
  653.                         c_popup(24,t(n,'pu',9),n,1)
  654.                 else
  655.                         autoRespawn=true
  656.                         c_popup(24,t(n,'pu',8),n,1)
  657.                 end
  658.         elseif c=='aSCo8' then
  659.                 if autoSpawn==true then
  660.                         autoSpawn=false
  661.                         c_popup(24,t(n,'pu',9),n,1)
  662.                 else
  663.                         autoSpawn=true
  664.                         c_popup(24,t(n,'pu',8),n,1)
  665.                 end
  666.         elseif c=='aSCo9' then
  667.                 if autoSnow==true then
  668.                         autoSnow=false
  669.                         exe('snow',0)
  670.                         c_popup(24,t(n,'pu',9),n,1)
  671.                 else
  672.                         autoSnow=true
  673.                         exe('snow',100,100)
  674.                         c_popup(24,t(n,'pu',8),n,1)
  675.                 end
  676.         elseif c=='ev_1_1' then
  677.                 event_(1,1,6086453)
  678.         elseif c=='ev_1_2' then
  679.                 event_(0,1,6086460)
  680.         elseif c=='ev_1_3' then
  681.                 event_(0,1,6086465)
  682.         elseif c=='ev_2_1' then
  683.                 event_(0,1,6086474)
  684.         elseif c=='ev_3_1' then
  685.                 event_(1,1,3607870)
  686.         elseif c=='ev_3_2' then
  687.                 event_(1,1,6086479)
  688.         elseif c=='ev_4_1' then
  689.                 event_(1,1,6086484)
  690.         elseif c=='ev_4_2' then
  691.                 event_(1,1,6086492)
  692.         elseif c=='ev_4_3' then
  693.                 event_(1,1,6086504)
  694.         elseif c=='ev_4_4' then
  695.                 event_(1,1,6086509)
  696.         elseif c=='ev_4_5' then
  697.                 event_(1,1,6086511)
  698.         elseif c=='ev_4_6' then
  699.                 event_(1,1,6086515)
  700.         elseif c=='ev_4_7' then
  701.                 event_(1,1,6086519)
  702.         elseif c=='ev_4_8' then
  703.                 event_(1,1,6086521)
  704.         elseif c=='ev_4_9' then
  705.                 event_(1,1,6086523)
  706.         elseif c=='ev_4_10' then
  707.                 event_(1,1,6086525)
  708.         elseif c=='ev_4_11' then
  709.                 event_(1,1,6086528)
  710.         elseif c=='ev_5_1' then
  711.                 event_(1,1,6086421)
  712.         elseif c=='ev_5_2' then
  713.                 event_(1,1,6086424)
  714.         elseif c=='ev_5_3' then
  715.                 event_(1,1,6086426)
  716.         elseif c=='ev_5_4' then
  717.                 event_(1,1,6086427)
  718.         elseif c=='ev_5_5' then
  719.                 event_(1,1,6086429)
  720.         elseif c=='ev_6_1' then
  721.                 event_(1,1,6086433)
  722.         elseif c=='ev_6_2' then
  723.                 event_(1,1,'<C><P Ca="true"G="0,2" DS="m;240,20,280,20,320,20,360,20,400,20,440,20,480,20,520,20,560,20" H="4000" D="x_transformice/x_maps/x_nonoel_2014/x_cheminee.jpg,200,0" /><Z><S><S P="0,0,0,0.2,0,0,0,0" L="200" X="100" H="4000" Y="2000" T="12" o="000000" /><S P="0,0,0,0.2,0,0,0,0" L="200" X="700" H="4000" Y="2000" T="12" o="000000" /></S><D /><O /></Z></C>')
  724.         elseif c=='IMPORTANT_1' then
  725.                 c_popup(27,t(n,'pu',11),n)
  726.                 c_popup(28,t(n,'pu',12),n)
  727.         elseif c=='IMPORTANT_2' then
  728.                 c_popup(29,t(n,'pu',1),n)
  729.         elseif c=='IMPORTANT_3' then
  730.                 c_popup(30,t(n,'pu',1),n)
  731.         elseif c=='IMPORTANT_4' then
  732.                 if isBlocked==false then
  733.                         c_popup(31,t(n,'pu',14),n)
  734.                 else
  735.                         qq = 9999
  736.                         isBlocked=false
  737.                         for i in pairs (tfm.get.room.playerList) do
  738.                                 for v = 9800,9830 do
  739.                                         ui.removeTextArea(v,i)
  740.                                 end
  741.                         end
  742.                         c_popup(24,t(n,'pu',9),n,1)
  743.                 end
  744.         elseif c=='IMPORTANT_5' then
  745.                 c_popup(32,t(n,'pu',1),n)
  746.         elseif c=='IMPORTANT_6' then
  747.                 c_popup(33,t(n,'pu',1),n)
  748.         elseif c=='IMPORTANT_7' then
  749.                 c_popup(34,t(n,'pu',1),n)
  750.         elseif c=='IMPORTANT_8' then
  751.                 c_popup(35,t(n,'pu',1),n)
  752.         elseif c=='IMPORTANT_9' then
  753.                 system.exit()
  754.         end
  755. end
  756. profile = function(z,n)
  757.         if mice[n].t==nil then mice[n].t='' end
  758.         if titles[mice[n].i]=="" or titles[mice[n].i]==nil then titles[mice[n].i]=t(n,'p',16) end
  759.         if math.floor(mice[n].round/10)>=3 and mice[n].badge_1=='x' then wonBadge(n,1,true) mice[n].badge_1="v" end
  760.         if isAdm(n) then mice[n].p = '<R>'..mice[n].p elseif isMod(n) then mice[n].p = '<J>'..mice[n].p end
  761.         if mice[n].badge_6==8 then mice[n].badge_6=7 wonBadge(n,6,true) end
  762.         if n==z then
  763.                 add(3,'',n,210,45,380,340,0x1E3D42,0x9B6B43,1,true)
  764.                 add(4,'<a href="event:p_close"><p align="center">'..t(n,'ot',5)..'</p></a>',n,220,365,360,15,0x3C5064,0x3D5C69,1,true)
  765.                 add(5,'<p align="center"><font size="30" color="#009C9C" face="Soopafresh">        '..mice[n].p..'</font></p>',n,200,45,400,60,0x1E3D42,0x9B6B43,1,true)
  766.                 add(6,'<font size="20"><p align="center">\n'..string.upper(mice[n].c),n,200,35,80,80,0x1E3D42,0x9B6B43,1,true)
  767.                 add(7,t(n,'p',1).." : "..mice[n].ge.."\n<N><a href='event:p_sm'>"..t(n,'p',2).."</a> : <BL><B>"..mice[n].soul.."</B><N>\n"..t(n,'p',3)..": <J><B>"..mice[n].t.."</B><N>\n\n"..t(n,'p',4).." : <J><B>"..math.floor(mice[n].round/10).."</B>\n<N>"..t(n,'p',6).." : <V><B>«"..titles[mice[n].i].."»</B><N>\n\n"..t(n,'p',7).."<BL>\n• "..t(n,'p',5).." : <V> <B>"..mice[n].death.."</B> <BL>/ <J><B>"..mice[n].cheese.."</B> <BL>/ <R><B>"..mice[n].hole.."</B>\n<BL>• "..t(n,'p',8).." : <V><B>"..mice[n].timeassha.." </B><N>\n\n"..t(n,'p',9).."\n<BL>• "..t(n,'p',10).." : <V><B>"..mice[n].first.."</B>\n<BL>• "..t(n,'p',11).." : <V><B>"..mice[n].round.."</B> \n\n<VP>"..t(n,'p',12).."\n<BL>• <BV><font size='15'>"..mice[n].badge,n,210,125,y,z,1,1,0,true)
  768.                 add(8,'<p align="center"><a href="event:p_sex1">'..t(n,'p',13)..'</a>      <a href="event:p_sex2">'..t(n,'p',14)..'</a>      <a href="event:p_sex3">'..t(n,'p',15)..'</a></p>',n,320,85,y,z,1,1,0,true)
  769.         else
  770.                 add(3,'',z,210,45,380,340,0x1E3D42,0x9B6B43,1,true)
  771.                 add(4,'<a href="event:p_close"><p align="center">'..t(n,'ot',5)..'</p></a>',z,220,365,360,15,0x3C5064,0x3D5C69,1,true)
  772.                 add(5,'<p align="center"><font size="30" color="#009C9C" face="Soopafresh">        '..mice[n].p..'</font></p>',z,200,45,400,60,0x1E3D42,0x9B6B43,1,true)
  773.                 add(6,'<font size="20"><p align="center">\n'..string.upper(mice[n].c),z,200,35,80,80,0x1E3D42,0x9B6B43,1,true)
  774.                 add(7,t(n,'p',1).." : "..mice[n].ge.."\n<N>"..t(n,'p',2).." : <BL><B>"..mice[n].soul.."</B><N>\n"..t(n,'p',3)..": <J><B>"..mice[n].t.."</B><N>\n\n"..t(n,'p',4).." : <J><B>"..math.floor(mice[n].round/10).."</B>\n<N>"..t(n,'p',6).." : <V><B>«"..titles[mice[n].i].."»</B><N>\n\n"..t(n,'p',7).."<BL>\n• "..t(n,'p',5).." : <V> <B>"..mice[n].death.."</B> <BL>/ <J><B>"..mice[n].cheese.."</B> <BL>/ <R><B>"..mice[n].hole.."</B>\n<BL>• "..t(n,'p',8).." : <V><B>"..mice[n].timeassha.." </B><N>\n\n"..t(n,'p',9).."\n<BL>• "..t(n,'p',10).." : <V><B>"..mice[n].first.."</B>\n<BL>• "..t(n,'p',11).." : <V><B>"..mice[n].round.."</B> \n\n<VP>"..t(n,'p',12).."\n<BL>• <BV><font size='15'>"..mice[n].badge,z,210,125,y,z,1,1,0,true)
  775.         end
  776. end
  777. function eventPopupAnswer(i,n,a)
  778.         if i==0 then
  779.                 verifN(a)
  780.                 mice[n].soul = A:sub(0,12)
  781.         elseif i==1 then
  782.                 if a~="*" and a~="@" then
  783.                         verifN(a)
  784.                         exe('giveCheese',A)
  785.                 else
  786.                         if a=="*" then
  787.                                 for i in pairs (tfm.get.room.playerList) do
  788.                                         exe('giveCheese',i)
  789.                                 end
  790.                         elseif a=="@" then
  791.                                 exe('giveCheese',n)
  792.                         end
  793.                 end
  794.         elseif i==2 then
  795.                 if a~="*" and a~="@" then
  796.                         verifN(a)
  797.                         exe('giveMeep',A)
  798.                 else
  799.                         if a=="*" then
  800.                                 for i in pairs (tfm.get.room.playerList) do
  801.                                         exe('giveMeep',i)
  802.                                 end
  803.                         elseif a=="@" then
  804.                                 exe('giveMeep',n)
  805.                         end
  806.                 end
  807.         elseif i==3 then
  808.                 if a~="*" and a~="@" then
  809.                         verifN(a)
  810.                         exe('killPlayer',A)
  811.                 else
  812.                         if a=="*" then
  813.                                 for i in pairs (tfm.get.room.playerList) do
  814.                                         exe('killPlayer',i)
  815.                                 end
  816.                         elseif a=="@" then
  817.                                 exe('killPlayer',n)
  818.                         end
  819.                 end
  820.         elseif i==4 then
  821.                 if a~="*" then
  822.                         verifN(a)
  823.                         mice[n].smpt = A
  824.                 else
  825.                         if smpt==false then
  826.                                 smpt=true
  827.                                 mice[n].smptq="v"
  828.                         end
  829.                 end
  830.                 mice[n].spT = true
  831.         elseif i==5 then
  832.                 if a~="*" and a~="@" then
  833.                         verifN(a)
  834.                         exe('giveCheese',A)
  835.                         exe('playerVictory',A)
  836.                 else
  837.                         if a=="*" then
  838.                                 for i in pairs (tfm.get.room.playerList) do
  839.                                         exe('giveCheese',i)
  840.                                         exe('playerVictory',i)
  841.                                 end
  842.                         elseif a=="@" then
  843.                                 exe('giveCheese',n)
  844.                                 exe('playerVictory',n)
  845.                         end
  846.                 end
  847.         elseif i==6 then
  848.                 if a~="*" and a~="@" then
  849.                         verifN(a)
  850.                         exe('respawnPlayer',A)
  851.                 else
  852.                         if a=="*" then
  853.                                 for i in pairs (tfm.get.room.playerList) do
  854.                                         exe('respawnPlayer',i)
  855.                                 end
  856.                         elseif a=="@" then
  857.                                 exe('respawnPlayer',n)
  858.                         end
  859.                 end
  860.         elseif i==7 then
  861.                 if a=="*" or a=="rand" then
  862.                         mice[n].sColor = math.random(0xFFFFFF)
  863.                 else
  864.                         mice[n].sColor = a
  865.                 end
  866.         elseif i==8 then
  867.                 if mice[n].sColor~="" then
  868.                         if a~="*" and a~="@" then
  869.                                 verifN(a)
  870.                                 exe('setNameColor',A,mice[n].sColor)
  871.                                 mice[n].sColor=""
  872.                         else
  873.                                 for i in pairs (tfm.get.room.playerList) do
  874.                                         exe('setNameColor',i,mice[n].sColor)
  875.                                         mice[n].sColor=""
  876.                                 end
  877.                         end
  878.                 end
  879.         elseif i==9 then
  880.                 mice[n].sPointValue = a
  881.         elseif i==10 then
  882.                 if mice[n].sPointValue then
  883.                         if a~="*" and a~="@" then
  884.                                 verifN(a)
  885.                                 exe('setPlayerScore',A,mice[n].sPointValue)
  886.                         else
  887.                                 if a=="*" then
  888.                                         for i in pairs (tfm.get.room.playerList) do
  889.                                                 exe('setPlayerScore',i,mice[n].sPointValue)
  890.                                         end
  891.                                 elseif a=="@" then
  892.                                         exe('setPlayerScore',n,mice[n].sPointValue)
  893.                                 end
  894.                         end
  895.                 end
  896.         elseif i==11 then
  897.                 if a~="*" and a~="@" then
  898.                         verifN(a)
  899.                         exe('setShaman',A)
  900.                 else
  901.                         if a=="*" then
  902.                                 for i in pairs (tfm.get.room.playerList) do
  903.                                         exe('setShaman',i)
  904.                                 end
  905.                         elseif a=="@" then
  906.                                 exe('setShaman',n)
  907.                         end
  908.                 end    
  909.         elseif i==12 then
  910.                 if a~="*" and a~="@" then
  911.                         verifN(a)
  912.                         exe('setVampirePlayer',A)
  913.                 else
  914.                         if a=="*" then
  915.                                 for i in pairs (tfm.get.room.playerList) do
  916.                                         exe('setVampirePlayer',i)
  917.                                 end
  918.                         elseif a=="@" then
  919.                                 exe('setVampirePlayer',n)
  920.                         end
  921.                 end
  922.         elseif i==13 then
  923.                 exe('setGameTime',a)
  924.         elseif i==14 then
  925.                 exe('newGame',a)
  926.         elseif i==15 then
  927.                 exe('disableAutoShaman',true)
  928.                 dAS = true
  929.                 exe('newGame',a)
  930.                 exe('disableAutoNewGame',true)
  931.                 dANG = true
  932.                 exe('disableAfkDeath',true)
  933.                 dAD = true
  934.         elseif i==16 then
  935.                 exe('setUIMapName',a)
  936.         elseif i==17 then
  937.                 exe('setUIShamanName',a)
  938.         elseif i==18 then
  939.                 if a~="" then
  940.                         if a~="*" then
  941.                                 verifN(a)
  942.                                 if mice[A].canFly==false then
  943.                                         mice[A].canFly=true
  944.                                 else
  945.                                         mice[A].canFly=false
  946.                                         c_popup(20,t(n,'pu',7)..A,n,1)
  947.                                 end
  948.                         else
  949.                                 for i in pairs (tfm.get.room.playerList) do
  950.                                         if mice[i].canFly==true then
  951.                                                 mice[i].canFly=false
  952.                                                 c_popup(20,t(n,'pu',7)..'*',n,1)
  953.                                         else
  954.                                                 mice[i].canFly=true
  955.                                         end
  956.                                 end
  957.                         end
  958.                 end
  959.         elseif i==19 then
  960.                 if a~="" then
  961.                         if a~="*" then
  962.                                 verifN(a)
  963.                                 if mice[A].canSpeed==false then
  964.                                         mice[A].canSpeed=true
  965.                                 else
  966.                                         mice[A].canSpeed=false
  967.                                         c_popup(20,t(n,'pu',7)..A,n,1)
  968.                                 end
  969.                         else
  970.                                 for i in pairs (tfm.get.room.playerList) do
  971.                                         if mice[i].canSpeed==true then
  972.                                                 mice[i].canSpeed=false
  973.                                                 c_popup(20,t(n,'pu',7)..'*',n,1)
  974.                                         else
  975.                                                 mice[i].canSpeed=true
  976.                                         end
  977.                                 end
  978.                         end
  979.                 end
  980.         elseif i==21 then
  981.                 if a~="" then
  982.                         if a~="*" then
  983.                                 verifN(a)
  984.                                 if mice[A].canJump==false then
  985.                                         mice[A].canJump=true
  986.                                 else
  987.                                         mice[A].canJump=false
  988.                                         c_popup(20,t(n,'pu',7)..A,n,1)
  989.                                 end
  990.                         else
  991.                                 for i in pairs (tfm.get.room.playerList) do
  992.                                         if mice[i].canJump==true then
  993.                                                 mice[i].canJump=false
  994.                                                 c_popup(20,t(n,'pu',7)..'*',n,1)
  995.                                         else
  996.                                                 mice[i].canJump=true
  997.                                         end
  998.                                 end
  999.                         end
  1000.                 end
  1001.         elseif i==22 then
  1002.                 if a~="" then
  1003.                         if a~="*" then
  1004.                                 verifN(a)
  1005.                                 if mice[A].canTJ==false then
  1006.                                         mice[A].canTJ=true
  1007.                                 end
  1008.                         else
  1009.                                 for i in pairs (tfm.get.room.playerList) do
  1010.                                         if mice[i].canTJ==false then
  1011.                                                 mice[i].canTJ=true
  1012.                                         end
  1013.                                 end
  1014.                         end
  1015.                 end
  1016.         elseif i==23 then
  1017.                 if a~="" then
  1018.                         if a~="*" then
  1019.                                 verifN(a)
  1020.                                 if mice[A].canTramp==false then
  1021.                                         mice[A].canTramp=true
  1022.                                 else
  1023.                                         mice[A].canTramp=false
  1024.                                         c_popup(20,t(n,'pu',7)..A,n,1)
  1025.                                 end
  1026.                         else
  1027.                                 for i in pairs (tfm.get.room.playerList) do
  1028.                                         if mice[i].canTramp==true then
  1029.                                                 mice[i].canTramp=false
  1030.                                                 c_popup(20,t(n,'pu',7)..'*',n,1)
  1031.                                         else
  1032.                                                 mice[i].canTramp=true
  1033.                                         end
  1034.                                 end
  1035.                         end
  1036.                 end
  1037.         elseif i==25 then
  1038.                 mice[n].explosion=a
  1039.         elseif i==26 then
  1040.                 if mice[n].explosion then
  1041.                         if a~="" then
  1042.                                 verifN(a)
  1043.                                 mice[A].xplo = true
  1044.                         end
  1045.                 end
  1046.         elseif i==27 then
  1047.                 a = verifN(a)
  1048.                 if pd[a] then
  1049.                         pd[a].voodoo = pd[n].temp
  1050.                 end
  1051.         elseif i==28 then
  1052.                 a = verifN(a)
  1053.                 if pd[a] then
  1054.                         pd[n].temp = a
  1055.                 end
  1056.         elseif i==29 then
  1057.                 verifN(a)
  1058.                 if not isBanned(A) and not isAdm(A) and tfm.get.room.playerList[A] then
  1059.                         table.insert(ban,A)
  1060.                         add(990000000000,'',A,-1500,-1500,3000,3000,1,1,1,true)
  1061.                         exe('killPlayer',A)
  1062.                         exe('setNameColor',A,0x000001)
  1063.                         for z in pairs (tfm.get.room.playerList) do
  1064.                                 x_msg(12,'<R>'..A..' <VP>'..t(n,'acess',4),z)
  1065.                         end
  1066.                 end
  1067.         elseif i==30 then
  1068.                 verifN(a)
  1069.                 if isBanned(A) and tfm.get.room.playerList[A] then
  1070.                         for i,w in pairs (ban) do
  1071.                                 if A==w then
  1072.                                         table.remove(ban,i)
  1073.                                         ui.removeTextArea(990000000000,A)
  1074.                                         exe('respawnPlayer',i)
  1075.                                         break
  1076.                                 end
  1077.                         end
  1078.                         for z in pairs (tfm.get.room.playerList) do
  1079.                                 x_msg(13,'<R>'..A..' <VP>'..t(n,'acess',5),z)
  1080.                         end
  1081.                 end
  1082.         elseif i==31 then
  1083.                 if isBlocked==false then
  1084.                         if tonumber(a) then
  1085.                                 qq = a+1
  1086.                                 isBlocked=true
  1087.                         end
  1088.                 end
  1089.         elseif i==32 then
  1090.                 verifN(a)
  1091.                 if tfm.get.room.playerList[A] and not (isAdm(A) or isMod(A)) then
  1092.                         table.insert(adm,A)
  1093.                 end
  1094.                 for i in pairs (tfm.get.room.playerList) do
  1095.                         x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',11),i)
  1096.                 end
  1097.         elseif i==33 then
  1098.                 verifN(a)
  1099.                 if tfm.get.room.playerList[A] and not (isAdm(A) or isMod(A)) then
  1100.                         table.insert(mod,A)
  1101.                 end
  1102.                 for i in pairs (tfm.get.room.playerList) do
  1103.                         x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',12),i)
  1104.                 end
  1105.         elseif i==34 then
  1106.                 verifN(a)
  1107.                 if tfm.get.room.playerList[A] and isAdm(A) then
  1108.                         for i,w in pairs (adm) do
  1109.                                 if A==w then
  1110.                                         table.remove(adm,i)
  1111.                                         break
  1112.                                 end
  1113.                         end
  1114.                 end
  1115.                 for i in pairs (tfm.get.room.playerList) do
  1116.                         x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',13),i)
  1117.                 end
  1118.         elseif i==35 then
  1119.                 verifN(a)
  1120.                 if tfm.get.room.playerList[A] and isMod(A) then
  1121.                         for i,w in pairs (mod) do
  1122.                                 if A==w then
  1123.                                         table.remove(mod,i)
  1124.                                         break
  1125.                                 end
  1126.                         end
  1127.                 end
  1128.                 for i in pairs (tfm.get.room.playerList) do
  1129.                         x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',14),i)
  1130.                 end
  1131.         elseif i==300 then
  1132.                 if a==pw then
  1133.                         if mice[n].badge_7=="x" then wonBadge(n,7,true) mice[n].badge_7="v" end
  1134.                         mice[n].acess=true
  1135.                 else
  1136.                         x_msg(23542,t(n,'acess',3),n)
  1137.                 end
  1138.         end    
  1139. end
  1140. function eventNewGame()
  1141.         local g = tfm.get.room.currentMap
  1142.         whoF = 0
  1143.         if g==map then
  1144.                 exe('setUIMapName','<VP>'..tfm.get.room.name:sub(3)..'                  <BL>~                   <ROSE>BETA o/\n\n')
  1145.         end
  1146.         for n in pairs (tfm.get.room.playerList) do
  1147.                 mice[n].round = mice[n].round + 1
  1148.                 if tfm.get.room.playerList[n].isShaman then
  1149.                         mice[n].timeassha = mice[n].timeassha + 1
  1150.                 end
  1151.         end
  1152.         if g=="@6086453" then
  1153.                 exe('setUIMapName','<R>Easter <BL>- <J>801 <BV>(2014)')
  1154.         elseif g=="@6086460" then
  1155.                 exe('setUIMapName','<R>Easter <BL>- <J>Land <BV>(2015)')
  1156.         elseif g=="@6086465" then
  1157.                 exe('setUIMapName','<R>Easter <BL>- <J>Candy <BV>(2015)')
  1158.         elseif g=="@6086474" then
  1159.                 exe('setUIMapName','<R>Carnival <BL>- <J>Churros <BV>(2014)')
  1160.         elseif g=="@3607870" then
  1161.                 exe('setUIMapName',"<R>Valentine's Day <BL>- <J>Defilante <BV>(2013)")
  1162.         elseif g=="@6086479" then
  1163.                 exe('setUIMapName',"<R>Valentine's Day <BL>- <J>Paris <BV>(2014)")
  1164.         elseif g=="@6086484" then
  1165.                 exe('setUIMapName','<R>Fish <BL>- <J>Ship <BV>(x)')
  1166.         elseif g=="@6086492" then
  1167.                 exe('setUIMapName','<R>Fish <BL>- <J>Shaman <BV>(2013)')
  1168.         elseif g=="@6086504" then
  1169.                 exe('setUIMapName','<R>Fish <BL>- <J>Jungle <BV>(2014)')
  1170.         elseif g=="@6086509" then
  1171.                 exe('setUIMapName','<R>Fish <BL>- <J>Waterfall <BV>(2014)')
  1172.         elseif g=="@6086511" then
  1173.                 exe('setUIMapName','<R>Fish <BL>- <J>Dinosaur <BV>(2014)')
  1174.         elseif g=="@6086515" then
  1175.                 exe('setUIMapName','<R>Fish <BL>- <J>Island <BV>(2014)')
  1176.         elseif g=="@6086519" then
  1177.                 exe('setUIMapName','<R>Fish <BL>- <J>Clouds <BV>(2014)')
  1178.         elseif g=="@6086521" then
  1179.                 exe('setUIMapName','<R>Fish <BL>- <J>Stone <BV>(2015)')
  1180.         elseif g=="@6086523" then
  1181.                 exe('setUIMapName','<R>Fish <BL>- <J>Temple <BV>(2015)')
  1182.         elseif g=="@6086525" then
  1183.                 exe('setUIMapName','<R>Fish <BL>- <J>Jungle <BV>(2015)')
  1184.         elseif g=="@6086528" then
  1185.                 exe('setUIMapName','<R>Fish <BL>- <J>Museum <BV>(2015)')
  1186.         elseif g=="@6086421" then
  1187.                 exe('setUIMapName','<R>Halloween <BL>- <J>Mansion <BV>(2013)')
  1188.         elseif g=="@6086424" then
  1189.                 exe('setUIMapName','<R>Halloween <BL>- <J>Bar <BV>(2013)')
  1190.         elseif g=="@6086426" then
  1191.                 exe('setUIMapName','<R>Halloween <BL>- <J>Street <BV>(2014)')
  1192.         elseif g=="@6086427" then
  1193.                 exe('setUIMapName','<R>Halloween <BL>- <J>Cemetery <BV>(2014)')
  1194.         elseif g=="@6086429" then
  1195.                 exe('setUIMapName','<R>Halloween <BL>- <J>Room <BV>(2014)')
  1196.         elseif g=="@6086433" then
  1197.                 exe('setUIMapName','<R>Christmas <BL>- <J>House <BV>(2013)')
  1198.         elseif tfm.get.room.xmlMapInfo.author=='#Module' then
  1199.                 exe('setUIMapName','<R>Christmas <BL>- <J>Troll <BV>(2014)')
  1200.         end
  1201.         for n in pairs (tfm.get.room.playerList) do     if isBanned(n) then exe('killPlayer',n) exe('setNameColor',n,0x000001) end end
  1202. end
  1203. function eventPlayerWon(n)
  1204.         whoF = whoF + 1
  1205.         if whoF==1 and not tfm.get.room.playerList[n].isShaman then
  1206.                 mice[n].first = mice[n].first + 1
  1207.         end
  1208.         if not tfm.get.room.playerList[n].isShaman then
  1209.                 mice[n].hole = mice[n].hole + 1
  1210.         end
  1211.         if autoRespawn==true then
  1212.                 exe('respawnPlayer',n)
  1213.         end
  1214. end
  1215. function eventPlayerGetCheese(n)
  1216.         if not tfm.get.room.playerList[n].isShaman then
  1217.                 mice[n].cheese = mice[n].cheese + 1
  1218.         end
  1219. end
  1220. function eventPlayerDied(n)
  1221.         if not tfm.get.room.playerList[n].isShaman then
  1222.                 mice[n].death = mice[n].death + 1
  1223.                 if mice[n].round~=0 then
  1224.                         mice[n].round = mice[n].round - 1
  1225.                 end
  1226.         end
  1227.         if autoRespawn==true then
  1228.                 if not isBanned(n) then
  1229.                         exe('respawnPlayer',n)
  1230.                 end
  1231.         end
  1232. end
  1233. function eventKeyboard(n,k)
  1234.         if k==80 then
  1235.                 profile(n,n)
  1236.         end
  1237.         if k==32 and mice[n].canFly==true then
  1238.                 exe('movePlayer',n,0,0,true,0,-60,true)
  1239.         end
  1240.         if k==17 and mice[n].canSpeed==true then
  1241.                 if tfm.get.room.playerList[n].movingRight then
  1242.                         exe('movePlayer',n,nil,nil,false,35,0,true)
  1243.                 else
  1244.                         exe('movePlayer',n,nil,nil,false,-35,0,true)
  1245.                 end
  1246.         end
  1247.         if (mice[n].canJump==true) and (k==string.byte('W') or k==90 or k==38) and (os.time()>time) then
  1248.                 time = os.time() + 2000
  1249.                 exe('movePlayer',n,0,0,false,0,-70,false)
  1250.         end
  1251.         if (mice[n].canTramp==true) and (k==40 or k==83) then
  1252.                 exe('movePlayer',n,0,0,true,0,600,true)
  1253.         end
  1254.         local d = {0,-40,-40,0,0,40,40,0}
  1255.         table.foreachi({85,72,74,75},function(i,v)
  1256.                 if v==k then
  1257.                         tfm.exec.movePlayer(pd[n].voodoo,0,0,false,d[i * 2 - 1],d[i * 2],false)
  1258.                 end
  1259.         end)
  1260. end
  1261. function Pw()
  1262.         q = math.random(5,12)
  1263.         x = {"+","-","_","@","?","!",".",":",",","(",")","~","*","=","$","#","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z","0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z"}
  1264.         pw = ""
  1265.         for i = 1,q do
  1266.                 pw = pw..x[math.random(#x)]
  1267.         end
  1268. end
  1269. wP_ = function(id,n)
  1270.         add(id,"<R><p align='center'><font size='13'>"..v.." </font><font size='20'><a href='event:msg_close'>"..f.."</a></font></p>",n,5,300,790,h,0x324650,0x141D22,0.95,true)
  1271. end
  1272. function eventChatCommand(n,c)
  1273.         badge3=function() if mice[n].badge_3=="x" then wonBadge(n,2,true) mice[n].badge_3="v" end end
  1274.         local p={}
  1275.         for arg in c:gmatch('[^%s]+') do
  1276.                 table.insert(p,arg)
  1277.         end
  1278.         p[1] = string.lower(p[1])
  1279.         if p[1]=="m" and p[2] then
  1280.                 badge3()
  1281.                 p[2]=table.concat(p," ",2)
  1282.                 local l=200+#p[2]*4
  1283.                 local x = 400-l/2
  1284.                 if isAdm(n) then
  1285.                         ui.addPopup(-666,0,"<p align='center'><font size='12' color='#EB1D51'>[~"..n.."]</font> <font size='12' color='#BABD2F'>"..p[2].."</font></p>",nil,x,200,l,true)
  1286.                 elseif isMod(n) then
  1287.                         ui.addPopup(-664,0,"<p align='center'><font size='12' color='#BABD2F'>[~"..n.."]</font> <font size='12' color='#C2C2DA'>"..p[2].."</font></p>",nil,x,200,l,true)
  1288.                 end
  1289.         elseif p[1]=="mp" and p[2] and p[3] then
  1290.                 badge3()
  1291.                 p[3]=table.concat(p," ",3)
  1292.                 verifN(p[2])
  1293.                 local l=200+#p[3]*4
  1294.                 local x = 400-l/2
  1295.                 if isAdm(n) then
  1296.                         ui.addPopup(-666,0,"<p align='center'><font size='12' color='#EB1D51'>[~"..n.."]</font> <font size='12' color='#BABD2F'>"..p[3].."</font></p>",A,x,200,l,true)
  1297.                 elseif isMod(n) then
  1298.                         ui.addPopup(-664,0,"<p align='center'><font size='12' color='#BABD2F'>[~"..n.."]</font> <font size='12' color='#C2C2DA'>"..p[3].."</font></p>",A,x,200,l,true)
  1299.                 end
  1300.         elseif p[1]=='p' then
  1301.                 badge3()
  1302.                 if p[2] then
  1303.                         verifN(p[2])
  1304.                         if tfm.get.room.playerList[A] then
  1305.                                 profile(n,A)
  1306.                         end
  1307.                 else
  1308.                         profile(n,n)
  1309.                 end
  1310.         elseif p[1]=='adm' and isAdm(n) then
  1311.                 badge3()
  1312.                 if p[2]~="" then
  1313.                         print('oi')
  1314.                         verifN(p[2])
  1315.                         if tfm.get.room.playerList[A] then
  1316.                                 table.insert(adm,A)
  1317.                         end
  1318.                         for i in pairs (tfm.get.room.playerList) do
  1319.                                 x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',11),i)
  1320.                         end
  1321.                 end
  1322.         elseif p[1]=='mod' and isAdm(n) then
  1323.                 badge3()
  1324.                 if p[2]~="" then
  1325.                         verifN(p[2])
  1326.                         if tfm.get.room.playerList[A] then
  1327.                                 table.insert(mod,A)
  1328.                         end
  1329.                         for i in pairs (tfm.get.room.playerList) do
  1330.                                 x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',12),i)
  1331.                         end
  1332.                 end
  1333.         elseif p[1]=='unadmin' and isAdm(n) then
  1334.                 badge3()
  1335.                 if p[2]~="" then
  1336.                         verifN(p[2])
  1337.                         if tfm.get.room.playerList[A] and isAdm(A) then
  1338.                                 for i,w in pairs (adm) do
  1339.                                         if A==w then
  1340.                                                 table.remove(adm,i)
  1341.                                                 break
  1342.                                         end
  1343.                                 end
  1344.                         end
  1345.                         for i in pairs (tfm.get.room.playerList) do
  1346.                                 x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',13),i)
  1347.                         end
  1348.                 end
  1349.         elseif p[1]=='unmod' and isAdm(n) then
  1350.                 badge3()
  1351.                 if p[2]~="" then
  1352.                         verifN(p[2])
  1353.                         if tfm.get.room.playerList[A] and isMod(A) then
  1354.                                 for i,w in pairs (mod) do
  1355.                                         if A==w then
  1356.                                                 table.remove(mod,i)
  1357.                                                 break
  1358.                                         end
  1359.                                 end
  1360.                         end
  1361.                         for i in pairs (tfm.get.room.playerList) do
  1362.                                 x_msg(14,'<R>'..A..' <VP>'..t(n,'acess',14),i)
  1363.                         end
  1364.                 end
  1365.         elseif p[1]=='cheese' then
  1366.                 badge3()
  1367.                 if p[2]~="" then
  1368.                         if isMod(n) or isAdm(n) then
  1369.                                 verifN(p[2])
  1370.                                 exe('giveCheese',A)
  1371.                         else
  1372.                                 if tPw==false or mice[n].acess==true then
  1373.                                         exe('giveCheese',n)
  1374.                                 end
  1375.                         end
  1376.                 end
  1377.         elseif p[1]=='r' then
  1378.                 badge3()
  1379.                 if p[2]~="" then
  1380.                         if isMod(n) or isAdm(n) then
  1381.                                 verifN(p[2])
  1382.                                 exe('respawnPlayer',A)
  1383.                         else
  1384.                                 if tPw==false or mice[n].acess==true then
  1385.                                         exe('respawnPlayer',n)
  1386.                                 end
  1387.                         end
  1388.                 end
  1389.         elseif p[1]=='np' and (isAdm(n) or isMod(n)) then
  1390.                 badge3()
  1391.                 exe('newGame',p[2])
  1392.         elseif p[1]=='reset' and (isAdm(n) or isMod(n)) then
  1393.                 badge3()
  1394.                 exe('newGame',tfm.get.room.currentMap)
  1395.         elseif p[1]=='pw' and isAdm(n) then
  1396.                 badge3()
  1397.                 if not p[2] then
  1398.                         if pw==nil then
  1399.                                 pw = nil
  1400.                                 Pw()
  1401.                                 v=t(n,'acess',7)
  1402.                                 f=pw
  1403.                                 wP_(999999999,n)
  1404.                                 pw = pw
  1405.                                 tPw = true
  1406.                         else
  1407.                                 v=t(n,'acess',8)
  1408.                                 f=pw
  1409.                                 wP_(999999999,n)
  1410.                                 tPw = true
  1411.                         end
  1412.                 else
  1413.                         if p[2]=="_new" then
  1414.                                 if not pw then
  1415.                                         v="<a href='event:msg_close'>"..t(n,'acess',9)
  1416.                                         f=''
  1417.                                         wP_(999999999,n)
  1418.                                 else
  1419.                                         pw = nil
  1420.                                         Pw()
  1421.                                         v=t(n,'acess',10)
  1422.                                         f=pw
  1423.                                         wP_(999999999,n)
  1424.                                         pw = pw
  1425.                                         tPw = true
  1426.                                 end
  1427.                         elseif p[2]=="_remove" then
  1428.                                 tPw = false
  1429.                                 pw = nil
  1430.                                 v="<a href='event:msg_close'>"..t(n,'acess',15)
  1431.                                 f=""
  1432.                                 wP_(999999999,n)
  1433.                         else
  1434.                                 p[2]=table.concat(p," ",2)
  1435.                                 pw = p[2]
  1436.                                 v=t(n,'acess',7)
  1437.                                 f=pw
  1438.                                 wP_(999999999,n)
  1439.                                 tPw = true
  1440.                         end
  1441.                 end
  1442.         elseif p[1]=='ban' and isAdm(n) then
  1443.                 badge3()
  1444.                 if p[2]~="" then
  1445.                         verifN(p[2])
  1446.                         if not isBanned(A) and not isAdm(A) and tfm.get.room.playerList[A] then
  1447.                                 table.insert(ban,A)
  1448.                                 add(990000000000,'',A,-1500,-1500,3000,3000,1,1,1,true)
  1449.                                 exe('killPlayer',A)
  1450.                                 exe('setNameColor',A,0x000001)
  1451.                                 for z in pairs (tfm.get.room.playerList) do
  1452.                                         x_msg(12,'<R>'..A..' <VP>'..t(n,'acess',4),z)
  1453.                                 end
  1454.                         end
  1455.                 end
  1456.         elseif p[1]=='unban' and isAdm(n) then
  1457.                 badge3()
  1458.                 if p[2]~="" then
  1459.                         verifN(p[2])
  1460.                         if isBanned(A) and tfm.get.room.playerList[A] then
  1461.                                 for i,w in pairs (ban) do
  1462.                                         if A==w then
  1463.                                                 table.remove(ban,i)
  1464.                                                 ui.removeTextArea(990000000000,A)
  1465.                                                 exe('respawnPlayer',i)
  1466.                                                 break
  1467.                                         end
  1468.                                 end
  1469.                                 for z in pairs (tfm.get.room.playerList) do
  1470.                                         x_msg(13,'<R>'..A..' <VP>'..t(n,'acess',5),z)
  1471.                                 end
  1472.                         end
  1473.                 end
  1474.         elseif p[1]=='xml' and isAdm(n) then
  1475.                 badge3()
  1476.                 xml = tfm.get.room.xmlMapInfo.xml
  1477.                 xml = xml:gsub("<","&lt;")
  1478.                 print("<R>XML:")
  1479.                 print("<R>"..xml:sub(0,3000).."")
  1480.                 if xml:sub(3001,6001)~="" then
  1481.                   print("<R>"..xml:sub(3001,6001).."")
  1482.                 end
  1483.                 if xml:sub(6002,9002)~="" then
  1484.                   print("<R>"..xml:sub(6002,9002).."")
  1485.                 end
  1486.                 if xml:sub(9003,12003)~="" then
  1487.                   print("<R>"..xml:sub(9003,12003).."")
  1488.                 end
  1489.                 if xml:sub(12004,15004)~="" then
  1490.                   print("<R>"..xml:sub(12004,15004).."")
  1491.                 end
  1492.                 if xml:sub(15005,18005)~="" then
  1493.                   print("<R>"..xml:sub(15005,18005).."")
  1494.                 end
  1495.                 if xml:sub(18006,21006)~="" then
  1496.                   print("<R>"..xml:sub(18006,21006).."")
  1497.                 end
  1498.                 if xml:sub(21007,24007)~="" then
  1499.                   print("<R>"..xml:sub(21007,24007).."")
  1500.                 end
  1501.                 if xml:sub(24008,27008)~="" then
  1502.                   print("<R>"..xml:sub(24008,27008).."")
  1503.                 end
  1504.                 if xml:sub(27009,30009)~="" then
  1505.                   print("<R>"..xml:sub(27009,30009).."")
  1506.                 end
  1507.                 if xml:sub(30010,40000)~="" then
  1508.                   print("<R>"..xml:sub(30010,40000).."")
  1509.                 end
  1510.         elseif p[1]=='list' and (isAdm(n) or isMod(n)) then
  1511.                 badge3()
  1512.                 if isAdm(n) then
  1513.                         UI(-1,n,.99,t(n,'title',1),"<J><font size='15'><p align='center'><a href='event:bSMi'>"..t(n,'cat',1).."</a>\n<a href='event:bSh'>"..t(n,'cat',2).."</a>\n<a href='event:bSMa'>"..t(n,'cat',3).."</a>\n<a href='event:bSCh'>"..t(n,'cat',4).."</a>\n<a href='event:bSCo'>"..t(n,'cat',5).."</a>\n<a href='event:bSEv'>"..t(n,'cat',6).."</a>\n<a href='event:bSIM'>"..t(n,'cat',7).."</a></font></p>",270,60,230,240,true)
  1514.                 elseif isMod(n) then
  1515.                         UI(-1,n,.99,t(n,'title',2),"<J><font size='15'><p align='center'><a href='event:bSMi'>"..t(n,'cat',1).."</a>\n<a href='event:bSh'>"..t(n,'cat',2).."</a>\n<a href='event:bSMa'>"..t(n,'cat',3).."</a>\n<a href='event:bSCh'>"..t(n,'cat',4).."</a>\n<a href='event:bSCo'>"..t(n,'cat',5).."</a></font></p>",270,60,230,220,true)              
  1516.                 end
  1517.         end
  1518. end
  1519. function eventLoop()
  1520.         for n in pairs (tfm.get.room.playerList) do
  1521.                 if isAdm(n) and mice[n].badge_4=="x" and mice[n].badge_5=="x" then
  1522.                         mice[n].badge_4="v" mice[n].badge_5="v"
  1523.                         wonBadge(n,4,false)
  1524.                         wonBadge(n,5,false)
  1525.                 elseif isMod(n) and mice[n].badge_5=="x" then
  1526.                         mice[n].badge_5="v"
  1527.                         wonBadge(n,5,false)
  1528.                 end
  1529.                 if isAdm(n) then
  1530.                         exe('setNameColor',n,0xEB1D51)
  1531.                 elseif isMod(n) then
  1532.                         exe('setNameColor',n,0xBABD2F)
  1533.                 elseif isBanned(n) then
  1534.                         exe('setNameColor',n,0x000001)
  1535.                 else
  1536.                         exe('setNameColor',n,0xFFFFFF)
  1537.                 end
  1538.         end
  1539.         if bannerShow == true then
  1540.                 bannerCount = bannerCount + .5
  1541.                 local a = string.char(85,116,105,108,32,77,105,110,105,109,97,108,105,115,116)
  1542.                 local b = tfm.get.room.name:sub(3)
  1543.                 local c = string.char(66,121,32,66,111,108,111,100,101,102,99,104,111,99,111)
  1544.                 add(875,'',n,-1500,-1500,3000,3000,0x0E242D,0x0E242D,.5,true)
  1545.                 add(876,"<B><p align='center'><font size='33'><VP>"..a.."\n</font><font size='23'><BV>"..b.."</font><font size='13'><ROSE>\n"..c,n,math.random(20,120),math.random(100,150),700,700,1,1,0,true)
  1546.                 if bannerCount>=5 then
  1547.                         bannerShow = false
  1548.                         for i = 875,876 do
  1549.                                 ui.removeTextArea(i,n)
  1550.                                 bannerCount=1000
  1551.                                 bannerShow=false
  1552.                         end
  1553.                 end
  1554.         end
  1555. end
  1556. function eventMouse(n,x,y)
  1557.         if mice[n].pT==true then
  1558.                 exe('movePlayer',n,x,y,false)
  1559.                 mice[n].pT=false
  1560.         end
  1561.         if mice[n].sID~="" then
  1562.                 exe('addShamanObject',mice[n].sID,x,y,math.random(0,360))
  1563.                 mice[n].sID = ""
  1564.         end
  1565.         if mice[n].spT==true and mice[n].smpt~="" then
  1566.                 exe('movePlayer',mice[n].smpt,x,y,false)
  1567.                 mice[n].spT=false
  1568.                 mice[n].smpt=""
  1569.         end
  1570.         if smpt==true then
  1571.                 if mice[n].smptq=="v" then
  1572.                         for i in pairs (tfm.get.room.playerList) do
  1573.                                 exe('movePlayer',i,x,y,false)
  1574.                         end
  1575.                         mice[n].smptq="x"
  1576.                         smpt=false
  1577.                 end
  1578.         end
  1579.         if mice[n].canTJ==true then
  1580.                 mice[n].tj = mice[n].tj+1
  1581.                 exe('movePlayer',n,x,y,false)
  1582.                 exe('movePlayer',n,0,0,false,0,-90,false)
  1583.                 if mice[n].tj>=3 then mice[n].canTJ=false mice[n].tj=0 end
  1584.         end
  1585.         if mice[n].xplo==true and mice[n].explosion~=0 then
  1586.                 exe('explosion',x,y,-mice[n].explosion,1000,false)
  1587.                 for i = 0,30 do
  1588.                         exe('displayParticle',3,math.random(x-30,x+30),math.random(y-30,y+30),0,0,0,0)
  1589.                         exe('displayParticle',9,math.random(x-70,x+70),math.random(y-70,y+70),0,0,0,0)
  1590.                 end
  1591.                 mice[n].xplo=false mice[n].explosion=0
  1592.         end
  1593. end
  1594. function eventSummoningStart(n,i,x,y,a)
  1595.         if autoSpawn==true then exe('addShamanObject',i,x,y,a) end
  1596. end
  1597. function eventPlayerLeft(n)
  1598.         who = who - 1
  1599.         if isBlocked==true then
  1600.                 ui.addPopup(40,0,"<p align='center'>+ "..qq-who-(1)..' '..t(n,'ot',7),p,5,30,w,true)
  1601.         end
  1602. end
  1603. for i,c in ipairs({'x','X','m','M','mp','Mp','mP','MP','p','P','adm','mod','ADM','MOD','unadmin','unmod','UNADMIN','UNMOD','cheese','CHEESE','r','R','NP','np','reset','RESET','pw','Pw','pW','PW','ban','unban','UNBAN','xml','XML','list','LIST'}) do
  1604.     system.disableChatCommandDisplay(c,true)
  1605. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement