Snowsz
Héroi
-
Registro em
-
Última visita
Tudo que Snowsz postou
-
Isso vai fazer com que não troque o nome do monstro... local shinys = {"Venusaur", "Charizard", "Blastoise", "Butterfree", "Beedrill", "Pidgeot", "Rattata", "Raticate", "Raichu", "Zubat", "Golbat", "Paras", "Parasect", "Venonat", "Venomoth", "Growlithe", "Arcanine", "Abra", "Alakazam", "Tentacool", "Tentacruel", "Farfetch'D", "Grimer", "Muk", "Gengar", "Onix", "Krabby", "Kingler", "Voltorb", "Electrode", "Cubone", "Marowak", "Hitmonlee", "Hitmonchan", "Tangela", "Horsea", "Seadra", "Scyther", "Jynx", "Electabuzz", "Pinsir", "Magikarp", "Gyarados", "Snorlax", "Dragonair", "Dratini", "Machamp"} local raros = {"Dragonite"} local function doWildName(cid) local lvl = pokes[getCreatureName(cid)].level local newNm = "["..Wild.."]"..getCreatureName(cid) local pos = {x=getCreaturePosition(cid).x, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z} if not isPlayer(cid) and not isSummon(cid) then doRemoveCreature(cid) doCreateMonsterNick(getCreatureName(cid),newNm,pos) end return true end local function doShinys(cid) if isCreature(cid) then if isSummon(cid) then return true end if getPlayerStorageValue(cid, 74469) >= 1 then return true end if getPlayerStorageValue(cid, 22546) >= 1 then return true end if isNpcSummon(cid) then return true end if getPlayerStorageValue(cid, 637500) >= 1 then return true end --alterado v1.9 if isInArray(shinys, getCreatureName(cid)) and math.random(1, 1000) <= 5 then local position = {x=getCreaturePosition(cid).x, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z} local newName = "Shiny "..getCreatureName(cid).."" doRemoveCreature(cid) local s = doCreateMonster(newName, position) doSendMagicEffect(getThingPos(s), 18) end end end function onSpawn(cid) print(getCreatureName(cid)) registerCreatureEvent(cid, "Exp") if isSummon(cid) then registerCreatureEvent(cid, "SummonDeath") return true end doShiny(cid) doShinys(cid) doWildName(cid) return true end function doShiny(cid) if isPlayer(cid) or isNpc(cid) then return true end local position = {x=581, y=980, z=7} local level = pokes[getCreatureName(cid)].level local newName = "Wild "..getCreatureName(cid).."["..level.."]" doRemoveCreature(cid) doCreateMonsterNick(getCreatureName(cid),newName, position) return true end -
Faça o seguinte, use o notepad++ e abra o arquivo.lua desse tal broadcast, nele, clique em formatação e dai, formatar para UTF-8(sem bom) e salve, se não funcionar, formate para ANSI, tenta isso.
-
Meu caro, esse problema não é no OTClient, é no script que você usa.
-
Me de um exemplo de "caractere especial" bugado.
-
O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Mapping"
-
O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Programação"
-
function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor) if isPlayer(cid) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "Parabéns, você tem acesso a Yalahar.") end return true end
-
function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor) if isPlayer(cid) then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Parabéns, você tem acesso a Yalahar.") end return true end
-
O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Scripts"
-
O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Scripts"
-
function onCastSpell(cid) local mana = getCreatureMana(cid) doCreatureAddMana(cid, -mana) doPlayerAddSpentMana(cid, mana) return true end O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Scripts"
-
Você que pensa rsrsrs, os sistemas de MOBA não são tão fáceis assim... De certo modo, até que seria legal, montar esse servidor mesmo que seja como um pequeno "passa-tempo", mexendo nele sempre que puder, pois eu, não estou com muito tempo disponível, estou tentando retomar "as rédias" kk. Então... Como o Liongm disse, o maior problema atualmente é as sprites, como eu mexo no OTClient, posso fazer uma tela especial para a seleção dos campeões etc... Também um problema seria o mapper...
-
Tópico fechado, já chega de mensagens desnecessárias, já foi dito que ela não faz mais scripts para esse tópico.
-
Pode explicar melhor? Não fique postando coisas inúteis por favor.
-
Tenta assim: function onJoinChannel(cid, channelId, users, isTv) if channelId == 10 then doShowPokemonStatistics(cid) return false end if channelId == 11 then doPlayerPopupFYI(cid, getHighscoreString(8)) return false end if channelId == 12 then doPlayerPopupFYI(cid, getHighscoreString(6)) return false end --////////////////////////////////////////////////////////////////////////////////////////-- if channelId >= 13 and channelId <= 18 then doSendAnimatedText(getThingPos(cid), (channelId-12).." Poke"..(channelId > 13 and "s" or ""), COLOR_BURN) setPlayerStorageValue(cid, 52481, (channelId-12)) if isInParty(cid) then local party = getPartyMembers(cid) if #party >= 2 then for i = 1, #party do if getPlayerStorageValue(party[i], 52481) <= -1 then --alterado v2.6 duel system setPlayerStorageValue(party[i], 52481, (channelId-12)) end end end elseif not isInParty(cid) then for _, sid in ipairs(getPlayersOnline()) do if getPlayerStorageValue(sid, 52482) == getCreatureName(cid) then if getPlayerStorageValue(sid, 52481) == -1 then setPlayerStorageValue(sid, 52481, (channelId-12)) end end end end addEvent(doSendAnimatedText, 1000, getThingPos(cid), "BATTLE", COLOR_ELECTRIC) doPlayerSetVocation(cid, 1) return false end --////////////////////////////////////////////////////////////////////////////////////////-- if channelId >= 100 and channelId <= 10000 then local owner = getPlayerByGUID(getChannelOwner(channelId)) if isChannelTv(channelId) then if isCreature(owner) then if owner ~= cid then doPlayerWatchOther(cid, owner) local plural = #users == 1 and "" or "s" doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is now watching your channel (currently '..#users..' player'..plural..' watching this channel).', 15, channelId) else setPlayerStorageValue(cid, 99284, 1) end end elseif owner == cid then setPlayerStorageValue(cid, 99284, 2) end return true end return true end function onLeaveChannel(cid, channelId, users) if channelId >= 100 and channelId <= 10000 then local owner = getPlayerByGUID(getChannelOwner(channelId)) if isChannelTv(channelId) then if owner ~= cid and getCreatureOutfit(cid).lookType == 814 then doPlayerStopWatching(cid) local plural = #users == 2 and "" or "s" doPlayerSendChannelMessage(owner, "TV Channel", getCreatureName(cid)..' is not watching your channel anymore (currently '..#users - (1)..' player'..plural..' watching this channel).', 15, channelId) elseif owner == cid then setPlayerStorageValue(cid, 99284, -1) doSendAnimatedText(getThingPos(cid), "CAM OFF", 180) for stops = 1, #users do if users[stops] ~= owner then doPlayerStopWatching(users[stops]) end end end elseif owner == cid then setPlayerStorageValue(cid, 99284, -1) end return true end return true end function onMove(cid, fromPosition, toPosition) -- Código não é mais necessário, feito em c++ -- Code deprecated, made in c++ --if not canWalkOnPos(toPosition, false, false, false, true, false) and getPlayerStorageValue(cid, 17000) >= 1 then -- doTeleportThing(cid, fromPosition, false) -- doPlayerSendCancel(cid, "Sorry, not possible.") --end if getPlayerStorageValue(cid, 99284) <= 0 then return true end local speed = getCreatureSpeed(cid) local a = getWatchingPlayersFromPos(cid, fromPosition) for b = 1, #a do if getCreatureSpeed(a[b]) ~= speed then doChangeSpeed(a[b], - getCreatureSpeed(a[b])) doChangeSpeed(a[b], speed) end doTeleportThing(a[b], toPosition, true) end return true end local permited = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "x", "w", ",", "'", '"', "y", "z", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", ".", "!", "@", "#", "$", "%", "&", "*", "(", ")", "-", "_", "+", "/", ";", ":", "?", "^", "~", "{", "[", "}", "]", ">", "<", "£", "¢", "¬"} function onTextEdit(cid, item, newText) if item.itemid == 12330 then if getPlayerStorageValue(cid, 99284) >= 1 then doPlayerSendCancel(cid, "You are already on air!") return false end local channelName = getCreatureName(cid).."'s TV Channel" if string.len(newText) <= 0 then doPlayerSendCancel(cid, "Your channel is going to be shown as \""..getCreatureName(cid).."'s TV Channel\".") elseif string.len(newText) > 25 then doPlayerSendCancel(cid, "Your channel name can't have more than 25 characters.") return false else channelName = newText end setPlayerStorageValue(cid, 99284, 1) setPlayerStorageValue(cid, 99285, "") setPlayerStorageValue(cid, 99285, channelName) doPlayerCreatePrivateChannel(cid, channelName) doSendAnimatedText(getThingPos(cid), "ON AIR!", COLOR_GRASS) return false end return true end
-
-
function onStepIn(cid, item, position, fromPosition) timenow = os.time() quantity = math.floor((getPlayerStorageValue(cid,13500) - timenow)/(3600*24)) if isPlayer(cid) then if quantity > 0 then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você ainda tem ".. quantity .." dia(s) restante(s) de VIP.") else dir = getPlayerLookDir(cid) pos = getCreaturePosition(cid) if dir == 0 then newpos = {x=pos.x, y=pos.y+1, z=pos.z} elseif dir == 2 then newpos = {x=pos.x, y=pos.y-1, z=pos.z} elseif dir == 1 then newpos = {x=pos.x-1, y=pos.y, z=pos.z} elseif dir == 3 then newpos = {x=pos.x+1, y=pos.y, z=pos.z} end doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doSendMagicEffect(position, CONST_ME_MAGIC_BLUE) doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Somente jogadores VIPs podem entrar nesta área.") end end end
-
Tente abrir em modo de compatibilidade.
-
O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → OTServ Geral" Para: "OTServ → Projetos / Formação de Equipes → Formação de Equipes"
-
O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de WebSites" Na próxima vez, veja a área correta isso é de WEBSITES não de OTSERVER, se possível, pesquise também. http://www.tibiaking.com/forum/topic/55426-multisites-com-xampp/
-
Fazendo isso vai fazer com que o "monstro" modificado não possa ser atacado, que é TOTALMENTE o contrário do que ele quer, por favor, leia tudo antes de postar...
-
O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Scripts" Para: "OTServ → Aprovação de Tópicos de Conteúdos"
-
Na verdade isso foi feito do zero. E o certo é "script" não "scripth", e esse tal shop ai, por um bom tempo não vai aparecer no fórum, creio eu, é bem ruim de fazer. O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Scripts" Para: "OTServ → Suporte OTServ → Suporte de Clients"
-
Como eu disse, não é loot rate 0, é 1! Loot rate em 0 não vai nem dropar loot.
-
function onUse(cid, item, frompos, item2, topos) local level = getPlayerLevel(cid) local mlevel = getPlayerMagLevel(cid) local exhausted_seconds = 1 local exhausted_storagevalue = 7480 local mana_minimum = 100000 local mana_maximum = 100000 local mana_add = math.random(mana_minimum, mana_maximum) if(item.type >= 1) then if os.time() > getPlayerStorageValue(cid, exhausted_storagevalue) then if isPlayer(cid) then doSendMagicEffect(topos,12) doPlayerAddMana(cid, mana_add) setPlayerStorageValue(cid, exhausted_storagevalue, os.time() + exhausted_seconds) doChangeTypeItem(item.uid, item.type - 1) else setPlayerStorageValue(cid, exhausted_storagevalue, os.time() + exhausted_seconds) doRemoveItem(item.uid, 1) doSendMagicEffect(frompos, 18) doCreatureAddHealth(cid, mana_add) doChangeTypeItem(item.uid,item.type-1) doPlayerAddMana(cid, mana_add) doCreatureSay(cid, "Senzu!", TALKTYPE_ORANGE_1) end else doSendMagicEffect(frompos, CONST_ME_POFF) doPlayerSendCancel(cid, "You are exhausted.") end else if os.time() < getPlayerStorageValue(cid, exhausted_storagevalue) then doSendMagicEffect(frompos, CONST_ME_POFF) doPlayerSendCancel(cid, "You are exhausted.") else if isPlayer(cid) then doSendMagicEffect(topos,12) doPlayerAddMana(cid, mana_add) doPlayerAddHealth(cid, mana_add*1.5) doCreatureSay(cid, "Senzu!", TALKTYPE_ORANGE_1) else doSendMagicEffect(frompos, CONST_ME_POFF) doPlayerSendCancel(cid, "You are exchausted.") end end end return true end
