Ramexinho

Call of Tibia Olá pessoal! Hoje vou mostrar para vocês um novo servidor de Tibia que ainda está sendo programado. Call of Tibia é um jogo criado em cima da engine de Tibia, que imita o jogo Call of Duty da Treyarch. O jogo consiste em eliminar outros jogadores nos diferentes tipos de mapas. Além do modo Eliminação, existem os modos Capture de Flag, Modo Zombie e Missões. Existem (por enquanto) 5 tipos de armas: Submachineguns: Atacam de distância média, dano pequeno e velocidade muito alta - Vária de acordo com a arma. Assault Rifles: Atacam de distância média, dano normal e velocidade normal - Vária de acordo com a arma. Snipers: Atacam de longe, dano alto e velocidade muito devagar - Vária de acordo com a arma. Shotguns: Atacam de perto, dano alto e velocidade muito devagar (porém nem tanto como a sniper) - Vária de acordo com a arma. Heavyguns: Nessa categoria entram as bazucas, lança-chamas, arco explosivo, granada, claymore etc. No jogo existem também Killstreaks, que são uma recompensa por você matar uma certa quantidade de players, por exemplo: RC-XD: São necessários 3 kills. Um carrinho que carrega explosivos e explode em uma área pequena (um pouco maior que 3x3) ao se chocar com um inimigo. Airstrike: São necessários 5 kills. Um chamado aéreo que causa altos danos em uma área grande. Sentry Gun: São necessários 7 kills. Uma metralhadora que é colocada no chão e dispara tiros contra todos os inimigos que o jogador atacar. Dogs: São necessários 9 kills. Chama 9 cachorros que são controlados pelo jogador. Tanque: São necessários 11 kills. Um tanque de guerra que é controlado pelo jogador. Dispara uma bala que explode em uma área pequena (3x3) e tira altos danos. Veja o primeiro trailer do jogo: Obs.: Algumas coisas mudaram no jogo, como os outfits (agora estão igual ao tibia, porem modificados), existem atualmente mais de 15 mapas e mais de 25 armas. Para mais informações sobre o laçamento ou sobre o jogo acesse: Nossa página no Facebook: http://on.fb.me/calloftibia Nosso fórum: Em Breve! Aguarde!

Bem quando vou editar 1 item no item.xml (No caso 1 wand) sempre da 1 problema na hora de carregar o servidor e todos os itens ficão "You see item id ... report gamemaster"... No executavel do server só aparece que não foi possivel ler o XML (Mais nada!!) Alguem poderia me esclarece Agradesso deis de já! Obrigado;. Edit: Aki esta como ficou minha modificação: <item id="2184" article="a" name="vip wand"> <attribute key="description" value="aa" /> <attribute key="weight" value="2300" /> <attribute key="weaponType" value="wand" /> <attribute key="shootType" value="holy" /> <attribute key="range" value="8" /> </item> E tb já adicionei no Wepons

Ola porfavor tenho um server 8.1 XML e queria que modificassem meu Global.xml, adicionando 2 moedas novas para que os NPCs aceitem sem ter que pressisar transfeir tudo pra crystal coin (Que no meu servidor da muito problema...) ... VIP coin = 2159 ID = 100k Magic coin = 5022 ID 1000k AKI esta o Global.xml: TRUE = 1 FALSE = 0 LUA_ERROR = -1 LUA_NO_ERROR = 0 NORTH = 0 EAST = 1 SOUTH = 2 WEST = 3 SOUTHWEST = 4 SOUTHEAST = 5 NORTHWEST = 6 NORTHEAST = 7 COMBAT_FORMULA_UNDEFINED = 0 COMBAT_FORMULA_LEVELMAGIC = 1 COMBAT_FORMULA_SKILL = 2 COMBAT_FORMULA_VALUE = 3 CONDITION_PARAM_OWNER = 1 CONDITION_PARAM_TICKS = 2 CONDITION_PARAM_OUTFIT = 3 CONDITION_PARAM_HEALTHGAIN = 4 CONDITION_PARAM_HEALTHTICKS = 5 CONDITION_PARAM_MANAGAIN = 6 CONDITION_PARAM_MANATICKS = 7 CONDITION_PARAM_DELAYED = 8 CONDITION_PARAM_SPEED = 9 CONDITION_PARAM_LIGHT_LEVEL = 10 CONDITION_PARAM_LIGHT_COLOR = 11 CONDITION_PARAM_SOULGAIN = 12 CONDITION_PARAM_SOULTICKS = 13 CONDITION_PARAM_MINVALUE = 14 CONDITION_PARAM_MAXVALUE = 15 CONDITION_PARAM_STARTVALUE = 16 CONDITION_PARAM_TICKINTERVAL = 17 CONDITION_PARAM_FORCEUPDATE = 18 CONDITION_PARAM_SKILL_MELEE = 19 CONDITION_PARAM_SKILL_FIST = 20 CONDITION_PARAM_SKILL_CLUB = 21 CONDITION_PARAM_SKILL_SWORD = 22 CONDITION_PARAM_SKILL_AXE = 23 CONDITION_PARAM_SKILL_DISTANCE = 24 CONDITION_PARAM_SKILL_SHIELD = 25 CONDITION_PARAM_SKILL_FISHING = 26 CONDITION_PARAM_STAT_MAXHITPOINTS = 27 CONDITION_PARAM_STAT_MAXMANAPOINTS = 28 CONDITION_PARAM_STAT_SOULPOINTS = 29 CONDITION_PARAM_STAT_MAGICPOINTS = 30 CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT = 31 CONDITION_PARAM_STAT_MAXMANAPOINTSPERCENT = 32 CONDITION_PARAM_STAT_SOULPOINTSPERCENT = 33 CONDITION_PARAM_STAT_MAGICPOINTSPERCENT = 34 COMBAT_PARAM_TYPE = 1 COMBAT_PARAM_EFFECT = 2 COMBAT_PARAM_DISTANCEEFFECT = 3 COMBAT_PARAM_BLOCKSHIELD = 4 COMBAT_PARAM_BLOCKARMOR = 5 COMBAT_PARAM_TARGETCASTERORTOPMOST = 6 COMBAT_PARAM_CREATEITEM = 7 COMBAT_PARAM_AGGRESSIVE = 8 COMBAT_PARAM_DISPEL = 9 CALLBACK_PARAM_LEVELMAGICVALUE = 1 CALLBACK_PARAM_SKILLVALUE = 2 CALLBACK_PARAM_TARGETTILE = 3 CALLBACK_PARAM_TARGETCREATURE = 4 COMBAT_NONE = 0 COMBAT_PHYSICALDAMAGE = 1 COMBAT_ENERGYDAMAGE = 2 COMBAT_POISONDAMAGE = 4 COMBAT_FIREDAMAGE = 8 COMBAT_UNDEFINEDDAMAGE = 16 COMBAT_LIFEDRAIN = 32 COMBAT_MANADRAIN = 64 COMBAT_HEALING = 128 COMBAT_DROWNDAMAGE = 256 COMBAT_ICEDAMAGE = 512 COMBAT_HOLYDAMAGE = 1024 COMBAT_DEATHDAMAGE = 2048 CONDITION_NONE = 0 CONDITION_POISON = 1 CONDITION_FIRE = 2 CONDITION_ENERGY = 4 CONDITION_LIFEDRAIN = 8 CONDITION_HASTE = 16 CONDITION_PARALYZE = 32 CONDITION_OUTFIT = 64 CONDITION_INVISIBLE = 128 CONDITION_LIGHT = 256 CONDITION_MANASHIELD = 512 CONDITION_INFIGHT = 1024 CONDITION_DRUNK = 2048 CONDITION_EXHAUSTED = 4096 CONDITION_FOOD = 8192 CONDITION_REGENERATION = 8192 CONDITION_SOUL = 16384 CONDITION_DROWN = 32768 CONDITION_MUTED = 65536 CONDITION_ATTRIBUTES = 131072 CONDITION_FREEZING = 262144 CONDITION_DAZZLED = 524288 CONDITION_CURSED = 1048576 PLAYERLOSS_EXPERIENCE = 0 PLAYERLOSS_MANA = 1 PLAYERLOSS_SKILL = 2 CONST_SLOT_HEAD = 1 CONST_SLOT_NECKLACE = 2 CONST_SLOT_BACKPACK = 3 CONST_SLOT_ARMOR = 4 CONST_SLOT_RIGHT = 5 CONST_SLOT_LEFT = 6 CONST_SLOT_LEGS = 7 CONST_SLOT_FEET = 8 CONST_SLOT_RING = 9 CONST_SLOT_AMMO = 10 CONST_ME_DRAWBLOOD = 0 CONST_ME_LOSEENERGY = 1 CONST_ME_POFF = 2 CONST_ME_BLOCKHIT = 3 CONST_ME_EXPLOSIONAREA = 4 CONST_ME_EXPLOSIONHIT = 5 CONST_ME_FIREAREA = 6 CONST_ME_YELLOW_RINGS = 7 CONST_ME_GREEN_RINGS = 8 CONST_ME_HITAREA = 9 CONST_ME_ENERGYAREA = 10 CONST_ME_ENERGYHIT = 11 CONST_ME_MAGIC_BLUE = 12 CONST_ME_MAGIC_RED = 13 CONST_ME_MAGIC_GREEN = 14 CONST_ME_HITBYFIRE = 15 CONST_ME_HITBYPOISON = 16 CONST_ME_MORTAREA = 17 CONST_ME_SOUND_BLUE = 18 CONST_ME_SOUND_RED = 19 CONST_ME_POISONAREA = 20 CONST_ME_SOUND_YELLOW = 21 CONST_ME_SOUND_PURPLE = 22 CONST_ME_SOUND_BLUE = 23 CONST_ME_SOUND_WHITE = 24 CONST_ME_BUBBLES = 25 CONST_ME_CRAPS = 26 CONST_ME_GIFT_WRAPS = 27 CONST_ME_FIREWORK_YELLOW = 28 CONST_ME_FIREWORK_RED = 29 CONST_ME_FIREWORK_BLUE = 30 CONST_ME_STUN = 31 CONST_ME_SLEEP = 32 CONST_ME_WATERCREATURE = 33 CONST_ME_GROUNDSHAKER = 34 CONST_ME_HEARTS = 35 CONST_ME_FIREATTACK = 36 CONST_ME_ENERGYAREA = 37 CONST_ME_SMALLCLOUDS = 38 CONST_ME_HOLYDAMAGE = 39 CONST_ME_BIGCLOUDS = 40 CONST_ME_ICEAREA = 41 CONST_ME_ICETORNADO = 42 CONST_ME_ICEATTACK = 43 CONST_ME_STONES = 44 CONST_ME_SMALLPLANTS = 45 CONST_ME_CARNIPHILA = 46 CONST_ME_PURPLEENERGY = 47 CONST_ME_YELLOWENERGY = 48 CONST_ME_HOLYAREA = 49 CONST_ME_BIGPLANTS = 50 CONST_ME_CAKE = 51 CONST_ME_GIANTICE = 52 CONST_ME_WATERSPLASH = 53 CONST_ME_PLANTATTACK = 54 CONST_ME_NONE = 255 CONST_ANI_SPEAR = 0 CONST_ANI_BOLT = 1 CONST_ANI_ARROW = 2 CONST_ANI_FIRE = 3 CONST_ANI_ENERGY = 4 CONST_ANI_POISONARROW = 5 CONST_ANI_BURSTARROW = 6 CONST_ANI_THROWINGSTAR = 7 CONST_ANI_THROWINGKNIFE = 8 CONST_ANI_SMALLSTONE = 9 CONST_ANI_SUDDENDEATH = 10 CONST_ANI_LARGEROCK = 11 CONST_ANI_SNOWBALL = 12 CONST_ANI_POWERBOLT = 13 CONST_ANI_POISON = 14 CONST_ANI_INFERNALBOLT = 15 CONST_ANI_HUNTINGSPEAR = 16 CONST_ANI_ENCHANTEDSPEAR = 17 CONST_ANI_ASSASSINSTAR = 18 CONST_ANI_GREENSTAR = 19 CONST_ANI_ROYALSPEAR = 20 CONST_ANI_SNIPERARROW = 21 CONST_ANI_ONYXARROW = 22 CONST_ANI_PIERCINGBOLT = 23 CONST_ANI_WHIRLWINDSWORD = 24 CONST_ANI_WHIRLWINDAXE = 25 CONST_ANI_WHIRLWINDCLUB = 26 CONST_ANI_ETHEREALSPEAR = 27 CONST_ANI_ICE = 28 CONST_ANI_EARTH = 29 CONST_ANI_HOLY = 30 CONST_ANI_DEATH = 31 CONST_ANI_FLASHARROW = 32 CONST_ANI_FLAMMINGARROW = 33 CONST_ANI_SHIVERARROW = 34 CONST_ANI_ENERGYBALL = 35 CONST_ANI_SMALLICE = 36 CONST_ANI_SMALLHOLY = 37 CONST_ANI_SMALLEARTH = 38 CONST_ANI_EARTHARROW = 39 CONST_ANI_EXPLOSION = 40 CONST_ANI_CAKE = 41 CONST_ANI_WEAPONTYPE = 254 CONST_ANI_NONE = 255 TALKTYPE_SAY = 1 TALKTYPE_WHISPER = 2 TALKTYPE_YELL = 3 TALKTYPE_PRIVATE = 4 TALKTYPE_CHANNEL_Y = 5 TALKTYPE_BROADCAST = 9 TALKTYPE_CHANNEL_R1 = 10 TALKTYPE_PRIVATE_RED = 11 TALKTYPE_CHANNEL_O = 12 TALKTYPE_CHANNEL_R2 = 14 TALKTYPE_ORANGE_1 = 16 TALKTYPE_ORANGE_2 = 17 MESSAGE_STATUS_WARNING = 18 MESSAGE_EVENT_ADVANCE = 19 MESSAGE_EVENT_DEFAULT = 20 MESSAGE_STATUS_DEFAULT = 21 MESSAGE_INFO_DESCR = 22 MESSAGE_STATUS_SMALL = 23 MESSAGE_STATUS_CONSOLE_BLUE = 24 MESSAGE_STATUS_CONSOLE_RED = 25 TEXTCOLOR_BLUE = 5 TEXTCOLOR_LIGHTBLUE = 35 TEXTCOLOR_LIGHTGREEN = 30 TEXTCOLOR_PURPLE = 83 TEXTCOLOR_LIGHTGREY = 129 TEXTCOLOR_DARKRED = 144 TEXTCOLOR_RED = 180 TEXTCOLOR_ORANGE = 198 TEXTCOLOR_YELLOW = 210 TEXTCOLOR_WHITE_EXP = 215 TEXTCOLOR_NONE = 255 RETURNVALUE_NOERROR = 1 RETURNVALUE_NOTPOSSIBLE = 2 RETURNVALUE_NOTENOUGHROOM = 3 RETURNVALUE_PLAYERISPZLOCKED = 4 RETURNVALUE_PLAYERISNOTINVITED = 5 RETURNVALUE_CANNOTTHROW = 6 RETURNVALUE_THEREISNOWAY = 7 RETURNVALUE_DESTINATIONOUTOFREACH = 8 RETURNVALUE_CREATUREBLOCK = 9 RETURNVALUE_NOTMOVEABLE = 10 RETURNVALUE_DROPTWOHANDEDITEM = 11 RETURNVALUE_BOTHHANDSNEEDTOBEFREE = 12 RETURNVALUE_CANONLYUSEONEWEAPON = 13 RETURNVALUE_NEEDEXCHANGE = 14 RETURNVALUE_CANNOTBEDRESSED = 15 RETURNVALUE_PUTTHISOBJECTINYOURHAND = 16 RETURNVALUE_PUTTHISOBJECTINBOTHHANDS = 17 RETURNVALUE_TOOFARAWAY = 18 RETURNVALUE_FIRSTGODOWNSTAIRS = 19 RETURNVALUE_FIRSTGOUPSTAIRS = 20 RETURNVALUE_CONTAINERNOTENOUGHROOM = 21 RETURNVALUE_NOTENOUGHCAPACITY = 22 RETURNVALUE_CANNOTPICKUP = 23 RETURNVALUE_THISISIMPOSSIBLE = 24 RETURNVALUE_DEPOTISFULL = 25 RETURNVALUE_CREATUREDOESNOTEXIST = 26 RETURNVALUE_CANNOTUSETHISOBJECT = 27 RETURNVALUE_PLAYERWITHTHISNAMEISNOTONLINE = 28 RETURNVALUE_NOTREQUIREDLEVELTOUSERUNE = 29 RETURNVALUE_YOUAREALREADYTRADING = 30 RETURNVALUE_THISPLAYERISALREADYTRADING = 31 RETURNVALUE_YOUMAYNOTLOGOUTDURINGAFIGHT = 32 RETURNVALUE_DIRECTPLAYERSHOOT = 33 RETURNVALUE_NOTENOUGHLEVEL = 34 RETURNVALUE_NOTENOUGHMAGICLEVEL = 35 RETURNVALUE_NOTENOUGHMANA = 36 RETURNVALUE_NOTENOUGHSOUL = 37 RETURNVALUE_YOUAREEXHAUSTED = 38 RETURNVALUE_PLAYERISNOTREACHABLE = 39 RETURNVALUE_CANONLYUSETHISRUNEONCREATURES = 40 RETURNVALUE_ACTIONNOTPERMITTEDINPROTECTIONZONE = 41 RETURNVALUE_YOUMAYNOTATTACKTHISPLAYER = 42 RETURNVALUE_YOUMAYNOTATTACKAPERSONINPROTECTIONZONE = 43 RETURNVALUE_YOUMAYNOTATTACKAPERSONWHILEINPROTECTIONZONE = 44 RETURNVALUE_YOUMAYNOTATTACKTHISCREATURE = 45 RETURNVALUE_YOUCANONLYUSEITONCREATURES = 46 RETURNVALUE_CREATUREISNOTREACHABLE = 47 RETURNVALUE_TURNSECUREMODETOATTACKUNMARKEDPLAYERS = 48 RETURNVALUE_YOUNEEDPREMIUMACCOUNT = 49 RETURNVALUE_YOUNEEDTOLEARNTHISSPELL = 50 RETURNVALUE_YOURVOCATIONCANNOTUSETHISSPELL = 51 RETURNVALUE_YOUNEEDAWEAPONTOUSETHISSPELL = 52 ITEM_GOLD_COIN = 2148 ITEM_PLATINUM_COIN = 2152 ITEM_CRYSTAL_COIN = 2160 function doPlayerGiveItem(cid, itemid, count, charges) local hasCharges = (isItemRune(itemid) == TRUE or isItemFluidContainer(itemid) == TRUE) if(hasCharges and charges == nil) then charges = 1 end while count > 0 do local tempcount = 1 if(hasCharges) then tempcount = charges end if(isItemStackable(itemid) == TRUE) then tempcount = math.min (100, count) end local ret = doPlayerAddItem(cid, itemid, tempcount) if(ret == LUA_ERROR) then ret = doCreateItem(itemid, tempcount, getPlayerPosition(cid)) end if(ret ~= LUA_ERROR) then if(hasCharges) then count = count-1 else count = count-tempcount end else return LUA_ERROR end end return LUA_NO_ERROR end function doPlayerTakeItem(cid, itemid, count) if(getPlayerItemCount(cid,itemid) >= count) then while count > 0 do local tempcount = 0 if(isItemStackable(itemid) == TRUE) then tempcount = math.min (100, count) else tempcount = 1 end local ret = doPlayerRemoveItem(cid, itemid, tempcount) if(ret ~= LUA_ERROR) then count = count-tempcount else return LUA_ERROR end end if(count == 0) then return LUA_NO_ERROR end else return LUA_ERROR end end function doPlayerAddMoney(cid, amount) local crystals = math.floor(amount/10000) amount = amount - crystals*10000 local platinum = math.floor(amount/100) amount = amount - platinum*100 local gold = amount local ret = 0 if(crystals > 0) then ret = doPlayerGiveItem(cid, ITEM_CRYSTAL_COIN, crystals) if(ret ~= LUA_NO_ERROR) then return LUA_ERROR end end if(platinum > 0) then ret = doPlayerGiveItem(cid, ITEM_PLATINUM_COIN, platinum) if(ret ~= LUA_NO_ERROR) then return LUA_ERROR end end if(gold > 0) then ret = doPlayerGiveItem(cid, ITEM_GOLD_COIN, gold) if(ret ~= LUA_NO_ERROR) then return LUA_ERROR end end return LUA_NO_ERROR end function doPlayerBuyItem(cid, itemid, count, cost, charges) if(doPlayerRemoveMoney(cid, cost) == TRUE) then return doPlayerGiveItem(cid, itemid, count, charges) else return LUA_ERROR end end function doPlayerSellItem(cid, itemid, count, cost) if(doPlayerTakeItem(cid, itemid, count) == LUA_NO_ERROR) then if(doPlayerAddMoney(cid, cost) ~= LUA_NO_ERROR) then error('Could not add money to ' .. getPlayerName(cid) .. '(' .. cost .. 'gp)') end return LUA_NO_ERROR else return LUA_ERROR end end DIRECTION_NORTH = 0 DIRECTION_EAST = 1 DIRECTION_SOUTH = 2 DIRECTION_WEST = 3 DIRECTION_SOUTHWEST = 4 DIRECTION_SOUTHEAST = 5 DIRECTION_NORTHWEST = 6 DIRECTION_NORTHEAST = 7 DOORSTATE_OPEN = 1 DOORSTATE_CLOSED = 2 DoorHandler = { doors = { north = { { 1212, 1214 }, { 1213, 1214 }, { 1221, 1222 }, { 1225, 1226 }, { 1229, 1230 }, { 1234, 1236 }, { 1235, 1236 }, { 1239, 1240 }, { 1243, 1244 }, { 1247, 1248 }, { 1252, 1254 }, { 1253, 1254 }, { 1257, 1258 }, { 1261, 1262 }, { 3535, 3537 }, { 3536, 3537 }, { 3538, 3539 }, { 3540, 3541 }, { 3542, 3543 }, { 5084, 5085 }, { 5098, 5100 }, { 5099, 5100 }, { 5101, 5102 }, { 5103, 5104 }, { 5105, 5106 }, { 5116, 5118 }, { 5117, 5118 }, { 5119, 5120 }, { 5121, 5122 }, { 5123, 5124 }, { 5134, 5136 }, { 5135, 5136 }, { 5137, 5139 }, { 5138, 5139 }, { 5278, 5280 }, { 5279, 5280 }, { 5286, 5287 }, { 5290, 5291 }, { 5294, 5295 }, { 5517, 5518 }, { 5748, 5749 }, { 6200, 6201 }, { 6257, 6258 }, { 6253, 6254 } }, west = { { 1209, 1211 }, { 1210, 1211 }, { 1219, 1220 }, { 1223, 1224 }, { 1227, 1228 }, { 1231, 1233 }, { 1232, 1233 }, { 1237, 1238 }, { 1241, 1242 }, { 1245, 1246 }, { 1249, 1251 }, { 1250, 1251 }, { 1255, 1256 }, { 1259, 1260 }, { 3544, 3546 }, { 3545, 3546 }, { 3547, 3548 }, { 3549, 3550 }, { 3551, 3552 }, { 5082, 5083 }, { 5107, 5109 }, { 5108, 5109 }, { 5110, 5111 }, { 5112, 5113 }, { 5114, 5115 }, { 5125, 5127 }, { 5126, 5127 }, { 5128, 5129 }, { 5130, 5131 }, { 5132, 5133 }, { 5140, 5142 }, { 5141, 5142 }, { 5143, 5145 }, { 5144, 5145 }, { 5281, 5283 }, { 5282, 5283 }, { 5284, 5285 }, { 5288, 5289 }, { 5292, 5293 }, { 5515, 5516 }, { 5748, 5749 }, { 6250, 6251 }, { 6255, 6256 }, { 6198, 6199 }, { 6263, 6264 } } } } function DoorHandler:new(o) o = o or {} -- create object if user does not provide one setmetatable(o, self) self.__index = self return o end function DoorHandler:searchArray(arr, itemid) local ret = nil local i = 1 while true do if(arr[i] == nil) then break end local tmp = arr[i] if(tmp[1] == itemid or tmp[2] == itemid) then ret = tmp break end i = i+1 end return ret end function DoorHandler:getDoor(item) local retDoor = { dir = 0, id = itemid, toid = 0, state = 0, minlvl = 0, keyid = 0 } local ret = self:searchArray(self.doors.north, item.itemid) if(ret == nil) then ret = self:searchArray(self.doors.west, item.itemid) if(ret ~= nil) then retDoor.dir = DIRECTION_WEST end else retDoor.dir = DIRECTION_NORTH end if(ret == nil) then return nil end if(ret[1] == item.itemid) then retDoor.state = DOORSTATE_CLOSED retDoor.toid = ret[2] else retDoor.state = DOORSTATE_OPEN retDoor.toid = ret[1] end if(item.actionid >= 1000 and item.actionid < 2000) then retDoor.minlvl = item.actionid-1000 elseif(item.actionid > 0) then retDoor.keyid = item.actionid end return retDoor end function DoorHandler:getCreatureFromPos(pos) local ret = 0 local tmp = { x=pos.x, y=pos.y, z=pos.z, stackpos=253} local creature = getThingfromPos(tmp) if(creature ~= nil and creature ~= 0 and creature.itemid > 0) then ret = creature.uid end return ret end function DoorHandler:movePlayerTo(cid, toPos) local p = getPlayerPosition(cid) local dist = math.max(math.abs(p.x-toPos.x), math.abs(p.y-toPos.y)) if(dist > 1 or p.z ~= toPos.z) then local ret = doTeleportThing(cid, toPos) return (ret == LUA_NO_ERROR) end if(dist <= 0) then return true end local dir = -1 if(p.y < toPos.y) then --SouthXXX if(p.x < toPos.x) then -- SouthEast dir = DIRECTION_SOUTHEAST elseif(p.x > toPos.x) then -- SouthWest dir = DIRECTION_SOUTHWEST else --South dir = DIRECTION_SOUTH end elseif(p.y > toPos.y) then --NorthXXX if(p.x < toPos.x) then -- NorthEast dir = DIRECTION_NORTHEAST elseif(p.x > toPos.x) then -- NorthWest dir = DIRECTION_NORTHWEST else --North dir = DIRECTION_NORTH end else -- West/East if(p.x < toPos.x) then -- East dir = DIRECTION_EAST elseif(p.x > toPos.x) then -- West dir = DIRECTION_WEST else --None dir = -1 end end if(dir == -1) then return false end local ret = doMoveCreature(cid, dir) return (ret == RETURNVALUE_NOERROR) end function DoorHandler:moveCreatures(thisDoor, doorpos) local lastcid = 0 local cid = self:getCreatureFromPos(doorpos) while (cid ~= 0 and cid ~= lastcid) do lastcid = cid if(thisDoor.dir == DIRECTION_NORTH) then local ret = doMoveCreature(cid, DIRECTION_SOUTH) if(ret ~= RETURNVALUE_NOERROR) then ret = doMoveCreature(cid, DIRECTION_NORTH) if(ret ~= RETURNVALUE_NOERROR) then local destPos = { x = doorpos.x, y = doorpos.y+1, z = doorpos.z } ret = doTeleportThing(cid, destPos) if(ret ~= LUA_NO_ERROR) then destPos = { x = doorpos.x, y = doorpos.y-1, z = doorpos.z } doTeleportThing(cid, destPos) end end end elseif(thisDoor.dir == DIRECTION_WEST) then local ret = doMoveCreature(cid, DIRECTION_EAST) if(ret ~= RETURNVALUE_NOERROR) then ret = doMoveCreature(cid, DIRECTION_WEST) if(ret ~= RETURNVALUE_NOERROR) then local destPos = { x = doorpos.x+1, y = doorpos.y, z = doorpos.z } ret = doTeleportThing(cid, destPos) if(ret ~= LUA_NO_ERROR) then destPos = { x = doorpos.x-1, y = doorpos.y, z = doorpos.z } doTeleportThing(cid, destPos) end end end end cid = self:getCreatureFromPos(doorpos) end end function DoorHandler:useDoor(item, pos, userid, key, playerGenerated) local thisDoor = self:getDoor(item) if(thisDoor == nil) then return 0 end if(key ~= nil and key.actionid ~= thisDoor.keyid) then doPlayerSendTextMessage(userid,22,"The key does not match.") return 1 end if(thisDoor.keyid > 0 and key == nil) then doPlayerSendTextMessage(userid,22,"The door is locked.") return 1 end if(thisDoor.state == DOORSTATE_OPEN and thisDoor.minlvl == 0) then self:moveCreatures(thisDoor, pos) doTransformItem(item.uid, thisDoor.toid) elseif(thisDoor.state == DOORSTATE_CLOSED) then if(thisDoor.minlvl > 0) then local lvl = getPlayerLevel(userid) if(lvl < thisDoor.minlvl) then doPlayerSendTextMessage(userid,22,"You need level " .. thisDoor.minlvl .. " to pass this door.") return 1 else doTransformItem(item.uid, thisDoor.toid) self:movePlayerTo(userid, pos) end else doTransformItem(item.uid, thisDoor.toid) end elseif(thisDoor.state == DOORSTATE_OPEN and thisDoor.minlvl > 0 and not playerGenerated) then doTransformItem(item.uid, thisDoor.toid) end return 1 end if(doorHandler == nil) then doorHandler = DoorHandler:new(nil) end function isPlayerOnPos(pos) local pos2 = pos pos2.stackpos = 253 local thing = getThingfromPos(pos2) if(thing ~= nil and thing.itemid > 0) then if(isPlayer(thing.uid)) then return true end end return false end function comparePos(pos1, pos2) return (pos1.x == pos2.x and pos1.y == pos2.y and pos1.z == pos2.z) end function doCreatureChangeMaxMana(cid, newPMana) local playerMana = getPlayerMaxMana(cid) if (newMana >= playerMana) then doCreatureAddMaxMana(cid, newPMana - playerMana) else doCreatureAddMaxMana(cid, -(playerMana - newPMana)) end return TRUE end function doCreatureChangeMaxHealth(cid, newPHealth) local playerHealth = getPlayerMaxHealth(cid) if (newPHealth >= playerHealth) then doCreatureAddMaxHealth(cid, newPHealth - playerHealth) else doCreatureAddMaxHealth(cid, -(playerHealth - newPHealth)) end return TRUE end Outra coisa é Existe um sistema de reset pra 8.1? Pode ser por action, moveevent qualquer coisa deis de que funcione... Sou grato deis de já ^^ ++++REP pra quem ajudar alguma coisa

local focus = 0 local talk_start = 0 local target = 0 local following = false local attacking = false function onThingMove(creature, thing, oldpos, oldstackpos, item, itemEx) end function onCreatureAppear(creature) end function onCreatureDisappear(cid, pos) if focus == cid then selfSay('Good bye then.') focus = 0 talk_start = 0 end end function onCreatureTurn(creature) end function msgcontains(txt, str) return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)')) end function onCreatureSay(cid, type, msg) msg = string.lower(msg) if (msgcontains(msg, 'hi')) and getDistanceToCreature(cid) < 4 then if getPlayerStorageValue(cid, 25000) == 5 then return selfSay('Você está montando.') end if getPlayerStorageValue(cid, 23000) == 5 then return selfSay('Você está voando.') end if #getCreatureSummons(cid) >= 1 then selfSay('Voce precisa botar seus pokemons dentro da pokebola.') focus = 0 talk_start = 0 return TRUE end if not getTilePzInfo(getCreaturePosition(cid)) then return selfSay('Please enter in the Pokemon Center...') end -- Poke Ball for slo = CONST_SLOT_FIRST, CONST_SLOT_LAST do local item = getPlayerSlotItem(cid, slo) if isContainer(item.uid) then local items = getItemsInContainerById(item.uid, pokeout) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokein) end local items2 = getItemsInContainerById(item.uid, pokein) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeout or item.itemid == pokein then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokein) end end local items = getItemsInContainerById(item.uid, pokeout) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokein) end local items2 = getItemsInContainerById(item.uid, pokein) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeout or item.itemid == pokein then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokein) end -- Ultra Ball local items = getItemsInContainerById(item.uid, pokeoutultra) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokeinultra) end local items2 = getItemsInContainerById(item.uid, pokeinultra) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeoutultra or item.itemid == pokeinultra then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokeinultra) end -- Poke Master local items = getItemsInContainerById(item.uid, pokeoutmaster) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokeinmaster) end local items2 = getItemsInContainerById(item.uid, pokeinmaster) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeoutmaster or item.itemid == pokeinmaster then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokeinmaster) end -- Super Ball local items = getItemsInContainerById(item.uid, pokeoutsuper) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokeinsuper) end local items2 = getItemsInContainerById(item.uid, pokeinsuper) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeoutsuper or item.itemid == pokeinsuper then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokeinsuper) end -- Great Ball local items = getItemsInContainerById(item.uid, pokeoutgreat) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokeingreat) end local items2 = getItemsInContainerById(item.uid, pokeingreat) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeoutgreat or item.itemid == pokeingreat then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokeingreat) end end selfSay("Hello! We've restored your Pokemon to full health. We hope to see you again!") local hp = getCreatureMaxHealth(cid) doCreatureAddHealth(cid, hp) doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_GREEN) focus = 0 talk_start = 0 end end function onCreatureChangeOutfit(creature) end Agora n ta dando erro mais ela não responde quando fala hi olha o script se tem augo errado Fica falando que ta com eero na linha 34 ou 33 =/

Gente oque tem de errado com este script fica falando no exe: Aqui ta o script sou grato quem consseguir consserta :confused: : Este script utiliza o LIB mais so que eu ja configurei e ta funcionando so ele que ta com problema..