Advertisement
Guest User

Untitled

a guest
Mar 2nd, 2015
207
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 14.80 KB | None | 0 0
  1. system.disableChatCommandDisplay("sklep", true)
  2. tfm.exec.disableAutoShaman(true)
  3. tfm.exec.disableAutoNewGame(true)
  4. tfm.exec.disableAfkDeath(true)
  5. item={}
  6. cash={}
  7. msek={}
  8. ban={}
  9. tfm.exec.newGame([[<C><P APS="x_evenements/x_fondSVb.png,0,940,0,800,400" defilante="0,0,0,1" L="1660" D="x_evenements/x_fondSVa.jpg" d="x_evenements/x_fondSVc.png" /><Z><S><S Y="201" T="12" P="0,0,0,0.2,90,0,0,0" L="400" o="12bd94" m="" X="-4" H="10" /><S Y="390" T="12" P="0,0,0.3,0.2,0,0,0,0" L="200" o="12bd94" m="" X="101" H="20" /><S Y="403" T="12" P="0,0,0.3,0.2,0,0,0,0" L="310" o="12bd94" m="" X="354" H="20" /><S Y="389" T="12" P="0,0,0.3,0.2,0,0,0,0" L="400" o="12bd94" m="" X="706" H="20" /><S Y="401" T="12" P="0,0,0.3,0.2,0,0,0,0" L="720" o="12bd94" m="" X="1300" H="20" /><S Y="390" T="12" P="0,0,0.3,0.2,-30,0,0,0" L="30" o="12bd94" m="" X="497" H="10" /><S Y="393" T="12" P="0,0,0.3,0.2,40,0,0,0" L="30" o="12bd94" m="" X="210" H="10" /><S Y="390" T="12" P="0,0,0.3,0.2,15,0,0,0" L="50" o="12bd94" m="" X="927" H="10" /><S Y="241" T="9" P="0,0,,,,0,0,0" L="57" m="" X="1630" H="300" /><S Y="265" T="12" P="0,0,0.3,0.2,0,0,0,0" L="850" o="12bd94" m="" X="1174" H="10" /><S Y="148" T="12" P="0,0,0.3,0.2,0,0,0,0" L="850" o="12bd94" m="" X="1176" H="10" /><S Y="201" T="12" P="0,0,0,0.2,-90,0,0,0" L="420" o="12bd94" m="" X="1664" H="10" /><S Y="-10" T="12" P="0,0,0.3,0,0,0,0,0" L="720" o="12bd94" m="" X="1309" H="20" /><S Y="273" T="12" P="0,0,0.3,0.2,0,0,0,0" L="40" o="12bd94" m="" X="629" H="10" /><S Y="214" T="12" P="0,0,0.3,0.2,0,0,0,0" L="60" o="12bd94" m="" X="565" H="10" /><S Y="66" T="12" P="0,0,0.3,0.2,0,0,0,0" L="280" o="12bd94" m="" X="266" H="10" /><S Y="218" T="12" P="0,0,0.3,0.2,90,0,0,0" L="200" o="12bd94" m="" X="429" H="10" /></S><D><DS Y="362" X="89" /><P Y="143" T="68" X="844" P="0,0" /><P Y="142" T="67" X="801" P="0,0" /><P Y="143" T="67" X="890" P="0,1" /><P Y="259" T="68" X="850" P="0,0" /><P Y="143" T="68" X="1017" P="0,0" /><P Y="143" T="68" X="1182" P="0,0" /><P Y="143" T="68" X="1334" P="0,0" /><P Y="143" T="68" X="1507" P="0,0" /><P Y="260" T="68" X="1513" P="0,0" /><P Y="260" T="68" X="1339" P="0,0" /><P Y="260" T="68" X="1174" P="0,0" /><P Y="260" T="68" X="1019" P="0,0" /><P Y="390" T="68" X="1115" P="0,0" /><P Y="389" T="68" X="1285" P="0,0" /><P Y="391" T="68" X="1459" P="0,0" /><P Y="260" T="67" X="809" P="0,0" /><P Y="143" T="67" X="975" P="0,0" /><P Y="144" T="67" X="1137" P="0,0" /><P Y="144" T="67" X="1290" P="0,0" /><P Y="144" T="67" X="1464" P="0,0" /><P Y="260" T="67" X="971" P="0,0" /><P Y="260" T="67" X="1131" P="0,0" /><P Y="259" T="67" X="1296" P="0,0" /><P Y="260" T="67" X="1468" P="0,0" /><P Y="391" T="67" X="1415" P="0,0" /><P Y="390" T="67" X="1240" P="0,0" /><P Y="391" T="67" X="1070" P="0,0" /><P Y="260" T="67" X="894" P="0,1" /><P Y="390" T="67" X="1504" P="0,1" /><P Y="391" T="67" X="1331" P="0,1" /><P Y="390" T="67" X="1160" P="0,1" /><P Y="144" T="67" X="1552" P="0,1" /><P Y="144" T="67" X="1380" P="0,1" /><P Y="143" T="67" X="1230" P="0,1" /><P Y="143" T="67" X="1063" P="0,1" /><P Y="260" T="67" X="1063" P="0,1" /><P Y="260" T="67" X="1220" P="0,1" /><P Y="260" T="67" X="1387" P="0,1" /><P Y="259" T="67" X="1558" P="0,1" /></D><O><O C="22" Y="282" X="1108" P="0" /></O></Z></C>]])
  10. tfm.exec.setUIMapName("<J>Unsteakhache - <bl> Mapa Walentynkowa")
  11. admin,admin2="Luxemburk","Tasted"
  12.  
  13. function eventNewPlayer(playerName)
  14.  tfm.exec.respawnPlayer(playerName)
  15.  item[playerName]=0
  16.  msek[playerName]=0
  17.  ban[playerName]=1
  18.  ui.addTextArea(-1,"<v><a href='event:roll'>Regulamin ▼</v></a>",playerName,500,20,280,0,0x1c3c41,0x1c3c41,500,100)
  19.  ui.addTextArea(2,"<j><a href='event:sklep'><b>Sklep!</b></v></a>",playerName,100,20,0,0,0x1c3c41,0x1c3c41,500,100)
  20.  system.bindMouse(playerName, true)
  21.   if playerName==admin or playerName==admin2 then
  22.    cash[playerName]=5
  23.   else
  24.    cash[playerName]=2
  25. end
  26. ui.addTextArea(-2,"<p align='center'><font face='Soopafresh' size='40' >"..cash[playerName],playerName,745,350,50,50,0x1c3c41,0x1c3c41,500,100)
  27. end
  28.  
  29. for playerName in pairs(tfm.get.room.playerList) do
  30.  eventNewPlayer(playerName)
  31. end
  32.  
  33. function eventLoop(czas, dokonca)
  34.   for playerName,player in pairs(tfm.get.room.playerList) do
  35.   msek[playerName]=msek[playerName]+1
  36.   if msek[playerName]==120 and playerName~=admin and playerName~=admin2 and ban[playerName]==1 then
  37.   msek[playerName]=0
  38.   cash[playerName]=cash[playerName]+1
  39.   ui.updateTextArea(-2, "<p align='center'><font size='40' >"..cash[playerName], playerName)
  40.   end
  41.  end
  42. end
  43.  
  44. function eventChatCommand(playerName,komd)
  45. sekw={}
  46. for arg in komd:gmatch("%S+") do
  47. table.insert(sekw,arg)
  48. end
  49. if sekw[1]=="ban" and playerName==admin and ban[sekw[2]]==1 or sekw[1]=="ban" and playerName==admin and ban==nil or sekw[1]=="ban" and playerName==admin2 and ban[sekw[2]]==1 or sekw[1]=="ban" and playerName==admin2 and ban==nil then
  50. ban[sekw[2]]=-1
  51. elseif sekw[1]=="ban" and playerName==admin and ban[sekw[2]]==-1 or sekw[1]=="ban" and playerName==admin2 and ban[sekw[2]]==-1 then
  52. ban[sekw[2]]=1
  53. elseif sekw[1]=="daj" and playerName==admin or sekw[1]=="daj" and playerName==admin2 then
  54. cash[sekw[2]]=cash[sekw[2]]+sekw[3]
  55. ui.updateTextArea(-2, "<p align='center'><font size='40' >"..cash[sekw[2]], sekw[2])
  56. end
  57. end
  58.  
  59.  
  60. function eventTextAreaCallback(id, playerName, odp)
  61.  if odp=="sklep" and ban[playerName]==1 then
  62.   ui.addTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:+deski'>Deski:</a><n> - zobacz więcej.\n<v><a href='event:+box'>Skrzynki:</a><n> - zobacz więcej.\n<v><a href='event:+pilki'>Piłki:</a><n> - zobacz więcej.\n<v><a href='event:+anvil'>Kowadła:</a><n> - zobacz więcej.\n<v><a href='event:+balony'>Balony:</a><n> - zobacz więcej.\n<v><a href='event:cloud'>Chmurka:</a> - <j>5<n> monet.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,500,100)
  63. elseif odp=="sklep" and ban[playerName]==-1 then
  64.   ui.addTextArea(1,"<r>Przykro mi, masz bana i nie możesz zakupywać przedmiotów.",playerName,100,50,280,0,0x1c3c41,0x1c3c41,500,100)
  65.  elseif odp=="roll" then
  66.   ui.updateTextArea(-1, "<v><a href='event:deroll'>Regulamin ▲</v></a>\n<j><b>①. Nie obrażaj myszek.</b>\n<n>Nie wolno obrażać innych graczy w pokoju oraz poza nim.</n>\n<j><b>②. Nie klnij.</b>\n<n>Nie wolno używać nieodpowiednich słów w pokoju oraz poza nim.\n\n<j><b>③. Nie puszczaj nieodpowiednich filmów w chatce plemiennej.</b>\n<n>Nie wolno puszczać nieodpowiednich filmów (z przekleństwami oraz rzeczami 18+).\n\n<j><b>④. Nie wysyłaj innym nieodpowiednich stron.</b>\n<n>Nie wolno wysyłać innym nieodpowiednich stron typu jak-zostac-syrenka.<COŚ>.\n\n<j><b>⑤. Nie proś o walutę do sklepu.</b>\n<n>Nie wolno prosić admina skryptu o pieniądze do wirtualnego sklepu. Za bycie minutę w chatce dostajesz 1 monetę.      </n>\n<j><b>⑥. Nie spam.</b>\n<n>Nie wolno wysyłać drażniących wiadomości; Nie wolno wysyłać 3 razy pod rząd 1 wiadomości.", playerName)
  67.  elseif odp=="deroll" then
  68.   ui.addTextArea(-1,"<v><a href='event:roll'>Regulamin ▼</v></a>",playerName,500,20,280,0,0x1c3c41,0x1c3c41,500,100)
  69.  elseif odp=="+deski" then
  70.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:minideska'>Mikrodeska:</a><n> - <j>1<n> moneta.\n<v><a href='event:+maledeski'>Małe deski:</a><n> - zobacz więcej.\n<v><a href='event:+duzedeski'>Duże deski:</a><n> - zobacz więcej.\n<v><a href='event:megadeska'>Megadeska:</a><n> - <j>5<n> monet.\n<v><a href='event:deSka'>DeSka:</a><n> - <j>4<n> monety.", playerName)
  71.  elseif odp=="+box" then
  72.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:+skrzynki'>Małe skrzynki:</a><n> - zobacz więcej.\n<v><a href='event:+skrzynie'>Duże skrzynie:</a><n> - zobacz więcej.", playerName)
  73.  elseif odp=="+maledeski" then
  74.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:maladeska'>Zwykła mała deska:</a><n> - <j>2<n> monety.", playerName)
  75.  elseif odp=="+duzedeski" then
  76.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:duzadeska'>Zwykła duża deska:</a><n> - <j>3<n> monety.", playerName)
  77.  elseif odp=="+skrzynki" then
  78.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:skrzynka'>Zwykła skrzynka:</a><n> - <j>1<n> moneta.", playerName)
  79.  elseif odp=="+skrzynie" then
  80.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:skrzynia'>Zwykła skrzynia:</a><n> - <j>3<n> monety.\n<v><a href='event:tri'>Trójkątna skrzynka:</a><n> - <j>3<n> monety.", playerName)
  81.  elseif odp=="+pilki" then
  82.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:pilka'>Piłka plażowa:</a><n> - <j>1<n> moneta.", playerName)
  83.  elseif odp=="+anvil" then
  84.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:kowaduo'>Zwykłe kowadło:</a><n> - <j>3<n> monety.", playerName)
  85.  elseif odp=="+balony" then
  86.   ui.updateTextArea(1,"Masz <j>"..cash[playerName].."<n> monet.\n\n<v><a href='event:balon'>Losowy balon:</a><n> - <j>1<n> moneta.", playerName)
  87.  elseif odp=="minideska" then
  88.   if cash[playerName]>=1 then
  89.    item[playerName]=60
  90. if playerName~=admin and playerName~=admin2 then
  91.    cash[playerName]=cash[playerName]-1
  92. end
  93.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  94.   else
  95.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  96. end
  97.  elseif odp=="maladeska" then
  98.   if cash[playerName]>=2 then
  99.    item[playerName]=3
  100. if playerName~=admin and playerName~=admin2 then
  101.    cash[playerName]=cash[playerName]-2
  102. end
  103.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  104.   else
  105.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  106. end
  107. elseif odp=="duzadeska" then
  108.   if cash[playerName]>=3 then
  109.    item[playerName]=4
  110. if playerName~=admin and playerName~=admin2 then
  111.    cash[playerName]=cash[playerName]-3
  112. end
  113.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  114.   else
  115.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  116. end
  117. elseif odp=="megadeska" then
  118.   if cash[playerName]>=5 then
  119.    item[playerName]=67
  120. if playerName~=admin and playerName~=admin2 then
  121.    cash[playerName]=cash[playerName]-5
  122. end
  123.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  124.   else
  125.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  126. end
  127. elseif odp=="deSka" then
  128.   if cash[playerName]>=4 then
  129.    item[playerName]=69
  130. if playerName~=admin and playerName~=admin2 then
  131.    cash[playerName]=cash[playerName]-4
  132. end
  133.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  134.   else
  135.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  136. end
  137. elseif odp=="skrzynka" then
  138.   if cash[playerName]>=1 then
  139.    item[playerName]=1
  140. if playerName~=admin and playerName~=admin2 then
  141.    cash[playerName]=cash[playerName]-1
  142. end
  143.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  144.   else
  145.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  146. end
  147. elseif odp=="skrzynia" then
  148.   if cash[playerName]>=3 then
  149.    item[playerName]=2
  150. if playerName~=admin and playerName~=admin2 then
  151.    cash[playerName]=cash[playerName]-3
  152. end
  153.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  154.   else
  155.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  156. end
  157. elseif odp=="tri" then
  158.   if cash[playerName]>=3 then
  159.    item[playerName]=68
  160. if playerName~=admin and playerName~=admin2 then
  161.    cash[playerName]=cash[playerName]-3
  162. end
  163.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  164.   else
  165.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  166. end
  167. elseif odp=="pilka" then
  168.   if cash[playerName]>=1 then
  169.    item[playerName]=6
  170. if playerName~=admin and playerName~=admin2 then
  171.    cash[playerName]=cash[playerName]-1
  172. end
  173.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  174.   else
  175.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  176. end
  177. elseif odp=="kowaduo" then
  178.   if cash[playerName]>=3 then
  179.    item[playerName]=10
  180. if playerName~=admin and playerName~=admin2 then
  181.    cash[playerName]=cash[playerName]-3
  182. end
  183.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  184.   else
  185.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  186. end
  187. elseif odp=="cloud" then
  188.   if cash[playerName]>=5 then
  189.    item[playerName]=57
  190. if playerName~=admin and playerName~=admin2 then
  191.    cash[playerName]=cash[playerName]-5
  192. end
  193.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  194.   else
  195.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  196. end
  197.  elseif odp=="balon" then
  198.   if cash[playerName]>=1 then
  199.    item[playerName]=28
  200.     if playerName~=admin and playerName~=admin2 then
  201.      cash[playerName]=cash[playerName]-1
  202.     end
  203.    ui.addTextArea(1,"Kliknij w dowolnym miejscu na mapie, aby stworzyć wybrany przedmiot.",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  204.   else
  205.    ui.addTextArea(1,"<r>Nie masz dość monet, aby kupić ten przedmiot! <b>",playerName,100,50,0,0,0x1c3c41,0x1c3c41,ffffff,100)
  206. end
  207. end
  208. end
  209.  
  210. function eventMouse(playerName, x, y)
  211. ui.removeTextArea(1, playerName)
  212.  if item[playerName]>0 then
  213.   tfm.exec.addShamanObject(item[playerName], x, y, 0, 0, 0, false)
  214.   ui.updateTextArea(-2, "<p align='center'><font size='40' >"..cash[playerName], playerName)
  215.   item[playerName]=0
  216. end
  217. end
  218.  
  219. function eventPlayerDied(playerName)
  220. tfm.exec.respawnPlayer(playerName)
  221. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement