API tools faq
paste
Advertisement
Tectoon

[TFM] Minigame Portal Maluco

Tectoon
Mar 22nd, 2015
342
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 32.27 KB | None | 0 0
raw download clone embed print report
  1. -- By Tectoon
  2. -- Lua Script Transformice
  3. -- Minigame Portal maluco
  4.  
  5. tfm.exec.chatMessage=function(m,n)print((n and n..'|'or'')..m)end
  6. -- ^ O chatmessage permite o uso de tribal house em vez de imprimir, se moverá quando você excluir a sala de prova
  7. --Vars
  8. langs={
  9.     EN={
  10.         deneme="test",
  11.         --aqui as traduções em português
  12.         --acontecendo lugar Palavras-chave julgamento inicial no verão passado
  13.         --por exemplo, uma mensagem para a frente para um jogador
  14.         --normalmente: tfm.exec.chatMessage('deneme mesajı',isim)
  15.         --çevirili hali: tfm.exec.chatMessage(cevir('deneme',isim),isim)
  16.         dildegisti='Sua linguagem foi alterado!',
  17.             oyuncuyasaklandi="<ROSE>[~FindTéam] %s has been banned.",
  18.         oldun='your killed yourself!',
  19.         bilgi='<N>[#<R>Information<N>]: Bem-vindo ao<R> #FindTeam<N>.Ajuda comando está localizado no canto superior direito do mapa "?" clique lá para introdução. <BR> [#<R>Admins:<N>] Tectoon <BR> [<n>#<r>Map submissions topic<n>]: http://www.transformice.com/forum/?s=567302&p=0',
  20.         codes=" Current Code: !mort !rapor !dil ESP or !dil EN",
  21.         team='<J>Você entrou para a equipe <R>Vermelha<J>!',
  22.         teamb='<J> Você entrou para a equipe <BV> Azul <J>',
  23.         repors='<J> Sua demanda foi tomado em consideração!',
  24. },
  25.     TR={
  26.         deneme="deneme",
  27.         dildegisti='Diliniz türkçe oldu!',
  28.         oyuncuyasaklandi="<ROSE>[~FindTéam] %s oyuncu yasaklandı.",
  29.         oldun='kendini öldürdün',
  30.         bilgi="<N>Bilgi:<R>#FindTeam<N>'a hoşgeldiniz.Help komutu için haritanın sağ üst köşesinde bulunan ? işaretine tıklayınız.<BR> [#<R>Adminler:<N>] Tectoon",
  31.         girdi=" %s deliğe girdi ve takımına 1 puan kazandırdı.",
  32.         codes="kullanılan komutlar: !mort !rapor !dil TR veya !dil EN",
  33.         team='<J>Sen <R> kırmızı <J> takımdasın.',
  34.         teamb='<J> Sen <BV> mavi <J> takımdasın.',
  35.         repors='<J> Talebiniz dikkate alındı!'
  36.  --buralara türkçeleri
  37.      }
  38. }
  39. odadili=tfm.get.room.community:upper()
  40. if not langs[odadili] then odadili='EN' end
  41. function cevir(anahtar,isim)
  42.     if isim then
  43.         local p=fareler[isim]
  44.         return p and p.dil and langs[p.dil] and langs[p.dil][anahtar] or cevir(anahtar)
  45.     end
  46.     return langs[odadili][anahtar] or langs.EN[anahtar]
  47. end
  48. haritaBilgi={
  49.     ['@4578677']={
  50.         maviDogum={15,367},
  51.         maviBolge={825,369},
  52.         maviKutu={{314,257},{473,286},{700,229}},
  53.         kirmiziDogum={15,180},
  54.         kirmiziBolge={826,102},
  55.         kirmiziKutu={{314,80},{473,101},{700,45}},
  56.         orsler={{1053,-69},{1363,-69}},
  57.     },
  58.     ['@4599931']={
  59.         maviDogum={28,255},
  60.         maviBolge={820,372},
  61.         maviKutu={{344,253},{641,312},{387,374},{763,374}},
  62.         kirmiziDogum={24,54},
  63.         kirmiziBolge={820,173},
  64.         kirmiziKutu={{339,54},{639,114},{389,174},{763,174}},
  65.         --{{x,y},{x,y},{x,y}} format bu şekilde ^ kutu sayısı istediğin kadar olabilir
  66.         orsX=50, -- tüm örsler için sabit X hızı tabi aşağıda belirtilmemişse
  67.         orsY=50, -- ^ üsttekinin Y versiyonu
  68.         orsler={{1590,-69}},--<<<<<<<<<<<<<<<<<<< bu şekilde
  69.         --{{x,y,açı},{x,y,nil,hizX},{x,y,nil,hizX,hizY}} format bu şekilde ^ örs sayısı istediğin kadar olabilir
  70.         -- ^ açı belirtmeyeceksen nil kullan
  71.     },
  72.     ['@4616408']={
  73.         maviDogum={17,356},
  74.         maviBolge={823,38},
  75.         maviKutu={{274,385},{456,230},{635,171},{456,110},{263,52}},
  76.         kirmiziDogum={821,356},
  77.         kirmiziBolge={23,38},
  78.         kirmiziKutu={{1074,291},{1256,230},{1435,171},{1256,110},{1063,52}},
  79.         --{{x,y},{x,y},{x,y}} format bu şekilde ^ kutu sayısı istediğin kadar olabilir
  80.         orsX=5, -- tüm örsler için sabit X hızı tabi aşağıda belirtilmemişse
  81.         orsY=5, -- ^ üsttekinin Y versiyonu
  82.         orsler={{3600,-69}},--<<<<<<<<<<<<<<<<<<< bu şekilde
  83.         --{{x,y,açı},{x,y,nil,hizX},{x,y,nil,hizX,hizY}} format bu şekilde ^ örs sayısı istediğin kadar olabilir
  84.         -- ^ açı belirtmeyeceksen nil kullan
  85.     },
  86.         ['@4617997']={
  87.         maviDogum={860,360},
  88.         maviBolge={1560,65},
  89.         maviKutu={{1260,345},{1320,225},{1060,185},{1260,105}},
  90.         kirmiziDogum={60,360},
  91.         kirmiziBolge={760,65},
  92.         kirmiziKutu={{460,345},{520,225},{260,185},{460,105}},
  93.         orsler={{350,50},{1150,50}}
  94.     },
  95.         ['@4669179']={
  96.         maviDogum={824,345},
  97.         maviBolge={1577,55},
  98.         maviKutu={{1158,345},{1193,186},{896,183}},
  99.         kirmiziDogum={15,345},
  100.         kirmiziBolge={780,25},
  101.         kirmiziKutu={{344,345},{381,183},{86,183}},
  102.         orsler={{200,50},{1020,50},{550,50},{1350,50}}
  103.     },
  104.         ['@4670613']={
  105.         maviDogum={52,354},
  106.         maviBolge={895,350},
  107.         maviKutu={{90,275},{327,272},{551,333}},
  108.         kirmiziDogum={52,170},
  109.         kirmiziBolge={895,175},
  110.         kirmiziKutu={{89,88},{328,89},{548,148}},
  111.         orsler={{1040,50},{1320,50}}
  112.     },
  113.         ['@4673760']={
  114.         maviDogum={29,348},
  115.         maviBolge={760,19},
  116.         maviKutu={{309,312},{544,312},{309,198},{98,198}},
  117.         kirmiziDogum={840,348},
  118.         kirmiziBolge={1568,19},
  119.         kirmiziKutu={{1114,312},{1352,312},{1116,198},{899,198}},
  120.         orsler={{212,50},{410,50},{1002,50},{1220,50}}
  121.     },
  122.         ['@4675073']={
  123.         maviDogum={29,348},
  124.         maviBolge={760,19},
  125.         maviKutu={{346,359},{599,359},{600,242},{347,242},{87,267}},
  126.         kirmiziDogum={840,348},
  127.         kirmiziBolge={1568,19},
  128.         kirmiziKutu={{1143,359},{1401,359},{1414,242},{1145,242},{885,268}},
  129.         orsler={{212,50},{430,50},{1002,50},{1240,50}}
  130.     },
  131.         ['@4689397']={
  132.         maviDogum={840,720},
  133.         maviBolge={1540,400},
  134.         maviKutu={{1360,495},{1120,495},{880,495}},
  135.         kirmiziDogum={84,720},
  136.         kirmiziBolge={740,400},
  137.         kirmiziKutu={{560,495},{320,495},{80,495}},
  138.         orsler={{200,425},{440,425},{1000,425},{1240,425}}
  139.     },
  140.         ['@4670981']={
  141.         maviDogum={840,348},
  142.         maviBolge={879,57},
  143.         maviKutu={{1157,357},{1120,272},{1072,194},{1341,135}},
  144.         kirmiziDogum={84,348},
  145.         kirmiziBolge={71,57},
  146.         kirmiziKutu={{357,357},{717,272},{272,194},{541,135}},
  147.         orsler={{200,99999},{440,99999},{1000,99999},{1240,99999}}
  148.     },
  149.         ['@4695320']={
  150.         maviDogum={840,348},
  151.         maviBolge={1559,57},
  152.         maviKutu={{1345,197},{1120,77},{866,77}},
  153.         kirmiziDogum={94,348},
  154.         kirmiziBolge={759,31},
  155.         kirmiziKutu={{534,197},{409,77},{70,77}},
  156.         orsler={{220,0},{540,0},{1020,0},{1340,0}}
  157.     }
  158.     --[[eğer yeni harita ekleyeceksen hemen bir üst satırdaki alt satırına geç sonra şu şekilde ekle
  159.     ]]
  160. }
  161. haritalar = {"4578677", "4599931", "4616408", "4617997", "4669179", "4670613", "4673760", "4675073", "4689397", "4670981", "4695320"}
  162. --suankiHarita = {}
  163. fareler = {}
  164. zamanlayici = os.time()
  165. takimpuan = { kirmizi=0, mavi=0 }
  166. sonObjeDususZamani = 0
  167. admins={Tectoon=1}
  168. mods={Mocodes=1}
  169. bans={}
  170. reports={}--Para armazenar vários relatórios
  171. --GameFunc
  172. function eventNewGame()
  173. if tfm.get.room.currentMap == '@4599931' then
  174. tfm.exec.setUIMapName("<BV>T<BL> - @4599931 - Wsprosu</font>")
  175. elseif tfm.get.room.currentMap == '@4578677' then
  176. tfm.exec.setUIMapName("<J>Ç - @4578677 - Wsprosu</font>")
  177. elseif tfm.get.room.currentMap == '@4616408' then
  178. tfm.exec.setUIMapName("<BV>S<BL> - @4616408 - Wsprosu")
  179. elseif tfm.get.room.currentMap == '@4617997' then
  180. tfm.exec.setUIMapName("<J>Ç<BL> - @4617997 - Kmlcan")
  181. elseif tfm.get.room.currentMap == '@4670613' then
  182. tfm.exec.setUIMapName("<J>Ç<BL> - @4670613 - Tutekkro")
  183. elseif tfm.get.room.currentMap == '@4673760' then
  184. tfm.exec.setUIMapName("<J>Ç<BL> - @4673760 - <N>Wsprosu")
  185. elseif tfm.get.room.currentMap == '@4669179' then
  186. tfm.exec.setUIMapName("<J>Ç<BL> - @4669179 - <N> Wsprosu")
  187. elseif tfm.get.room.currentMap == '@4675073' then
  188. tfm.exec.setUIMapName("<J>Ç<BL> - @4675073 - <N> Wsprosu")
  189. elseif tfm.get.room.currentMap == '@4689397' then
  190. tfm.exec.setUIMapName("<J>Ç<BL> - @4689397 - <N> Wsprosu")
  191. elseif tfm.get.room.currentMap == '@4670981' then
  192. tfm.exec.setUIMapName("<J>Ç<BL> - @4670981 - <N> Barsems")
  193. end
  194.   if os.difftime(os.time(), zamanlayici) > 10*60*1000 then
  195.     local kazanan = takimpuan.kirmizi
  196.     local renk = "<R>"
  197.     if takimpuan.mavi == kazanan then
  198.       kazanan = "<J>Turu kazanan olmadı tur berabere bitti!"
  199.       renk = "<J>"
  200.     elseif takimpuan.mavi > kazanan then
  201.       kazanan = "Mavi <j>takım turu kazandı!"
  202.       renk = "<CH>"
  203.     elseif takimpuan.mavi < kazanan then
  204.       kazanan = "Kırmızı <J>takım turu kazandı !"
  205.       renk = "<R>"
  206.     end
  207.     tfm.exec.chatMessage(renk ..' '.. kazanan ,nil,nil,nil,nil,nil,1,0,0.5,true)
  208.     takimpuan.kirmizi = 0
  209.     takimpuan.mavi = 0
  210.     puanGuncelle()
  211.     zamanlayici = os.time()
  212.   end
  213.   if haritaBilgi[tfm.get.room.currentMap] then
  214.     suankiHarita = { orsler={}, bilgi=haritaBilgi[tfm.get.room.currentMap],
  215.       kutuM=math.random(1,#haritaBilgi[tfm.get.room.currentMap].maviKutu),
  216.       kutuK=math.random(1,#haritaBilgi[tfm.get.room.currentMap].kirmiziKutu) }
  217.     local oListe = {}
  218.     for isim in pairs(tfm.get.room.playerList) do
  219.       table.insert(oListe, isim)
  220.     end
  221.     local id = 0
  222.     local isim = ''
  223.     for i=1, #oListe do
  224.       id = math.random(#oListe)
  225.       isim = table.remove(oListe, id)
  226.       if fareler[isim] then
  227.         fareler[isim].takim = (i%2==0)
  228.         if fareler[isim].takim then
  229.           tfm.exec.movePlayer(isim, suankiHarita.bilgi.maviDogum[1], suankiHarita.bilgi.maviDogum[2])
  230.           tfm.exec.setNameColor(isim, 0x0000ff)
  231.           --tfm.exec.chatMessage("sen mavi takımdasın.")
  232.           tfm.exec.chatMessage(cevir('teamb',isim),isim)
  233.         else
  234.           tfm.exec.movePlayer(isim, suankiHarita.bilgi.kirmiziDogum[1], suankiHarita.bilgi.kirmiziDogum[2])
  235.           tfm.exec.setNameColor(isim, 0xff0000)
  236.           --tfm.exec.chatMessage("sen Vermelho na equipe.")
  237.           tfm.exec.chatMessage(cevir('team',isim),isim)
  238.         end
  239.       end
  240.     end
  241.   else
  242.     suankiHarita = nil
  243.   end
  244.   local unbanlist={}--unban olacak oyuncu listesi
  245.   for name,info in pairs(bans) do
  246.     if os.time()-info[1]>info[2] then--ban süresi geçtiyse
  247.         table.insert(unbanlist,name)--oyuncu ismini unbanliste ekliyor
  248.     else--değilse
  249.         tfm.exec.killPlayer(name)--oyuncuyu öldürüyor
  250.     end
  251.   end
  252.   for i=1,#unbanlist do--unbanlisti döngüye alıyor
  253.     bans[unbanlist[i]]=nil--ve oyuncu için banı kaldırıyor
  254.   end
  255. end
  256. function eventLoop(zaman, kalanZaman)
  257.    if zaman < 11000 and zaman > 9000 then
  258.        ui.removeTextArea(333)
  259.     end
  260.     if suankiHarita then
  261.         if os.difftime(os.time(), sonObjeDususZamani) >= 2000 then -- 2000ms=2 saniyede bir örs düşürür
  262.             for _,ID in pairs(suankiHarita.orsler) do
  263.                 tfm.exec.removeObject(ID) -- önceki örsleri siler
  264.             end
  265.             for _,ors in pairs(suankiHarita.bilgi.orsler) do
  266.                 table.insert(suankiHarita.orsler, tfm.exec.addShamanObject(10,ors[1],ors[2],ors[3],ors[4] or suankiHarita.bilgi.orsX,ors[5] or suankiHarita.bilgi.orsY))
  267.             end
  268.             sonObjeDususZamani = os.time()
  269.         end
  270.     end
  271.     if kalanZaman <= 0 and not gamedm then
  272.         haritaDegistir()
  273.     end
  274. end
  275. --PlayerFunc
  276. function eventNewPlayer(isim,init)
  277.  for n in pairs(admins) do
  278.        ui.addTextArea(22123,"<p align='center'><a href='event:L'><b><R>L</b></a></p>",n,20,25,16,16,1,1,0.8,true)
  279. end
  280. --tfm.exec.chatMessage("<N>Bilgi:<R>#FindTeam<N>'a hoşgeldiniz.Help komutu için haritanın sağ üst köşesinde bulunan ? işaretine tıklayınız.<BR> [#<R>Adminler:<N>] Wsprosu & Transforcips & Fightcireis & Mocodes & Grifaremice")
  281. tfm.exec.chatMessage(cevir('bilgi',isim),isim)
  282. ui.addTextArea(0,"<p align='center'><a href='event:help'><b><R>?</b></a></p>",name,780,25,16,16,1,1,0.8,true)
  283.   fareler[isim] = {}
  284.   tfm.exec.bindKeyboard(isim,32,false,true)
  285.   puanGuncelle()
  286. end
  287.  function eventPlayerWon(isim)
  288.   for n in pairs(tfm.get.room.playerList) do
  289.   tfm.exec.killPlayer(n)
  290.   end  
  291.   tfm.exec.setGameTime(3)
  292.   if not fareler[isim] then return end
  293.   if fareler[isim].takim then
  294.     takimpuan.mavi = takimpuan.mavi+1
  295.     tfm.exec.chatMessage("Equipe <CH> Azul<J> ganhou 1 ponto.<CH> Azul<J> sua pontuação atual da equipe : "..takimpuan.mavi.."")
  296.   else
  297.     takimpuan.kirmizi = takimpuan.kirmizi+1
  298.     tfm.exec.chatMessage("Equipe <R> Vermelho<J> ganhou 1 ponto . <R>Vermelho<J> sua pontuação atual da equipe : "..takimpuan.kirmizi.."")
  299.   end
  300.   puanGuncelle()
  301. end
  302. function eventPlayerLeft(isim)
  303.   fareler[isim] = nil
  304. end
  305. function eventPlayerDied()
  306.   local i=0
  307.   for n,player in pairs(tfm.get.room.playerList) do
  308.     if not player.isDead then
  309.       i=i+1
  310.     end
  311.   end
  312. if i <= 0 and not gamedm then
  313.     haritaDegistir()
  314.   end
  315. end
  316. function eventKeyboard(isim,tus,basili,x,y)
  317.   if tus == 32 and suankiHarita and fareler[isim] then
  318.     local kutu = suankiHarita.bilgi.kirmiziKutu[suankiHarita.kutuK]
  319.     if fareler[isim].takim then
  320.       kutu = suankiHarita.bilgi.maviKutu[suankiHarita.kutuM]
  321.     end
  322.     if math.abs(x-kutu[1])<10 and math.abs(y-kutu[2])<10 then
  323.       local bolge = fareler[isim].takim and suankiHarita.bilgi.maviBolge or suankiHarita.bilgi.kirmiziBolge
  324.       tfm.exec.movePlayer(isim, bolge[1], bolge[2])
  325.       if fareler[isim].takim then
  326.         suankiHarita.kutuM=math.random(1,#suankiHarita.bilgi.maviKutu)
  327.       else
  328.         suankiHarita.kutuK=math.random(1,#suankiHarita.bilgi.kirmiziKutu)
  329. end
  330.     end
  331. end
  332.  end
  333. function eventChatCommand(isim,komut)
  334.     -- oyuncu komutları buraya
  335.     if komut=='mlist' then
  336.         ui.addPopup(1,0,table.concat(haritalar,'\n'),isim,10,40,nil,true)
  337.     elseif komut:sub(1,4) == 'dil ' then
  338.         local hangidil=komut:sub(5):upper()
  339.         if langs[hangidil] then
  340.             fareler[isim].dil=hangidil
  341.             tfm.exec.chatMessage(cevir('dildegisti',isim),isim)
  342.         end
  343.        elseif komut == 'mort' then
  344.            tfm.exec.killPlayer(isim)
  345.        --tfm.exec.chatMessage("Kendini öldürdün.",isim)
  346.        tfm.exec.chatMessage(cevir('oldun',isim),isim)
  347.        elseif komut== "rapor" or komut== "report" then
  348.         if not bans[isim:lower()] then -- oyuncu uzaklaştırılmamışsa rapor ekranı çıkıyor 
  349.        ui.addPopup(444,2,"[TR]Rapor a hoşgeldiniz.Rapor atarken rapor edilecek kişinin nicki ve rapor etmenizin sebebini yazınız. Gereksiz rapor atan kişiler banlanacaktır.                                                                  [EN]Welcome to report.The report will be sending reports person of name and report reason of writing.Needless who sent reports of will be banned.",isim,200,130,400,true)
  350.         end
  351.       end
  352.     if not admins[isim] and not mods[isim] then return end-- mod veya admin değilse devam etmiyor
  353.     -- mod komutları buraya
  354.     if komut== "geç" then
  355.         haritaDegistir(false)
  356.     elseif komut:sub(1,5) == "renk " then
  357.         local bosluk2 = komut:find(' ',6) -- 6. karakterden itibaren boşluğu bulmaya çalışıyor
  358.         if not bosluk2 then
  359.             -- !renk isim
  360.             -- ^ bu şekilde yazılırsa olacaklar buraya kullanım talimatı filan yap istersen
  361.             return
  362.         end
  363.         local isim2 = komut:sub(6,bosluk2-1) -- 6. karakter ve boşluk arasını alıyor
  364.         local renk = komut:sub(bosluk2+1) -- boşluktan sonrası
  365.         renk = tonumber(renk) or tonumber('0x'..renk)
  366.         if renk then
  367.             tfm.exec.setNameColor(isim2, renk)
  368.         end
  369.     elseif komut:sub(1,5) == "puan " then
  370.     local bosluk2 = komut:find (' ',6)
  371.     if not bosluk2 then
  372.     return
  373.     end
  374.     local isim2 = komut:sub(6,bosluk2-1)
  375.     local puan = komut:sub(bosluk2+1)
  376.     puan = tonumber(puan) or tonumber('PS'..puan)
  377.     if puan then
  378.     tfm.exec.setPlayerScore(isim2, puan)
  379.     end
  380.     elseif komut:sub(1,6) == "saman " then
  381.         tfm.exec.setShaman(komut:sub(7))
  382.     elseif komut:sub(1,6) == "süre " then
  383.         tfm.exec.setGameTime(komut:sub(7), true)
  384.     elseif komut:sub(1,7) == "vampir " then
  385.         tfm.exec.setVampirePlayer(komut:sub(8))
  386.     elseif komut:sub(1,5) == "koord" then
  387.         local p=tfm.get.room.playerList[isim]
  388.         if p then
  389.             ui.addPopup(333,0,'X:'..p.x..'  Y:'..p.y,isim,nil,nil,nil,true)
  390.         end
  391.     elseif komut:sub(1,1)=="." then
  392.         ui.addPopup(1,2,"<align='center'>duyuru",isim,300,200,200,16,16,70,nil,0x324650,nil,true)
  393.     elseif komut:sub(1,9) == "şamanad " then
  394.         tfm.exec.setUIShamanName(komut:sub(9))
  395.     elseif komut:sub(1,5) == "kill " then
  396.         tfm.exec.killPlayer(komut:sub(6))
  397.     elseif komut:sub(1,4) == "win " then
  398.         tfm.exec.respawnPlayer(komut:sub(5))
  399.         tfm.exec.giveCheese(komut:sub(5))
  400.         tfm.exec.playerVictory(komut:sub(5))
  401.     elseif komut=="win*" then
  402.     for n in pairs(tfm.get.room.playerList) do
  403.     tfm.exec.respawnPlayer(n)
  404.         tfm.exec.giveCheese(n)
  405.         tfm.exec.playerVictory(n)
  406.     end
  407.     elseif komut:sub(1,7) == "dirilt " then
  408.         tfm.exec.respawnPlayer(komut:sub(8))
  409.     elseif komut=="dirilt*" then
  410.     for n in pairs(tfm.get.room.playerList) do
  411.         tfm.exec.respawnPlayer(n)
  412.     end
  413.     elseif komut:sub(1,6) == "kilit " then
  414.         tfm.exec.setRoomMaxPlayers(komut:sub(7))
  415.     tfm.exec.chatMessage("maxplayer : on ")
  416.     elseif komut == "cmd" then
  417.         --tfm.exec.chatMessage("komutlar: !map !ban !unban !banlist !kilit !dirilt !kill !süre !renk !win !şamanad !vampir")
  418.     tfm.exec.chatMessage(cevir('codes',isim),isim)
  419.     elseif komut:sub(1,4) == "map " then
  420.         tfm.exec.newGame(komut:sub(5))
  421.     elseif komut:sub(1,4) == "ban " then
  422.         local kim,sure=komut:match'ban (%S+) (%d+)'
  423.         if kim and sure then
  424.             bans[kim:lower()]={os.time(),tonumber(sure)*6e4}
  425.             tfm.exec.chatMessage(cevir('oyuncuyasaklandi'):format(kim))
  426.             tfm.exec.killPlayer(kim)
  427.         end
  428.     elseif komut:sub(1,6) == "unban " then
  429.         bans[komut:sub(7):lower()] = nil
  430.         tfm.exec.chatMessage("<ROSE>[~FindTéam] "..komut:sub(7).." unbanned.")
  431.     elseif komut == "banlist" then
  432.         local s='Banlist:'
  433.         for name in pairs(bans) do
  434.             s = s .. '\n' .. name
  435.         end
  436.         ui.addPopup(3443,0,s,isim)
  437.     elseif komut:sub(1,8)=='creport ' then -- rapor kontrol komutu
  438.         local ID=tonumber(komut:sub(9))
  439.         if ID and reports[ID] then -- ID sayıysa ve belirtilen ID'ye sahip rapor varsa
  440.             ui.addTextArea(555,(reports[ID][3]and'+'or'-').." <font color='#CB546B'>Raporu Gönderen</font> : <V>"..reports[ID][1].."</V><br>"..reports[ID][2]:gsub('<','&lt;'),isim,200, 200, 400, 100, 0x000001, 0x000001, 1,true)
  441.             ui.addTextArea(554,"<a href='event:y.Fechar'><R>X</a>",isim,585, 185, 15, 16, 0x000001, 0x000001, 1,true)
  442.             reports[ID][3]=1-- rapor kontrol edildi
  443.         end
  444.     elseif komut=='dm' then
  445.         gamedm=not gamedm
  446.         tfm.exec.chatMessage('gamedm = '..tostring(gamedm),isim)
  447.     elseif komut=='lreport' then -- rapor listesi
  448.         local s='<b>Liste:</b>'
  449.         for _,rapor in pairs(reports) do
  450.             s=s..'\n'..rapor[1]..': '..rapor[2]:gsub('<','&lt;')
  451.         end
  452.         ui.addPopup(213,0,s,isim,5,20,nil,true)
  453.     end
  454.     if not admins[isim] then return end-- admin değilse devam etmiyor
  455.     -- admin komutları buraya
  456.     if komut:match('tp%d+,%d+') then
  457.         tfm.exec.respawnPlayer(isim)
  458.         tfm.exec.movePlayer(isim,komut:match('tp(%d+),%d+'),komut:match('tp%d+,(%d+)'))
  459.     elseif komut=="#cmd" then
  460.         ui.addTextArea(1111,"<p align='center'><font size='25'>KOMUTLAR</font><BR><p align='left'><R>!ban <N>  kullanıcıyı uzaklaştırır.<BR><p align='left'><R>!unban <N>  kullanıcının banını açar.<BR><p align='left'><R>!banlist <N>  banlı oyuncu listesini görüntüler.<BR><p align='left'><R>!creport [ID] <N>  Girdiğiniz ID deki raporu kontrol eder.<BR><p align='left'><R>!lreport <N>  rapor listesinin tamamını görüntüler.<BR><p align='left'><R>!kilit [Sayı] <N>  Girilen sayıya göre odayı kitler verdiğiniz değerin üstünde kimse odaya giremez.<BR><p align='left'><R>!. !duyuru !sunucu <N>  konuşma komutlarıdır.<BR><p align='left'><R>!win !win*<N>  win oyuncuyu deliğe sokar .<BR><p align='left'><R> !dirilt !dirilt*<N> Oyuncuyu diriltir.<BR><p align='left'><R>!süre <N> süreyi ayarlar.<BR><p align='left'><R>!dm <N>  haritanın hiç bir takdirde değişmemesini sağlar.<BR><p align='left'><R>!koord <N>  kordinatlarınızı gösterir.<BR><R>Not:<N>  komutun yanına *işareti geldiğinde herkezi anlamına gelir fakat şuan sadece !win* !dirilt* komutlarında çalışmaktadır. ",isim,300,40,300,290,0,1,0.8,true) --xy falan karıştırıyorum ui.addTextarea'da
  461.         ui.addTextArea(1112,"<p align='center'><a href='event:close'>[Fechar]",isim,300,360,300,nil,0,1,0.8,true)
  462.     elseif komut:sub(1,6)=="sunucu" then
  463.         ui.addPopup(3,2,"<align='center'>duyuru",isim,300,200,200,16,16,70,nil,0x324650,nil,true)
  464.     elseif komut:sub(1,6)=="duyuru" then
  465.         ui.addPopup(2,2,"<align='center'>duyuru",isim,300,200,200,16,16,70,nil,0x324650,nil,true)
  466.       elseif komut:sub(1,7)=="Drivertr" or komut == "drivertr" then
  467.         ui.addPopup(4,2,"<align='center'>duyuru",isim,300,200,200,16,16,70,nil,0x324650,nil,true)
  468.     elseif komut:sub(1,9)=='adminyap ' then
  469.         admins[komut:sub(10)]=1
  470.         tfm.exec.chatMessage(komut:sub(10)..' sayende admin oldu!',isim)
  471.     elseif komut:sub(1,7)=='modyap ' then
  472.         mods[komut:sub(8)]=1
  473.         tfm.exec.chatMessage(komut:sub(8)..' sayende mod oldu!',isim)
  474.     elseif komut:sub(1,9)=='adminsil ' then
  475.         if komut:sub(10)=='Fightcireis' then return end--kimse senden adminlik alamaz :P
  476.         admins[komut:sub(10)]=nil
  477.         tfm.exec.chatMessage(komut:sub(10)..' artık admin değil!',isim)
  478.     elseif komut:sub(1,7)=='modsil ' then
  479.         mods[komut:sub(8)]=nil
  480.         tfm.exec.chatMessage(komut:sub(8)..' artık mod değil!',isim)
  481.     elseif komut:sub(1,4)=="ktp" then
  482.       takimpuan.kirmizi = takimpuan.kirmizi+1
  483.      tfm.exec.chatMessage("<VP>Adminler <R>Kırmızı<N> takımın puanı 1 arttırdı. <R> kırmızı <N> takımın suanki puanı : "..takimpuan.kirmizi.."")    
  484.      ui.updateTextArea(1,'<B><CH>Blue <J>'..takimpuan.mavi..' <G>- <B><J>'..takimpuan.kirmizi..' <R>Red',nil,335,20,100,0,nil,0.9,0.8,true)
  485.     elseif komut:sub(1,4)=="mtp" then
  486.       takimpuan.mavi = takimpuan.mavi+1
  487.      tfm.exec.chatMessage("<VP>Adminler<ch>Mavi<N> takımın puanı 1 arttırdı <ch> Mavi <N> takımın suanki puanı : "..takimpuan.mavi.."")
  488.       ui.updateTextArea(1,'<B><CH>Blue <J>'..takimpuan.mavi..' <G>- <B><J>'..takimpuan.kirmizi..' <R>Red',nil,335,20,100,0,nil,0.9,0.8,true)
  489.     elseif komut:sub(1,4)=="dmtp" then
  490.       takimpuan.mavi = takimpuan.mavi-1
  491.           tfm.exec.chatMessage("<VP>Adminler <ch>Mavi<N> takımın puanı 1 azalttı <ch> Mavi <N> takımın suanki puanı : "..takimpuan.mavi.."")
  492.      ui.updateTextArea(1,'<B><CH>Blue <J>'..takimpuan.mavi..' <G>- <B><J>'..takimpuan.kirmizi..' <R>Red',nil,335,20,100,0,nil,0.9,0.8,true)
  493.     elseif komut:sub(1,4)=="dktp" then
  494.       takimpuan.kirmizi = takimpuan.kirmizi-1
  495.      tfm.exec.chatMessage("<VP>Adminler <R>Kırmızı<N> takımın puanı 1 azalttı. <R> kırmızı <N> takımın suanki puanı : "..takimpuan.kirmizi.."")
  496.      ui.updateTextArea(1,'<B><CH>Blue <J>'..takimpuan.mavi..' <G>- <B><J>'..takimpuan.kirmizi..' <R>Red',nil,335,20,100,0,nil,0.9,0.8,true)
  497.     elseif komut:sub(1,4)=="rktp" then
  498.     takimpuan.kirmizi = 0
  499.     takimpuan.mavi = 0
  500.   ui.updateTextArea(1,'<B><CH>Blue <J>'..takimpuan.mavi..' <G>- <B><J>'..takimpuan.kirmizi..' <R>Red',nil,335,20,100,0,nil,0.9,0.8,true)    
  501.   tfm.exec.chatMessage("<VP>Puanlar <ch>adminler <N>tarafından resetlendi şuanda <R>Kırmızı <N>takım'ın puanı <CH> :<N> "..takimpuan.kirmizi.." <CH>Mavi <N>takım'ın puanı <CH>:<N> "..takimpuan.mavi.." ")
  502.   puanGuncelle()
  503. end
  504. end
  505. function eventPopupAnswer(id, name, answer)
  506.        if id==444 and #answer>0 then
  507.         table.insert(reports,{name,answer})--raporlara ekliyoruz gönderilen raporu
  508.         --tfm.exec.chatMessage('<J>Talebiniz dikkate alındı!',name) -- rapor gönderene mesaj
  509.             tfm.exec.chatMessage(cevir('repors',name),name)
  510.        for isim in pairs(admins) do
  511.             tfm.exec.chatMessage('<VP>Yeni bir rapor var! ID: '..#reports,isim) -- admine mesaj
  512.         end
  513.         elseif id==1 and #answer>1 then
  514.         tfm.exec.chatMessage("<ROSE> [~"..name.."] " .. answer .. "</font>",playerName, 410, 20, 780, 18, 1, 3, 3, nil, nil,0x324650, nil, nil, 1.5)
  515.        elseif id==2 and #answer>1 then
  516.                 tfm.exec.chatMessage("<ROSE> [~Findtéam] " .. answer .. "</font>",playerName, 410, 20, 780, 18, 1, 3, 3, nil, nil,0x324650, nil, nil, 1.5)
  517.        elseif id==3 and #answer>1 then
  518.         tfm.exec.chatMessage("<ROSE> " .. answer .. "</font>",playerName, 410, 20, 780, 18, 1, 3, 3, nil, nil,0x324650, nil, nil, 1.5)
  519.        elseif id==4 and #answer>1 then
  520.         tfm.exec.chatMessage("<VP>• TR ["..name.."] " .. answer .. "</font>",playerName, 410, 20, 780, 18, 1, 3, 3, nil, nil,0x324650, nil, nil, 1.5)
  521.    
  522. end
  523. end
  524. system.disableChatCommandDisplay("saman",true)
  525. system.disableChatCommandDisplay("vampir",true)
  526. system.disableChatCommandDisplay("duyuru", true)
  527. system.disableChatCommandDisplay("ban", true)
  528. system.disableChatCommandDisplay("dirilt", true)
  529. system.disableChatCommandDisplay("map", true)
  530. system.disableChatCommandDisplay("banlist", true)
  531. system.disableChatCommandDisplay("kill", true)
  532. system.disableChatCommandDisplay("süre", true)
  533. system.disableChatCommandDisplay("win", true)
  534. system.disableChatCommandDisplay("kilit", true)
  535. system.disableChatCommandDisplay("tp", true)
  536. system.disableChatCommandDisplay("koord", true)
  537. system.disableChatCommandDisplay(".", true)
  538. --UserFunc
  539. function haritaDegistir(kod)
  540.   return tfm.exec.newGame(kod or haritalar[math.random(#haritalar)])
  541. end
  542. function puanGuncelle()
  543.   ui.addTextArea(1,'<B><CH>Blue <J>'..takimpuan.mavi..' <G>- <B><J>'..takimpuan.kirmizi..' <R>Red',isim,335,20,100,0,nil,0.9,0.8,true)
  544. end
  545. --Init
  546. tfm.exec.disableAutoNewGame(true)
  547. tfm.exec.disableAutoShaman(true)
  548. tfm.exec.disableAfkDeath(true)
  549. for isim in pairs(tfm.get.room.playerList) do
  550.   eventNewPlayer(isim,true)
  551. end
  552. haritaDegistir()
  553.  
  554. ui.addTextArea(0,"<p align='center'><a href='event:help'><b><R>?</b></a></p>",name,775,383,16,16,1,1,0.8,true)
  555.  
  556. function eventTextAreaCallback(id, name, callback, key)
  557. if callback=="help" then
  558. ui.addTextArea(999,"helpdeki yazın",name,250,50,300,300,1,1,0.8,true)
  559. ui.addTextArea(779,"<p align='center'><a href='event:close'><b>Fechar</b></a></p>",name,250,370,300,16,1,1,0.8,true)
  560.         elseif callback=="close" then
  561. ui.removeTextArea(999,name)
  562. ui.removeTextArea(779,name)
  563.     end
  564. end
  565. ui.addTextArea(0,"<p align='center'><a href='event:help'><b><R>?</b></a></p>",name,780,25,16,16,1,1,0.8,true)
  566.     for n in pairs(admins) do
  567.        ui.addTextArea(22123,"<p align='center'><a href='event:L'><b><R>L</b></a></p>",n,20,25,16,16,1,1,0.8,true)
  568. end
  569. function eventTextAreaCallback(id, name, callback)
  570.     if callback=="y.Fechar" then
  571.         ui.removeTextArea(555,name)
  572.         ui.removeTextArea(554,name)
  573.     elseif callback=="help" then
  574.         ui.addTextArea(999,"<p align='center'><font color='#BABD2F'><font size='15'>Minigame Portal Maluco</font>                                          <font size='13'><p align='left'><font color='#009D9D'>           Regras e Especificações:</font>                                               <p align='left'><font color='#2ECF73'>Regras:</font>                                                 <font color='#2ECF73'>•</font> É proibido compartilhar bug no jogo.                                                        <font color='#2ECF73'>•</font> É proibido o uso de fraudes no jogo.                                                        <font size='13'><p align='left'><font color='#2ECF73'>Características:</font>                                                       <font color='#2ECF73'>•</font> Áreas de teletransporte localizados em certos lugares no jogo.Você quando tiver certeza de que você encontrou as áreas do direito <font color='#FF0000'><U>ESPAÇO</U></font> Teleport Imprensa.No lado bigorna do mapa ele tenta impedi-lo.Cada partida é de 10 minutos.A equipe que marcar mais pontos ganha!<BR><font color='#2ECF73'>•</font> !Exibe o atual mapa mlister                                                                                                                           <font color='#CB546B'>Script Editado por Tectoon </font>",name,250,50,300,300,1,1,0.8,true)
  575.         ui.addTextArea(779,"<p align='center'><a href='event:close'><b><R>Fechar</b></a></p>",name,250,370,200,16,1,1,0.8,true)
  576.         ui.addTextArea(800,"<p align='center'><a href='event:sag'><b><R>EN</b></a></p>",name,515,370,35,16,1,1,0.8,true)
  577.         ui.addTextArea(801,"<p align='center'><a href='event:sol'><b><R>ESP</b></a></p>",name,465,370,35,16,1,1,0.8,true)
  578.     elseif callback=="L" then
  579.     if id == 22123 then
  580.     ui.addTextArea(2121312,"<a href='event:LK'>Clique me para escrever",name,50,25,200,16,1,1,0.8,true)
  581.      ui.addTextArea(2121313,"<p align='center'><a href='event:close'><b>««  </b></a></p>",name,275,25,10,16,1,1,true)        
  582. end
  583.     elseif callback=="LK" then
  584. ui.addPopup(1,2,"Escreveu Avisos",name,300,200,200,16,16,70,nil,0x324650,nil,true)
  585.     elseif callback=="close" then
  586.         if id == 1112 then
  587.             ui.removeTextArea(1111, name)
  588.         else
  589.             ui.removeTextArea(999,name)
  590.             ui.removeTextArea(779,name)
  591.             ui.removeTextArea(800,name)
  592.             ui.removeTextArea(801,name)
  593.             ui.removeTextArea(2121312,name)
  594.         end
  595.         ui.removeTextArea(id, name)
  596.                 elseif callback=="sag" then
  597.                 ui.addTextArea(999,"<p align='center'><font color='#BABD2F'><font size='15'>Minigame Portal Mad</font>                                                                                                     <font size='13'><p align='left'><font color='#009D9D'>Rules & Features:</font>                                                       <p align='left'><font color='#2ECF73'>Rules:</font>                                                       <font color='#2ECF73'>•</font> Do not share bug in the game.                                                        <font color='#2ECF73'>•</font> Don't use cheats in the game.                                                       <font size='13'><p align='left'><font color='#2ECF73'>Features:</font>                                                       <font color='#2ECF73'>•</font>   In the game specific locetions have got teleportation areas.The correction locetions finds press to </b><font color='#FF0000'><U>SPACE</U></font><font color='#BABD2F'>  Press the spaces are teleportation.The other side the maps are prevention the anvil.get in the hole is team one point the bring.A lap is ten minute.The team which has high score is the winner after ten minute.Top game.<BR><font color='#2ECF73'>•</font>!mlist is has to view maps                                                                                                                                                   <font color='#CB546B'>Script edited by Tectoon </font>",name,250,50,300,300,1,1,0.8,true)
  598.                 elseif callback=="sol" then
  599.                 ui.addTextArea(999,"<p align='center'><font color='#BABD2F'><font size='15'>Minijuego Portal Mad</font>                                          <font size='13'><p align='left'><font color='#009D9D'>Normas y Especificaciones:</font>                                               <p align='left'><font color='#2ECF73'>Reglas:</font>                                                 <font color='#2ECF73'>•</font><font color='#BABD2F'> Está prohibido compartir error en el juego.                                                        <font color='#2ECF73'>•</font> Está prohibido el uso de trampas en el juego.                                                        </font><font size='13'><p align='left'><font color='#2ECF73'>Características:</font>                                                       <font color='#2ECF73'>•</font><font color='#BABD2F'> Zonas de teletransporte ubicados en ciertos lugares en el juego.Usted cuando esté seguro de que ha encontrado las áreas de derecho </font><font color='#FF0000'><U>ESPACIO</U></font><font color='#BABD2F'> Teleport Prensa.En el lado de yunque del mapa que trata de detenerlo. Cada juego es de 10 minutos. El equipo que anota más puntos gana!.<br><font color='#2ECF73'>•</font>! Mlister Muestra mapas actuales                                                                                                                                                      <font color='#CB546B'>Guión editado por Tectoon</font>",name,250,50,300,300,1,1,0.8,true)
  600. end
  601.  end
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!