Rawoas13

[Script] Shop

Jan 19th, 2020
174
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --Hass
  2. --10/01/2020
  3.  
  4. --Main--
  5. adm = {"Hass"}
  6. Vn = ("Beta")
  7. V = ("Versão "..Vn.."")
  8. print("#Lua Load Sucessfully | "..V.."")
  9. --Variáveis--
  10. ----Efeitos
  11. ef = {0,1,2,3,4,9,11,13} efx = {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,-1,-2,-3,-4,-5,-6,-7,-8,-9,-10,-11,-12,-13,-14,-15,-16,-17,-18,-19,-20,-21,-22,-23,-24,-25,-26,-27,-28,-29,-30,-31,-32,-33,-34,-35,-36,-37,-38,-39,-40} efy = {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,-1,-2,-3,-4,-5,-6,-7,-8,-9,-10,-11,-12,-13,-14,-15,-16,-17,-18,-19,-20,-21,-22,-23,-24,-25,-26,-27,-28,-29,-30,-31,-32,-33,-34,-35,-36,-37,-38,-39,-40}
  12. ----Nome(n);Preço(p);Quantidade(q),Ação(a)
  13. p = ("Pontos")
  14. n0 = ("ColorName") p0 = ("<J>Preço:<N> 10 "..p.."") q0 = ("<J>Quantidade: <N>1") a0 = ("<T>Muda a cor de seu nome") n1 = ("Bola de Praia") p1 = ("<J>Preço:<N> 15 "..p.."") q1 = ("<J>Quantidade:<N> 3") a1 = ("<T>Lança uma Bola de Praia") n2 = ("Lápide") p2 = ("<J>Preço:<N> 20 "..p.."") q2 = ("<J>Quantidade:<N> 5") a2 = ("<T>Solta uma Lápide") n3 = ("Bigorna") p3 = ("<J>Preço:<N> 25 "..p.."") q3 = ("<J>Quantidade:<N> 2") a3 = ("<T>Solta uma Bigorna") n4 = ("Ovelha") p4 = ("<J>Preço:<N> 50 "..p.."") q4 = ("<J>Quantidade:<N> 1") a4 = ("<T>Solta uma Ovelha") n5 = ("Vampiro") p5 = ("<J>Preço:<N> 70 "..p.."") q5 = ("<J>Quantidade:<N> 1") a5 = ("<T>Cinco mapas como vampiro") n6 = ("Flying Spirit") p6 = ("<J>Preço:<N> 100 "..p.."") q6 = ("<J>Quantidade:<N> 2") a6 = ("<T>Um Spirit te impulsiona para cima") n7 = ("Choco-Jump") p7 = ("<J>Preço:<N> 150 "..p.."") q7 = ("<J>Quantidade:<N> 2") a7 = ("<T>Spawna um Chocolate para Wall-Jump") n8 = ("Explosão") p8 = ("<J>Preço:<N> 170 "..p.."") q8 = ("<J>Quantidade:<N> 1") a8 = ("<T>Faz uma Explosão") n9 = ("Trampolim") p9 = ("<J>Preço:<N> 210 "..p.."") q9 = ("<J>Quantidade:<N> 2") a9 = ("<T>Spawna um Trampolim") n10 = ("Voodoo") p10 = ("<J>Preço:<N> 270 "..p.."") q10 = ("<J>Quantidade:<N> 1") a10 = ("<T>Você poderá controlar um rato") n11 = ("Assassino") p11 = ("<J>Preço:<N> 310 "..p.."") q11 = ("<J>Quantidade:<N> 1") a11 = ("<T>Matará todos no mapa, exceto você")
  15. --NewPlayer--
  16. mice = {}
  17. function eventNewPlayer(n)
  18.         if not mice[n] then
  19.                 mice[n] = {
  20.                         vitima = "",
  21.                         voodooativado = false,
  22.                         vampiro = false,
  23.                         round = 0,
  24.                         }
  25.         end
  26. end
  27. for n in pairs(tfm.get.room.playerList) do
  28.         eventNewPlayer(n)
  29. end
  30. --Pisos--
  31. ChocoJump={
  32.         type=4,
  33.         width=10,
  34.         height=60,
  35.         foreground=false,
  36.         friction=20,
  37.         restitution=0,
  38.         angle=0,
  39.         miceCollision=true,
  40.         groundCollision=false,
  41.         dynamic=false,
  42.         }
  43. Trampolim={
  44.         type=2,
  45.         width=60,
  46.         height=10,
  47.         foreground=false,
  48.         friction=0,
  49.         restitution=2,
  50.         angle=0,
  51.         miceCollision=true,
  52.         groundCollision=false,
  53.         dynamic=false,
  54.         }
  55. --Voodoo--
  56. function eventPopupAnswer(i,p,a)
  57.         if i == 1 then
  58.                 print(""..p.." nomeou "..a.." como vítima")
  59.                 mice[p].vitima = ""..a..""
  60.                
  61.         end
  62. end
  63. function eventKeyboard(god, key, down, x, y)
  64.         if key == 85 and mice[god].voodooativado == true then
  65.                 tfm.exec.movePlayer(mice[god].vitima, 0, 0, true, 0, -50, false)
  66.                         elseif key == 74 then
  67.                 tfm.exec.movePlayer(mice[god].vitima, 0, 0, true, 0, 40, false)
  68.         elseif key == 72 then
  69.                 tfm.exec.movePlayer(mice[god].vitima, 0, 0, true, -40, 0, false)                
  70.         elseif key == 75 then  
  71.                 tfm.exec.movePlayer(mice[god].vitima, 0, 0, true, 40, 0, false)                      
  72.         end
  73. end
  74. --Mapas--
  75. maps = {"0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19","20","21","22","23","24","25","26","27","28","29","30","31","32","33","34","35","36","37","38","39","40","41","42","43","44","45","46","47","48","49","50","51","52","53","54","55","56","57","58","59","60","61","62","63","64","65","66","67","68","69","70","71","72","73","74","75","76","77","78","79","80","81","82","83","84","85","86","87","88","89","90","91","92","93","94","95","96","97","98","99","100","101","102","103","104","105","106","107","108","109","110","111","112","112","113","114","115","116","117","118","119","120","121","122","123","124","125","126","127","128","129","130","131","132","133","134","@120806","@131444","@151712","@155582","@156966","@159709","@164663","@165741","@166138","@168872","@169710","@172357","@173231","@179968","@182878","@183705","@183740","@183760","@186482","@187059","@187088","@188816","@188821","@199112","@199265","@200017","@213781","@215312","@219032","@234373","@234665","@239860","@239941","@245354","@249255","@251052","@273581","@308787","@317521","@326777","@348365","@355562","@357214","@357644","@360778","@364544","@364688","@365734","@367747","@371007","@379805","@382841","@384181","@392150","@398828","@413242","@416324","@420875","@421185","@421195","@423670","@426398","@427273","@431506","@433332","@436128","@437313","@438271","@442098","@444118","@452653","@452773","@453948","@455820","@458677","@460646","@461925","@467799","@470160","@474113","@474477","@484159","@490175","@497021","@500471","@504166","@504567","@509320","@515250","@517344","@524924","@528954","@576319","@576456","@584430","@598394","@607131","@617225","@743739","@746698","@772825","@773147","@776051","@798052","@812808","@853788","@901990","@909734","@923878","@953233","@1031070","@1061308","@1124454","@1139501","@1150596","@1193841","@1196336","@1233889","@1341479","@1346981","@1347532","@1360297","@1377965","@1381446","@1400684","@1406626","@1476450","@1492702","@1510908","@1519938","@1570590","@1584280","@1596859","@1615397","@1622242","@1641473","@1655360","@1696123","@1728174","@1732919","@1754420","@1836964","@1845748","@1871593","@1900914","@1927549","@1937184","@1964128","@1965721","@2087280","@2104751","@2113338","@2151169","@2199656","@2406202","@2462668","@2465963","@2577135","@2579134","@2587007","@2597411","@2630179","@2645143","@2661109","@2668819","@2693292","@2703778","@2722183","@2782301","@2847459","@2905546","@2907925","@2915515","@2927599","@2932610","@2957283","@2957682","@3008334","@3016804","@3017381","@3024969","@3028325","@3043400","@3047886","@3049560","@3060750","@3097109","@3112222","@3147428","@3168488","@3532970","@3534630","@3583744","@3593731","@3617459","@3798375","@3799806","@3820670","@3932849","@3971113","@3996892","@3997083","@3997117","@3999440","@4007168","@4012245","@4062696","@4087743","@4127339","@4141157","@4367103","@4530334","@4624694","@4657760","@4767239","@4872938","@5586587","@129420","@154859","@202952","@224120","@230970","@235931","@238162","@247992","@256797","@257777","@257782","@261886","@263215","@263800","@270238","@277994","@280679","@290549","@299897","@306561","@315632","@317110","@330773","@330797","@334645","@350441","@438546","@453765","@457558","@476658","@485653","@495829","@503268","@506218","@525684","@543398","@578714","@585040","@604406","@617254","@638159","@706326","@744348","@750942","@763156","@779260","@786497","@848208","@878196","@899457","@927182","@979494","@1135318","@1164011","@1200519","@1211568","@1214279","@1259600","@1262441","@1262576","@1263900","@1268550","@1300245","@1334402","@1349031","@1352113","@1412929","@1452622","@1485916","@1528279","@1573316","@1592223","@1695882","@1697837","@1708963","@1712533","@1716752","@1730988","@1738125","@1738989","@1746290","@1749688","@1749932","@1756788","@1762434","@1766747","@1777814","@1787404","@1796467","@1799015","@1800626","@1820179","@1830174","@1836823","@1844159","@1846067","@1847621","@1860790","@1863924","@1872587","@1889408","@1889794","@1913370","@1942013","@1976323","@1980188","@1984663","@1998819","@2012914","@2018904","@2019344","@2052945","@2066584","@2115470","@2119048","@2139252","@2154135","@2203483","@2220773","@2270547","@2328121","@2360279","@2367228","@2372033","@2376836","@2407012","@2427381","@2429189","@2446305","@2446697","@2455096","@2462352","@2470112","@2479910","@2490148","@2539757","@2546729","@2552396","@2563171","@2621331","@2638619","@2677968","@2688651","@2760552","@2763000","@2780261","@2784715","@2794881","@2796541","@2798026","@2802862","@2828746","@2866381","@2880542","@2953001","@2957089","@2971843","@2975039","@2996913","@3007211","@3014000","@3019964","@3023538","@3026528","@3052500","@3067412","@3100888","@3107962","@3110059","@3121566","@3122999","@3128066","@3130657","@3130919","@3167482","@3171809","@3191094","@3191391","@3213325","@3237452","@3237957","@3283533","@3295987","@3295997","@3296008","@3305726","@3335221","@3396857","@3420648","@3421888","@3436062","@3451399","@3473320","@3474595","@3478848","@3561784","@3572354","@3631500","@3676167","@3688100","@3738367","@3910771","@3924361","@3932627","@3938620","@4048949","@4094915","@4149609","@4202281","@4297651","@4346298","@4365311","@4457730","@4550279","@4586150","@4656673","@4784470","@4868634","@4893002","@4973378","@5353045","@5358152","@5418043","@5457562","@5492714","@5555555","@5577611","@5578052","@5616736","@49101","@60303","@63366","@108982","@113235","@119308","@121043","@124969","@127440","@133082","@139581","@141827","@147831","@149476","@155262","@155591","@158569","@160303","@164404","@164859","@166106","@167093","@169959","@171290","@179384","@183423","@183427","@184294","@192144","@192155","@196950","@198823","@204059","@206891","@208692","@211171","@211533","@213396","@217333","@219350","@220999","@225109","@226423","@238926","@239907","@242381","@248490","@248644","@250042","@254893","@290801","@293308","@301206","@306730","@313415","@314416","@325027","@327706","@334288","@339035","@340745","@356553","@356643","@356892","@370937","@372968","@407025","@411996","@413183","@420001","@425247","@434768","@437196","@486012","@499940","@515187","@581701","@594426","@605286","@627958","@629763","@672430","@693009","@697877","@748650","@778287","@868686","@921661","@923485","@928583","@941707","@944540","@993954","@1249188","@1255674","@1297039","@1391896","@1412359","@1427861","@1432572","@1505167","@1542565","@1709809","@1783602","@1799297","@1854137","@1933292","@1957536","@2036283","@2261863","@2373533","@2456807","@2468712","@2493085","@2493651","@2515079","@2618581","@2655603","@2686903","@2766068","@2868361","@2943206","@2984874","@2999899","@3003958","@3078733","@3118578","@3132494","@3157116","@3197968","@3229524","@3265107","@3265446","@3270078","@3296011","@3333614","@3361309","@3382202","@3476685","@3478259","@3499928","@3529629","@3641144","@3659540","@3661853","@3729243","@3765910","@3965601","@4000179","@4141348","@4702404","@4766133","@4793569","@4843980","@4933394","@5303746","@5984298","@3078","@8679","@82090","@127419","@129835","@142101","@142738","@146364","@146615","@147437","@149853","@155415","@159076","@159204","@164931","@165808","@169033","@178486","@179656","@180035","@181261","@182233","@185646","@185955","@185985","@186484","@186695","@191070","@197413","@197442","@197503","@197742","@199957","@201502","@201606","@210217","@211248","@212576","@212903","@213470","@214465","@214788","@215601","@219889","@220737","@221767","@222730","@228517","@233294","@233333","@235464","@237251","@238378","@240994","@244642","@245152","@247329","@247904","@248906","@250619","@261462","@266889","@269131","@269534","@274963","@276098","@280637","@281784","@284702","@292057","@294500","@298123","@303391","@306755","@313182","@318970","@321268","@327447","@329627","@335361","@352622","@353079","@363635","@364490","@366205","@369138","@371072","@371332","@387110","@387659","@402190","@417816","@421885","@422655","@423989","@424864","@429339","@433483","@446627","@446819","@455094","@466871","@470069","@482003","@500133","@505196","@511007","@520258","@523865","@552213","@557334","@581408","@611234","@629731","@659216","@667934","@724780","@763961","@780286","@847540","@1053516","@1190826","@1222017","@1222509","@1252255","@1255253","@1292025","@1368022","@1429444","@1481024","@1502799","@1550076","@1556972","@1563226","@1662570","@1683790","@1698845","@1699288","@1855968","@1864676","@1931963","@1958341","@1970001","@2006183","@2019746","@2188104","@2208335","@2223354","@2227644","@2261303","@2262297","@2311047","@2373079","@2378818","@2439335","@2444362","@2458243","@2558294","@2589845","@2598599","@2616341","@2617003","@2708773","@2711946","@2746128","@2805602","@2808729","@2813218","@2827176","@2842279","@2870002","@2932980","@2959762","@2959999","@2960917","@2969368","@2972400","@2973921","@2978151","@3014728","@3018693","@3021717","@3051957","@3117749","@3124696","@3224383","@3237735","@3270188","@3279863","@3297112","@3407209","@3425103","@3432133","@3497411","@3512325","@3526384","@3560912","@3586018","@3603116","@3605217","@3710926","@3714605","@3779546","@3865524","@3866374","@4017491","@4018172","@4116927","@4140588","@4254886","@4293755","@4388419","@4413613","@4456479","@4839357","@4852051","@5206685","@5226524","@5345895","@5572726","@5579316","@125204","@149514","@159903","@176885","@185685","@197214","@198028","@212956","@216809","@232664","@240849","@270489","@294822","@322898","@343455","@350169","@352617","@404907","@414991","@421583","@422305","@465849","@476573","@481925","@484218","@485334","@497904","@498707","@506950","@508252","@509145","@515913","@542870","@544675","@560293","@570888","@586245","@586331","@590820","@609552","@626107","@742744","@898449","@1089882","@1095753","@1296882","@1341133","@1365330","@1380404","@1390764","@1405207","@1428989","@1452753","@1474189","@1568962","@1651220","@1662853","@1696100","@1703817","@1709353","@1721620","@1758349","@1789491","@1805044","@1819830","@1821046","@1830591","@1887755","@1901078","@1912644","@1927354","@1984585","@2002867","@2099300","@2110278","@2170579","@2190794","@2241748","@2472355","@2476452","@2479717","@2541893","@2562533","@2564902","@2574988","@2611862","@2670753","@2768546","@2779096","@2781563","@2785680","@2850049","@2859994","@2866657","@2873024","@2876773","@2877342","@2902195","@2989211","@3036001","@3056988","@3165231","@3189412","@3210210","@3265149","@3292713","@3294077","@3296020","@3296027","@3296031","@3418308","@3460996","@3482188","@3518304","@3537721","@3605225","@3630912","@3688810","@3797905","@3810119","@3866756","@4428240","@4940118","@5594719","@5937748","@121024","@139360","@141301","@144903","@145968","@151850","@156030","@158563","@163770","@163833","@165264","@165993","@180301","@183676","@186490","@187672","@191021","@205280","@218061","@225041","@237089","@238365","@239883","@253295","@253864","@257008","@260953","@266723","@269622","@270403","@277517","@278557","@304325","@308541","@313076","@316859","@324426","@327308","@328997","@332114","@333333","@348115","@352154","@361426","@361481","@365347","@365742","@370045","@377297","@379521","@379615","@382746","@382906","@384457","@384989","@387280","@415547","@421576","@421608","@434730","@445108","@445520","@449424","@449673","@452850","@482845","@512836","@542808","@569959","@599834","@604878","@605894","@622358","@628530","@631342","@651831","@716537","@765392","@772557","@798831","@808378","@852256","@869358","@874246","@875176","@876556","@963540","@969431","@970117","@970198","@976697","@977262","@1081250","@1086601","@1089866","@1104249","@1174479","@1200915","@1224372","@1272516","@1275389","@1299027","@1306989","@1311201","@1318294","@1338514","@1344447","@1352685","@1394013","@1396768","@1419534","@1428388","@1429835","@1493128","@1534992","@1712362","@1734175","@1751478","@1793831","@1798816","@1877115","@1909167","@1919638","@1923014","@1966907","@1967293","@1999118","@2079741","@2106356","@2107419","@2252334","@2302488","@2319756","@2384762","@2386468","@2447229","@2524170","@2618582","@2639255","@2675644","@2686331","@2724484","@2741272","@2763444","@2814227","@2843248","@2851032","@2856758","@2858383","@2887942","@2899026","@2914749","@2916200","@2920810","@2930438","@2934496","@2952221","@2964580","@2992350","@3037332","@3100074","@3113666","@3120127","@3176576","@3196883","@3224581","@3244657","@3269221","@3296037","@3401753","@3420275","@3547768","@3556145","@3567150","@3567351","@3574216","@3595916","@3606940","@3612172","@3692263","@3745142","@3745152","@3818522","@3887579","@3917762","@3937231","@3991389","@4035492","@4164079","@5107298","@5180200","@5529776","@5559228","@5559306","@5573521","@5592547","@5776415","@2414326","@5428511","@5603373","@5744343","@5796644","@5819314","@5822948","@5836216","@5837098","@5849982","@5858167","@5859270","@5859608","@5859666","@5956038","@5960337","@5967356","@5961606","@5965394","@5932728","@5873512","@6001434","@5873179","@5991618","@5991460","@5990659","@5990147","@5989115","@5986895","@5979320","@5979152","@5979054","@5976435","@5974219","@5973944","@5971883","@5970688","@5968571","@5967713","@5956312","@5954933","@5933809","@5932785","@5932768","@5932714","@5928040","@5925445","@5925369","@5925340","@5925286","@5919944","@5919786","@5919777","@5919755","@5918528","@5918469","@5918466","@5918464","@5918455","@5916845","@5914630","@5903602","@5876568","@5874898","@5866779","@5864974","@5861320","@5856146","@5855486","@5852950","@5850018","@5841656","@5841587","@5837785","@5825659","@5806572","@5780087","@5744712","@5667330","@5664849","@5653957","@5640856","@5604412","@5305732","@5246873","@5235191","@5198607","@5198518","@5198433","@4419586","@4306038","@4305992","@4185068","@4133536","@4125984","@4093087","@2001846","@5992607","@5977391","@6005594","@5999873","@5996517","@2794596","@3514818","@2972499","@3456786","@3312830"}
  76. tfm.exec.newGame(maps[math.random(#maps)])
  77. function eventLoop(time,remaining)
  78.         if remaining<=0 then
  79.         tfm.exec.newGame(maps[math.random(#maps)])
  80.         end
  81. end
  82. ----NextMap
  83. function getAlivePlayers()
  84.         local alivePlayersInt = 0
  85.         local alivePlayers = {}
  86.         for i, player in pairs(tfm.get.room.playerList) do
  87.                 if player.isDead == false then
  88.                         alivePlayersInt = alivePlayersInt + 1
  89.                         table.insert(alivePlayers, player)
  90.                 end
  91.         end
  92.     return {alivePlayers, alivePlayersInt}
  93. end
  94. function eventPlayerDied(playerName)
  95.     alivePlayers = getAlivePlayers()
  96.     alivePlayersList = alivePlayers[1]
  97.     alivePlayersNum = alivePlayers[2]
  98.     if alivePlayersNum == 0 then
  99. tfm.exec.setGameTime(5)
  100. end
  101. end
  102. --TextArea & Callback--
  103. ui.addTextArea(0,"<B><J><font size='13'><a href='event:shop'>Shop</a>",nil,10,30,x,y,0x324650,0x212F36,1,true)
  104. function eventTextAreaCallback(textAreaId, player, callback)
  105. score = tfm.get.room.playerList[player].score
  106.         if(callback == "shop") then
  107.                 print(""..player.." abriu a Loja")
  108.                 ui.addTextArea(1,"<font size='30'><B><p align='center'>Shop</p>",player,150,50,450,250,0x324650,0x212F36,0.9,true)
  109.                         ui.addTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player,480,120,80,90,0x273F4C,0x141D22,2,true)                
  110.                         ui.addTextArea(2,"<VP><a href='event:i0'>"..n0.."</a>",player,160,100,x,y,0x273F4C,0x141D22,0.7,true)
  111.                 ui.addTextArea(3,"<N><B><p align='center'><a href='event:help0'>+</a>",player,236,100,x,y,0x273F4C,0x141D22,0.7,true)
  112.                 ui.addTextArea(6,"<VP><a href='event:i1'>"..n1.."</a>",player,160,130,x,y,0x273F4C,0x141D22,0.7,true)
  113.                 ui.addTextArea(7,"<N><B><p align='center'><a href='event:help1'>+</a>",player,248,130,x,y,0x273F4C,0x141D22,0.7,true)
  114.                 ui.addTextArea(10,"<VP><a href='event:i2'>"..n2.."</a>",player,160,160,x,y,0x273F4C,0x141D22,0.7,true)
  115.                 ui.addTextArea(11,"<N><B><p align='center'><a href='event:help2'>+</a>",player,209,160,x,y,0x273F4C,0x141D22,0.7,true)
  116.                 ui.addTextArea(14,"<VP><a href='event:i3'>"..n3.."</a>",player,160,190,x,y,0x273F4C,0x141D22,0.7,true)
  117.                 ui.addTextArea(15,"<N><B><p align='center'><a href='event:help3'>+</a>",player,216,190,x,y,0x273F4C,0x141D22,0.7,true)
  118.                 ui.addTextArea(18,"<VP><a href='event:i4'>"..n4.."</a>",player,160,220,x,y,0x273F4C,0x141D22,0.7,true)
  119.                 ui.addTextArea(19,"<N><B><p align='center'><a href='event:help4'>+</a>",player,212,220,x,y,0x273F4C,0x141D22,0.7,true)
  120.                 ui.addTextArea(22,"<VP><a href='event:i5'>"..n5.."<a/>",player,160,250,x,y,0x273F4C,0x141D22,0.7,true)
  121.                 ui.addTextArea(23,"<N><B><p align='center'><a href='event:help5'>+</a>",player,220,250,x,y,0x273F4C,0x141D22,0.7,true)
  122.                 ui.addTextArea(26,"<VP><a href='event:i6'>"..n6.."</a>",player,360,100,x,y,0x273F4C,0x141D22,0.7,true)
  123.                 ui.addTextArea(27,"<N><B><p align='center'><a href='event:help6'>+</a>",player,439,100,x,y,0x273F4C,0x141D22,0.7,true)
  124.                 ui.addTextArea(30,"<VP><a href='event:i7'>"..n7.."</a>",player,360,130,x,y,0x273F4C,0x141D22,0.7,true)
  125.                 ui.addTextArea(31,"<N><B><p align='center'><a href='event:help7'>+</a>",player,443,130,x,y,0x273F4C,0x141D22,0.7,true)
  126.                 ui.addTextArea(34,"<VP><a href='event:i8'>"..n8.."</a>",player,360,160,x,y,0x273F4C,0x141D22,0.7,true)
  127.                 ui.addTextArea(35,"<N><B><p align='center'><a href='event:help8'>+</a>",player,423,160,x,y,0x273F4C,0x141D22,0.7,true)
  128.                 ui.addTextArea(38,"<VP><a href='event:i9'>"..n9.."</a>",player,360,190,x,y,0x273F4C,0x141D22,0.7,true)
  129.                 ui.addTextArea(39,"<N><B><p align='center'><a href='event:help9'>+</a>",player,433,190,x,y,0x273F4C,0x141D22,0.7,true)
  130.                 ui.addTextArea(42,"<VP><a href='event:i10'>"..n10.."</a>",player,360,220,x,y,0x273F4C,0x141D22,0.7,true)
  131.                 ui.addTextArea(43,"<N><B><p align='center'><a href='event:help10'>+</a>",player,415,220,x,y,0x273F4C,0x141D22,0.7,true)
  132.                 ui.addTextArea(46,"<VP><a href='event:i11'>"..n11.."</a>",player,360,250,x,y,0x273F4C,0x141D22,0.7,true)
  133.                 ui.addTextArea(47,"<N><B><p align='center'><a href='event:help11'>+</a>",player,428,250,x,y,0x273F4C,0x141D22,0.7,true)
  134.                 ui.addTextArea(50,"<VP><font size='13'><a href='event:closeshop'>Fechar</a>",player,530,270,x,y,0x324650,0x141D22,1,true)
  135.  elseif(callback == "help0") then
  136.                 print(""..player.." abriu a ajuda do "..n0.."")
  137.                 ui.addTextArea(4,""..p0.."<br>"..q0.."<br>"..a0.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  138.                 ui.addTextArea(5,"<R><B><a href='event:closeh0'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  139.         elseif(callback == "closeh0") then
  140.                 print(""..player.." fechou a ajuda do "..n0.."")
  141.                 ui.removeTextArea(4,player) ui.removeTextArea(5,player)
  142.         elseif(callback == "help1") then
  143.                 print(""..player.." abriu a ajuda do "..n1.."")
  144.                 ui.addTextArea(8,""..p1.."<br>"..q1.."<br>"..a1.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  145.                 ui.addTextArea(9,"<R><B><a href='event:closeh1'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  146.         elseif(callback == "closeh1") then
  147.                 print(""..player.." fechou a ajuda do "..n1.."")
  148.                 ui.removeTextArea(8,player) ui.removeTextArea(9,player)
  149.         elseif(callback == "help2") then
  150.                 print(""..player.." abriu a ajuda do "..n2.."")
  151.                 ui.addTextArea(12,""..p2.."<br>"..q2.."<br>"..a2.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  152.                 ui.addTextArea(13,"<R><B><a href='event:closeh2'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  153.         elseif(callback == "closeh2") then
  154.                 print(""..player.." fechou a ajuda do "..n2.."")
  155.                 ui.removeTextArea(12,player) ui.removeTextArea(13,player)
  156.         elseif(callback == "help3") then
  157.                 print(""..player.." abriu a ajuda do "..n3.."")
  158.                 ui.addTextArea(16,""..p3.."<br>"..q3.."<br>"..a3.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  159.                 ui.addTextArea(17,"<R><B><a href='event:closeh3'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  160.         elseif(callback == "closeh3") then
  161.                 print(""..player.." fechou a ajuda do "..n3.."")
  162.                 ui.removeTextArea(16,player) ui.removeTextArea(17,player)
  163.         elseif(callback == "help4") then
  164.                 print(""..player.." abriu a ajuda do "..n4.."")
  165.                 ui.addTextArea(20,""..p4.."<br>"..q4.."<br>"..a4.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  166.                 ui.addTextArea(21,"<R><B><a href='event:closeh4'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  167.         elseif(callback == "closeh4") then
  168.                 print(""..player.." fechou a ajuda do "..n4.."")
  169.                 ui.removeTextArea(20,player) ui.removeTextArea(21,player)
  170.         elseif(callback == "help5") then
  171.                 print(""..player.." abriu a ajuda do "..n5.."")
  172.                 ui.addTextArea(24,""..p5.."<br>"..q5.."<br>"..a5.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  173.                 ui.addTextArea(25,"<R><B><a href='event:closeh5'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  174.         elseif(callback == "closeh5") then
  175.                 print(""..player.." fechou a ajuda do "..n5.."")
  176.                 ui.removeTextArea(24,player) ui.removeTextArea(25,player)
  177.         elseif(callback == "help6") then
  178.                 print(""..player.." abriu a ajuda do "..n6.."")
  179.                 ui.addTextArea(28,""..p6.."<br>"..q6.."<br>"..a6.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  180.                 ui.addTextArea(29,"<R><B><a href='event:closeh6'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  181.         elseif(callback == "closeh6") then
  182.                 print(""..player.." fechou a ajuda do "..n6.."")
  183.                 ui.removeTextArea(28,player) ui.removeTextArea(29,player)
  184.         elseif(callback == "help7") then
  185.                 print(""..player.." abriu a ajuda do "..n7.."")
  186.                 ui.addTextArea(32,""..p7.."<br>"..q7.."<br>"..a7.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  187.                 ui.addTextArea(33,"<R><B><a href='event:closeh7'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  188.         elseif(callback == "closeh7") then
  189.                 print(""..player.." fechou a ajuda do "..n7.."")
  190.                 ui.removeTextArea(32,player) ui.removeTextArea(33,player)
  191.         elseif(callback == "help8") then
  192.                 print(""..player.." abriu a ajuda do "..n8.."")
  193.                 ui.addTextArea(36,""..p8.."<br>"..q8.."<br>"..a8.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  194.                 ui.addTextArea(37,"<R><B><a href='event:closeh8'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  195.         elseif(callback == "closeh8") then
  196.                 print(""..player.." fechou a ajuda do "..n8.."")
  197.                 ui.removeTextArea(36,player) ui.removeTextArea(37,player)
  198.         elseif(callback == "help9") then
  199.                 print(""..player.." abriu a ajuda do "..n9.."")
  200.                 ui.addTextArea(40,""..p9.."<br>"..q9.."<br>"..a9.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  201.                 ui.addTextArea(41,"<R><B><a href='event:closeh9'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  202.         elseif(callback == "closeh9") then
  203.                 print(""..player.." fechou a ajuda do "..n9.."")
  204.                 ui.removeTextArea(40,player) ui.removeTextArea(41,player)
  205.         elseif(callback == "help10") then
  206.                 print(""..player.." abriu a ajuda do "..n10.."")
  207.                 ui.addTextArea(44,""..p10.."<br>"..q10.."<br>"..a10.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  208.                 ui.addTextArea(45,"<R><B><a href='event:closeh10'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  209.         elseif(callback == "closeh10") then
  210.                 print(""..player.." fechou a ajuda do "..n10.."")
  211.                 ui.removeTextArea(44,player) ui.removeTextArea(45,player)
  212.         elseif(callback == "help11") then
  213.                 print(""..player.." abriu a ajuda do "..n11.."")
  214.                 ui.addTextArea(48,""..p11.."<br>"..q11.."<br>"..a11.."",player,610,80,150,y,0x273F4C,0x141D22,1,true)
  215.                 ui.addTextArea(49,"<R><B><a href='event:closeh11'>X</a>",player,748,65,x,y,0x273F4C,0x141D22,1,true)
  216.         elseif(callback == "closeh11") then
  217.                 print(""..player.." fechou a ajuda do "..n11.."")
  218.                 ui.removeTextArea(48,player) ui.removeTextArea(49,player)
  219.         elseif(callback == "closeshop") then
  220.                 print(""..player.." fechou a loja")
  221.                 ui.removeTextArea(1,player) ui.removeTextArea(1000,player) ui.removeTextArea(2,player) ui.removeTextArea(3,player) ui.removeTextArea(6,player) ui.removeTextArea(7,player) ui.removeTextArea(10,player) ui.removeTextArea(11,player) ui.removeTextArea(14,player) ui.removeTextArea(15,player) ui.removeTextArea(18,player) ui.removeTextArea(19,player) ui.removeTextArea(22,player) ui.removeTextArea(23,player) ui.removeTextArea(26,player) ui.removeTextArea(27,player) ui.removeTextArea(30,player) ui.removeTextArea(31,player) ui.removeTextArea(34,player) ui.removeTextArea(35,player) ui.removeTextArea(38,player) ui.removeTextArea(39,player) ui.removeTextArea(42,player) ui.removeTextArea(43,player) ui.removeTextArea(46,player) ui.removeTextArea(47,player) ui.removeTextArea(50,player)
  222.         elseif(callback == "i0" and tfm.get.room.playerList[player].score >= 10)  then
  223.                 print(""..player.." comprou o "..n0.."")
  224.                         tfm.exec.setPlayerScore(player,-10,true)
  225.                         tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 10
  226.                         score = tfm.get.room.playerList[player].score
  227. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  228. tfm.exec.setNameColor(player,math.random(0x000000, 0xFFFFFF))              
  229.         elseif(callback == "i1" and tfm.get.room.playerList[player].score >= 15) then
  230.                 print(""..player.." comprou o "..n1.."")
  231.                         tfm.exec.setPlayerScore(player,-15,true)
  232.                         tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 15
  233.                         score = tfm.get.room.playerList[player].score
  234. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  235.                 tfm.exec.addShamanObject(6, tfm.get.room.playerList[player].x+10, tfm.get.room.playerList[player].y,0,10,8)
  236.         elseif(callback == "i2" and tfm.get.room.playerList[player].score >= 20) then
  237.                 print(""..player.." comprou o "..n2.."")
  238.                 tfm.exec.setPlayerScore(player,-20,true)
  239.                                         tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 20
  240.                         score = tfm.get.room.playerList[player].score
  241.                         ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  242.                 tfm.exec.addShamanObject(90, tfm.get.room.playerList[player].x, tfm.get.room.playerList[player].y,0,0,0)
  243.         elseif(callback == "i3" and tfm.get.room.playerList[player].score >= 25) then
  244.                 print(""..player.." comprou o "..n3.."")
  245.                 tfm.exec.setPlayerScore(player,-25,true)
  246.                                         tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 25
  247.                         score = tfm.get.room.playerList[player].score
  248.                         ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  249.                 tfm.exec.addShamanObject(10, tfm.get.room.playerList[player].x, tfm.get.room.playerList[player].y,0,0,0)
  250.         elseif(callback == "i4" and tfm.get.room.playerList[player].score >= 50) then
  251.                 print(""..player.." comprou o "..n4.."")
  252.                 tfm.exec.setPlayerScore(player,-50,true)
  253.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 50
  254.                         score = tfm.get.room.playerList[player].score
  255. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  256.                 tfm.exec.addShamanObject(40, tfm.get.room.playerList[player].x, tfm.get.room.playerList[player].y,0,0,0)
  257.         elseif(callback == "i5" and tfm.get.room.playerList[player].score >= 70) then
  258.                 print(""..player.." comprou o "..n5.."")
  259.                 tfm.exec.setPlayerScore(player,-70,true)
  260.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 70
  261.                         score = tfm.get.room.playerList[player].score
  262. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  263.                 tfm.exec.setVampirePlayer(player)
  264.                 mice[player].vampiro = true
  265.         elseif(callback == "i6" and tfm.get.room.playerList[player].score >= 100) then
  266.                 print(""..player.." comprou o "..n6.."")
  267.                 tfm.exec.setPlayerScore(player,-100,true)
  268.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 100
  269.                         score = tfm.get.room.playerList[player].score
  270. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  271.                 tfm.exec.addShamanObject(24, tfm.get.room.playerList[player].x, tfm.get.room.playerList[player].y+25,0,0,0)
  272.         elseif(callback == "i7" and tfm.get.room.playerList[player].score >= 150) then
  273.                 print(""..player.." comprou o "..n7.."")
  274.                 tfm.exec.setPlayerScore(player,-150,true)
  275.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 150
  276.                         score = tfm.get.room.playerList[player].score
  277. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  278.                         if tfm.get.room.playerList[player].isFacingRight then tfm.exec.addPhysicObject(1,tfm.get.room.playerList[player].x+80,tfm.get.room.playerList[player].y-45,ChocoJump) else tfm.exec.addPhysicObject(1,tfm.get.room.playerList[player].x-80,tfm.get.room.playerList[player].y-45,ChocoJump) end
  279.         elseif(callback == "i8" and tfm.get.room.playerList[player].score >= 170) then
  280.         print(""..player.." comprou o "..n8.."")
  281.                 tfm.exec.setPlayerScore(player,-170,true)
  282.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 170
  283.                         score = tfm.get.room.playerList[player].score
  284. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  285.                 tfm.exec.explosion(tfm.get.room.playerList[player].x,tfm.get.room.playerList[player].y,-40,400,false)
  286.                 for i = 1,50 do
  287.                 tfm.exec.displayParticle(ef[math.random(#ef)],tfm.get.room.playerList[player].x+efx[math.random(#efx)],tfm.get.room.playerList[player].y+efy[math.random(#efy)],0,0,0,0,nil)
  288.                 end
  289.         elseif(callback == "i9" and tfm.get.room.playerList[player].score >= 210) then
  290.                 print(""..player.." comprou o "..n9.."")
  291.                 tfm.exec.setPlayerScore(player,-210,true)
  292.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 210
  293.                         score = tfm.get.room.playerList[player].score
  294. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  295.                         if tfm.get.room.playerList[player].isFacingRight then tfm.exec.addPhysicObject(2,tfm.get.room.playerList[player].x+80,tfm.get.room.playerList[player].y-15,Trampolim) else tfm.exec.addPhysicObject(2,tfm.get.room.playerList[player].x-80,tfm.get.room.playerList[player].y-15,Trampolim) end
  296.         elseif(callback == "i10" and tfm.get.room.playerList[player].score >= 270) then
  297.                 print(""..player.." comprou o "..n10.."")
  298.                 tfm.exec.setPlayerScore(player,-270,true)
  299.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 270
  300.                         score = tfm.get.room.playerList[player].score
  301. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  302.                 ui.removeTextArea(1,player) ui.removeTextArea(1000,player) ui.removeTextArea(2,player) ui.removeTextArea(3,player) ui.removeTextArea(6,player) ui.removeTextArea(7,player) ui.removeTextArea(10,player) ui.removeTextArea(11,player) ui.removeTextArea(14,player) ui.removeTextArea(15,player) ui.removeTextArea(18,player) ui.removeTextArea(19,player) ui.removeTextArea(22,player) ui.removeTextArea(23,player) ui.removeTextArea(26,player) ui.removeTextArea(27,player) ui.removeTextArea(30,player) ui.removeTextArea(31,player) ui.removeTextArea(34,player) ui.removeTextArea(35,player) ui.removeTextArea(38,player) ui.removeTextArea(39,player) ui.removeTextArea(42,player) ui.removeTextArea(43,player) ui.removeTextArea(46,player) ui.removeTextArea(47,player) ui.removeTextArea(50,player)
  303.                 ui.addPopup(0,0,"<J><B><font size='10' color='#BABD2F'>U : Faz a vítima pular<br>H : Faz a vítima ir para a esquerda<br>J : Faz a vítima baixar<br>K : Faz a vítima ir para a direita",player,5,70,w,true)
  304.                 ui.addPopup(1,2,"Nome da Vítima:",player,400,50,w,true)
  305.                 for name in pairs(tfm.get.room.playerList) do
  306.                         for keys, k in pairs({85,74,72,75}) do
  307.                                 tfm.exec.bindKeyboard(player, k, true, true)
  308.                         end
  309.                 end
  310.         elseif(callback == "i11" and tfm.get.room.playerList[player].score >= 310) then
  311.                 print(""..player.." comprou o "..n11.."")
  312.                 tfm.exec.setPlayerScore(player,-310,true)
  313.                                                                 tfm.get.room.playerList[player].score = tfm.get.room.playerList[player].score - 310
  314.                         score = tfm.get.room.playerList[player].score
  315. ui.updateTextArea(1000,"<p align='center'><font size='15'><V>Você tem <br><J><b>"..score.."</b><BR><V> pontos",player)
  316.                 for i,v in pairs(tfm.get.room.playerList) do
  317.                         tfm.exec.killPlayer(i)
  318.                 end
  319.                 tfm.exec.setGameTime(60)
  320.                 tfm.exec.respawnPlayer(player)
  321.                 end
  322. end
  323. --Function--
  324. tfm.exec.disableAutoNewGame(true)
  325. tfm.exec.disableAutoScore(true)
  326. function eventPlayerWon(playerName)
  327.         tfm.exec.setPlayerScore(playerName,10,true)
  328. end
  329. function eventPlayerDied(playerName)
  330.         tfm.exec.setPlayerScore(playerName,-2,true)
  331. end
  332. for i,name in pairs(tfm.get.room.playerList) do
  333.         tfm.exec.setPlayerScore(i,50)
  334. end
  335. for i,name in pairs(adm) do
  336. tfm.exec.setPlayerScore(name,10000)
  337. end
  338. --newGame--
  339. function eventNewGame()
  340.         for name,player in pairs(tfm.get.room.playerList) do
  341.                 if mice[name].vampiro == true then
  342.                     mice[name].round = mice[name].round + 1
  343.                     if mice[name].round < 5 then
  344.                         tfm.exec.setVampirePlayer(name)
  345.                     else
  346.                         mice[name].round = 5
  347.                     end
  348.                 end
  349.                 if player.isShaman then
  350.                         tfm.exec.setPlayerScore(name,5,true)
  351.                 end
  352.                         xml = tfm.get.room.xmlMapInfo.xml
  353.                         xml = xml:gsub("<","&lt;")
  354.                         print("<CH>"..tfm.get.room.xmlMapInfo.author.." <BL>| <J>P"..tfm.get.room.xmlMapInfo.permCode.."<BL> | <V>@"..tfm.get.room.xmlMapInfo.mapCode.."<BL> | <R>XML: "..xml.."")
  355.         end
  356. end
RAW Paste Data