Subwat

aquela é area de quests.

removido.

Esse comando você poderá comprar uma Magia por VIP Coins ou dinheiro tanto faz. talkaction: function onSay(cid, words, param) if param == "" then doPlayerSendTextMessage(cid,18, "!spell aurora. preco 5 vip coins. magia para magos.") end if param == "death damage" then if getPlayerVocation(cid) == 1 or getPlayerVocation(cid) == 2 or getPlayerVocation(cid) == 5 or getPlayerVocation(cid) == 6 and (getPlayerStorageValue(cid,202050) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,202050,1) doPlayerSendTextMessage(cid,25, 'you earned the spell death damage spell words Aurora.') else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end else doPlayerSendTextMessage(cid,25, 'voce ja tem esta magia!') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end end end tag: <talkaction words="!spell" script="spell.lua"/> Spells: exemplo de spell: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGYBALL) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -120.5, -30, -120.1, 0) local condition = createConditionObject(CONDITION_HASTE) setConditionParam(condition, CONDITION_PARAM_TICKS, 22000) setConditionFormula(condition, -1.1, -1, -1.2, -1) setCombatCondition(combat, condition) local arr = { {0, 0, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 3, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 0, 0} } local area = createCombatArea(arr) setCombatArea(combat, area) function onCastSpell(cid, var) if (getPlayerStorageValue(cid,202050) == 1) then doCreatureSay(cid, "vis Damage", TALKTYPE_ORANGE_1) return doCombat(cid, combat, var) else doPlayerSendCancel(cid,"voce nao comprou esta magia.") end return TRUE end TAG: <instant name="physical damage" words="aurora" lvl="5000" mana="3000" prem="1" needweapon="0" exhaustion="1000" needlearn="0" event="script" value="attack/aurora.lua"> <vocation id="1"/> <vocation id="2"/> </instant> você poderá adicionar varias magias ao comando vou dar um exemplo aqui em baixo de como ficaria com varias magias. function onSay(cid, words, param) if param == "" then doPlayerSendTextMessage(cid,18, "!spell death damage. preco 5 vip coins. magia para magos.") doPlayerSendTextMessage(cid,18, "!spell song damage. preco 5 vip coins. magia para paladinos.") doPlayerSendTextMessage(cid,18, "!spell ultra damage. preco 5 vip coins. magia para knights.") doPlayerSendTextMessage(cid,18, "!spell holy damage. preco 10 vip coins. magia para knights e paladinos.") doPlayerSendTextMessage(cid,18, "!spell vis damage. preco 10 vip coins. magia para magos.") end if param == "death damage" then if getPlayerVocation(cid) == 1 or getPlayerVocation(cid) == 2 or getPlayerVocation(cid) == 5 or getPlayerVocation(cid) == 6 and (getPlayerStorageValue(cid,202020) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,202020,1) doPlayerSendTextMessage(cid,25, 'you earned the spell death damage spell words EXEVO MAS DEAD.') else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end else doPlayerSendTextMessage(cid,25, 'voce ja tem esta magia!') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end end if param == "vis damage" then if getPlayerVocation(cid) == 1 or getPlayerVocation(cid) == 2 or getPlayerVocation(cid) == 5 or getPlayerVocation(cid) == 6 and (getPlayerStorageValue(cid,202050) == -1) then if doPlayerRemoveItem(cid,11192,10) then setPlayerStorageValue(cid,202050,1) doPlayerSendTextMessage(cid,25, 'you earned the spell vis damage spell words AURORA.') else doPlayerSendTextMessage(cid,25, 'voce nao tem 10 vip coins.') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end else doPlayerSendTextMessage(cid,25, 'voce ja tem esta magia!') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end end if param == "song damage" then if getPlayerVocation(cid) == 3 or getPlayerVocation(cid) == 7 and (getPlayerStorageValue(cid,202030) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,202030,1) doPlayerSendTextMessage(cid,25, 'you earned the spell song damage spell words EXEVO SONG PALLY.') else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end else doPlayerSendTextMessage(cid,25, 'voce ja tem esta magia!') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end end if param == "holy damage" then if getPlayerVocation(cid) == 7 or getPlayerVocation(cid) == 8 and (getPlayerStorageValue(cid,202060) == -1) then if doPlayerRemoveItem(cid,11192,10) then setPlayerStorageValue(cid,202060,1) doPlayerSendTextMessage(cid,25, 'you earned the spell song damage spell words CALDERA.') else doPlayerSendTextMessage(cid,25, 'voce nao tem 10 vip coins.') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end else doPlayerSendTextMessage(cid,25, 'voce ja tem esta magia!') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end end if param == "ultra damage" then if getPlayerVocation(cid) == 8 or getPlayerVocation(cid) == 4 and (getPlayerStorageValue(cid,202040) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,202040,1) doPlayerSendTextMessage(cid,25, 'you earned the spell ultra damage spell words EXORI MAS GRAN.') else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end else doPlayerSendTextMessage(cid,25, 'voce ja tem esta magia!') doSendAnimatedText(getPlayerPosition(cid),"failure", math.random(01,255)) end end end Créditos: Subwat

esse comando você precisará modificar sua LIB Com em 050-funcion no final onde fala sobre skill mude para . créditos vodkart. Comando Funciona da seguinte forma: você digita !distance first;para comprar a primeira parte do skill Por 5 vip coins (no meu ot esse item é a ID 11192) seu skill ficará 250 voce pode alterar basta ler no codigo é muito facil. depois de comprar !distance first voce poderá comprar !distance second e ficar skill 300 e depois !distance third e depois !distance fourth. Agora a Talkaction: function onSay(cid, words, param) if param == "" then doPlayerSendTextMessage(cid,18, "!distance first. preco 5 vip coins.") doPlayerSendTextMessage(cid,18, "!distance second. preco 5 vip coins.") doPlayerSendTextMessage(cid,18, "!distance third. preco 5 vip coins.") doPlayerSendTextMessage(cid,18, "!distance fourth. preco 5 vip coins.") end if param == "first" or param == "1" then if getPlayerVocation(cid) == 7 or getPlayerVocation(cid) == 3 then if (getPlayerStorageValue(cid,101010) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,101010,1) doPlayerSetSkill(cid, 4, 250) else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') end else doPlayerSendTextMessage(cid,25, 'voce ja utilizou a first.') end else doPlayerSendTextMessage(cid,25, 'voce precisa ter promotion\n5 vip coins \nseu skill ficara 250! \nse caso ja tiver usado a first utilize a second.') end end if param == "second" or param == "2" then if getPlayerVocation(cid) == 7 or getPlayerVocation(cid) == 3 and (getPlayerStorageValue(cid,101010) == 1) then if (getPlayerStorageValue(cid,101020) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,101020,1) doPlayerSetSkill(cid, 4, 300) else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') end else doPlayerSendTextMessage(cid,25, 'voce ja utilizou a second.') end else doPlayerSendTextMessage(cid,25, 'voce precisa ter promotion\n5 vip coins \nseu skill ficara 300! \nse caso ja tiver usado a second utilize a third.') end end if param == "third" or param == "3" then if getPlayerVocation(cid) == 7 or getPlayerVocation(cid) == 3 and (getPlayerStorageValue(cid,101020) == 1) then if (getPlayerStorageValue(cid,101030) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,101030,1) doPlayerSetSkill(cid, 4, 350) else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') end else doPlayerSendTextMessage(cid,25, 'voce ja utilizou a third.') end else doPlayerSendTextMessage(cid,25, 'voce precisa ter promotion\n5 vip coins \nseu skill ficara 350! \nse caso ja tiver usado a first utilize a fourth.') end end if param == "fourth" or param == "4" then if getPlayerVocation(cid) == 7 or getPlayerVocation(cid) == 3 and (getPlayerStorageValue(cid,101030) == 1) then if (getPlayerStorageValue(cid,101040) == -1) then if doPlayerRemoveItem(cid,11192,5) then setPlayerStorageValue(cid,101040,1) doPlayerSetSkill(cid, 4, 400) else doPlayerSendTextMessage(cid,25, 'voce nao tem 5 vip coins.') end else doPlayerSendTextMessage(cid,25, 'voce ja utilizou a fourth.') end else doPlayerSendTextMessage(cid,25, 'voce precisa ter promotion\n5 vip coins \nseu skill ficara 400! \n voce precisa utilizar a first,second,third para usar esta.') end end end TAG: <!-- skill buying --> <talkaction words="!distance" script="distance.lua"/> créditos: Subwat (talk) Vokart (lib)

Comando Online modificado para Mostrar Max Health Max Mana E Premium days dos Players! local config = { showGamemasters = getBooleanFromString(getConfigValue('displayGamemastersWithOnlineCommand')) } function getResets(cid) resets = getPlayerStorageValue(cid,2310) if resets < 0 then resets = 0 end return resets end function onSay(cid, words, param, channel) local players = getPlayersOnline() local strings = {""} local i, position = 1, 1 local added = false for _, pid in ipairs(players) do if(added) then if(i > (position * 7)) then strings[position] = strings[position] .. "•" position = position + 1 strings[position] = "" else strings[position] = i == 1 and "" or strings[position] .. "• " end end if((config.showGamemasters or getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES) or not getPlayerCustomFlagValue(pid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES)) and (not isPlayerGhost(pid) or getPlayerGhostAccess(cid) >= getPlayerGhostAccess(pid))) then strings[position] = strings[position] .. getCreatureName(pid) .. " HP: ".. getCreatureMaxHealth(pid) .." MP: ".. getCreatureMaxMana(pid) .." Vip Days: ".. getPlayerPremiumDays(pid) .." \n" i = i + 1 added = true else added = false end end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, (i - 1) .. " On:") for i, str in ipairs(strings) do if(str:sub(str:len()) ~= ",") then str = str .. "" end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, str) end return true end Créditos: Subwat

não tem virus no servidor,só se for falso positivo mas isso da em todos os executaveis.

da namelock.

os multi coins vc consegue nas quests.

eu não acho legal,e nem devo achar legal o que eu faço,quem acha é quem baixa e me reputa. até

não sei cara,eu não faço servidores editadinhos,eu faço servidores do zero para sua informação. flws eu não estária com Reputation: 359 se eu só postasse coisinha editadinha de alguma coisinha que ja existe. reflita. ja fiz muito por essa comunidade cara,só não faço mais por disgosto.

me diga o que RPG significa para você. pois falar em RPG nessa comunidade é meio tenso pois aonde está o RPG nos servidores desta comunidade?99,9% dos servidors dessa comunidade são iguais apenas editadinhos com teleportizinhos e monstrinhos editadinhos,tudo editado apartir de uma mesma base o que não leva a RPG nenhum,editar a vida inteira a mesma coisa,não venha falar dos meus mapas e rpg,eu nunca postei nada com RPG aqui até por que é perda de tempo,o que eu ganharei com isso?as crianças de hoje em dia não curtem rpg,elas curtem teleports e videos pornos,só isso quanto mais facil o joguinho melhor,então não tente me dizer que meus servidores não tem RPG,quando uma comunidade inteira é da mesma forma,e me dizer que servidores globais é RPG,também é foda,aonde está o RPG em jogar num mesmo mapinha só que com mais bugs que o tibia.com ? qual a moral disso. me diga xau.

eu daria os parabéns se o que o cara que ganhou pensa-se e agisse da forma que escreve. eu fazia ots com ele a 1 ano já,e tudo que ele queria era o dinheiro se não dava lucro pedia para fazer um novo mapa ou editar qualquer um outro,o servidor que hoje ele tem online e que dá dinheiro para ele foi eu que fiz do zero ficamos 7 meses com o servidor online juntos,e por que não estava dando tanta grana quanto ele queria ele resolveu não renovar o dedicado,e depois vendo que foi uma besteira e perda de dinheiro não deixar on,reabriu o servidor sem os meus créditos por tudo,com algo que eu fiz SOZINHO,com certeza esté foi o pior ganhador de alguma coisa daqui =D e não duvido nada que não tenha Sido ele quem se deu ao trabalho de elaborar o texto,=D Só entrei pra dizer isso mesmo tchau. att

sim,comcerteza qualquer um consegue editar um servidor,porém para sua informação este servidor é 100% próprio criado do zero e não "editado" ok? flw.

opa pessoal atualizações desse servidor só em janeiro quando eu tiver tempo e vontade,malz.

reverta a situação criando um nome de usuário criativo. já é um bom começo. =D

poisé né nem sei como andam as coisas por aqui mas quando eu frequentava os novatos só postavam edições de baiaks e quase ninguem postava algo inovador e próprio (só eu ) bjs

não é por comando é por runa.