API tools faq
paste
Advertisement
Karluwu

TRIBE MANAGAER LUA

Karluwu
Jan 4th, 2019
152
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 56.60 KB | None | 0 0
raw download clone embed print report
  1. SuperAdmin={"Karl"}admins={"Nickname","Nickname"}RUSZ={[1]=392,[2]=133,[3]=372,[4]=505,[5]=113,[6]=123,[7]=143,[8]=100,[9]=469,[10]=133,[11]=173,[12]=323,[13]=397,[14]=500}ENSZ={[1]=392,[2]=113,[3]=352,[4]=485,[5]=83,[6]=93,[7]=113,[8]=60,[9]=429,[10]=113,[11]=153,[12]=303,[13]=377,[14]=480}RU={[1]="Администраторы: ",[2]="| Пароль: |",[3]="Введите пароль для доступа к функциям администратора",[4]="Дать..",[5]="Карта..",[6]="Игрок..",[7]="Другое..",[8]="Мини-игры",[9]="<p align='center'><font color='#A4CF9E'>Введите что Вы хотите дать и кому</font><br><font color='#BABD2F'>Доступные команды:</font><br><font color='#2ECF73'>cheese</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>vampire</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>shaman</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>victory</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>meep</font> <font color='#BABD2F'>Nick</font><br></p><font size='9'><font color='#CB546B'>*Никнейм обязательно вводить с большой буквы (Пример:cheese Bushmeister)</font></font>",[10]="Назад",[11]="Изменить карту",[12]="Изменить название",[13]="Изменить время",[14]="Перезагрузить",[15]="Введите @номер карты",[16]="Введите название карты",[17]="Введите время раунда в секундах",[18]="Цвет никнейма",[19]="Убить",[20]="Телепортировать",[21]="<br><p align='center'><b>Введите никнейм и код цвета.</b></p><br><font size='9'><font color='#CB546B'>*Код цвета должен быть без # (Пример:Bushmeister FF9500)</font></font>",[22]="Введите никнейм игрока которого хотите убить.",[23]="Введите никнейм игрока и x y координаты.",[24]="<br><p align='center'><b>Введите никнейм игрока, причину и время на которое будет забанен игрок<br> <font color='#CB546B'>После никнейма обязателен знак</font> <font color='#2ECF73'>#</font><br><font color='#CB546B'>Пример: Bushmeister</font><font color='#2ECF73'>#</font><font color='#CB546B'>Hack!</font><font color='#2ECF73'>#</font><font color='#CB546B'>60</font></b></p>",[25]="Введите никнейм игрока.",[26]="Снег",[27]="Умения шамана: ",[28]="Телепортация: ",[29]="Добавить объект",[30]="Фейерверки: ",[31]="<br><p align='center'><b>Введите <font color='#2ECF73'>время</font> которое будет идти снег<br> (<font color='#2ECF73'>в секундах</font>) и <font color='#2ECF73'>силу</font> снежков(стандартная - 10)</b></p><font color='#CB546B'><font size='9'>Пример: 60 12</font></font>",[32]=" отключил(а) умения шамана",[33]=" включил(a) умения шамана",[34]=" включил(a) режим Fly",[35]=" выключил(a) режим Fly",[36]=" включил(а) режим Teleport",[37]=" выключил(а) режим Teleport",[38]="Введите id объекта и X Y координаты.",[39]="<p align='center'><b>Список объектов:</p></b><br><p align='left'>ID 27 оранжевый портал<br>ID 28 шарик<br>ID 32 руна<br>ID 34 снег<br>ID 35 стрелка Валентина<br>ID 39 яблоко<br>ID 40 овчека<br>ID 45 ледяная палка<br>ID 46 шоколадная палка<br>ID 57 облако<br>ID 59 пузырь<br>ID 60 крошечная палка<br>ID 61 компаньон-куб<br>ID 62 стабильная руна</p>",[40]="<p align='center'><b>Список объектов:</p></b><br><p align='left'>ID 0 стрелка<br>ID 1 маленький ящик<br>ID 2 большой ящик<br>ID 3 маленькая палка<br>ID 4 большая палка<br>ID 6 мячик<br>ID 7 трамплин<br>ID 10 наковальня<br>ID 18 ядро вниз<br>ID 19 ядро вправо<br>ID 20 ядро влево<br>ID 23 бомба<br>ID 24 спирит<br>ID 26 голубой портал</p>",[41]=" включил(а) фейерверки",[42]="Фейерверки: ",[43]=" выключил(а) фейерверки",[44]="Забанить",[45]="Разбанить",[46]="Добавить админа",[47]="Удалить админа",[48]="<p align='center'><b>Введите текст таблички и X Y координаты.</b></p><br><b><p align='left'><font color='#CB546B'>Пример:</font><font color='#2ECF73'>Текст </font><font color='#BABD2F'>#</font><font color='#2ECF73'>400</font><font color='#BABD2F'>#</font><font color='#2ECF73'>200</font></b></p>",[49]="Введите текст сообщения",[50]="Введите никнейм нового админа",[51]="Введите никнейм админа и причину</b> <font size='9'>(необязательно)",[52]="Перезапустить скрипт?",[53]=" включил(а) мини-игру Shamanhunt",[54]=" включил(а) режим Survivor",[55]=" включил(а) режим Bootcamp",[56]=" включил(а) мини-игру Racing",[57]="Остановить работу всех игр?",[58]="Разблокировано!",[59]="Неверный пароль!",[60]=" изменил(а) карту на @",[61]=" сменил(а) название карты на ",[62]=" установил(а) время раунда ",[72]=" секунд",[63]=" изменил(а) цвет никнейма ",[64]=" убил(а) ",[65]=" телепортировал(а) ",[66]=" забанен на",[67]=" секунд. Причина: ",[68]="<br><p align='center'>Вы были забанены<font color='#CB546B'> на ",[73]=" секунд</font><br>Причина: <font color='#CB546B'>",[69]=" забанил(а) ",[70]=" на ",[71]=" секунд Причина: ",[74]=" забанен. Причина: ",[75]="Вы были забанены<br>Причина: ",[76]=" забанил(а) ",[77]=" Причина: ",[78]=" разбанен",[79]=" разбанил(а) ",[80]=" включил(а) снег на ",[81]=" секунд",[82]="Приветствуем нового администратора - ",[83]=" больше не администратор!",[84]=" выключил(а) все мини-игры",[85]="Shamanhunt будет запущен через ",[86]="1 Мышь взяла сыр!",[87]="5 Мышам достался сыр!",[88]="10 мышам достался сыр! Шаман нуб и опозорился!",[89]="Время вышло, ",[90]="нуб и опозорился! ^_^",[91]="Продержитесь 2 минуты и не дайте мышам вас схватить!<br>Все граунды пропускают сквозь себя объекты.<br><font color='#CB546B'>Нажмите чтобы закрыть</font>",[92]=" Спасайтесь от",[93]=" погиб T_T",[94]="Добро пожаловать в мини-игру <font color='#BABD2F'>shamanhunt!</font> Главная цель схватить шамана и донести сыр до норы! Но будьте осторожны, шаман будет предпринимать все меры, чтобы вы не cмогли это сделать!<br><font color='#EB1D51'>Creator:</font><font color='#BABD2F'> Bushmeister</font><br><font color='#2ECF73'>Helpers:</font> <font color='#A4CF9E'>Timatimaaa Clowfish Issey </font>",[95]="Введите никнейм СуперАдмина"}EN={[1]="Administrators: ",[2]="| Password: |",[3]="Please enter the password to get access to adminstrator's options",[4]="Give..",[5]="Map..",[6]="Player..",[7]="Miscellaneous..",[8]="Minigames",[9]="<p align='center'><font color='#A4CF9E'>Please enter what you want to give and whom</font><br><font color='#BABD2F'>Accessible commands:</font><br><font color='#2ECF73'>cheese</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>vampire</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>shaman</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>victory</font> <font color='#BABD2F'>Nick</font><br><font color='#2ECF73'>meep</font> <font color='#BABD2F'>Nick</font><br></p><font size='9'><font color='#CB546B'><br></p><font size='9'><font color='#CB546B'>*You must enter the nickname with a capital letter (Example: cheese Bushmeister)</font></font>",[10]="Return",[11]="Change map",[12]="Change title",[13]="Change time",[14]="Reload",[15]="Enter @-code of the map",[16]="Enter the title of the map",[17]="Enter round's time in seconds",[18]="Nickname colour",[19]="Kill",[20]="Teleport",[21]="<br><p align='center'><b>Enter the nickname and colour code.</b></p><br><font size='9'><font color='#CB546B'>*Colour code must not contain # (Example:Bushmeister FF9500)</font></font>",[22]="Enter the nickname of the player you want to kill",[23]="Enter the nickname of the player and X Y coordinates.",[24]="<br><p align='center'><b>Enter the player's nickname, reason and length of the ban<br> <font color='#CB546B'>Character</font> <font color='#2ECF73'>#</font> <font color='#CB546B'>after the nickname is mandatory</font><br><font color='#CB546B'>Example: Bushmeister</font><font color='#2ECF73'>#</font><font color='#CB546B'>Hack!</font><font color='#2ECF73'>#</font><font color='#CB546B'>60</font></b></p>",[25]="Enter the nickname of a player",[26]="Snow",[27]="Shaman skills: ",[28]="Teleportation: ",[29]="Add object",[30]="Fireworks: ",[31]="<br><p align='center'><b>Enter the <font color='#2ECF73'>time</font> it will be snowing for<br> (<font color='#2ECF73'>in seconds</font>) and the <font color='#2ECF73'>power</font> of snowballs (default - 10)</b></p><font color='#CB546B'><font size='9'>Example: 60 12</font></font>",[32]=" disabled shaman skills",[33]=" enabled shaman skills",[34]=" enabled Fly mode",[35]=" disabled Fly mode",[36]=" enabled Teleport mode",[37]=" disabled Teleport mode",[38]="Enter object's ID and X Y coordinates.",[39]="<p align='center'><b>List of objects:</p></b><br><p align='left'>ID 27 orange portal<br>ID 28 balloon<br>ID 32 rune<br>ID 34 snow<br>ID 35 Valentine's arrow<br>ID 39 apple<br>ID 40 sheep<br>ID 45 ice plank<br>ID 46 chocolate plank<br>ID 57 cloud<br>ID 59 bubble<br>ID 60 tiny plank<br>ID 61 companion cube<br>ID 62 stable rune</p>",[40]="<p align='center'><b>List of objects:</p></b><br><p align='left'>ID 0 arrow<br>ID 1 small box<br>ID 2 large box<br>ID 3 small plank<br>ID 4 large plank<br>ID 6 ball<br>ID 7 trampoline<br>ID 10 anvil<br>ID 18 cannon down<br>ID 19 cannon right<br>ID 20 cannon left<br>ID 23 bomb<br>ID 24 spirit<br>ID 26 blue portal</p>",[41]=" enabled fireworks",[42]="Fireworks: ",[43]=" disabled fireworks",[44]="Ban",[45]="Unban",[46]="Add an admin",[47]="Remove an admin",[48]="<p align='center'><b>Enter the text of the table and X Y coordinates.</b></p><br><b><p align='left'><font color='#CB546B'>Example:</font><font color='#2ECF73'>Text </font><font color='#BABD2F'>#</font><font color='#2ECF73'>400</font><font color='#BABD2F'>#</font><font color='#2ECF73'>200</font></b></p>",[49]="Enter the text of the message",[50]="Enter the nickname of the new admin",[51]="Enter the nickname of the admin and reason</b> <font size='9'>(optionally)",[52]="Restart the script?",[53]=" enabled Shamanhunt minigame",[54]=" enabled Survivor minigame",[55]=" enabled Bootcamp minigame",[56]=" enabled Racing minigame",[57]="Stop all the games?",[58]="Unlocked!",[59]="Invalid password!",[60]=" changed map to @",[61]=" changed map's title to ",[62]=" set the time of the round ",[72]=" seconds",[63]=" changed nickname colour ",[64]=" killed ",[65]=" teleported ",[66]=" banned for",[67]=" seconds. Reason: ",[68]="<br><p align='center'>You have been banned<font color='#CB546B'> for ",[73]=" seconds</font><br>Reason: <font color='#CB546B'>",[69]=" banned ",[70]=" for ",[71]=" seconds. Reason: ",[74]=" has been banned. Reason: ",[75]="You have been banned.<br>Reason: ",[76]=" banned ",[77]=" Reason: ",[78]=" has been unbanned",[79]=" unbanned ",[80]=" turned snow on for ",[81]=" seconds",[82]="Welcome the new administrator - ",[83]=" is no longer an administrator!",[84]=" disable all minigames",[85]="Shamanhunt will be started in ",[86]="1 Mouse has taken cheese!",[87]="5 Mice have got cheese!",[88]="10 mice have got cheese. The shaman is a noob and has been disgraced!",[89]="Time is up, ",[90]="is a noob and has been disgraced! ^_^",[91]="Hold out within 2 minutes and don't let the mice catch you!<br>All the grounds don't collide with objects.<br><font color='#CB546B'>Click to close</font>",[92]=" Escape from",[93]=" has died T_T",[94]="Welcome to <font color='#BABD2F'>shamanhunt</font> minigame! The main aim is to get the cheese and take it to the hole. But be careful, the shaman will do their best in order you couldn't do this!<br><font color='#EB1D51'>Creator:</font><font color='#BABD2F'> Bushmeister</font><br><font color='#2ECF73'>Helpers:</font> <font color='#A4CF9E'>Timatimaaa Clowfish Issey </font>",[95]="nil"}lang={}com={}sz={}for c,e in pairs(tfm.get.room.playerList)do lang[c]="EN"com[c]=EN;sz[c]=ENSZ end;function start()function home(c)ui.addTextArea(401,"<p align='center'><a href='event:minus'><b>-</b></a></p>",c,22,36,53,16,nil,0x324650,nil,true)ui.addTextArea(402,"<p align='center'><a href='event:sir'><b>"..com[c][4].."</b></a></p>",c,92,36,83,16,nil,0x324650,nil,true)ui.addTextArea(404,"<p align='center'><a href='event:карта'><b>"..com[c][5].."</b></a></p>",c,192,36,83,16,nil,0x324650,nil,true)ui.addTextArea(405,"<p align='center'><a href='event:игрок'><b>"..com[c][6].."</b></a></p>",c,292,36,83,16,nil,0x324650,nil,true)ui.addTextArea(406,"<p align='center'><a href='event:другое'><b>"..com[c][7].."</b></a></p>",c,392,36,103,16,nil,0x324650,nil,true)ui.addTextArea(407,"<p align='center'><a href='event:админ'><b>Admin</b></a></p>",c,512,36,73,16,nil,0x324650,nil,true)ui.addTextArea(408,"<p align='center'><a href='event:мини-игры'><b>"..com[c][8].."</b></a></p>",c,602,36,103,16,nil,0x324650,nil,true)ui.addTextArea(409,"<p align='center'><a href='event:язык'><b>"..lang[c].."</b></a></p>",c,725,36,25,16,nil,0x324650,nil,true)end;char={"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"}math.randomseed(os.time())pass={}function generate(f,g)pass={}size=math.random(f,g)for z=1,size do case=math.random(1)a=math.random(1,#char)if case==1 then x=string.upper(char[a])elseif case==2 then x=string.lower(char[a])end;table.insert(pass,x)end;return table.concat(pass)end;system.disableChatCommandDisplay("m#",true)generate(5,5)oj=20;oj=oj*2;rouF=-1;rempver=-500;proverenniy={"Bushmeister","Aqvaswirle"}for c,e in pairs(proverenniy)do table.insert(SuperAdmin,e)end;Banned={}mor="<font color='#2ECF73'>ON</font>"far=false;faro="<font color='#CB546B'>OFF</font>"tear=false;tea="<font color='#CB546B'>OFF</font>"xClick=000;yClick=000;info=false;idName={}Module_Shamanhunt=false;Module_Survivor=false;Module_Bootcamp=false;Module_Racing=false;fire=false;firew="<font color='#CB546B'>OFF</font>"adminfly={}log={}popu=true;popuset="<font color='#2ECF73'>ON</font>"gafra=10;bantime={}brtag={}for i=1,152 do table.insert(brtag,"<br>")end;ui.addPopup(42,0,table.concat(brtag),nil,-5000,-900,10200)ui.addTextArea(41,"<p align='center'><a href='event:NOWAYBAY'><font face='soopafresh' size='40'><font color='#879efe'><b>Lua</font><font color='#ffd667'>TribeManager</font></font></b></a></p>",nil,200,200,400,nil,nil,0x324650,99999999,true)for c in pairs(admins)do adminfly[c]=false;print(adminfly[c])end;for c in pairs(SuperAdmin)do adminfly[c]=false;print(adminfly[c])end;function Log(h)abr=table.maxn(log)if abr<=23 then table.insert(log,h)elseif abr>=24 then table.remove(log,1)table.insert(log,h)end end;function textarea(j,l)ui.addTextArea(77777,"<p align='center'><a href='event:close'> <font size='11'>"..l.."</font></p></a>",j,6,368,800,30,0x1C3C41,0x1C3C41,0.7,true)end;for c,j in pairs(tfm.get.room.playerList)do idName[c]=0 end;function eventNewPlayer(m)for c,j in pairs(tfm.get.room.playerList)do idName[c]=0;lang[c]="EN"com[c]=EN;sz[c]=ENSZ end;system.bindMouse(m,true)tfm.exec.bindKeyboard(m,32,true,true)tfm.exec.bindKeyboard(m,80,true,true)tfm.exec.bindKeyboard(m,72,true,true)tfm.exec.bindKeyboard(m,76,true,true)tfm.exec.bindKeyboard(m,17,true,true)tfm.exec.bindKeyboard(m,17,false,true)end;function eventKeyboard(m,n,p,q,r)if Module_Shamanhunt==true and sec<0 then if tfm.get.room.playerList[m].isShaman then if n==81 then keyCodeUserName[m]=20 elseif n==37 then keyCodeUserName[m]=20 elseif n==39 then keyCodeUserName[m]=19 elseif n==68 then keyCodeUserName[m]=19 elseif n==40 or n==83 then if os.time()-keyCodeULastTime[m]>=1000 then tfm.exec.addShamanObject(keyCodeUserName[m],q,r+15,0,0,0,false)keyCodeULastTime[m]=os.time()end end end end;if adminfly[m]==true then if n==32 then tfm.exec.movePlayer(m,0,0,true,0,-50,false)tfm.exec.displayParticle(26,q-15,r-35,0,0,0,0,nil)end end;if far==true then if n==32 then tfm.exec.movePlayer(m,0,0,true,0,-50,false)tfm.exec.displayParticle(26,q-15,r-35,0,0,0,0,nil)end end;for s,t in pairs(admins)do if t==m then if n==76 and p==true then ui.addTextArea(08502,"<p align='center'><font color='#2ECF73'>----ADMIN LOG----</p><br><p align='left'>"..table.concat(log,"<br>").."</p></font>",m,200,40,400,340,0x1C3C41,0x1C3C41,0.6)tfm.exec.bindKeyboard(m,76,false,true)elseif n==76 and p==false then ui.removeTextArea(08502,m)tfm.exec.bindKeyboard(m,76,true,true)end;if n==17 and p==true then key17=true else key17=false end;if n==80 then ui.addTextArea(401,"<p align='center'><a href='event:plusik'><b>+</b></a></p>",t,22,36,53,16,nil,0x324650,nil,true)end end end;for s,u in pairs(SuperAdmin)do if u==m then if n==76 and p==true then ui.addTextArea(08502,"<p align='center'><font color='#2ECF73'>----ADMIN LOG----</p><br><p align='left'>"..table.concat(log,"<br>").."</p></font>",m,200,40,400,340,0x1C3C41,0x1C3C41,0.6)tfm.exec.bindKeyboard(m,76,false,true)elseif n==76 and p==false then ui.removeTextArea(08502,m)tfm.exec.bindKeyboard(m,76,true,true)end;if n==17 and p==true then key17=true else key17=false end;if n==80 then ui.addTextArea(401,"<p align='center'><a href='event:plusik'><b>+</b></a></p>",u,22,36,53,16,nil,0x324650,nil,true)end end end;for s,t in pairs(admins)do if t==m then if n==72 then ui.addTextArea(403,""..com[t][2].."<p align='center'><a href='event:parol'><b>"..table.concat(pass).."</b></a></p>",t,628,363,133,20,nil,0x324650,nil,true)rouF=oj end end end;for s,u in pairs(SuperAdmin)do if u==m then if n==72 then ui.addTextArea(403,""..com[u][2].."<p align='center'><a href='event:parol'><b>"..table.concat(pass).."</b></a></p>",u,628,363,133,20,nil,0x324650,nil,true)rouF=oj end end end end;function eventMouse(m,v,w)for s,t in pairs(admins)do if t==m then if key17==true then tfm.exec.movePlayer(m,v,w,false,0,0,false)tfm.exec.displayParticle(3,v-10,w-5,0,0,0,0,nil)tfm.exec.displayParticle(3,v,w,0,0,0,0,nil)tfm.exec.displayParticle(3,v+3,w+2,0,0,0,0,nil)tfm.exec.displayParticle(3,v+6,w+4,0,0,0,0,nil)tfm.exec.displayParticle(3,v-5,w+6,0,0,0,0,nil)tfm.exec.displayParticle(3,v-2,w+8,0,0,0,0,nil)tfm.exec.displayParticle(3,v-10,w+15,0,0,0,0,nil)tfm.exec.displayParticle(3,v-10,w+8,0,0,0,0,nil)tfm.exec.displayParticle(3,v+10,w+10,0,0,0,0,nil)end;if fire==true then a=v;b=w;local A={a={0,10,-10,0,10,-10,0},b={0,10,-10,10,0,0,-10}}for i=1,7 do fa(a+A.a[i],b+A.b[i])end end end end;for s,B in pairs(SuperAdmin)do if B==m then if key17==true then tfm.exec.movePlayer(m,v,w,false,0,0,false)tfm.exec.displayParticle(3,v-10,w-5,0,0,0,0,nil)tfm.exec.displayParticle(3,v,w,0,0,0,0,nil)tfm.exec.displayParticle(3,v+3,w+2,0,0,0,0,nil)tfm.exec.displayParticle(3,v+6,w+4,0,0,0,0,nil)tfm.exec.displayParticle(3,v-5,w+6,0,0,0,0,nil)tfm.exec.displayParticle(3,v-2,w+8,0,0,0,0,nil)tfm.exec.displayParticle(3,v-10,w+15,0,0,0,0,nil)tfm.exec.displayParticle(3,v-10,w+8,0,0,0,0,nil)tfm.exec.displayParticle(3,v+10,w+10,0,0,0,0,nil)end;if fire==true then a=v;b=w;local A={a={0,10,-10,0,10,-10,0},b={0,10,-10,10,0,0,-10}}for i=1,7 do fa(a+A.a[i],b+A.b[i])end end end end;if tear==true then tfm.exec.movePlayer(m,v,w,false,0,0,false)tfm.exec.displayParticle(3,v-10,w-5,0,0,0,0,nil)tfm.exec.displayParticle(3,v,w,0,0,0,0,nil)tfm.exec.displayParticle(3,v+3,w+2,0,0,0,0,nil)tfm.exec.displayParticle(3,v+6,w+4,0,0,0,0,nil)tfm.exec.displayParticle(3,v-5,w+6,0,0,0,0,nil)tfm.exec.displayParticle(3,v-2,w+8,0,0,0,0,nil)tfm.exec.displayParticle(3,v-10,w+15,0,0,0,0,nil)tfm.exec.displayParticle(3,v-10,w+8,0,0,0,0,nil)tfm.exec.displayParticle(3,v+10,w+10,0,0,0,0,nil)end;if info==true then xClick=v;yClick=w;myid=math.random(1000-3999)ui.addTextArea(myid,"<p align='center'><a href='event:mo'><font color='#FFDD00'>X</font><font color='#A4CF9E'>=</font><font color='#2ECF73'>"..xClick.."</font> <font color='#FFDD00'>Y</font><font color='#A4CF9E'>=</font><font color='#2ECF73'>"..yClick.."</font><b></b></a></p>",m,v+10,w-5,nil,20,nil,0x324650,nil,false)gord=10 end end;function eventChatCommand(m,C)local D={}for s,t in pairs(admins)do if t==m then for E in C:gmatch("[^#]+")do table.insert(D,E)end;if C=="fly"then adminfly[m]=true elseif C=="flyoff"then adminfly[m]=false end;if D[1]=="chat"and D[2]then end;if D[1]=="m"and D[2]then textarea(j,"<font color='#ED67EA'>[~Modération] "..D[2].."</font>")end;if C=="panel"then ui.addTextArea(401,"<p align='center'><a href='event:plusik'><b>+</b></a></p>",m,22,36,53,16,nil,0x324650,nil,true)end;if C=="arg"then print(arg[#arg])end;if C=="pass"then ui.addTextArea(403,""..com[t][2].."<p align='center'><a href='event:parol'><b>"..table.concat(pass).."</b></a></p>",t,628,363,133,20,nil,0x324650,nil,true)rouF=oj end;if C=="banlist"then print(table.concat(Banned,"\n"))end end end;for s,F in pairs(SuperAdmin)do if F==m then if C=="fly"then adminfly[m]=true elseif C=="flyoff"then adminfly[m]=false end end end end;function eventTextAreaCallback(id,c,G)if G=="язык"then if lang[c]=="RU"then lang[c]="EN"sz[c]=ENSZ;com[c]=EN;for i,H in ipairs({401,402,403,404,405,406,407,408,028,029,019,020,021,011,012,022,023,024,025,026,020,027,018,017,016,015,014,013,07,08,09,010,03,04,05,06,030,031,032,0033,409,1706})do ui.removeTextArea(H,c)end;home(c)elseif lang[c]=="EN"then lang[c]="RU"sz[c]=RUSZ;com[c]=RU;for i,H in ipairs({401,402,403,404,405,406,407,408,028,029,019,020,021,011,012,022,023,024,025,026,020,027,018,017,016,015,014,013,07,08,09,010,03,04,05,06,030,031,032,0033,409,1706})do ui.removeTextArea(H,c)end;home(c)end end;if Module_Shamanhunt==true then if G=="close"then ui.removeTextArea(55555,c)end;if G=="closeShaman"then ui.removeTextArea(77777,c)end;if G=="closeSmall"then ui.removeTextArea(44444,c)end;if G=="closeBigAll"then ui.removeTextArea(33333,c)end end;if Module_Survivor==true then if G=="closeSmall"then ui.removeTextArea(44444,c)ui.removeTextArea(44445,c)ui.removeTextArea(44446,c)end end;if G=="mo"then ui.removeTextArea(myid,c)end;if G=="close"then ui.removeTextArea(77777,c)end;keyinvoker=c;if G=="plusik"then if table.contains(proverenniy,keyinvoker)==false then ui.addPopup(1,2,com[c][3],c,300,150,200,true)elseif table.contains(proverenniy,keyinvoker)==true then ui.removeTextArea(401,c)home(c)end end;if G=="sir"then ui.addPopup(2,2,com[c][9],c,300,150,240,true)end;if G=="minus"then for i,I in ipairs({401,402,404,405,406,407,408,409})do ui.removeTextArea(I,c)end;ui.addTextArea(401,"<p align='center'><a href='event:plusik'><b>+</b></a></p>",c,22,36,53,16,nil,0x324650,nil,true)end;if G=="карта"then for i,I in ipairs({401,402,404,405,406,407,408,409})do ui.removeTextArea(I,c)end;ui.addTextArea(03,"<p align='center'><a href='event:назад'><b>"..com[c][10].."</b></a></p>",c,22,36,53,16,nil,0x324650,nil,true)ui.addTextArea(04,"<p align='center'><a href='event:изменить карту'><b>"..com[c][11].."</b></a></p>",c,92,36,113,16,nil,0x324650,nil,true)ui.addTextArea(05,"<p align='center'><a href='event:изменить название'><b>"..com[c][12].."</b></a></p>",c,222,36,sz[c][2],16,nil,0x324650,nil,true)ui.addTextArea(06,"<p align='center'><a href='event:изменить время'><b>"..com[c][13].."</b></a></p>",c,sz[c][3],36,113,16,nil,0x324650,nil,true)ui.addTextArea(1706,"<p align='center'><a href='event:рестартмап'><b>"..com[c][14].."</b></a></p>",c,sz[c][4],36,sz[c][5],16,nil,0x324650,nil,true)end;if G=="назад"then for i,J in ipairs({03,04,05,06,1706,409})do ui.removeTextArea(J,c)end;ui.removeTextArea(03,c)ui.removeTextArea(04,c)ui.removeTextArea(05,c)ui.removeTextArea(06,c)ui.removeTextArea(1706,c)home(c)end;if G=="изменить карту"then ui.addPopup(3,2,"<br><p align='center'><b>"..com[c][15].."</b></p>",c,300,150,200,true)end;if G=="изменить название"then ui.addPopup(4,2,"<br><p align='center'><b>"..com[c][16].."</b></p>",c,300,150,200,true)end;if G=="изменить время"then ui.addPopup(5,2,"<br><p align='center'><b>"..com[c][17].."</b></p>",c,300,150,200,true)end;if G=="рестартмап"then kodrestarta=tfm.get.room.xmlMapInfo.mapCode;tfm.exec.newGame(kodrestarta)end;if G=="игрок"then for i,I in ipairs({401,402,404,405,406,407,408,409})do ui.removeTextArea(I,c)end;ui.addTextArea(07,"<p align='center'><a href='event:назадигрок'><b>"..com[c][10].."</b></a></p>",c,22,36,53,16,nil,0x324650,nil,true)ui.addTextArea(08,"<p align='center'><a href='event:цвет'><b>"..com[c][18].."</b></a></p>",c,92,36,133,16,nil,0x324650,nil,true)ui.addTextArea(09,"<p align='center'><a href='event:убить'><b>"..com[c][19].."</b></a></p>",c,242,36,53,16,nil,0x324650,nil,true)ui.addTextArea(010,"<p align='center'><a href='event:телепорт'><b>"..com[c][20].."</b></a></p>",c,312,36,sz[c][6],16,nil,0x324650,nil,true)end;if G=="цвет"then ui.addPopup(6,2,com[c][21],c,300,150,200,true)end;if G=="убить"then ui.addPopup(7,2,"<br><p align='center'><b>"..com[c][22].."</b></p>",c,300,150,200,true)end;if G=="телепорт"then ui.addPopup(8,2,"<br><p align='center'><b>"..com[c][23].."</b></p>",c,300,150,200,true)end;if G=="бан"then ui.addPopup(9,2,com[c][24],c,300,150,200,true)end;if G=="разбан"then ui.addPopup(10,2,"<br><p align='center'><b>"..com[c][25].."</b></p>",c,300,150,200,true)end;if G=="назадигрок"then home(c)for i,K in ipairs({07,08,09,010,409})do ui.removeTextArea(K,c)end end;if G=="другое"then for i,I in ipairs({401,402,404,405,406,407,408,409})do ui.removeTextArea(I,c)end;ui.addTextArea(013,"<p align='center'><a href='event:назаддругое'><b>"..com[c][10].."</b></a></p>",c,22,36,53,16,nil,0x324650,nil,true)ui.addTextArea(014,"<p align='center'><a href='event:snow'><b>"..com[c][26].."</b></a></p>",c,92,36,53,16,nil,0x324650,nil,true)ui.addTextArea(015,"<p align='center'><a href='event:скилы'><b>"..com[c][27]..""..mor.."</b></a></p>",c,162,36,153,16,nil,0x324650,nil,true)ui.addTextArea(016,"<p align='center'><a href='event:фли'><b>Fly: "..faro.."</b></a></p>",c,332,36,73,16,nil,0x324650,nil,true)ui.addTextArea(017,"<p align='center'><a href='event:телепортак'><b>"..com[c][28]..""..tea.."</b></a></p>",c,422,36,153,16,nil,0x324650,nil,true)ui.addTextArea(018,"<p align='center'><a href='event:добъект'><b>"..com[c][29].."</b></a></p>",c,592,36,sz[c][7],16,nil,0x324650,nil,true)ui.addTextArea(027,"<p align='center'><a href='event:файер'><b>"..com[c][30].."</b>"..firew.."</a></p>",c,22,70,126,16,nil,0x324650,nil,true)end;if G=="snow"then ui.addPopup(11,2,com[c][31],c,300,150,200,true)end;if G=="скилы"then if mor=="<font color='#2ECF73'>ON</font>"then mor="<font color='#CB546B'>OFF</font>"Log(""..c..""..EN[32])tfm.exec.disableAllShamanSkills(true)textarea(j,"<font color='#ED67EA'>Skills:</font><font color='#CB546B'> OFF</font>")ui.removeTextArea(015,c)ui.addTextArea(015,"<p align='center'><a href='event:скилы'><b>"..com[c][27]..""..mor.."</b></a></p>",c,162,36,153,16,nil,0x324650,nil,true)elseif mor=="<font color='#CB546B'>OFF</font>"then mor="<font color='#2ECF73'>ON</font>"Log(""..c..""..EN[33])tfm.exec.disableAllShamanSkills(false)textarea(j,"<font color='#ED67EA'>Skills:</font><font color='#2ECF73'> ON</font>")ui.removeTextArea(015,c)ui.addTextArea(015,"<p align='center'><a href='event:скилы'><b>"..com[c][27]..""..mor.."</b></a></p>",c,162,36,153,16,nil,0x324650,nil,true)end end;if G=="фли"then if far==false then far=true;faro="<font color='#2ECF73'>ON</font>"Log(""..c..""..EN[34])textarea(j,"<font color='#ED67EA'>Fly:</font><font color='#2ECF73'> ON</font>")dor()ui.removeTextArea(016,c)ui.addTextArea(016,"<p align='center'><a href='event:фли'><b>Fly: "..faro.."</b></a></p>",c,332,36,73,16,nil,0x324650,nil,true)elseif far==true then far=false;Log(""..c..""..EN[35])faro="<font color='#CB546B'>OFF</font>"textarea(j,"<font color='#ED67EA'>Fly:</font><font color='#CB546B'> OFF</font>")dor()ui.removeTextArea(016,c)ui.addTextArea(016,"<p align='center'><a href='event:фли'><b>Fly: "..faro.."</b></a></p>",c,332,36,73,16,nil,0x324650,nil,true)end end;if G=="телепортак"then if tear==false then tear=true;textarea(j,"<font color='#ED67EA'>Teleportation:</font><font color='#2ECF73'> ON</font>")Log(""..c..""..EN[36])tea="<font color='#2ECF73'>ON</font>"ui.removeTextArea(017,c)ui.addTextArea(017,"<p align='center'><a href='event:телепортак'><b>"..com[c][28]..""..tea.."</b></a></p>",c,422,36,153,16,nil,0x324650,nil,true)dor()elseif tear==true then tear=false;Log(""..c..""..EN[37])tea="<font color='#CB546B'>OFF</font>"textarea(j,"<font color='#ED67EA'>Teleportation:</font><font color='#CB546B'> OFF</font>")ui.removeTextArea(017,c)ui.addTextArea(017,"<p align='center'><a href='event:телепортак'><b>"..com[c][28]..""..tea.."</b></a></p>",c,422,36,153,16,nil,0x324650,nil,true)dor()end end;if G=="добъект"then ui.addPopup(12,2,"<br><p align='center'><b>"..com[c][38].."</b></p>",c,300,150,200,true)ui.addPopup(00889,0,com[c][39],c,510,90,200,true)ui.addPopup(00888,0,com[c][40],c,90,90,200,true)end;if G=="файер"then if fire==false then fire=true;firew="<font color='#2ECF73'>ON</font>"Log(""..c..""..EN[41])ui.removeTextArea(027,c)ui.addTextArea(027,"<p align='center'><a href='event:файер'><b>"..com[c][42].."</b>"..firew.."</a></p>",c,22,70,126,16,nil,0x324650,nil,true)elseif fire==true then fire=false;Log(""..c..""..EN[43])firew="<font color='#CB546B'>OFF</font>"ui.removeTextArea(027,c)ui.addTextArea(027,"<p align='center'><a href='event:файер'><b>"..com[c][42].."</b>"..firew.."</a></p>",c,22,70,126,16,nil,0x324650,nil,true)end end;if G=="назаддругое"then alfazet=0;for i,L in ipairs({013,014,015,016,017,018,027,409})do ui.removeTextArea(L,c)end;home(c)end;if G=="админ"then for i,I in ipairs({401,402,404,405,406,407,408,409})do ui.removeTextArea(I,c)end;ui.addTextArea(019,"<p align='center'><a href='event:назададмин'><b>"..com[c][10].."</b></a></p>",c,22,36,53,17,nil,0x324650,nil,true)ui.addTextArea(020,"<p align='center'><a href='event:папуп'><b>ui.addPopup() "..popuset.."</b></a></p>",c,92,36,133,17,nil,0x324650,nil,true)ui.addTextArea(021,"<p align='center'><a href='event:месаге'><b>Message</b></a></p>",c,242,36,85,17,nil,0x324650,nil,true)ui.addTextArea(011,"<p align='center'><a href='event:бан'><b>"..com[c][44].."</b></a></p>",c,347,36,sz[c][8],16,nil,0x324650,nil,true)ui.addTextArea(012,"<p align='center'><a href='event:разбан'><b>"..com[c][45].."</b></a></p>",c,sz[c][9],36,sz[8],16,nil,0x324650,nil,true)for s,u in pairs(SuperAdmin)do if u==c then ui.addTextArea(022,"<p align='center'><a href='event:Добавить админа'><b><font color='#FFDD00'>"..com[c][46].."</font></b></a></p>",c,22,78,sz[c][10],17,nil,0x324650,nil,true)ui.addTextArea(023,"<p align='center'><a href='event:удалить админа'><b><font color='#FFDD00'>"..com[c][47].."</font></b></a></p>",c,sz[c][11],78,130,17,nil,0x324650,nil,true)ui.addTextArea(024,"<p align='center'><a href='event:инфо'><b><font color='#FFDD00'>Info</font></b></a></p>",c,sz[c][12],78,53,17,nil,0x324650,nil,true)ui.addTextArea(025,"<p align='center'><a href='event:попустройки'><b><font color='#FFDD00'>Popup: "..popuset.."</font></b></a></p>",c,sz[c][13],78,83,17,nil,0x324650,nil,true)ui.addTextArea(026,"<p align='center'><a href='event:рестарт'><b><font color='#FFDD00'>Restart</font></b></a></p>",c,sz[c][14],78,73,17,nil,0x324650,nil,true)end end end;if G=="папуп"then if popu==true then ui.addPopup(13,2,com[c][48],c,300,150,200,true)end end;if G=="месаге"then ui.addPopup(14,2,"<br><p align='center'><b>"..com[c][49].."</b></p>",c,300,150,200,true)end;if G=="Добавить админа"then ui.addPopup(15,2,"<br><p align='center'><b>"..com[c][50].."</p>",c,300,150,200,true)end;if G=="удалить админа"then ui.addPopup(16,2,"<br><p align='center'><b>"..com[c][51].."</font></p>",c,300,150,200,true)end;if G=="инфо"then if info==false then info=true;textarea(j,"<font color='#ED67EA'>Info:</font><font color='#2ECF73'> ON</font>")elseif info==true then info=false;textarea(j,"<font color='#ED67EA'>Info:</font><font color='#CB546B'> OFF</font>")ui.removeTextArea(idd)end end;if G=="попустройки"then if popu==true then popu=false;popuset="<font color='#CB546B'>OFF"ui.removeTextArea(020,c)ui.addTextArea(020,"<p align='center'><a href='event:папуп'><b>ui.addPopup() "..popuset.."</b></a></p>",c,92,36,133,17,nil,0x324650,nil,true)for s,u in pairs(SuperAdmin)do if u==c then ui.removeTextArea(025,c)ui.addTextArea(025,"<p align='center'><a href='event:попустройки'><b><font color='#FFDD00'>Popup: "..popuset.."</font></font></b></a></p>",c,sz[c][13],78,83,17,nil,0x324650,nil,true)end end elseif popu==false then popu=true;popuset="<font color='#2ECF73'>ON"ui.removeTextArea(020,c)ui.addTextArea(020,"<p align='center'><a href='event:папуп'><b>ui.addPopup() "..popuset.."</b></a></p>",c,92,36,133,17,nil,0x324650,nil,true)for s,u in pairs(SuperAdmin)do if u==c then ui.removeTextArea(025,c)ui.addTextArea(025,"<p align='center'><a href='event:попустройки'><b><font color='#FFDD00'>Popup: "..popuset.."</font></b></a></p>",c,sz[c][13],78,83,17,nil,0x324650,nil,true)end end end end;if G=="рестарт"then ui.addPopup(17,1,"<br><p align='center'><b>"..com[c][52].."</p>",c,300,150,200,true)ui.addPopup(18,0,"<br><p align='center'><b><font color='#CB546B'>"..com[c][1].."</font><font color='#E88F4F'>"..admn.."</font><font color='#CB546B'><br>SuperAdmin: </font><font color='#E88F4F'>"..sadmn.."</font></p>",c,300,250,200,true)end;if G=="назададмин"then for s,u in pairs(SuperAdmin)do if u==c then ui.removeTextArea(022,c)ui.removeTextArea(023,c)ui.removeTextArea(024,c)ui.removeTextArea(025,c)ui.removeTextArea(026,c)end end;ui.removeTextArea(011,c)ui.removeTextArea(012,c)ui.removeTextArea(019,c)ui.removeTextArea(020,c)ui.removeTextArea(021,c)home(c)end;if G=="мини-игры"then for i,I in ipairs({401,402,404,405,406,407,408,409})do ui.removeTextArea(I,c)end;ui.addTextArea(028,"<p align='center'><a href='event:назадигра'><b>"..com[c][10].."</b></a></p>",c,22,36,53,17,nil,0x324650,nil,true)ui.addTextArea(029,"<p align='center'><a href='event:shamanhunt'><b>Shamanhunt</b></a></p>",c,92,36,113,17,nil,0x324650,nil,true)ui.addTextArea(030,"<p align='center'><a href='event:stopgame'><font color='#FFDD00'><b>Stop</b></font></a></p>",c,22,73,53,17,nil,0x324650,nil,true)ui.addTextArea(031,"<p align='center'><a href='event:survivor'><b>Survivor</b></a></p>",c,222,36,90,17,nil,0x324650,nil,true)ui.addTextArea(032,"<p align='center'><a href='event:bootcamp'><b>Bootcamp</b></a></p>",c,332,36,88,17,nil,0x324650,nil,true)ui.addTextArea(0033,"<p align='center'><a href='event:racing'><b>Racing</b></a></p>",c,442,36,80,17,nil,0x324650,nil,true)end;if G=="shamanhunt"then if Module_Shamanhunt==false and Module_Racing==false and Module_Bootcamp==false and Module_Survivor==false then Module_Shamanhunt=true;startShamanhunt()Log(""..c..""..EN[53])print("<V>Module_Shamanhunt=<BV>true")elseif Module_Shamanhunt==true then end end;if G=="survivor"then if Module_Survivor==false and Module_Shamanhunt==false and Module_Racing==false and Module_Bootcamp==false then Module_Survivor=true;startSurvivor()print("<V>Module_Survivor=<BV>true")Log(""..c..""..EN[54])end end;if G=="bootcamp"then if Module_Bootcamp==false and Module_Shamanhunt==false and Module_Racing==false and Module_Survivor==false then Module_Bootcamp=true;print("<V>Module_Bootcamp=<BV>true")Log(""..c..""..EN[55])startBootcamp()end end;if G=="racing"then if Module_Racing==false and Module_Shamanhunt==false and Module_Bootcamp==false and Module_Survivor==false then Module_Racing=true;print("<V>Module_Racing=<BV>true")Log(""..c..""..EN[56])start_racing()end end;if G=="stopgame"then ui.addPopup(18,1,"<br><p align='center'><b>"..com[c][57].."</p>",c,300,150,200,true)end;if G=="назадигра"then for i,M in ipairs({028,029,030,031,032,0033,409})do ui.removeTextArea(M,c)end;home(c)end end;gav={"ste"}function eventPopupAnswer(id,m,N)local arg={}local O={}for E in N:gmatch("[^%s]+")do table.insert(arg,E)end;for E in N:gmatch("[^#]+")do table.insert(O,E)end;if id==1 then if N==table.concat(pass)then table.insert(proverenniy,m)ui.removeTextArea(401,m)ui.addTextArea(401,"<p align='center'><a href='event:minus'><b>-</b></a></p>",m,22,36,53,16,nil,0x324650,nil,true)ui.addTextArea(402,"<p align='center'><a href='event:sir'><b>"..com[m][4].."</b></a></p>",m,92,36,83,16,nil,0x324650,nil,true)ui.addTextArea(404,"<p align='center'><a href='event:карта'><b>"..com[m][5].."</b></a></p>",m,192,36,83,16,nil,0x324650,nil,true)ui.addTextArea(405,"<p align='center'><a href='event:игрок'><b>"..com[m][6].."</b></a></p>",m,292,36,83,16,nil,0x324650,nil,true)ui.addTextArea(406,"<p align='center'><a href='event:другое'><b>"..com[m][7].."</b></a></p>",m,392,36,103,16,nil,0x324650,nil,true)ui.addTextArea(407,"<p align='center'><a href='event:админ'><b>Admin</b></a></p>",m,512,36,73,16,nil,0x324650,nil,true)ui.addTextArea(408,"<p align='center'><a href='event:мини-игры'><b>"..com[m][8].."</b></a></p>",m,602,36,103,16,nil,0x324650,nil,true)ui.addTextArea(02,"<p align='center'><a href='event:AGHненужно'><b>"..com[m][58].."</b></a></p>",m,330,206,123,16,nil,0x324650,nil,true)ui.addTextArea(409,"<p align='center'><a href='event:язык'><b>"..lang[m].."</b></a></p>",m,725,36,25,16,nil,0x324650,nil,true)rempver=5 else tfm.exec.chatMessage("<R>"..com[m][59].."",m)end end;if id==2 then if arg[1]=="cheese"and arg[2]then tfm.exec.giveCheese(arg[2])elseif arg[1]=="vampire"and arg[2]then tfm.exec.setVampirePlayer(arg[2])elseif arg[1]=="shaman"and arg[2]then tfm.exec.setShaman(arg[2])elseif arg[1]=="victory"and arg[2]then tfm.exec.playerVictory(arg[2])elseif arg[1]=="meep"and arg[2]then tfm.exec.giveMeep(arg[2])end end;if id==3 then if arg[1]then if arg[1]~=nil then tfm.exec.newGame(arg[1])Log(""..m..""..EN[60]..""..arg[1].."")end end end;if id==4 then if O[1]then if O[1]~=nil then tfm.exec.setUIMapName(O[1])Log(""..m..""..EN[61]..""..O[1].."")end end end;if id==5 then if arg[1]then if arg[1]~=nil then tfm.exec.setGameTime(arg[1])Log(""..m..""..EN[62]..""..arg[1]..""..EN[72].."")end end end;if id==6 then if arg[1]~=nil then tfm.exec.setNameColor(arg[1],"0x"..arg[2])Log(""..m..""..EN[63]..""..arg[1].."")end end;if id==7 then if arg[1]then if arg[1]~=nil then tfm.exec.killPlayer(arg[1])Log(""..m..""..EN[64]..""..arg[1])end end end;if id==8 then if arg[1]then if arg[1]~=nil then tfm.exec.movePlayer(arg[1],arg[2],arg[3])Log(""..m..""..EN[65]..""..arg[1])end end end;if id==9 then if O[1]and O[2]then if O[1]~=nil and O[3]~=nil then textarea(j,"<font color='#CB546B'>"..O[1].."</font><font color='#BABD2F'>"..com[m][66].."</font><font color='#CB546B'> "..O[3].."</font><font color='#BABD2F'>"..com[m][67].."</font><font color='#CB546B'>"..O[2].."</font>")bantime[O[1]]=O[3]table.insert(Banned,O[1])ui.addPopup(005,0,table.concat(brtag),O[1],-5000,-900,10200)ui.addPopup(006,0,""..com[m][68]..""..O[3]..""..com[m][73]..""..O[2].."</p></font>",O[1],300,150,200,true)Log(""..m..""..EN[69]..""..O[1]..""..EN[70]..""..O[3]..""..EN[71]..""..O[2])elseif O[1]~=nil and O[2]~=nil and O[3]==nil then textarea(j,"<font color='#CB546B'>"..O[1].."</font><font color='#BABD2F'>"..com[m][74].."</font><font color='#CB546B'>"..O[2].."</font>")table.insert(Banned,O[1])bantime[O[1]]=-1;ui.addPopup(005,0,table.concat(brtag),O[1],-5000,-900,10200)ui.addPopup(006,0,"<br><p align='center'>"..com[m][75].."<font color='#CB546B'>"..O[2].."</p></font>",O[1],300,150,200,true)Log(""..m..""..EN[76]..""..O[1]..""..EN[77]..""..O[2])end end end;if id==10 then if arg[1]then if arg[1]~=nil then table.rem(Banned,arg[1])ui.addPopup(005,0,"0",arg[1],-5000,-900,10200)textarea(j,"<font color='#CB546B'>"..arg[1].."</font><font color='#BABD2F'>"..com[m][78].."</font>")Log(""..m.." разбанил(а) "..arg[1])end end end;if id==11 then if arg[1]then if arg[1]~=nil then tfm.exec.snow(arg[1],arg[2])Log(""..m..""..EN[80]..""..arg[1]..""..EN[81].."")end end end;if id==12 then ui.addPopup(00888,0,"<br><p align='center'><b>0</b></p>",m,-2000,-5000,200)ui.addPopup(00889,0,"<br><p align='center'><b>0</b></p>",m,-2000,-5000,200)if arg[1]then if arg[1]~=nil then tfm.exec.addShamanObject(arg[1],arg[2],arg[3],nil,nil,nil,arg[4])end end end;if id==13 then if arg[1]then if arg[1]~=nil then for c,j in pairs(tfm.get.room.playerList)do ui.addPopup(math.random(4001,4200),0,"<p align='center'><b>"..O[1].."</b></p>",c,O[2],O[3],150,true)end end end end;if id==14 then if arg[1]then if arg[1]~=nil then textarea(j,"<font color='#ED67EA'>[~Modération] "..O[1].."</font>")end end end;if id==15 then if arg[1]then if arg[1]~=nil then table.insert(admins,arg[1])textarea(j,"<font color='#BABD2F'>"..com[m][82].."</font><font color='#ED67EA'>"..arg[1].."!</font>")admn=table.concat(admins,", ")end end end;if id==16 then if arg[1]then if arg[1]~=nil then table.rem(admins,arg[1])for i,H in ipairs({401,402,403,404,405,406,407,408,028,029,019,020,021,011,012,022,023,024,025,026,020,027,018,017,016,015,014,013,07,08,09,010,03,04,05,06,030,031,032,0033,409,1706})do ui.removeTextArea(H,arg[1])end;local P=""if arg[2]~=nil then P=" <R>"..com[m][77].."<J> "for Q=2,#arg,1 do P=P.." "..arg[Q]end end;textarea(j,"<font color='#ED67EA'>"..arg[1].."</font><font color='#BABD2F'>"..com[m][83].."</font>"..P)admn=table.concat(admins,", ")end end end;if id==17 then if N=="yes"then start()end end;if id==18 then if N=="yes"then print("<V>Module_game=<R>false")Game_off()Log(""..m..""..EN[84])end end end;gord=-1;regros={"<CEP>Bush","<VP>Creator: "}startsh=0;function eventLoop(a,R)admincolor()for c,e in pairs(tfm.get.room.playerList)do if bantime[c]~=nil then if bantime[c]~=0 then bantime[c]=bantime[c]-0.5;tfm.exec.setPlayerScore(c,0)elseif bantime[c]==0 and table.contains(Banned,c)==true then table.rem(Banned,c)ui.addPopup(005,0,"0",c,-5000,-900,10200)end end end;dor()if Module_Racing==true then if tfm.get.room.MouseAlive()==0 then new_race()end;if R<=0 then new_race()end end;if Module_Shamanhunt==true then function new_shamanhunt()tfm.exec.newGame(mapss[math.random(#mapss)])end;if startsh==1 then if R<=0 then tfm.exec.newGame(mapss[math.random(#mapss)])end;z=z-1;sec=sec-0.5;if sec==0 then TextAllBig(j,"Start!")new_shamanhunt()elseif sec==9 then tfm.exec.setGameTime(9)elseif sec>0 then for c,e in pairs(tfm.get.room.playerList)do TextAllBig(c,""..com[c][85]..""..sec..""..com[c][72].."")end end;if shaman~=nil and not tfm.get.room.playerList[shaman].isDead then local S=tfm.get.room.playerList[shaman].x;local T=tfm.get.room.playerList[shaman].y;for c,j in pairs(tfm.get.room.playerList)do if not tfm.get.room.playerList[c].isShaman then x=tfm.get.room.playerList[c].x;y=tfm.get.room.playerList[c].y;if x>S-30 and x<S+30 and y>T-30 and y<T+30 and z<=6 then tfm.exec.giveCheese(c)end;if tfm.get.room.currentMap=="@4465309"then if x>740 and x<780 and y>70 and y<100 then tfm.exec.setVampirePlayer(c)end end end end end;if i==1 then for c,e in pairs(tfm.get.room.playerList)do SmallText(c,"<font color='#98E2EB'>"..com[c][86].."</font>")end;i=i+20 end;if d==5 then for c,e in pairs(tfm.get.room.playerList)do SmallText(c,"<font color='#98E2EB'>"..com[c][87].."</font>")end;d=d+20 end;if k==10 then for c,e in pairs(tfm.get.room.playerList)do SmallText(c,"<font color='#98E2EB'>"..com[c][88].."</font>")end;tfm.exec.newGame(mapss[math.random(#mapss)])end end end;if Module_Survivor==true then getMouseCount()if R<=0 and getMouseCount()>1 then for c,e in pairs(tfm.get.room.playerList)do SmallText(c,"<font color='#ED67EA'>[~Modération]</font>"..com[c][89].."<font color='#ED67EA'>"..shaman.." </font>"..com[c][90].."</font>")end;tfm.exec.newGame(survivorMaps[math.random(#survivorMaps)])elseif R<=0 and getMouseCount()==1 then tfm.exec.setGameTime(1)tfm.exec.newGame(survivorMaps[math.random(#survivorMaps)])end end;if Module_Bootcamp==true then if R<=0 then tfm.exec.newGame(bootcampMaps[math.random(#bootcampMaps)])end end;gord=gord-1;gafra=gafra-1;if gafra==7 then ui.addPopup(42,0,"1",nil,-5000,-900,10200)elseif gafra==4 then ui.removeTextArea(41)end;if gord==0 then ui.removeTextArea(idd)end;for j,c in pairs(tfm.get.room.playerList)do if table.contains(Banned,j)then tfm.exec.killPlayer(j)end end;for c,j in pairs(tfm.get.room.playerList)do x=tfm.get.room.playerList[c].x;y=tfm.get.room.playerList[c].y end;rempver=rempver-1;if rempver==0 then ui.removeTextArea(02,c)end;rouF=rouF-1;if rouF==0 then ui.removeTextArea(403,c)end;oj=oj-1;if oj==0 then o()end end;function o()generate(5,5)oj=20;oj=oj*2 end;alf={"mei","r"}function dor()for c,j in pairs(tfm.get.room.playerList)do tfm.exec.bindKeyboard(c,32,true,true)tfm.exec.bindKeyboard(c,80,true,true)tfm.exec.bindKeyboard(c,72,true,true)tfm.exec.bindKeyboard(c,76,true,true)tfm.exec.bindKeyboard(c,17,true,true)tfm.exec.bindKeyboard(c,17,false,true)system.bindMouse(c,true)end end;for i,U in ipairs({"pass","panel","banlist","chat#","info"})do system.disableChatCommandDisplay(U)end;function table.contains(table,h)for s,V in pairs(table)do if V==h then return true end end;return false end;function table.notnill(table)if next(table)==nil then return false else return true end end;if table.notnill(SuperAdmin)==true then tfm.exec.chatMessage("<R>SuperAdmin: <ROSE>"..SuperAdmin[1])else end;if gord==-1 then tfm.exec.chatMessage(regros[2]..regros[1]..alf[1]..gav[1]..alf[2])gord=88888888 else system.exit()end;function table.indexof(W,X)for k,Y in ipairs(W)do if Y==X then return k end end end;function table.rem(Z,V)table.remove(Z,table.indexof(Z,V))end;dor()admn=table.concat(admins,", ")if table.notnill(SuperAdmin)==true then sadmn=table.concat(SuperAdmin,", ")table.insert(proverenniy,SuperAdmin[1])end end;start()function fa(a,b)for i=1,4 do if i==1 then id=13;masUzor={a={50,0,0,-50,30,-30,-30,30},b={0,50,-50,0,30,-30,30,-30},va={0.5,0,0,-0.5,0.5,-0.5,-0.5,0.5},vb={0,0.5,-0.5,0,0.5,-0.5,0.5,-0.5}}elseif i==2 then id=1;masUzor={a={40,0,0,-40,20,-20,-20,20},b={0,40,-40,0,20,-20,20,-20},va={0.5,0,0,-0.5,0.5,-0.5,-0.5,0.5},vb={0,0.5,-0.5,0,0.5,-0.5,0.5,-0.5}}elseif i==3 then id=2;masUzor={a={30,0,0,-30,10,-10,-10,10},b={0,30,-30,0,10,-10,10,-10},va={0.5,0,0,-0.5,0.5,-0.5,-0.5,0.5},vb={0,0.5,-0.5,0,0.5,-0.5,0.5,-0.5}}elseif i==4 then id=9;masUzor={a={20,0,0,-20,0,-0,-0,0},b={0,20,-20,0,0,-0,0,-0},va={0.5,0,0,-0.5,0.5,-0.5,-0.5,0.5},vb={0,0.5,-0.5,0,0.5,-0.5,0.5,-0.5}}end;for i=1,8 do tfm.exec.displayParticle(id,a+masUzor.a[i],b+masUzor.b[i],0,0,masUzor.va[i],masUzor.vb[i],nil)tfm.exec.displayParticle(id,a+masUzor.a[i],b+masUzor.b[i],0,0,masUzor.va[i],masUzor.vb[i],nil)end end end;function Game_off()ui.removeTextArea(44444)ui.removeTextArea(44445)ui.removeTextArea(44446)ui.removeTextArea(33333)ui.removeTextArea(77777)ui.removeTextArea(55555)Module_Shamanhunt=false;tfm.exec.disableAutoNewGame(false)mor="<font color='#2ECF73'>ON</font>"tfm.exec.disableAllShamanSkills(false)startsh=0;Module_Survivor=false;tfm.exec.setGameTime(1)Module_Bootcamp=false;tfm.exec.disableAfkDeath(false)tfm.exec.disableAutoTimeLeft(false)tfm.exec.disableAutoShaman(false)Module_Racing=false end;function admincolor()for s,t in pairs(admins)do tfm.exec.setNameColor(t,"0xCB546B")end;for s,u in pairs(SuperAdmin)do tfm.exec.setNameColor(u,"0xCB546B")end end;function eventNewGame()kodrestarta=tfm.get.room.xmlMapInfo.mapCode;if Module_Racing==true then tfm.exec.setGameTime(60)checkAuthor()end;if Module_Shamanhunt==true then tfm.exec.disableAllShamanSkills(true)tfm.exec.setGameTime(123)for _,j in pairs(tfm.get.room.playerList)do tfm.exec.bindKeyboard(_,37,true,true)tfm.exec.bindKeyboard(_,38,true,true)tfm.exec.bindKeyboard(_,39,true,true)tfm.exec.bindKeyboard(_,40,true,true)tfm.exec.bindKeyboard(_,81,true,true)tfm.exec.bindKeyboard(_,68,true,true)tfm.exec.bindKeyboard(_,83,true,true)tfm.exec.bindKeyboard(_,87,true,true)keyCodeULastTime[_]=os.time()keyCodeUserName[_]=20 end;for c,e in pairs(tfm.get.room.playerList)do if e.isShaman then ui.addTextArea(77777,"<p align='center'><a href='event:closeShaman'> <font size='11'>"..com[c][91].."</font></p></a>",c,300,150,200,nil,0x1C3C41,0x1C3C41,0.7,true)end end;z=20;d=0;i=0;k=0;shaman=nil;for a0,j in pairs(tfm.get.room.playerList)do if tfm.get.room.playerList[a0].isShaman then shaman=a0;tfm.exec.giveCheese(shaman)end end;if shaman==nil then print('No shaman found!')else SmallText(j,"<font color='#A4CF9E'>"..shaman.."</font><font color='#BABD2F'> just stole the cheese! CATCH HER!")end end;if Module_Survivor==true then local a1=0;local a2;for j in pairs(tfm.get.room.playerList)do if not tfm.get.room.playerList[j].isDead then a1=a1+1 end end;shaman=nil;for a3,j in pairs(tfm.get.room.playerList)do if tfm.get.room.playerList[a3].isShaman then shaman=a3 end end;tfm.exec.disableAllShamanSkills(true)for c,e in pairs(tfm.get.room.playerList)do SmallText2(c,"<font color='#ED67EA'>[~Modération]</font>"..com[c][92].."<font color='#ED67EA'> "..shaman.."</font>!")end end;if Module_Bootcamp==true then tfm.exec.setGameTime(bootcampDuration)end end;function eventPlayerWon(m)if Module_Shamanhunt==true then i=i+1;k=k+1;d=d+1;local a1=0;local a2;for j in pairs(tfm.get.room.playerList)do if not tfm.get.room.playerList[j].isDead then a1=a1+1;a2=j end end;if a1==1 then tfm.exec.setGameTime(10)elseif a1==0 then new_shamanhunt()end end;if Module_Bootcamp==true then tfm.exec.respawnPlayer(m)end end;function eventPlayerDied(m)if Module_Racing==true then if tfm.get.room.MouseAlive()==2 then tfm.exec.setGameTime(20)elseif tfm.get.room.MouseAlive()==0 then new_race()end end;if Module_Shamanhunt==true then local a1=0;local a2;for j in pairs(tfm.get.room.playerList)do if not tfm.get.room.playerList[j].isDead then a1=a1+1;a2=j end end;if a1==1 then tfm.exec.setGameTime(10)elseif a1==0 then tfm.exec.newGame(mapss[math.random(#mapss)])end;for c,a4 in pairs(tfm.get.room.playerList)do if a4.isShaman then tfm.exec.setGameTime(1)SmallText(j,"<font color='#CB546B'>Shaman has died T_T</font>")end;tfm.exec.newGame(mapss[math.random(#mapss)])end end;if Module_Survivor==true then local a1=0;local a2;for j in pairs(tfm.get.room.playerList)do if not tfm.get.room.playerList[j].isDead then a1=a1+1;a2=j end end;if a1==1 then tfm.exec.setGameTime(1)end;if tfm.get.room.playerList[m].isShaman==true then tfm.exec.setPlayerScore(m,0,false)for c,e in pairs(tfm.get.room.playerList)do SmallText(c,"<font color='#CB546B'>"..shaman.."</font><font color='#ED67EA'>"..com[c][93].."</font>")end;tfm.exec.newGame(survivorMaps[math.random(#survivorMaps)])for e,s in pairs(tfm.get.room.playerList)do if tfm.get.room.playerList[e].isShaman==false then if tfm.get.room.playerList[e].isDead==false then tfm.exec.setPlayerScore(e,10,true)end end end end end;if Module_Bootcamp==true then tfm.exec.respawnPlayer(m)end end;mapss={"4400516","4402674","4398700","4388974","4427343","4430443","4465309"}function startShamanhunt()startsh=1;sec=10;function text(j,l)for c,j in pairs(tfm.get.room.playerList)do if not j.isShaman then ui.addTextArea(55555,"<p align='center'><a href='event:close'> <font size='11'>"..l.."</font></p></a>",c,300,150,200,nil,0x1C3C41,0x1C3C41,0.7,true)end end end;function TextAllBig(j,l)ui.addTextArea(33333,"<p align='center'><a href='event:closeBigAll'> <font size='11'>"..l.."</font></p></a>",j,300,150,200,nil,0x000001,0x000001,0.7,true)end;function SmallText(j,l)ui.addTextArea(44444,"<p align='center'><a href='event:closeSmall'> <font size='11'>"..l.."</font></p></a>",j,6,368,800,30,0x1C3C41,0x1C3C41,0.7,true)end;for c,e in pairs(tfm.get.room.playerList)do ui.addPopup(1,0,com[c][94],c,278,220,250,true)end;tfm.exec.disableAutoNewGame(true)z=-1;keyCodeUserName={}keyCodeULastTime={}end;function startSurvivor()tfm.exec.disableAutoTimeLeft(true)function SmallText(j,l)ui.addTextArea(44444,"<p align='center'><a href='event:closeSmall'> <font size='11'>"..l.."</font></p></a>",j,6,378,nil,20,0x1C3C41,0x1C3C41,0.8,true)end;function SmallText2(j,l)ui.addTextArea(44445,"<p align='center'><a href='event:closeSmall'> <font size='11'>"..l.."</font></p></a>",j,530,378,nil,20,0x1C3C41,0x1C3C41,0.8,true)end;survivorMaps={"@3540608","@492283","@1026249","@1545834","@1659906","@1659906","@3295213","@3699989","@741041","@489470","@395246","@292672","@306106","@3584123","@1522692","@3107377","@2387888","@3685564","@787131","@2408376","@3670885","@3620709","@3584826","@3587860","@3549404","@481676","@3550350","@3480467"}tfm.exec.disableAutoNewGame(true)tfm.exec.disableAutoTimeLeft(true)function getMouseCount()local a5=0;for a6,e in pairs(tfm.get.room.playerList)do if not tfm.get.room.playerList[a6].isDead then a5=a5+1 end end;return a5 end;tfm.exec.newGame(survivorMaps[math.random(#survivorMaps)])end;function startBootcamp()bootcampMaps={"@172951","@1427980","@161434","@216173","@172621","@500000","@3908151","@512887","@374995","@306365","@155606","@333002","@172547","@3734998","@1737914","@2989803","@3136410","@438449","@976944","@1595965","@1636814","@2009003","@3804078","@3768117","@3799357","@3278138","@3311534","@3779861","@3576303","@3780618","@2789121","@2811229","@3659983","@3759157","@597804","@2998268","@2132250","@3745158","@3338283","@3062939","@3137929","@3560999","@3182487","@3725142","@3012311","@3493456","@343456","@208056","@881158","@492399","@268915","@505619","@397469","@729863","@184648","@156720","@541693"}bootcampDuration=360;tfm.exec.disableAutoShaman(true)tfm.exec.disableAfkDeath(true)tfm.exec.disableAutoTimeLeft(true)tfm.exec.disableAutoNewGame(true)tfm.exec.newGame(bootcampMaps[math.random(#bootcampMaps)])tfm.exec.setGameTime(bootcampDuration)end;function start_racing()tfm.exec.disableAutoNewGame(true)tfm.exec.disableAutoShaman(true)racing_maps={3953425,3638794,1856349,164802,160762,158128,145020,122911,180509,165747,163682,165843,216505,211885,209708,545493,512291,2005559,1956002,3696662,2538131,4428798,693021,2316566,1504935,1595131,2475527,416625,3452208,511007,2262297,250619,180617,260478,308729,1404417,3629984,3077480,1587883,2679801,1957607,583715,2141827,1187548,2920810,425229,2522826,1607271,2535752,2782088,2527651,2118873,326032,2870581,1954181,1629706,1419902,1221806,179541,252033,326192,482951,592204,583715,4212491,3674997,2946601,3931290,3877599,4119705,3026533,4024450,1842545,2007295,2686505,2580114,2988325,3549627,4338921,4059294,3559116,211902,1524883,2464807,2463035,2444219,162561,387110,2501491,2731707,1652047,2222219,2306838,233093,1545000,2819802,2432314,2760668,2782088,2852249,3033972,3488998,4949321,4949286,4949186,4949173,4949114,4949101,4949075,4949061,4948998,4865457,4865422,4840440,3799998,3789192,455499,3766449,2981609,3828678,3250015,3832217,3688191,3272722,3715958,3701788,3695243,3856794,3690600,3820202,3919116,3685029,3687917,1387078,2901007,3561325,3936449,1452162,3952271,3884802,3253701,1307956,3077480,3676395,3673777,3678477,3051957,3679199,3663008,3654423,3556603,3669198,3652475,3660048,3534755,3428362,3651841,3651961,3046497,3495277,3594130,3595063,3644534,3577823,2556192,3644964,3644907,1678717,3523401,2731707,3220349,3648297,3600181,3641333,1478131,3637777,3639230,499821,3490631,2205147,1964800,585601,3816991,3786946,1758903,3588299,2852718,3530855,3561646,139360,2760668}function checkAuthor()mapcode=tfm.get.room.xmlMapInfo.mapCode;if mapcode==4955881 then tfm.exec.setUIMapName("<J>Felipedtx <BL>- @4119705")elseif mapcode==4949286 then tfm.exec.setUIMapName("<J>Kenjit <BL>- @639649")elseif mapcode==4949321 then tfm.exec.setUIMapName("<J>Kmlcan <BL>- @646968")elseif mapcode==4949075 then tfm.exec.setUIMapName("<J>Hibr <BL>- @221564")elseif mapcode==4865422 then tfm.exec.setUIMapName("<J>Temple <BL>- @314806")elseif mapcode==4840440 then tfm.exec.setUIMapName("<J>Bushmeister <BL>- @3066761")elseif mapcode==4865457 then tfm.exec.setUIMapName("<J>Viprin <BL>- @405795")end end;function new_race()tfm.exec.newGame(racing_maps[math.random(#racing_maps)])end;new_race()function tfm.get.room.MouseAlive()local a7=0;for a6,e in pairs(tfm.get.room.playerList)do if not tfm.get.room.playerList[a6].isDead then a7=a7+1 end end;return a7 end end;tfm.exec.newGame()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!