Thaygur

Estou procurando desde ontem em vários sites e nada, e pelo que ví ao atacar e movimentar o char sem estar com a HK do elf ativado bate fast também :\
 
@UP

Achei isso em um site polonês
 
Abra suas sources em
 
creature.h
 
Add
 
#define EVENT_CREATURE_THINK_INTERVAL 500
 
Compile e veja se da certo.

Tenta:
function onSay(cid, words, param) local storage = 98798644 local limite = 50 local message = [[ !!!DODGE SYSTEM!!!   Dodge System: O sistema consiste em defender certa porcentagem dos ataques recebidos.   Por Exemplo:     (*) Com 10 de dodge, você vai defender 50% de dano de 3 entre 100 ataques levados.     (*) Com 100 de dodge (o máximo) voce vai defender 50% de dano de 30 entre 100 ataques levados.     (*) Cada pedra que você usar, sua skill de dodge aumenta em 1 ponto.     (*) Podendo no maximo ter 100 pontos.     (*) Para obter a pedra você precisa comprar no Npc Dodge Seller.     (*) Localizado no teleport de NPCS, no templo. ]]     doShowTextDialog(cid, 8300, "" .. message .. " \n Seu nivel de dodge é: [".. getPlayerStorageValue(cid, storage) .."/"..limite.."]. ")     return TRUE end Talvez precise trocar a storage, vá até o .lua da sua stone que provavelmente se encontra em actions, e verifique qual a storage usada no sistema de dodge.

um exemplo em data/weapons/scripts


local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, TRUE) setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 37) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, 41) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1.3, -30, -1.8,0) function onUseWeapon(cid, var) return doCombat(cid, combat, var) end

estes 2 são os efects que vão sair

tenho um script aqui que talvez te ajude.. não sei de quem é, portanto se alguém souber, dê os créditos por mim..
 
abra sua pasta data/weapons/scripts e crie um arquivo chamado efeito.lua
 
cole isto dentro
 
local combat =  createCombatObject() setCombatParam(combat, COMBAT_PARAM_BLOCKARMOR, 1) setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatFormula(combat, COMBAT_FORMULA_SKILL, 0, 0, 1.0, 0) local xCombat = createCombatObject() setCombatParam(xCombat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 36) local condition =  createConditionObject(CONDITION_FIRE) setConditionParam(condition, CONDITION_PARAM_DELAYED, 1) addDamageCondition(condition, 4, 2000, -10) addDamageCondition(condition, 6, 2000, -5) setCombatCondition(xCombat, condition) function onUseWeapon(cid, var) local ret = doCombat(cid, combat, var) if(ret == false) then return false end local target = variantToNumber(var) if(target ~= 0) then -- chance to fire the enemy local chance = math.random(0, 100) if(chance > 90) then ret = doCombat(cid, xCombat, var) end end return ret end agora vá em weapons.xml ache o id da sword que você quer, caso o id não esteja lá crie um.
se tiver o id você apenas substiui, se não tiver.. você adiciona esta tag:
<melee id="7959" level="100" unproperly="1" event="script" value="efeito.lua"> Explicando como por efeito, e level de utilização.
 
Localiza esta parte:
 
setCombatParam(xCombat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 36)
 
FIREDAMAGE - é o dano que irá ocorrer ao efetuar o ataque.
36 - é o efeito que irá aparecer ao atacar algo.. ex: monstros, players e treiners.. tudo!
 
você pode achar os efeitos com o comando /z 1 que vai até o /z 68 se não me engano..
 
agora ache:
createConditionObject(CONDITION_FIRE)
 
vou dar um exemplo do que isto faz:
sabe quando a gente passa em cima do poison e o poison fica arrancando de 5 em 5? então..
 
FIRE - será o que você quer que fique hitando.
 
level de utilização é na weapons.xml e id da sword:
 
<melee id="7959" level="100" unproperly="1" event="script" value="efeito.lua">
 
já deu pra sacar que no 100 ali que é o level requerido né?
 
e a parte em rosa é o id da sword..
 
 
"ah, mas não precisa mexer em nada na pasta items?"
R= Não, porque na weapons.xml está configurado para ler apenas o script..

function onUse(cid) local values = { [1] = {male = {lookType = 10, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 11, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, [2] = {male = {lookType = 20, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 21, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, [3] = {male = {lookType = 30, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 31, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, [4] = {male = {lookType = 40, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 41, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, [5] = {male = {lookType = 50, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 51, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, [6] = {male = {lookType = 60, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 61, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, [7] = {male = {lookType = 70, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 71, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, [8] = {male = {lookType = 80, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, female = {lookType = 81, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0} }, } if getPlayerSex(cid) == 0 then doCreatureChangeOutfit(cid, values[getPlayerVocation(cid)].female) else doCreatureChangeOutfit(cid, values[getPlayerVocation(cid)].male) end return true end

Tenta assim :
 
local txt = { [1] = {"Baiak", {x = 160, y = 54, z = 7}}, [2] = {"Vip City", {x = 166, y = 50, z = 7}}, [3] = {"Welcome", {x = 158, y = 51, z = 4}}, [4] = {"Trainers", {x = 158, y = 47, z = 7}}, [5] = {"Quest", {x = 167, y = 51, z = 7}}, } function onThink(interval, lastExecution) for i = 1, 5 do doSendAnimatedText(text[i][2], text[i][1], math.random(1, 255)) end return true end

COE KALELINHA QUE MORA LOGO ALI !
Olá TKbianos,
Trouxe para vocês um script antigo, só que atualizado, por mim mesma !
É o do Addon Doll... Vejo servers de 8.6 que não tem o comando do script para dar os addons de Warmaster/Wayfarer, então eu descidi atualizar ele totalmente para 9.44 até o ultimo outfit !

Crie um arquivo .lua na pasta Talkactions>Scripts chamado addondoll.lua , e bote isso aqui :

function onSay(cid, words, param) local addondollid = 2112 local femaleOutfits = { ["citizen"]={136}, ["hunter"]={137}, ["mage"]={138}, ["knight"]={139}, ["nobleman"]={140}, ["summoner"]={141}, ["warrior"]={142}, ["barbarian"]={147}, ["druid"]={148}, ["wizard"]={149}, ["oriental"]={150}, ["pirate"]={155}, ["assassin"]={156}, ["beggar"]={157}, ["shaman"]={158}, ["norsewoman"]={252}, ["nightmare"]={269}, ["jester"]={270}, ["brotherhood"]={279}, ["demonhunter"]={288}, ["yalaharian"]={324} , ["wayfarer"]={366}, ["afflicted"]={431}, ["elementalist"]={433}, ["deepling"]={464}, ["insectoid"]={466}, ["entrepreneur"]={471} } local maleOutfits = { ["citizen"]={128}, ["hunter"]={129}, ["mage"]={130}, ["knight"]={131}, ["nobleman"]={132},["summoner"]={133}, ["warrior"]={134}, ["barbarian"]={143}, ["druid"]={144}, ["wizard"]={145}, ["oriental"]={146}, ["pirate"]={151}, ["assassin"]={152}, ["beggar"]={153}, ["shaman"]={154}, ["norsewoman"]={251}, ["nightmare"]={268}, ["jester"]={273}, ["brotherhood"]={278}, ["demonhunter"]={289}, ["yalaharian"]={325}, ["wayfarer"]={367}, ["afflicted"]={430}, ["elementalist"]={432}, ["deepling"]={463}, ["insectoid"]={465}, ["entrepreneur"]={472} } local msg = {"Digite o nome correto!", "Voce não possui Addon Doll!", "Bad param!", "Você recebeu seu addons!"} local param = string.lower(param) if (not isPremium(cid)) then doPlayerSendCancel(cid, "Você nao tem premium account.") return TRUE end if(getPlayerItemCount(cid, addondollid) > 0) then if(param ~= "" and maleOutfits[param] and femaleOutfits[param]) then doPlayerRemoveItem(cid, addondollid, 1) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[4]) doSendMagicEffect(getCreaturePosition(cid), CONST_ME_GIFT_WRAPS) if(getPlayerSex(cid) == 0)then doPlayerAddOutfit(cid, femaleOutfits[param][1], 3) else doPlayerAddOutfit(cid, maleOutfits[param][1], 3) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[1]) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[2]) end end
Bote isso no arquivo talkaction.xml :

<talkaction words="!addon" event="script" value="addondoll.lua"/>

Configurando o addondoll.lua :
Já está configurado, mas caso vocês queiram mudar o ID do addondoll é só trocar aqui :

local addondollid = 2112

Espero que sejá util xD

Att. Huziwara no Mokou

function onSay(cid, words, param) local addondollid = 2112 local femaleOutfits = { ["citizen"]={136}, ["hunter"]={137}, ["mage"]={138}, ["knight"]={139}, ["nobleman"]={140}, ["summoner"]={141}, ["warrior"]={142}, ["barbarian"]={147}, ["druid"]={148}, ["wizard"]={149}, ["oriental"]={150}, ["pirate"]={155}, ["assassin"]={156}, ["beggar"]={157}, ["shaman"]={158}, ["norsewoman"]={252}, ["nightmare"]={269}, ["jester"]={270}, ["brotherhood"]={279}, ["demonhunter"]={288}, ["yalaharian"]={324} , ["wayfarer"]={366}, ["afflicted"]={431}, ["elementalist"]={433}, ["deepling"]={464}, ["insectoid"]={466}, ["entrepreneur"]={471}, ["warmaster"]={336}} local maleOutfits = { ["citizen"]={128}, ["hunter"]={129}, ["mage"]={130}, ["knight"]={131}, ["nobleman"]={132},["summoner"]={133}, ["warrior"]={134}, ["barbarian"]={143}, ["druid"]={144}, ["wizard"]={145}, ["oriental"]={146}, ["pirate"]={151}, ["assassin"]={152}, ["beggar"]={153}, ["shaman"]={154}, ["norsewoman"]={251}, ["nightmare"]={268}, ["jester"]={273}, ["brotherhood"]={278}, ["demonhunter"]={289}, ["yalaharian"]={325}, ["wayfarer"]={367}, ["afflicted"]={430}, ["elementalist"]={432}, ["deepling"]={463}, ["insectoid"]={465}, ["entrepreneur"]={472}, ["warmaster"]={335} } local msg = {"Digite o nome correto!", "Voce não possui Addon Doll!", "Bad param!", "Você recebeu seu addons!"} local param = string.lower(param) if (not isPremium(cid)) then doPlayerSendCancel(cid, "Você nao tem premium account.") return TRUE end if(getPlayerItemCount(cid, addondollid) > 0) then if(param ~= "" and maleOutfits[param] and femaleOutfits[param]) then doPlayerRemoveItem(cid, addondollid, 1) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[4]) doSendMagicEffect(getCreaturePosition(cid), CONST_ME_GIFT_WRAPS) if(getPlayerSex(cid) == 0)then doPlayerAddOutfit(cid, femaleOutfits[param][1], 3) else doPlayerAddOutfit(cid, maleOutfits[param][1], 3) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[1]) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[2]) end end

Amigo, inserir isso não tem nada a ver..
 
Tive esse problema também, fiquei horas e horas modificando a source e olha que solução mais estúpida (NAO TEM NADA A VER COM A SOURCE!)
 
O notepad++ estava salva normalmente como UTF-8 (SEM BOM). Apesar de aceitar acentos, eu converti para ANSI e assim os acentos funcionaram.. 
 
SIM, É SOH FAZER ISSO (¬¬) Raiva kkkkk

function onSay(cid, words, param) local text = 'Critical System: O sistema consiste em Hitar 50% a mais em seus ataques. Por Exemplo: Com 10 de critical, voce vai hitar 50% de dano de 3 entre 100 ataques desferidos ao seu oponente. Com 100 de critical (o maximo) voce vai hitar 50% de dano de 30 entre 100 ataques desferidos ao oponente. Cada pedra que voce usar, sua skill de critical aumenta em 1 ponto. Podendo no maximo ter 100 pontos. Para obter a pedra voce precisa comprar no Npc Dodge/critical Seller.' doShowTextDialog(cid, 2160, text) return true end

só um detalhe.. se vc quiser pular linha no texto você pode usar \n. Ficando assim:
local text = '           CRITICAL SYSTEM.\nCritical System: O sistema consiste em Hitar 50% a mais em seus ataques.\nPor Exemplo:\n Com 10 de critical, voce vai hitar 50% de dano de 3 entre 100 ataques desferidos ao seu oponente. Com 100 de critical (o maximo) voce vai hitar 50% de dano de 30 entre 100 ataques desferidos ao oponente. Cada pedra que voce usar, sua skill de critical aumenta em 1 ponto. Podendo no maximo ter 100 pontos. Para obter a pedra voce precisa comprar no Npc Dodge/critical Seller.' e na função doShowTextDialog(cid, 2160, text) você pode editar o icone do item que aparece ali em cima trocando o número do meio... nesse exemplo do @Nogard será o item de id 2160 (crystal coin) que aparecerá como icone.

Fonte:  http://www.tibiaking.com/forum/topic/49095-lib-000-const/
Eu mesmo...
 
 
CONST_ME:
 
 
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_TELEPORT = 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_GREEN = 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 (OBS: são as nuvens do exevo gran mas vis)
 
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    (é quase igual, só que cresce mais, não consegui gif)
 
CONST_ME_CAKE = 51   
 
CONST_ME_GIANTICE = 52   
 
CONST_ME_WATERSPLASH = 53  
 
CONST_ME_PLANTATTACK = 54   
 
CONST_ME_TUTORIALARROW = 55   
 
CONST_ME_TUTORIALSQUARE = 56   
 
CONST_ME_MIRRORHORIZONTAL = 57   
 
CONST_ME_MIRRORVERTICAL = 58   
 
CONST_ME_SKULLHORIZONTAL = 59  
  
CONST_ME_SKULLVERTICAL = 60   
 
CONST_ME_ASSASSIN = 61   
 
CONST_ME_STEPSHORIZONTAL = 62 (Ignorado)
CONST_ME_BLOODYSTEPS = 63 (Ignorado)
CONST_ME_STEPSVERTICAL = 64 (Ignorado)
 
CONST_ME_YALAHARIGHOST = 65   
 
CONST_ME_BATS = 66   
 
CONST_ME_SMOKE = 67  
  
CONST_ME_INSECTS = 68   
 
CONST_ME_NONE = 255
CONST_ME_LAST = CONST_ME_INSECTS
 
      Depois eu posto o CONST_ANI

Eu gostaria de vende Premium Account ao inves de VIP no meu Gesior.

Tentei aditar o shopsystem mas ele adiciona muitos números em premdays e ele não inverte como na VIP.
Tentei PACC mas é a mesma coisa de VIPDAY


Grato



EDITTTT

CONSEGUIR!

Só por via de registro:

Basta colocar este codigo em baixo de if($buy_offer['type'] == 'vipdays') {

$player_vip_time = $buy_player_account->getCustomField('premdays');
if($player_vip_time > 0)
$buy_player_account->setCustomField('premdays', $player_vip_time + $buy_offer['days']);
else
$buy_player_account->setCustomField('premdays', $player_vip_time + $buy_offer['days']);
$buy_player_account->setCustomField('premium_points', $user_premium_points-$buy_offer['points']);
$user_premium_points = $user_premium_points - $buy_offer['points'];
if ($player_vip_days >= 1) {
}